pic32mx795f512h.pp 3.5 MB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595145961459714598145991460014601146021460314604146051460614607146081460914610146111461214613146141461514616146171461814619146201462114622146231462414625146261462714628146291463014631146321463314634146351463614637146381463914640146411464214643146441464514646146471464814649146501465114652146531465414655146561465714658146591466014661146621466314664146651466614667146681466914670146711467214673146741467514676146771467814679146801468114682146831468414685146861468714688146891469014691146921469314694146951469614697146981469914700147011470214703147041470514706147071470814709147101471114712147131471414715147161471714718147191472014721147221472314724147251472614727147281472914730147311473214733147341473514736147371473814739147401474114742147431474414745147461474714748147491475014751147521475314754147551475614757147581475914760147611476214763147641476514766147671476814769147701477114772147731477414775147761477714778147791478014781147821478314784147851478614787147881478914790147911479214793147941479514796147971479814799148001480114802148031480414805148061480714808148091481014811148121481314814148151481614817148181481914820148211482214823148241482514826148271482814829148301483114832148331483414835148361483714838148391484014841148421484314844148451484614847148481484914850148511485214853148541485514856148571485814859148601486114862148631486414865148661486714868148691487014871148721487314874148751487614877148781487914880148811488214883148841488514886148871488814889148901489114892148931489414895148961489714898148991490014901149021490314904149051490614907149081490914910149111491214913149141491514916149171491814919149201492114922149231492414925149261492714928149291493014931149321493314934149351493614937149381493914940149411494214943149441494514946149471494814949149501495114952149531495414955149561495714958149591496014961149621496314964149651496614967149681496914970149711497214973149741497514976149771497814979149801498114982149831498414985149861498714988149891499014991149921499314994149951499614997149981499915000150011500215003150041500515006150071500815009150101501115012150131501415015150161501715018150191502015021150221502315024150251502615027150281502915030150311503215033150341503515036150371503815039150401504115042150431504415045150461504715048150491505015051150521505315054150551505615057150581505915060150611506215063150641506515066150671506815069150701507115072150731507415075150761507715078150791508015081150821508315084150851508615087150881508915090150911509215093150941509515096150971509815099151001510115102151031510415105151061510715108151091511015111151121511315114151151511615117151181511915120151211512215123151241512515126151271512815129151301513115132151331513415135151361513715138151391514015141151421514315144151451514615147151481514915150151511515215153151541515515156151571515815159151601516115162151631516415165151661516715168151691517015171151721517315174151751517615177151781517915180151811518215183151841518515186151871518815189151901519115192151931519415195151961519715198151991520015201152021520315204152051520615207152081520915210152111521215213152141521515216152171521815219152201522115222152231522415225152261522715228152291523015231152321523315234152351523615237152381523915240152411524215243152441524515246152471524815249152501525115252152531525415255152561525715258152591526015261152621526315264152651526615267152681526915270152711527215273152741527515276152771527815279152801528115282152831528415285152861528715288152891529015291152921529315294152951529615297152981529915300153011530215303153041530515306153071530815309153101531115312153131531415315153161531715318153191532015321153221532315324153251532615327153281532915330153311533215333153341533515336153371533815339153401534115342153431534415345153461534715348153491535015351153521535315354153551535615357153581535915360153611536215363153641536515366153671536815369153701537115372153731537415375153761537715378153791538015381153821538315384153851538615387153881538915390153911539215393153941539515396153971539815399154001540115402154031540415405154061540715408154091541015411154121541315414154151541615417154181541915420154211542215423154241542515426154271542815429154301543115432154331543415435154361543715438154391544015441154421544315444154451544615447154481544915450154511545215453154541545515456154571545815459154601546115462154631546415465154661546715468154691547015471154721547315474154751547615477154781547915480154811548215483154841548515486154871548815489154901549115492154931549415495154961549715498154991550015501155021550315504155051550615507155081550915510155111551215513155141551515516155171551815519155201552115522155231552415525155261552715528155291553015531155321553315534155351553615537155381553915540155411554215543155441554515546155471554815549155501555115552155531555415555155561555715558155591556015561155621556315564155651556615567155681556915570155711557215573155741557515576155771557815579155801558115582155831558415585155861558715588155891559015591155921559315594155951559615597155981559915600156011560215603156041560515606156071560815609156101561115612156131561415615156161561715618156191562015621156221562315624156251562615627156281562915630156311563215633156341563515636156371563815639156401564115642156431564415645156461564715648156491565015651156521565315654156551565615657156581565915660156611566215663156641566515666156671566815669156701567115672156731567415675156761567715678156791568015681156821568315684156851568615687156881568915690156911569215693156941569515696156971569815699157001570115702157031570415705157061570715708157091571015711157121571315714157151571615717157181571915720157211572215723157241572515726157271572815729157301573115732157331573415735157361573715738157391574015741157421574315744157451574615747157481574915750157511575215753157541575515756157571575815759157601576115762157631576415765157661576715768157691577015771157721577315774157751577615777157781577915780157811578215783157841578515786157871578815789157901579115792157931579415795157961579715798157991580015801158021580315804158051580615807158081580915810158111581215813158141581515816158171581815819158201582115822158231582415825158261582715828158291583015831158321583315834158351583615837158381583915840158411584215843158441584515846158471584815849158501585115852158531585415855158561585715858158591586015861158621586315864158651586615867158681586915870158711587215873158741587515876158771587815879158801588115882158831588415885158861588715888158891589015891158921589315894158951589615897158981589915900159011590215903159041590515906159071590815909159101591115912159131591415915159161591715918159191592015921159221592315924159251592615927159281592915930159311593215933159341593515936159371593815939159401594115942159431594415945159461594715948159491595015951159521595315954159551595615957159581595915960159611596215963159641596515966159671596815969159701597115972159731597415975159761597715978159791598015981159821598315984159851598615987159881598915990159911599215993159941599515996159971599815999160001600116002160031600416005160061600716008160091601016011160121601316014160151601616017160181601916020160211602216023160241602516026160271602816029160301603116032160331603416035160361603716038160391604016041160421604316044160451604616047160481604916050160511605216053160541605516056160571605816059160601606116062160631606416065160661606716068160691607016071160721607316074160751607616077160781607916080160811608216083160841608516086160871608816089160901609116092160931609416095160961609716098160991610016101161021610316104161051610616107161081610916110161111611216113161141611516116161171611816119161201612116122161231612416125161261612716128161291613016131161321613316134161351613616137161381613916140161411614216143161441614516146161471614816149161501615116152161531615416155161561615716158161591616016161161621616316164161651616616167161681616916170161711617216173161741617516176161771617816179161801618116182161831618416185161861618716188161891619016191161921619316194161951619616197161981619916200162011620216203162041620516206162071620816209162101621116212162131621416215162161621716218162191622016221162221622316224162251622616227162281622916230162311623216233162341623516236162371623816239162401624116242162431624416245162461624716248162491625016251162521625316254162551625616257162581625916260162611626216263162641626516266162671626816269162701627116272162731627416275162761627716278162791628016281162821628316284162851628616287162881628916290162911629216293162941629516296162971629816299163001630116302163031630416305163061630716308163091631016311163121631316314163151631616317163181631916320163211632216323163241632516326163271632816329163301633116332163331633416335163361633716338163391634016341163421634316344163451634616347163481634916350163511635216353163541635516356163571635816359163601636116362163631636416365163661636716368163691637016371163721637316374163751637616377163781637916380163811638216383163841638516386163871638816389163901639116392163931639416395163961639716398163991640016401164021640316404164051640616407164081640916410164111641216413164141641516416164171641816419164201642116422164231642416425164261642716428164291643016431164321643316434164351643616437164381643916440164411644216443164441644516446164471644816449164501645116452164531645416455164561645716458164591646016461164621646316464164651646616467164681646916470164711647216473164741647516476164771647816479164801648116482164831648416485164861648716488164891649016491164921649316494164951649616497164981649916500165011650216503165041650516506165071650816509165101651116512165131651416515165161651716518165191652016521165221652316524165251652616527165281652916530165311653216533165341653516536165371653816539165401654116542165431654416545165461654716548165491655016551165521655316554165551655616557165581655916560165611656216563165641656516566165671656816569165701657116572165731657416575165761657716578165791658016581165821658316584165851658616587165881658916590165911659216593165941659516596165971659816599166001660116602166031660416605166061660716608166091661016611166121661316614166151661616617166181661916620166211662216623166241662516626166271662816629166301663116632166331663416635166361663716638166391664016641166421664316644166451664616647166481664916650166511665216653166541665516656166571665816659166601666116662166631666416665166661666716668166691667016671166721667316674166751667616677166781667916680166811668216683166841668516686166871668816689166901669116692166931669416695166961669716698166991670016701167021670316704167051670616707167081670916710167111671216713167141671516716167171671816719167201672116722167231672416725167261672716728167291673016731167321673316734167351673616737167381673916740167411674216743167441674516746167471674816749167501675116752167531675416755167561675716758167591676016761167621676316764167651676616767167681676916770167711677216773167741677516776167771677816779167801678116782167831678416785167861678716788167891679016791167921679316794167951679616797167981679916800168011680216803168041680516806168071680816809168101681116812168131681416815168161681716818168191682016821168221682316824168251682616827168281682916830168311683216833168341683516836168371683816839168401684116842168431684416845168461684716848168491685016851168521685316854168551685616857168581685916860168611686216863168641686516866168671686816869168701687116872168731687416875168761687716878168791688016881168821688316884168851688616887168881688916890168911689216893168941689516896168971689816899169001690116902169031690416905169061690716908169091691016911169121691316914169151691616917169181691916920169211692216923169241692516926169271692816929169301693116932169331693416935169361693716938169391694016941169421694316944169451694616947169481694916950169511695216953169541695516956169571695816959169601696116962169631696416965169661696716968169691697016971169721697316974169751697616977169781697916980169811698216983169841698516986169871698816989169901699116992169931699416995169961699716998169991700017001170021700317004170051700617007170081700917010170111701217013170141701517016170171701817019170201702117022170231702417025170261702717028170291703017031170321703317034170351703617037170381703917040170411704217043170441704517046170471704817049170501705117052170531705417055170561705717058170591706017061170621706317064170651706617067170681706917070170711707217073170741707517076170771707817079170801708117082170831708417085170861708717088170891709017091170921709317094170951709617097170981709917100171011710217103171041710517106171071710817109171101711117112171131711417115171161711717118171191712017121171221712317124171251712617127171281712917130171311713217133171341713517136171371713817139171401714117142171431714417145171461714717148171491715017151171521715317154171551715617157171581715917160171611716217163171641716517166171671716817169171701717117172171731717417175171761717717178171791718017181171821718317184171851718617187171881718917190171911719217193171941719517196171971719817199172001720117202172031720417205172061720717208172091721017211172121721317214172151721617217172181721917220172211722217223172241722517226172271722817229172301723117232172331723417235172361723717238172391724017241172421724317244172451724617247172481724917250172511725217253172541725517256172571725817259172601726117262172631726417265172661726717268172691727017271172721727317274172751727617277172781727917280172811728217283172841728517286172871728817289172901729117292172931729417295172961729717298172991730017301173021730317304173051730617307173081730917310173111731217313173141731517316173171731817319173201732117322173231732417325173261732717328173291733017331173321733317334173351733617337173381733917340173411734217343173441734517346173471734817349173501735117352173531735417355173561735717358173591736017361173621736317364173651736617367173681736917370173711737217373173741737517376173771737817379173801738117382173831738417385173861738717388173891739017391173921739317394173951739617397173981739917400174011740217403174041740517406174071740817409174101741117412174131741417415174161741717418174191742017421174221742317424174251742617427174281742917430174311743217433174341743517436174371743817439174401744117442174431744417445174461744717448174491745017451174521745317454174551745617457174581745917460174611746217463174641746517466174671746817469174701747117472174731747417475174761747717478174791748017481174821748317484174851748617487174881748917490174911749217493174941749517496174971749817499175001750117502175031750417505175061750717508175091751017511175121751317514175151751617517175181751917520175211752217523175241752517526175271752817529175301753117532175331753417535175361753717538175391754017541175421754317544175451754617547175481754917550175511755217553175541755517556175571755817559175601756117562175631756417565175661756717568175691757017571175721757317574175751757617577175781757917580175811758217583175841758517586175871758817589175901759117592175931759417595175961759717598175991760017601176021760317604176051760617607176081760917610176111761217613176141761517616176171761817619176201762117622176231762417625176261762717628176291763017631176321763317634176351763617637176381763917640176411764217643176441764517646176471764817649176501765117652176531765417655176561765717658176591766017661176621766317664176651766617667176681766917670176711767217673176741767517676176771767817679176801768117682176831768417685176861768717688176891769017691176921769317694176951769617697176981769917700177011770217703177041770517706177071770817709177101771117712177131771417715177161771717718177191772017721177221772317724177251772617727177281772917730177311773217733177341773517736177371773817739177401774117742177431774417745177461774717748177491775017751177521775317754177551775617757177581775917760177611776217763177641776517766177671776817769177701777117772177731777417775177761777717778177791778017781177821778317784177851778617787177881778917790177911779217793177941779517796177971779817799178001780117802178031780417805178061780717808178091781017811178121781317814178151781617817178181781917820178211782217823178241782517826178271782817829178301783117832178331783417835178361783717838178391784017841178421784317844178451784617847178481784917850178511785217853178541785517856178571785817859178601786117862178631786417865178661786717868178691787017871178721787317874178751787617877178781787917880178811788217883178841788517886178871788817889178901789117892178931789417895178961789717898178991790017901179021790317904179051790617907179081790917910179111791217913179141791517916179171791817919179201792117922179231792417925179261792717928179291793017931179321793317934179351793617937179381793917940179411794217943179441794517946179471794817949179501795117952179531795417955179561795717958179591796017961179621796317964179651796617967179681796917970179711797217973179741797517976179771797817979179801798117982179831798417985179861798717988179891799017991179921799317994179951799617997179981799918000180011800218003180041800518006180071800818009180101801118012180131801418015180161801718018180191802018021180221802318024180251802618027180281802918030180311803218033180341803518036180371803818039180401804118042180431804418045180461804718048180491805018051180521805318054180551805618057180581805918060180611806218063180641806518066180671806818069180701807118072180731807418075180761807718078180791808018081180821808318084180851808618087180881808918090180911809218093180941809518096180971809818099181001810118102181031810418105181061810718108181091811018111181121811318114181151811618117181181811918120181211812218123181241812518126181271812818129181301813118132181331813418135181361813718138181391814018141181421814318144181451814618147181481814918150181511815218153181541815518156181571815818159181601816118162181631816418165181661816718168181691817018171181721817318174181751817618177181781817918180181811818218183181841818518186181871818818189181901819118192181931819418195181961819718198181991820018201182021820318204182051820618207182081820918210182111821218213182141821518216182171821818219182201822118222182231822418225182261822718228182291823018231182321823318234182351823618237182381823918240182411824218243182441824518246182471824818249182501825118252182531825418255182561825718258182591826018261182621826318264182651826618267182681826918270182711827218273182741827518276182771827818279182801828118282182831828418285182861828718288182891829018291182921829318294182951829618297182981829918300183011830218303183041830518306183071830818309183101831118312183131831418315183161831718318183191832018321183221832318324183251832618327183281832918330183311833218333183341833518336183371833818339183401834118342183431834418345183461834718348183491835018351183521835318354183551835618357183581835918360183611836218363183641836518366183671836818369183701837118372183731837418375183761837718378183791838018381183821838318384183851838618387183881838918390183911839218393183941839518396183971839818399184001840118402184031840418405184061840718408184091841018411184121841318414184151841618417184181841918420184211842218423184241842518426184271842818429184301843118432184331843418435184361843718438184391844018441184421844318444184451844618447184481844918450184511845218453184541845518456184571845818459184601846118462184631846418465184661846718468184691847018471184721847318474184751847618477184781847918480184811848218483184841848518486184871848818489184901849118492184931849418495184961849718498184991850018501185021850318504185051850618507185081850918510185111851218513185141851518516185171851818519185201852118522185231852418525185261852718528185291853018531185321853318534185351853618537185381853918540185411854218543185441854518546185471854818549185501855118552185531855418555185561855718558185591856018561185621856318564185651856618567185681856918570185711857218573185741857518576185771857818579185801858118582185831858418585185861858718588185891859018591185921859318594185951859618597185981859918600186011860218603186041860518606186071860818609186101861118612186131861418615186161861718618186191862018621186221862318624186251862618627186281862918630186311863218633186341863518636186371863818639186401864118642186431864418645186461864718648186491865018651186521865318654186551865618657186581865918660186611866218663186641866518666186671866818669186701867118672186731867418675186761867718678186791868018681186821868318684186851868618687186881868918690186911869218693186941869518696186971869818699187001870118702187031870418705187061870718708187091871018711187121871318714187151871618717187181871918720187211872218723187241872518726187271872818729187301873118732187331873418735187361873718738187391874018741187421874318744187451874618747187481874918750187511875218753187541875518756187571875818759187601876118762187631876418765187661876718768187691877018771187721877318774187751877618777187781877918780187811878218783187841878518786187871878818789187901879118792187931879418795187961879718798187991880018801188021880318804188051880618807188081880918810188111881218813188141881518816188171881818819188201882118822188231882418825188261882718828188291883018831188321883318834188351883618837188381883918840188411884218843188441884518846188471884818849188501885118852188531885418855188561885718858188591886018861188621886318864188651886618867188681886918870188711887218873188741887518876188771887818879188801888118882188831888418885188861888718888188891889018891188921889318894188951889618897188981889918900189011890218903189041890518906189071890818909189101891118912189131891418915189161891718918189191892018921189221892318924189251892618927189281892918930189311893218933189341893518936189371893818939189401894118942189431894418945189461894718948189491895018951189521895318954189551895618957189581895918960189611896218963189641896518966189671896818969189701897118972189731897418975189761897718978189791898018981189821898318984189851898618987189881898918990189911899218993189941899518996189971899818999190001900119002190031900419005190061900719008190091901019011190121901319014190151901619017190181901919020190211902219023190241902519026190271902819029190301903119032190331903419035190361903719038190391904019041190421904319044190451904619047190481904919050190511905219053190541905519056190571905819059190601906119062190631906419065190661906719068190691907019071190721907319074190751907619077190781907919080190811908219083190841908519086190871908819089190901909119092190931909419095190961909719098190991910019101191021910319104191051910619107191081910919110191111911219113191141911519116191171911819119191201912119122191231912419125191261912719128191291913019131191321913319134191351913619137191381913919140191411914219143191441914519146191471914819149191501915119152191531915419155191561915719158191591916019161191621916319164191651916619167191681916919170191711917219173191741917519176191771917819179191801918119182191831918419185191861918719188191891919019191191921919319194191951919619197191981919919200192011920219203192041920519206192071920819209192101921119212192131921419215192161921719218192191922019221192221922319224192251922619227192281922919230192311923219233192341923519236192371923819239192401924119242192431924419245192461924719248192491925019251192521925319254192551925619257192581925919260192611926219263192641926519266192671926819269192701927119272192731927419275192761927719278192791928019281192821928319284192851928619287192881928919290192911929219293192941929519296192971929819299193001930119302193031930419305193061930719308193091931019311193121931319314193151931619317193181931919320193211932219323193241932519326193271932819329193301933119332193331933419335193361933719338193391934019341193421934319344193451934619347193481934919350193511935219353193541935519356193571935819359193601936119362193631936419365193661936719368193691937019371193721937319374193751937619377193781937919380193811938219383193841938519386193871938819389193901939119392193931939419395193961939719398193991940019401194021940319404194051940619407194081940919410194111941219413194141941519416194171941819419194201942119422194231942419425194261942719428194291943019431194321943319434194351943619437194381943919440194411944219443194441944519446194471944819449194501945119452194531945419455194561945719458194591946019461194621946319464194651946619467194681946919470194711947219473194741947519476194771947819479194801948119482194831948419485194861948719488194891949019491194921949319494194951949619497194981949919500195011950219503195041950519506195071950819509195101951119512195131951419515195161951719518195191952019521195221952319524195251952619527195281952919530195311953219533195341953519536195371953819539195401954119542195431954419545195461954719548195491955019551195521955319554195551955619557195581955919560195611956219563195641956519566195671956819569195701957119572195731957419575195761957719578195791958019581195821958319584195851958619587195881958919590195911959219593195941959519596195971959819599196001960119602196031960419605196061960719608196091961019611196121961319614196151961619617196181961919620196211962219623196241962519626196271962819629196301963119632196331963419635196361963719638196391964019641196421964319644196451964619647196481964919650196511965219653196541965519656196571965819659196601966119662196631966419665196661966719668196691967019671196721967319674196751967619677196781967919680196811968219683196841968519686196871968819689196901969119692196931969419695196961969719698196991970019701197021970319704197051970619707197081970919710197111971219713197141971519716197171971819719197201972119722197231972419725197261972719728197291973019731197321973319734197351973619737197381973919740197411974219743197441974519746197471974819749197501975119752197531975419755197561975719758197591976019761197621976319764197651976619767197681976919770197711977219773197741977519776197771977819779197801978119782197831978419785197861978719788197891979019791197921979319794197951979619797197981979919800198011980219803198041980519806198071980819809198101981119812198131981419815198161981719818198191982019821198221982319824198251982619827198281982919830198311983219833198341983519836198371983819839198401984119842198431984419845198461984719848198491985019851198521985319854198551985619857198581985919860198611986219863198641986519866198671986819869198701987119872198731987419875198761987719878198791988019881198821988319884198851988619887198881988919890198911989219893198941989519896198971989819899199001990119902199031990419905199061990719908199091991019911199121991319914199151991619917199181991919920199211992219923199241992519926199271992819929199301993119932199331993419935199361993719938199391994019941199421994319944199451994619947199481994919950199511995219953199541995519956199571995819959199601996119962199631996419965199661996719968199691997019971199721997319974199751997619977199781997919980199811998219983199841998519986199871998819989199901999119992199931999419995199961999719998199992000020001200022000320004200052000620007200082000920010200112001220013200142001520016200172001820019200202002120022200232002420025200262002720028200292003020031200322003320034200352003620037200382003920040200412004220043200442004520046200472004820049200502005120052200532005420055200562005720058200592006020061200622006320064200652006620067200682006920070200712007220073200742007520076200772007820079200802008120082200832008420085200862008720088200892009020091200922009320094200952009620097200982009920100201012010220103201042010520106201072010820109201102011120112201132011420115201162011720118201192012020121201222012320124201252012620127201282012920130201312013220133201342013520136201372013820139201402014120142201432014420145201462014720148201492015020151201522015320154201552015620157201582015920160201612016220163201642016520166201672016820169201702017120172201732017420175201762017720178201792018020181201822018320184201852018620187201882018920190201912019220193201942019520196201972019820199202002020120202202032020420205202062020720208202092021020211202122021320214202152021620217202182021920220202212022220223202242022520226202272022820229202302023120232202332023420235202362023720238202392024020241202422024320244202452024620247202482024920250202512025220253202542025520256202572025820259202602026120262202632026420265202662026720268202692027020271202722027320274202752027620277202782027920280202812028220283202842028520286202872028820289202902029120292202932029420295202962029720298202992030020301203022030320304203052030620307203082030920310203112031220313203142031520316203172031820319203202032120322203232032420325203262032720328203292033020331203322033320334203352033620337203382033920340203412034220343203442034520346203472034820349203502035120352203532035420355203562035720358203592036020361203622036320364203652036620367203682036920370203712037220373203742037520376203772037820379203802038120382203832038420385203862038720388203892039020391203922039320394203952039620397203982039920400204012040220403204042040520406204072040820409204102041120412204132041420415204162041720418204192042020421204222042320424204252042620427204282042920430204312043220433204342043520436204372043820439204402044120442204432044420445204462044720448204492045020451204522045320454204552045620457204582045920460204612046220463204642046520466204672046820469204702047120472204732047420475204762047720478204792048020481204822048320484204852048620487204882048920490204912049220493204942049520496204972049820499205002050120502205032050420505205062050720508205092051020511205122051320514205152051620517205182051920520205212052220523205242052520526205272052820529205302053120532205332053420535205362053720538205392054020541205422054320544205452054620547205482054920550205512055220553205542055520556205572055820559205602056120562205632056420565205662056720568205692057020571205722057320574205752057620577205782057920580205812058220583205842058520586205872058820589205902059120592205932059420595205962059720598205992060020601206022060320604206052060620607206082060920610206112061220613206142061520616206172061820619206202062120622206232062420625206262062720628206292063020631206322063320634206352063620637206382063920640206412064220643206442064520646206472064820649206502065120652206532065420655206562065720658206592066020661206622066320664206652066620667206682066920670206712067220673206742067520676206772067820679206802068120682206832068420685206862068720688206892069020691206922069320694206952069620697206982069920700207012070220703207042070520706207072070820709207102071120712207132071420715207162071720718207192072020721207222072320724207252072620727207282072920730207312073220733207342073520736207372073820739207402074120742207432074420745207462074720748207492075020751207522075320754207552075620757207582075920760207612076220763207642076520766207672076820769207702077120772207732077420775207762077720778207792078020781207822078320784207852078620787207882078920790207912079220793207942079520796207972079820799208002080120802208032080420805208062080720808208092081020811208122081320814208152081620817208182081920820208212082220823208242082520826208272082820829208302083120832208332083420835208362083720838208392084020841208422084320844208452084620847208482084920850208512085220853208542085520856208572085820859208602086120862208632086420865208662086720868208692087020871208722087320874208752087620877208782087920880208812088220883208842088520886208872088820889208902089120892208932089420895208962089720898208992090020901209022090320904209052090620907209082090920910209112091220913209142091520916209172091820919209202092120922209232092420925209262092720928209292093020931209322093320934209352093620937209382093920940209412094220943209442094520946209472094820949209502095120952209532095420955209562095720958209592096020961209622096320964209652096620967209682096920970209712097220973209742097520976209772097820979209802098120982209832098420985209862098720988209892099020991209922099320994209952099620997209982099921000210012100221003210042100521006210072100821009210102101121012210132101421015210162101721018210192102021021210222102321024210252102621027210282102921030210312103221033210342103521036210372103821039210402104121042210432104421045210462104721048210492105021051210522105321054210552105621057210582105921060210612106221063210642106521066210672106821069210702107121072210732107421075210762107721078210792108021081210822108321084210852108621087210882108921090210912109221093210942109521096210972109821099211002110121102211032110421105211062110721108211092111021111211122111321114211152111621117211182111921120211212112221123211242112521126211272112821129211302113121132211332113421135211362113721138211392114021141211422114321144211452114621147211482114921150211512115221153211542115521156211572115821159211602116121162211632116421165211662116721168211692117021171211722117321174211752117621177211782117921180211812118221183211842118521186211872118821189211902119121192211932119421195211962119721198211992120021201212022120321204212052120621207212082120921210212112121221213212142121521216212172121821219212202122121222212232122421225212262122721228212292123021231212322123321234212352123621237212382123921240212412124221243212442124521246212472124821249212502125121252212532125421255212562125721258212592126021261212622126321264212652126621267212682126921270212712127221273212742127521276212772127821279212802128121282212832128421285212862128721288212892129021291212922129321294212952129621297212982129921300213012130221303213042130521306213072130821309213102131121312213132131421315213162131721318213192132021321213222132321324213252132621327213282132921330213312133221333213342133521336213372133821339213402134121342213432134421345213462134721348213492135021351213522135321354213552135621357213582135921360213612136221363213642136521366213672136821369213702137121372213732137421375213762137721378213792138021381213822138321384213852138621387213882138921390213912139221393213942139521396213972139821399214002140121402214032140421405214062140721408214092141021411214122141321414214152141621417214182141921420214212142221423214242142521426214272142821429214302143121432214332143421435214362143721438214392144021441214422144321444214452144621447214482144921450214512145221453214542145521456214572145821459214602146121462214632146421465214662146721468214692147021471214722147321474214752147621477214782147921480214812148221483214842148521486214872148821489214902149121492214932149421495214962149721498214992150021501215022150321504215052150621507215082150921510215112151221513215142151521516215172151821519215202152121522215232152421525215262152721528215292153021531215322153321534215352153621537215382153921540215412154221543215442154521546215472154821549215502155121552215532155421555215562155721558215592156021561215622156321564215652156621567215682156921570215712157221573215742157521576215772157821579215802158121582215832158421585215862158721588215892159021591215922159321594215952159621597215982159921600216012160221603216042160521606216072160821609216102161121612216132161421615216162161721618216192162021621216222162321624216252162621627216282162921630216312163221633216342163521636216372163821639216402164121642216432164421645216462164721648216492165021651216522165321654216552165621657216582165921660216612166221663216642166521666216672166821669216702167121672216732167421675216762167721678216792168021681216822168321684216852168621687216882168921690216912169221693216942169521696216972169821699217002170121702217032170421705217062170721708217092171021711217122171321714217152171621717217182171921720217212172221723217242172521726217272172821729217302173121732217332173421735217362173721738217392174021741217422174321744217452174621747217482174921750217512175221753217542175521756217572175821759217602176121762217632176421765217662176721768217692177021771217722177321774217752177621777217782177921780217812178221783217842178521786217872178821789217902179121792217932179421795217962179721798217992180021801218022180321804218052180621807218082180921810218112181221813218142181521816218172181821819218202182121822218232182421825218262182721828218292183021831218322183321834218352183621837218382183921840218412184221843218442184521846218472184821849218502185121852218532185421855218562185721858218592186021861218622186321864218652186621867218682186921870218712187221873218742187521876218772187821879218802188121882218832188421885218862188721888218892189021891218922189321894218952189621897218982189921900219012190221903219042190521906219072190821909219102191121912219132191421915219162191721918219192192021921219222192321924219252192621927219282192921930219312193221933219342193521936219372193821939219402194121942219432194421945219462194721948219492195021951219522195321954219552195621957219582195921960219612196221963219642196521966219672196821969219702197121972219732197421975219762197721978219792198021981219822198321984219852198621987219882198921990219912199221993219942199521996219972199821999220002200122002220032200422005220062200722008220092201022011220122201322014220152201622017220182201922020220212202222023220242202522026220272202822029220302203122032220332203422035220362203722038220392204022041220422204322044220452204622047220482204922050220512205222053220542205522056220572205822059220602206122062220632206422065220662206722068220692207022071220722207322074220752207622077220782207922080220812208222083220842208522086220872208822089220902209122092220932209422095220962209722098220992210022101221022210322104221052210622107221082210922110221112211222113221142211522116221172211822119221202212122122221232212422125221262212722128221292213022131221322213322134221352213622137221382213922140221412214222143221442214522146221472214822149221502215122152221532215422155221562215722158221592216022161221622216322164221652216622167221682216922170221712217222173221742217522176221772217822179221802218122182221832218422185221862218722188221892219022191221922219322194221952219622197221982219922200222012220222203222042220522206222072220822209222102221122212222132221422215222162221722218222192222022221222222222322224222252222622227222282222922230222312223222233222342223522236222372223822239222402224122242222432224422245222462224722248222492225022251222522225322254222552225622257222582225922260222612226222263222642226522266222672226822269222702227122272222732227422275222762227722278222792228022281222822228322284222852228622287222882228922290222912229222293222942229522296222972229822299223002230122302223032230422305223062230722308223092231022311223122231322314223152231622317223182231922320223212232222323223242232522326223272232822329223302233122332223332233422335223362233722338223392234022341223422234322344223452234622347223482234922350223512235222353223542235522356223572235822359223602236122362223632236422365223662236722368223692237022371223722237322374223752237622377223782237922380223812238222383223842238522386223872238822389223902239122392223932239422395223962239722398223992240022401224022240322404224052240622407224082240922410224112241222413224142241522416224172241822419224202242122422224232242422425224262242722428224292243022431224322243322434224352243622437224382243922440224412244222443224442244522446224472244822449224502245122452224532245422455224562245722458224592246022461224622246322464224652246622467224682246922470224712247222473224742247522476224772247822479224802248122482224832248422485224862248722488224892249022491224922249322494224952249622497224982249922500225012250222503225042250522506225072250822509225102251122512225132251422515225162251722518225192252022521225222252322524225252252622527225282252922530225312253222533225342253522536225372253822539225402254122542225432254422545225462254722548225492255022551225522255322554225552255622557225582255922560225612256222563225642256522566225672256822569225702257122572225732257422575225762257722578225792258022581225822258322584225852258622587225882258922590225912259222593225942259522596225972259822599226002260122602226032260422605226062260722608226092261022611226122261322614226152261622617226182261922620226212262222623226242262522626226272262822629226302263122632226332263422635226362263722638226392264022641226422264322644226452264622647226482264922650226512265222653226542265522656226572265822659226602266122662226632266422665226662266722668226692267022671226722267322674226752267622677226782267922680226812268222683226842268522686226872268822689226902269122692226932269422695226962269722698226992270022701227022270322704227052270622707227082270922710227112271222713227142271522716227172271822719227202272122722227232272422725227262272722728227292273022731227322273322734227352273622737227382273922740227412274222743227442274522746227472274822749227502275122752227532275422755227562275722758227592276022761227622276322764227652276622767227682276922770227712277222773227742277522776227772277822779227802278122782227832278422785227862278722788227892279022791227922279322794227952279622797227982279922800228012280222803228042280522806228072280822809228102281122812228132281422815228162281722818228192282022821228222282322824228252282622827228282282922830228312283222833228342283522836228372283822839228402284122842228432284422845228462284722848228492285022851228522285322854228552285622857228582285922860228612286222863228642286522866228672286822869228702287122872228732287422875228762287722878228792288022881228822288322884228852288622887228882288922890228912289222893228942289522896228972289822899229002290122902229032290422905229062290722908229092291022911229122291322914229152291622917229182291922920229212292222923229242292522926229272292822929229302293122932229332293422935229362293722938229392294022941229422294322944229452294622947229482294922950229512295222953229542295522956229572295822959229602296122962229632296422965229662296722968229692297022971229722297322974229752297622977229782297922980229812298222983229842298522986229872298822989229902299122992229932299422995229962299722998229992300023001230022300323004230052300623007230082300923010230112301223013230142301523016230172301823019230202302123022230232302423025230262302723028230292303023031230322303323034230352303623037230382303923040230412304223043230442304523046230472304823049230502305123052230532305423055230562305723058230592306023061230622306323064230652306623067230682306923070230712307223073230742307523076230772307823079230802308123082230832308423085230862308723088230892309023091230922309323094230952309623097230982309923100231012310223103231042310523106231072310823109231102311123112231132311423115231162311723118231192312023121231222312323124231252312623127231282312923130231312313223133231342313523136231372313823139231402314123142231432314423145231462314723148231492315023151231522315323154231552315623157231582315923160231612316223163231642316523166231672316823169231702317123172231732317423175231762317723178231792318023181231822318323184231852318623187231882318923190231912319223193231942319523196231972319823199232002320123202232032320423205232062320723208232092321023211232122321323214232152321623217232182321923220232212322223223232242322523226232272322823229232302323123232232332323423235232362323723238232392324023241232422324323244232452324623247232482324923250232512325223253232542325523256232572325823259232602326123262232632326423265232662326723268232692327023271232722327323274232752327623277232782327923280232812328223283232842328523286232872328823289232902329123292232932329423295232962329723298232992330023301233022330323304233052330623307233082330923310233112331223313233142331523316233172331823319233202332123322233232332423325233262332723328233292333023331233322333323334233352333623337233382333923340233412334223343233442334523346233472334823349233502335123352233532335423355233562335723358233592336023361233622336323364233652336623367233682336923370233712337223373233742337523376233772337823379233802338123382233832338423385233862338723388233892339023391233922339323394233952339623397233982339923400234012340223403234042340523406234072340823409234102341123412234132341423415234162341723418234192342023421234222342323424234252342623427234282342923430234312343223433234342343523436234372343823439234402344123442234432344423445234462344723448234492345023451234522345323454234552345623457234582345923460234612346223463234642346523466234672346823469234702347123472234732347423475234762347723478234792348023481234822348323484234852348623487234882348923490234912349223493234942349523496234972349823499235002350123502235032350423505235062350723508235092351023511235122351323514235152351623517235182351923520235212352223523235242352523526235272352823529235302353123532235332353423535235362353723538235392354023541235422354323544235452354623547235482354923550235512355223553235542355523556235572355823559235602356123562235632356423565235662356723568235692357023571235722357323574235752357623577235782357923580235812358223583235842358523586235872358823589235902359123592235932359423595235962359723598235992360023601236022360323604236052360623607236082360923610236112361223613236142361523616236172361823619236202362123622236232362423625236262362723628236292363023631236322363323634236352363623637236382363923640236412364223643236442364523646236472364823649236502365123652236532365423655236562365723658236592366023661236622366323664236652366623667236682366923670236712367223673236742367523676236772367823679236802368123682236832368423685236862368723688236892369023691236922369323694236952369623697236982369923700237012370223703237042370523706237072370823709237102371123712237132371423715237162371723718237192372023721237222372323724237252372623727237282372923730237312373223733237342373523736237372373823739237402374123742237432374423745237462374723748237492375023751237522375323754237552375623757237582375923760237612376223763237642376523766237672376823769237702377123772237732377423775237762377723778237792378023781237822378323784237852378623787237882378923790237912379223793237942379523796237972379823799238002380123802238032380423805238062380723808238092381023811238122381323814238152381623817238182381923820238212382223823238242382523826238272382823829238302383123832238332383423835238362383723838238392384023841238422384323844238452384623847238482384923850238512385223853238542385523856238572385823859238602386123862238632386423865238662386723868238692387023871238722387323874238752387623877238782387923880238812388223883238842388523886238872388823889238902389123892238932389423895238962389723898238992390023901239022390323904239052390623907239082390923910239112391223913239142391523916239172391823919239202392123922239232392423925239262392723928239292393023931239322393323934239352393623937239382393923940239412394223943239442394523946239472394823949239502395123952239532395423955239562395723958239592396023961239622396323964239652396623967239682396923970239712397223973239742397523976239772397823979239802398123982239832398423985239862398723988239892399023991239922399323994239952399623997239982399924000240012400224003240042400524006240072400824009240102401124012240132401424015240162401724018240192402024021240222402324024240252402624027240282402924030240312403224033240342403524036240372403824039240402404124042240432404424045240462404724048240492405024051240522405324054240552405624057240582405924060240612406224063240642406524066240672406824069240702407124072240732407424075240762407724078240792408024081240822408324084240852408624087240882408924090240912409224093240942409524096240972409824099241002410124102241032410424105241062410724108241092411024111241122411324114241152411624117241182411924120241212412224123241242412524126241272412824129241302413124132241332413424135241362413724138241392414024141241422414324144241452414624147241482414924150241512415224153241542415524156241572415824159241602416124162241632416424165241662416724168241692417024171241722417324174241752417624177241782417924180241812418224183241842418524186241872418824189241902419124192241932419424195241962419724198241992420024201242022420324204242052420624207242082420924210242112421224213242142421524216242172421824219242202422124222242232422424225242262422724228242292423024231242322423324234242352423624237242382423924240242412424224243242442424524246242472424824249242502425124252242532425424255242562425724258242592426024261242622426324264242652426624267242682426924270242712427224273242742427524276242772427824279242802428124282242832428424285242862428724288242892429024291242922429324294242952429624297242982429924300243012430224303243042430524306243072430824309243102431124312243132431424315243162431724318243192432024321243222432324324243252432624327243282432924330243312433224333243342433524336243372433824339243402434124342243432434424345243462434724348243492435024351243522435324354243552435624357243582435924360243612436224363243642436524366243672436824369243702437124372243732437424375243762437724378243792438024381243822438324384243852438624387243882438924390243912439224393243942439524396243972439824399244002440124402244032440424405244062440724408244092441024411244122441324414244152441624417244182441924420244212442224423244242442524426244272442824429244302443124432244332443424435244362443724438244392444024441244422444324444244452444624447244482444924450244512445224453244542445524456244572445824459244602446124462244632446424465244662446724468244692447024471244722447324474244752447624477244782447924480244812448224483244842448524486244872448824489244902449124492244932449424495244962449724498244992450024501245022450324504245052450624507245082450924510245112451224513245142451524516245172451824519245202452124522245232452424525245262452724528245292453024531245322453324534245352453624537245382453924540245412454224543245442454524546245472454824549245502455124552245532455424555245562455724558245592456024561245622456324564245652456624567245682456924570245712457224573245742457524576245772457824579245802458124582245832458424585245862458724588245892459024591245922459324594245952459624597245982459924600246012460224603246042460524606246072460824609246102461124612246132461424615246162461724618246192462024621246222462324624246252462624627246282462924630246312463224633246342463524636246372463824639246402464124642246432464424645246462464724648246492465024651246522465324654246552465624657246582465924660246612466224663246642466524666246672466824669246702467124672246732467424675246762467724678246792468024681246822468324684246852468624687246882468924690246912469224693246942469524696246972469824699247002470124702247032470424705247062470724708247092471024711247122471324714247152471624717247182471924720247212472224723247242472524726247272472824729247302473124732247332473424735247362473724738247392474024741247422474324744247452474624747247482474924750247512475224753247542475524756247572475824759247602476124762247632476424765247662476724768247692477024771247722477324774247752477624777247782477924780247812478224783247842478524786247872478824789247902479124792247932479424795247962479724798247992480024801248022480324804248052480624807248082480924810248112481224813248142481524816248172481824819248202482124822248232482424825248262482724828248292483024831248322483324834248352483624837248382483924840248412484224843248442484524846248472484824849248502485124852248532485424855248562485724858248592486024861248622486324864248652486624867248682486924870248712487224873248742487524876248772487824879248802488124882248832488424885248862488724888248892489024891248922489324894248952489624897248982489924900249012490224903249042490524906249072490824909249102491124912249132491424915249162491724918249192492024921249222492324924249252492624927249282492924930249312493224933249342493524936249372493824939249402494124942249432494424945249462494724948249492495024951249522495324954249552495624957249582495924960249612496224963249642496524966249672496824969249702497124972249732497424975249762497724978249792498024981249822498324984249852498624987249882498924990249912499224993249942499524996249972499824999250002500125002250032500425005250062500725008250092501025011250122501325014250152501625017250182501925020250212502225023250242502525026250272502825029250302503125032250332503425035250362503725038250392504025041250422504325044250452504625047250482504925050250512505225053250542505525056250572505825059250602506125062250632506425065250662506725068250692507025071250722507325074250752507625077250782507925080250812508225083250842508525086250872508825089250902509125092250932509425095250962509725098250992510025101251022510325104251052510625107251082510925110251112511225113251142511525116251172511825119251202512125122251232512425125251262512725128251292513025131251322513325134251352513625137251382513925140251412514225143251442514525146251472514825149251502515125152251532515425155251562515725158251592516025161251622516325164251652516625167251682516925170251712517225173251742517525176251772517825179251802518125182251832518425185251862518725188251892519025191251922519325194251952519625197251982519925200252012520225203252042520525206252072520825209252102521125212252132521425215252162521725218252192522025221252222522325224252252522625227252282522925230252312523225233252342523525236252372523825239252402524125242252432524425245252462524725248252492525025251252522525325254252552525625257252582525925260252612526225263252642526525266252672526825269252702527125272252732527425275252762527725278252792528025281252822528325284252852528625287252882528925290252912529225293252942529525296252972529825299253002530125302253032530425305253062530725308253092531025311253122531325314253152531625317253182531925320253212532225323253242532525326253272532825329253302533125332253332533425335253362533725338253392534025341253422534325344253452534625347253482534925350253512535225353253542535525356253572535825359253602536125362253632536425365253662536725368253692537025371253722537325374253752537625377253782537925380253812538225383253842538525386253872538825389253902539125392253932539425395253962539725398253992540025401254022540325404254052540625407254082540925410254112541225413254142541525416254172541825419254202542125422254232542425425254262542725428254292543025431254322543325434254352543625437254382543925440254412544225443254442544525446254472544825449254502545125452254532545425455254562545725458254592546025461254622546325464254652546625467254682546925470254712547225473254742547525476254772547825479254802548125482254832548425485254862548725488254892549025491254922549325494254952549625497254982549925500255012550225503255042550525506255072550825509255102551125512255132551425515255162551725518255192552025521255222552325524255252552625527255282552925530255312553225533255342553525536255372553825539255402554125542255432554425545255462554725548255492555025551255522555325554255552555625557255582555925560255612556225563255642556525566255672556825569255702557125572255732557425575255762557725578255792558025581255822558325584255852558625587255882558925590255912559225593255942559525596255972559825599256002560125602256032560425605256062560725608256092561025611256122561325614256152561625617256182561925620256212562225623256242562525626256272562825629256302563125632256332563425635256362563725638256392564025641256422564325644256452564625647256482564925650256512565225653256542565525656256572565825659256602566125662256632566425665256662566725668256692567025671256722567325674256752567625677256782567925680256812568225683256842568525686256872568825689256902569125692256932569425695256962569725698256992570025701257022570325704257052570625707257082570925710257112571225713257142571525716257172571825719257202572125722257232572425725257262572725728257292573025731257322573325734257352573625737257382573925740257412574225743257442574525746257472574825749257502575125752257532575425755257562575725758257592576025761257622576325764257652576625767257682576925770257712577225773257742577525776257772577825779257802578125782257832578425785257862578725788257892579025791257922579325794257952579625797257982579925800258012580225803258042580525806258072580825809258102581125812258132581425815258162581725818258192582025821258222582325824258252582625827258282582925830258312583225833258342583525836258372583825839258402584125842258432584425845258462584725848258492585025851258522585325854258552585625857258582585925860258612586225863258642586525866258672586825869258702587125872258732587425875258762587725878258792588025881258822588325884258852588625887258882588925890258912589225893258942589525896258972589825899259002590125902259032590425905259062590725908259092591025911259122591325914259152591625917259182591925920259212592225923259242592525926259272592825929259302593125932259332593425935259362593725938259392594025941259422594325944259452594625947259482594925950259512595225953259542595525956259572595825959259602596125962259632596425965259662596725968259692597025971259722597325974259752597625977259782597925980259812598225983259842598525986259872598825989259902599125992259932599425995259962599725998259992600026001260022600326004260052600626007260082600926010260112601226013260142601526016260172601826019260202602126022260232602426025260262602726028260292603026031260322603326034260352603626037260382603926040260412604226043260442604526046260472604826049260502605126052260532605426055260562605726058260592606026061260622606326064260652606626067260682606926070260712607226073260742607526076260772607826079260802608126082260832608426085260862608726088260892609026091260922609326094260952609626097260982609926100261012610226103261042610526106261072610826109261102611126112261132611426115261162611726118261192612026121261222612326124261252612626127261282612926130261312613226133261342613526136261372613826139261402614126142261432614426145261462614726148261492615026151261522615326154261552615626157261582615926160261612616226163261642616526166261672616826169261702617126172261732617426175261762617726178261792618026181261822618326184261852618626187261882618926190261912619226193261942619526196261972619826199262002620126202262032620426205262062620726208262092621026211262122621326214262152621626217262182621926220262212622226223262242622526226262272622826229262302623126232262332623426235262362623726238262392624026241262422624326244262452624626247262482624926250262512625226253262542625526256262572625826259262602626126262262632626426265262662626726268262692627026271262722627326274262752627626277262782627926280262812628226283262842628526286262872628826289262902629126292262932629426295262962629726298262992630026301263022630326304263052630626307263082630926310263112631226313263142631526316263172631826319263202632126322263232632426325263262632726328263292633026331263322633326334263352633626337263382633926340263412634226343263442634526346263472634826349263502635126352263532635426355263562635726358263592636026361263622636326364263652636626367263682636926370263712637226373263742637526376263772637826379263802638126382263832638426385263862638726388263892639026391263922639326394263952639626397263982639926400264012640226403264042640526406264072640826409264102641126412264132641426415264162641726418264192642026421264222642326424264252642626427264282642926430264312643226433264342643526436264372643826439264402644126442264432644426445264462644726448264492645026451264522645326454264552645626457264582645926460264612646226463264642646526466264672646826469264702647126472264732647426475264762647726478264792648026481264822648326484264852648626487264882648926490264912649226493264942649526496264972649826499265002650126502265032650426505265062650726508265092651026511265122651326514265152651626517265182651926520265212652226523265242652526526265272652826529265302653126532265332653426535265362653726538265392654026541265422654326544265452654626547265482654926550265512655226553265542655526556265572655826559265602656126562265632656426565265662656726568265692657026571265722657326574265752657626577265782657926580265812658226583265842658526586265872658826589265902659126592265932659426595265962659726598265992660026601266022660326604266052660626607266082660926610266112661226613266142661526616266172661826619266202662126622266232662426625266262662726628266292663026631266322663326634266352663626637266382663926640266412664226643266442664526646266472664826649266502665126652266532665426655266562665726658266592666026661266622666326664266652666626667266682666926670266712667226673266742667526676266772667826679266802668126682266832668426685266862668726688266892669026691266922669326694266952669626697266982669926700267012670226703267042670526706267072670826709267102671126712267132671426715267162671726718267192672026721267222672326724267252672626727267282672926730267312673226733267342673526736267372673826739267402674126742267432674426745267462674726748267492675026751267522675326754267552675626757267582675926760267612676226763267642676526766267672676826769267702677126772267732677426775267762677726778267792678026781267822678326784267852678626787267882678926790267912679226793267942679526796267972679826799268002680126802268032680426805268062680726808268092681026811268122681326814268152681626817268182681926820268212682226823268242682526826268272682826829268302683126832268332683426835268362683726838268392684026841268422684326844268452684626847268482684926850268512685226853268542685526856268572685826859268602686126862268632686426865268662686726868268692687026871268722687326874268752687626877268782687926880268812688226883268842688526886268872688826889268902689126892268932689426895268962689726898268992690026901269022690326904269052690626907269082690926910269112691226913269142691526916269172691826919269202692126922269232692426925269262692726928269292693026931269322693326934269352693626937269382693926940269412694226943269442694526946269472694826949269502695126952269532695426955269562695726958269592696026961269622696326964269652696626967269682696926970269712697226973269742697526976269772697826979269802698126982269832698426985269862698726988269892699026991269922699326994269952699626997269982699927000270012700227003270042700527006270072700827009270102701127012270132701427015270162701727018270192702027021270222702327024270252702627027270282702927030270312703227033270342703527036270372703827039270402704127042270432704427045270462704727048270492705027051270522705327054270552705627057270582705927060270612706227063270642706527066270672706827069270702707127072270732707427075270762707727078270792708027081270822708327084270852708627087270882708927090270912709227093270942709527096270972709827099271002710127102271032710427105271062710727108271092711027111271122711327114271152711627117271182711927120271212712227123271242712527126271272712827129271302713127132271332713427135271362713727138271392714027141271422714327144271452714627147271482714927150271512715227153271542715527156271572715827159271602716127162271632716427165271662716727168271692717027171271722717327174271752717627177271782717927180271812718227183271842718527186271872718827189271902719127192271932719427195271962719727198271992720027201272022720327204272052720627207272082720927210272112721227213272142721527216272172721827219272202722127222272232722427225272262722727228272292723027231272322723327234272352723627237272382723927240272412724227243272442724527246272472724827249272502725127252272532725427255272562725727258272592726027261272622726327264272652726627267272682726927270272712727227273272742727527276272772727827279272802728127282272832728427285272862728727288272892729027291272922729327294272952729627297272982729927300273012730227303273042730527306273072730827309273102731127312273132731427315273162731727318273192732027321273222732327324273252732627327273282732927330273312733227333273342733527336273372733827339273402734127342273432734427345273462734727348273492735027351273522735327354273552735627357273582735927360273612736227363273642736527366273672736827369273702737127372273732737427375273762737727378273792738027381273822738327384273852738627387273882738927390273912739227393273942739527396273972739827399274002740127402274032740427405274062740727408274092741027411274122741327414274152741627417274182741927420274212742227423274242742527426274272742827429274302743127432274332743427435274362743727438274392744027441274422744327444274452744627447274482744927450274512745227453274542745527456274572745827459274602746127462274632746427465274662746727468274692747027471274722747327474274752747627477274782747927480274812748227483274842748527486274872748827489274902749127492274932749427495274962749727498274992750027501275022750327504275052750627507275082750927510275112751227513275142751527516275172751827519275202752127522275232752427525275262752727528275292753027531275322753327534275352753627537275382753927540275412754227543275442754527546275472754827549275502755127552275532755427555275562755727558275592756027561275622756327564275652756627567275682756927570275712757227573275742757527576275772757827579275802758127582275832758427585275862758727588275892759027591275922759327594275952759627597275982759927600276012760227603276042760527606276072760827609276102761127612276132761427615276162761727618276192762027621276222762327624276252762627627276282762927630276312763227633276342763527636276372763827639276402764127642276432764427645276462764727648276492765027651276522765327654276552765627657276582765927660276612766227663276642766527666276672766827669276702767127672276732767427675276762767727678276792768027681276822768327684276852768627687276882768927690276912769227693276942769527696276972769827699277002770127702277032770427705277062770727708277092771027711277122771327714277152771627717277182771927720277212772227723277242772527726277272772827729277302773127732277332773427735277362773727738277392774027741277422774327744277452774627747277482774927750277512775227753277542775527756277572775827759277602776127762277632776427765277662776727768277692777027771277722777327774277752777627777277782777927780277812778227783277842778527786277872778827789277902779127792277932779427795277962779727798277992780027801278022780327804278052780627807278082780927810278112781227813278142781527816278172781827819278202782127822278232782427825278262782727828278292783027831278322783327834278352783627837278382783927840278412784227843278442784527846278472784827849278502785127852278532785427855278562785727858278592786027861278622786327864278652786627867278682786927870278712787227873278742787527876278772787827879278802788127882278832788427885278862788727888278892789027891278922789327894278952789627897278982789927900279012790227903279042790527906279072790827909279102791127912279132791427915279162791727918279192792027921279222792327924279252792627927279282792927930279312793227933279342793527936279372793827939279402794127942279432794427945279462794727948279492795027951279522795327954279552795627957279582795927960279612796227963279642796527966279672796827969279702797127972279732797427975279762797727978279792798027981279822798327984279852798627987279882798927990279912799227993279942799527996279972799827999280002800128002280032800428005280062800728008280092801028011280122801328014280152801628017280182801928020280212802228023280242802528026280272802828029280302803128032280332803428035280362803728038280392804028041280422804328044280452804628047280482804928050280512805228053280542805528056280572805828059280602806128062280632806428065280662806728068280692807028071280722807328074280752807628077280782807928080280812808228083280842808528086280872808828089280902809128092280932809428095280962809728098280992810028101281022810328104281052810628107281082810928110281112811228113281142811528116281172811828119281202812128122281232812428125281262812728128281292813028131281322813328134281352813628137281382813928140281412814228143281442814528146281472814828149281502815128152281532815428155281562815728158281592816028161281622816328164281652816628167281682816928170281712817228173281742817528176281772817828179281802818128182281832818428185281862818728188281892819028191281922819328194281952819628197281982819928200282012820228203282042820528206282072820828209282102821128212282132821428215282162821728218282192822028221282222822328224282252822628227282282822928230282312823228233282342823528236282372823828239282402824128242282432824428245282462824728248282492825028251282522825328254282552825628257282582825928260282612826228263282642826528266282672826828269282702827128272282732827428275282762827728278282792828028281282822828328284282852828628287282882828928290282912829228293282942829528296282972829828299283002830128302283032830428305283062830728308283092831028311283122831328314283152831628317283182831928320283212832228323283242832528326283272832828329283302833128332283332833428335283362833728338283392834028341283422834328344283452834628347283482834928350283512835228353283542835528356283572835828359283602836128362283632836428365283662836728368283692837028371283722837328374283752837628377283782837928380283812838228383283842838528386283872838828389283902839128392283932839428395283962839728398283992840028401284022840328404284052840628407284082840928410284112841228413284142841528416284172841828419284202842128422284232842428425284262842728428284292843028431284322843328434284352843628437284382843928440284412844228443284442844528446284472844828449284502845128452284532845428455284562845728458284592846028461284622846328464284652846628467284682846928470284712847228473284742847528476284772847828479284802848128482284832848428485284862848728488284892849028491284922849328494284952849628497284982849928500285012850228503285042850528506285072850828509285102851128512285132851428515285162851728518285192852028521285222852328524285252852628527285282852928530285312853228533285342853528536285372853828539285402854128542285432854428545285462854728548285492855028551285522855328554285552855628557285582855928560285612856228563285642856528566285672856828569285702857128572285732857428575285762857728578285792858028581285822858328584285852858628587285882858928590285912859228593285942859528596285972859828599286002860128602286032860428605286062860728608286092861028611286122861328614286152861628617286182861928620286212862228623286242862528626286272862828629286302863128632286332863428635286362863728638286392864028641286422864328644286452864628647286482864928650286512865228653286542865528656286572865828659286602866128662286632866428665286662866728668286692867028671286722867328674286752867628677286782867928680286812868228683286842868528686286872868828689286902869128692286932869428695286962869728698286992870028701287022870328704287052870628707287082870928710287112871228713287142871528716287172871828719287202872128722287232872428725287262872728728287292873028731287322873328734287352873628737287382873928740287412874228743287442874528746287472874828749287502875128752287532875428755287562875728758287592876028761287622876328764287652876628767287682876928770287712877228773287742877528776287772877828779287802878128782287832878428785287862878728788287892879028791287922879328794287952879628797287982879928800288012880228803288042880528806288072880828809288102881128812288132881428815288162881728818288192882028821288222882328824288252882628827288282882928830288312883228833288342883528836288372883828839288402884128842288432884428845288462884728848288492885028851288522885328854288552885628857288582885928860288612886228863288642886528866288672886828869288702887128872288732887428875288762887728878288792888028881288822888328884288852888628887288882888928890288912889228893288942889528896288972889828899289002890128902289032890428905289062890728908289092891028911289122891328914289152891628917289182891928920289212892228923289242892528926289272892828929289302893128932289332893428935289362893728938289392894028941289422894328944289452894628947289482894928950289512895228953289542895528956289572895828959289602896128962289632896428965289662896728968289692897028971289722897328974289752897628977289782897928980289812898228983289842898528986289872898828989289902899128992289932899428995289962899728998289992900029001290022900329004290052900629007290082900929010290112901229013290142901529016290172901829019290202902129022290232902429025290262902729028290292903029031290322903329034290352903629037290382903929040290412904229043290442904529046290472904829049290502905129052290532905429055290562905729058290592906029061290622906329064290652906629067290682906929070290712907229073290742907529076290772907829079290802908129082290832908429085290862908729088290892909029091290922909329094290952909629097290982909929100291012910229103291042910529106291072910829109291102911129112291132911429115291162911729118291192912029121291222912329124291252912629127291282912929130291312913229133291342913529136291372913829139291402914129142291432914429145291462914729148291492915029151291522915329154291552915629157291582915929160291612916229163291642916529166291672916829169291702917129172291732917429175291762917729178291792918029181291822918329184291852918629187291882918929190291912919229193291942919529196291972919829199292002920129202292032920429205292062920729208292092921029211292122921329214292152921629217292182921929220292212922229223292242922529226292272922829229292302923129232292332923429235292362923729238292392924029241292422924329244292452924629247292482924929250292512925229253292542925529256292572925829259292602926129262292632926429265292662926729268292692927029271292722927329274292752927629277292782927929280292812928229283292842928529286292872928829289292902929129292292932929429295292962929729298292992930029301293022930329304293052930629307293082930929310293112931229313293142931529316293172931829319293202932129322293232932429325293262932729328293292933029331293322933329334293352933629337293382933929340293412934229343293442934529346293472934829349293502935129352293532935429355293562935729358293592936029361293622936329364293652936629367293682936929370293712937229373293742937529376293772937829379293802938129382293832938429385293862938729388293892939029391293922939329394293952939629397293982939929400294012940229403294042940529406294072940829409294102941129412294132941429415294162941729418294192942029421294222942329424294252942629427294282942929430294312943229433294342943529436294372943829439294402944129442294432944429445294462944729448294492945029451294522945329454294552945629457294582945929460294612946229463294642946529466294672946829469294702947129472294732947429475294762947729478294792948029481294822948329484294852948629487294882948929490294912949229493294942949529496294972949829499295002950129502295032950429505295062950729508295092951029511295122951329514295152951629517295182951929520295212952229523295242952529526295272952829529295302953129532295332953429535295362953729538295392954029541295422954329544295452954629547295482954929550295512955229553295542955529556295572955829559295602956129562295632956429565295662956729568295692957029571295722957329574295752957629577295782957929580295812958229583295842958529586295872958829589295902959129592295932959429595295962959729598295992960029601296022960329604296052960629607296082960929610296112961229613296142961529616296172961829619296202962129622296232962429625296262962729628296292963029631296322963329634296352963629637296382963929640296412964229643296442964529646296472964829649296502965129652296532965429655296562965729658296592966029661296622966329664296652966629667296682966929670296712967229673296742967529676296772967829679296802968129682296832968429685296862968729688296892969029691296922969329694296952969629697296982969929700297012970229703297042970529706297072970829709297102971129712297132971429715297162971729718297192972029721297222972329724297252972629727297282972929730297312973229733297342973529736297372973829739297402974129742297432974429745297462974729748297492975029751297522975329754297552975629757297582975929760297612976229763297642976529766297672976829769297702977129772297732977429775297762977729778297792978029781297822978329784297852978629787297882978929790297912979229793297942979529796297972979829799298002980129802298032980429805298062980729808298092981029811298122981329814298152981629817298182981929820298212982229823298242982529826298272982829829298302983129832298332983429835298362983729838298392984029841298422984329844298452984629847298482984929850298512985229853298542985529856298572985829859298602986129862298632986429865298662986729868298692987029871298722987329874298752987629877298782987929880298812988229883298842988529886298872988829889298902989129892298932989429895298962989729898298992990029901299022990329904299052990629907299082990929910299112991229913299142991529916299172991829919299202992129922299232992429925299262992729928299292993029931299322993329934299352993629937299382993929940299412994229943299442994529946299472994829949299502995129952299532995429955299562995729958299592996029961299622996329964299652996629967299682996929970299712997229973299742997529976299772997829979299802998129982299832998429985299862998729988299892999029991299922999329994299952999629997299982999930000300013000230003300043000530006300073000830009300103001130012300133001430015300163001730018300193002030021300223002330024300253002630027300283002930030300313003230033300343003530036300373003830039300403004130042300433004430045300463004730048300493005030051300523005330054300553005630057300583005930060300613006230063300643006530066300673006830069300703007130072300733007430075300763007730078300793008030081300823008330084300853008630087300883008930090300913009230093300943009530096300973009830099301003010130102301033010430105301063010730108301093011030111301123011330114301153011630117301183011930120301213012230123301243012530126301273012830129301303013130132301333013430135301363013730138301393014030141301423014330144301453014630147301483014930150301513015230153301543015530156301573015830159301603016130162301633016430165301663016730168301693017030171301723017330174301753017630177301783017930180301813018230183301843018530186301873018830189301903019130192301933019430195301963019730198301993020030201302023020330204302053020630207302083020930210302113021230213302143021530216302173021830219302203022130222302233022430225302263022730228302293023030231302323023330234302353023630237302383023930240302413024230243302443024530246302473024830249302503025130252302533025430255302563025730258302593026030261302623026330264302653026630267302683026930270302713027230273302743027530276302773027830279302803028130282302833028430285302863028730288302893029030291302923029330294302953029630297302983029930300303013030230303303043030530306303073030830309303103031130312303133031430315303163031730318303193032030321303223032330324303253032630327303283032930330303313033230333303343033530336303373033830339303403034130342303433034430345303463034730348303493035030351303523035330354303553035630357303583035930360303613036230363303643036530366303673036830369303703037130372303733037430375303763037730378303793038030381303823038330384303853038630387303883038930390303913039230393303943039530396303973039830399304003040130402304033040430405304063040730408304093041030411304123041330414304153041630417304183041930420304213042230423304243042530426304273042830429304303043130432304333043430435304363043730438304393044030441304423044330444304453044630447304483044930450304513045230453304543045530456304573045830459304603046130462304633046430465304663046730468304693047030471304723047330474304753047630477304783047930480304813048230483304843048530486304873048830489304903049130492304933049430495304963049730498304993050030501305023050330504305053050630507305083050930510305113051230513305143051530516305173051830519305203052130522305233052430525305263052730528305293053030531305323053330534305353053630537305383053930540305413054230543305443054530546305473054830549305503055130552305533055430555305563055730558305593056030561305623056330564305653056630567305683056930570305713057230573305743057530576305773057830579305803058130582305833058430585305863058730588305893059030591305923059330594305953059630597305983059930600306013060230603306043060530606306073060830609306103061130612306133061430615306163061730618306193062030621306223062330624306253062630627306283062930630306313063230633306343063530636306373063830639306403064130642306433064430645306463064730648306493065030651306523065330654306553065630657306583065930660306613066230663306643066530666306673066830669306703067130672306733067430675306763067730678306793068030681306823068330684306853068630687306883068930690306913069230693306943069530696306973069830699307003070130702307033070430705307063070730708307093071030711307123071330714307153071630717307183071930720307213072230723307243072530726307273072830729307303073130732307333073430735307363073730738307393074030741307423074330744307453074630747307483074930750307513075230753307543075530756307573075830759307603076130762307633076430765307663076730768307693077030771307723077330774307753077630777307783077930780307813078230783307843078530786307873078830789307903079130792307933079430795307963079730798307993080030801308023080330804308053080630807308083080930810308113081230813308143081530816308173081830819308203082130822308233082430825308263082730828308293083030831308323083330834308353083630837308383083930840308413084230843308443084530846308473084830849308503085130852308533085430855308563085730858308593086030861308623086330864308653086630867308683086930870308713087230873308743087530876308773087830879308803088130882308833088430885308863088730888308893089030891308923089330894308953089630897308983089930900309013090230903309043090530906309073090830909309103091130912309133091430915309163091730918309193092030921309223092330924309253092630927309283092930930309313093230933309343093530936309373093830939309403094130942309433094430945309463094730948309493095030951309523095330954309553095630957309583095930960309613096230963309643096530966309673096830969309703097130972309733097430975309763097730978309793098030981309823098330984309853098630987309883098930990309913099230993309943099530996309973099830999310003100131002310033100431005310063100731008310093101031011310123101331014310153101631017310183101931020310213102231023310243102531026310273102831029310303103131032310333103431035310363103731038310393104031041310423104331044310453104631047310483104931050310513105231053310543105531056310573105831059310603106131062310633106431065310663106731068310693107031071310723107331074310753107631077310783107931080310813108231083310843108531086310873108831089310903109131092310933109431095310963109731098310993110031101311023110331104311053110631107311083110931110311113111231113311143111531116311173111831119311203112131122311233112431125311263112731128311293113031131311323113331134311353113631137311383113931140311413114231143311443114531146311473114831149311503115131152311533115431155311563115731158311593116031161311623116331164311653116631167311683116931170311713117231173311743117531176311773117831179311803118131182311833118431185311863118731188311893119031191311923119331194311953119631197311983119931200312013120231203312043120531206312073120831209312103121131212312133121431215312163121731218312193122031221312223122331224312253122631227312283122931230312313123231233312343123531236312373123831239312403124131242312433124431245312463124731248312493125031251312523125331254312553125631257312583125931260312613126231263312643126531266312673126831269312703127131272312733127431275312763127731278312793128031281312823128331284312853128631287312883128931290312913129231293312943129531296312973129831299313003130131302313033130431305313063130731308313093131031311313123131331314313153131631317313183131931320313213132231323313243132531326313273132831329313303133131332313333133431335313363133731338313393134031341313423134331344313453134631347313483134931350313513135231353313543135531356313573135831359313603136131362313633136431365313663136731368313693137031371313723137331374313753137631377313783137931380313813138231383313843138531386313873138831389313903139131392313933139431395313963139731398313993140031401314023140331404314053140631407314083140931410314113141231413314143141531416314173141831419314203142131422314233142431425314263142731428314293143031431314323143331434314353143631437314383143931440314413144231443314443144531446314473144831449314503145131452314533145431455314563145731458314593146031461314623146331464314653146631467314683146931470314713147231473314743147531476314773147831479314803148131482314833148431485314863148731488314893149031491314923149331494314953149631497314983149931500315013150231503315043150531506315073150831509315103151131512315133151431515315163151731518315193152031521315223152331524315253152631527315283152931530315313153231533315343153531536315373153831539315403154131542315433154431545315463154731548315493155031551315523155331554315553155631557315583155931560315613156231563315643156531566315673156831569315703157131572315733157431575315763157731578315793158031581315823158331584315853158631587315883158931590315913159231593315943159531596315973159831599316003160131602316033160431605316063160731608316093161031611316123161331614316153161631617316183161931620316213162231623316243162531626316273162831629316303163131632316333163431635316363163731638316393164031641316423164331644316453164631647316483164931650316513165231653316543165531656316573165831659316603166131662316633166431665316663166731668316693167031671316723167331674316753167631677316783167931680316813168231683316843168531686316873168831689316903169131692316933169431695316963169731698316993170031701317023170331704317053170631707317083170931710317113171231713317143171531716317173171831719317203172131722317233172431725317263172731728317293173031731317323173331734317353173631737317383173931740317413174231743317443174531746317473174831749317503175131752317533175431755317563175731758317593176031761317623176331764317653176631767317683176931770317713177231773317743177531776317773177831779317803178131782317833178431785317863178731788317893179031791317923179331794317953179631797317983179931800318013180231803318043180531806318073180831809318103181131812318133181431815318163181731818318193182031821318223182331824318253182631827318283182931830318313183231833318343183531836318373183831839318403184131842318433184431845318463184731848318493185031851318523185331854318553185631857318583185931860318613186231863318643186531866318673186831869318703187131872318733187431875318763187731878318793188031881318823188331884318853188631887318883188931890318913189231893318943189531896318973189831899319003190131902319033190431905319063190731908319093191031911319123191331914319153191631917319183191931920319213192231923319243192531926319273192831929319303193131932319333193431935319363193731938319393194031941319423194331944319453194631947319483194931950319513195231953319543195531956319573195831959319603196131962319633196431965319663196731968319693197031971319723197331974319753197631977319783197931980319813198231983319843198531986319873198831989319903199131992319933199431995319963199731998319993200032001320023200332004320053200632007320083200932010320113201232013320143201532016320173201832019320203202132022320233202432025320263202732028320293203032031320323203332034320353203632037320383203932040320413204232043320443204532046320473204832049320503205132052320533205432055320563205732058320593206032061320623206332064320653206632067320683206932070320713207232073320743207532076320773207832079320803208132082320833208432085320863208732088320893209032091320923209332094320953209632097320983209932100321013210232103321043210532106321073210832109321103211132112321133211432115321163211732118321193212032121321223212332124321253212632127321283212932130321313213232133321343213532136321373213832139321403214132142321433214432145321463214732148321493215032151321523215332154321553215632157321583215932160321613216232163321643216532166321673216832169321703217132172321733217432175321763217732178321793218032181321823218332184321853218632187321883218932190321913219232193321943219532196321973219832199322003220132202322033220432205322063220732208322093221032211322123221332214322153221632217322183221932220322213222232223322243222532226322273222832229322303223132232322333223432235322363223732238322393224032241322423224332244322453224632247322483224932250322513225232253322543225532256322573225832259322603226132262322633226432265322663226732268322693227032271322723227332274322753227632277322783227932280322813228232283322843228532286322873228832289322903229132292322933229432295322963229732298322993230032301323023230332304323053230632307323083230932310323113231232313323143231532316323173231832319323203232132322323233232432325323263232732328323293233032331323323233332334323353233632337323383233932340323413234232343323443234532346323473234832349323503235132352323533235432355323563235732358323593236032361323623236332364323653236632367323683236932370323713237232373323743237532376323773237832379323803238132382323833238432385323863238732388323893239032391323923239332394323953239632397323983239932400324013240232403324043240532406324073240832409324103241132412324133241432415324163241732418324193242032421324223242332424324253242632427324283242932430324313243232433324343243532436324373243832439324403244132442324433244432445324463244732448324493245032451324523245332454324553245632457324583245932460324613246232463324643246532466324673246832469324703247132472324733247432475324763247732478324793248032481324823248332484324853248632487324883248932490324913249232493324943249532496324973249832499325003250132502325033250432505325063250732508325093251032511325123251332514325153251632517325183251932520325213252232523325243252532526325273252832529325303253132532325333253432535325363253732538325393254032541325423254332544325453254632547325483254932550325513255232553325543255532556325573255832559325603256132562325633256432565325663256732568325693257032571325723257332574325753257632577325783257932580325813258232583325843258532586325873258832589325903259132592325933259432595325963259732598325993260032601326023260332604326053260632607326083260932610326113261232613326143261532616326173261832619326203262132622326233262432625326263262732628326293263032631326323263332634326353263632637326383263932640326413264232643326443264532646326473264832649326503265132652326533265432655326563265732658326593266032661326623266332664326653266632667326683266932670326713267232673326743267532676326773267832679326803268132682326833268432685326863268732688326893269032691326923269332694326953269632697326983269932700327013270232703327043270532706327073270832709327103271132712327133271432715327163271732718327193272032721327223272332724327253272632727327283272932730327313273232733327343273532736327373273832739327403274132742327433274432745327463274732748327493275032751327523275332754327553275632757327583275932760327613276232763327643276532766327673276832769327703277132772327733277432775327763277732778327793278032781327823278332784327853278632787327883278932790327913279232793327943279532796327973279832799328003280132802328033280432805328063280732808328093281032811328123281332814328153281632817328183281932820328213282232823328243282532826328273282832829328303283132832328333283432835328363283732838328393284032841328423284332844328453284632847328483284932850328513285232853328543285532856328573285832859328603286132862328633286432865328663286732868328693287032871328723287332874328753287632877328783287932880328813288232883328843288532886328873288832889328903289132892328933289432895328963289732898328993290032901329023290332904329053290632907329083290932910329113291232913329143291532916329173291832919329203292132922329233292432925329263292732928329293293032931329323293332934329353293632937329383293932940329413294232943329443294532946329473294832949329503295132952329533295432955329563295732958329593296032961329623296332964329653296632967329683296932970329713297232973329743297532976329773297832979329803298132982329833298432985329863298732988329893299032991329923299332994329953299632997329983299933000330013300233003330043300533006330073300833009330103301133012330133301433015330163301733018330193302033021330223302333024330253302633027330283302933030330313303233033330343303533036330373303833039330403304133042330433304433045330463304733048330493305033051330523305333054330553305633057330583305933060330613306233063330643306533066330673306833069330703307133072330733307433075330763307733078330793308033081330823308333084330853308633087330883308933090330913309233093330943309533096330973309833099331003310133102331033310433105331063310733108331093311033111331123311333114331153311633117331183311933120331213312233123331243312533126331273312833129331303313133132331333313433135331363313733138331393314033141331423314333144331453314633147331483314933150331513315233153331543315533156331573315833159331603316133162331633316433165331663316733168331693317033171331723317333174331753317633177331783317933180331813318233183331843318533186331873318833189331903319133192331933319433195331963319733198331993320033201332023320333204332053320633207332083320933210332113321233213332143321533216332173321833219332203322133222332233322433225332263322733228332293323033231332323323333234332353323633237332383323933240332413324233243332443324533246332473324833249332503325133252332533325433255332563325733258332593326033261332623326333264332653326633267332683326933270332713327233273332743327533276332773327833279332803328133282332833328433285332863328733288332893329033291332923329333294332953329633297332983329933300333013330233303333043330533306333073330833309333103331133312333133331433315333163331733318333193332033321333223332333324333253332633327333283332933330333313333233333333343333533336333373333833339333403334133342333433334433345333463334733348333493335033351333523335333354333553335633357333583335933360333613336233363333643336533366333673336833369333703337133372333733337433375333763337733378333793338033381333823338333384333853338633387333883338933390333913339233393333943339533396333973339833399334003340133402334033340433405334063340733408334093341033411334123341333414334153341633417334183341933420334213342233423334243342533426334273342833429334303343133432334333343433435334363343733438334393344033441334423344333444334453344633447334483344933450334513345233453334543345533456334573345833459334603346133462334633346433465334663346733468334693347033471334723347333474334753347633477334783347933480334813348233483334843348533486334873348833489334903349133492334933349433495334963349733498334993350033501335023350333504335053350633507335083350933510335113351233513335143351533516335173351833519335203352133522335233352433525335263352733528335293353033531335323353333534335353353633537335383353933540335413354233543335443354533546335473354833549335503355133552335533355433555335563355733558335593356033561335623356333564335653356633567335683356933570335713357233573335743357533576335773357833579335803358133582335833358433585335863358733588335893359033591335923359333594335953359633597335983359933600336013360233603336043360533606336073360833609336103361133612336133361433615336163361733618336193362033621336223362333624336253362633627336283362933630336313363233633336343363533636336373363833639336403364133642336433364433645336463364733648336493365033651336523365333654336553365633657336583365933660336613366233663336643366533666336673366833669336703367133672336733367433675336763367733678336793368033681336823368333684336853368633687336883368933690336913369233693336943369533696336973369833699337003370133702337033370433705337063370733708337093371033711337123371333714337153371633717337183371933720337213372233723337243372533726337273372833729337303373133732337333373433735337363373733738337393374033741337423374333744337453374633747337483374933750337513375233753337543375533756337573375833759337603376133762337633376433765337663376733768337693377033771337723377333774337753377633777337783377933780337813378233783337843378533786337873378833789337903379133792337933379433795337963379733798337993380033801338023380333804338053380633807338083380933810338113381233813338143381533816338173381833819338203382133822338233382433825338263382733828338293383033831338323383333834338353383633837338383383933840338413384233843338443384533846338473384833849338503385133852338533385433855338563385733858338593386033861338623386333864338653386633867338683386933870338713387233873338743387533876338773387833879338803388133882338833388433885338863388733888338893389033891338923389333894338953389633897338983389933900339013390233903339043390533906339073390833909339103391133912339133391433915339163391733918339193392033921339223392333924339253392633927339283392933930339313393233933339343393533936339373393833939339403394133942339433394433945339463394733948339493395033951339523395333954339553395633957339583395933960339613396233963339643396533966339673396833969339703397133972339733397433975339763397733978339793398033981339823398333984339853398633987339883398933990339913399233993339943399533996339973399833999340003400134002340033400434005340063400734008340093401034011340123401334014340153401634017340183401934020340213402234023340243402534026340273402834029340303403134032340333403434035340363403734038340393404034041340423404334044340453404634047340483404934050340513405234053340543405534056340573405834059340603406134062340633406434065340663406734068340693407034071340723407334074340753407634077340783407934080340813408234083340843408534086340873408834089340903409134092340933409434095340963409734098340993410034101341023410334104341053410634107341083410934110341113411234113341143411534116341173411834119341203412134122341233412434125341263412734128341293413034131341323413334134341353413634137341383413934140341413414234143341443414534146341473414834149341503415134152341533415434155341563415734158341593416034161341623416334164341653416634167341683416934170341713417234173341743417534176341773417834179341803418134182341833418434185341863418734188341893419034191341923419334194341953419634197341983419934200342013420234203342043420534206342073420834209342103421134212342133421434215342163421734218342193422034221342223422334224342253422634227342283422934230342313423234233342343423534236342373423834239342403424134242342433424434245342463424734248342493425034251342523425334254342553425634257342583425934260342613426234263342643426534266342673426834269342703427134272342733427434275342763427734278342793428034281342823428334284342853428634287342883428934290342913429234293342943429534296342973429834299343003430134302343033430434305343063430734308343093431034311343123431334314343153431634317343183431934320343213432234323343243432534326343273432834329343303433134332343333433434335343363433734338343393434034341343423434334344343453434634347343483434934350343513435234353343543435534356343573435834359343603436134362343633436434365343663436734368343693437034371343723437334374343753437634377343783437934380343813438234383343843438534386343873438834389343903439134392343933439434395343963439734398343993440034401344023440334404344053440634407344083440934410344113441234413344143441534416344173441834419344203442134422344233442434425344263442734428344293443034431344323443334434344353443634437344383443934440344413444234443344443444534446344473444834449344503445134452344533445434455344563445734458344593446034461344623446334464344653446634467344683446934470344713447234473344743447534476344773447834479344803448134482344833448434485344863448734488344893449034491344923449334494344953449634497344983449934500345013450234503345043450534506345073450834509345103451134512345133451434515345163451734518345193452034521345223452334524345253452634527345283452934530345313453234533345343453534536345373453834539345403454134542345433454434545345463454734548345493455034551345523455334554345553455634557345583455934560345613456234563345643456534566345673456834569345703457134572345733457434575345763457734578345793458034581345823458334584345853458634587345883458934590345913459234593345943459534596345973459834599346003460134602346033460434605346063460734608346093461034611346123461334614346153461634617346183461934620346213462234623346243462534626346273462834629346303463134632346333463434635346363463734638346393464034641346423464334644346453464634647346483464934650346513465234653346543465534656346573465834659346603466134662346633466434665346663466734668346693467034671346723467334674346753467634677346783467934680346813468234683346843468534686346873468834689346903469134692346933469434695346963469734698346993470034701347023470334704347053470634707347083470934710347113471234713347143471534716347173471834719347203472134722347233472434725347263472734728347293473034731347323473334734347353473634737347383473934740347413474234743347443474534746347473474834749347503475134752347533475434755347563475734758347593476034761347623476334764347653476634767347683476934770347713477234773347743477534776347773477834779347803478134782347833478434785347863478734788347893479034791347923479334794347953479634797347983479934800348013480234803348043480534806348073480834809348103481134812348133481434815348163481734818348193482034821348223482334824348253482634827348283482934830348313483234833348343483534836348373483834839348403484134842348433484434845348463484734848348493485034851348523485334854348553485634857348583485934860348613486234863348643486534866348673486834869348703487134872348733487434875348763487734878348793488034881348823488334884348853488634887348883488934890348913489234893348943489534896348973489834899349003490134902349033490434905349063490734908349093491034911349123491334914349153491634917349183491934920349213492234923349243492534926349273492834929349303493134932349333493434935349363493734938349393494034941349423494334944349453494634947349483494934950349513495234953349543495534956349573495834959349603496134962349633496434965349663496734968349693497034971349723497334974349753497634977349783497934980349813498234983349843498534986349873498834989349903499134992349933499434995349963499734998349993500035001350023500335004350053500635007350083500935010350113501235013350143501535016350173501835019350203502135022350233502435025350263502735028350293503035031350323503335034350353503635037350383503935040350413504235043350443504535046350473504835049350503505135052350533505435055350563505735058350593506035061350623506335064350653506635067350683506935070350713507235073350743507535076350773507835079350803508135082350833508435085350863508735088350893509035091350923509335094350953509635097350983509935100351013510235103351043510535106351073510835109351103511135112351133511435115351163511735118351193512035121351223512335124351253512635127351283512935130351313513235133351343513535136351373513835139351403514135142351433514435145351463514735148351493515035151351523515335154351553515635157351583515935160351613516235163351643516535166351673516835169351703517135172351733517435175351763517735178351793518035181351823518335184351853518635187351883518935190351913519235193351943519535196351973519835199352003520135202352033520435205352063520735208352093521035211352123521335214352153521635217352183521935220352213522235223352243522535226352273522835229352303523135232352333523435235352363523735238352393524035241352423524335244352453524635247352483524935250352513525235253352543525535256352573525835259352603526135262352633526435265352663526735268352693527035271352723527335274352753527635277352783527935280352813528235283352843528535286352873528835289352903529135292352933529435295352963529735298352993530035301353023530335304353053530635307353083530935310353113531235313353143531535316353173531835319353203532135322353233532435325353263532735328353293533035331353323533335334353353533635337353383533935340353413534235343353443534535346353473534835349353503535135352353533535435355353563535735358353593536035361353623536335364353653536635367353683536935370353713537235373353743537535376353773537835379353803538135382353833538435385353863538735388353893539035391353923539335394353953539635397353983539935400354013540235403354043540535406354073540835409354103541135412354133541435415354163541735418354193542035421354223542335424354253542635427354283542935430354313543235433354343543535436354373543835439354403544135442354433544435445354463544735448354493545035451354523545335454354553545635457354583545935460354613546235463354643546535466354673546835469354703547135472354733547435475354763547735478354793548035481354823548335484354853548635487354883548935490354913549235493354943549535496354973549835499355003550135502355033550435505355063550735508355093551035511355123551335514355153551635517355183551935520355213552235523355243552535526355273552835529355303553135532355333553435535355363553735538355393554035541355423554335544355453554635547355483554935550355513555235553355543555535556355573555835559355603556135562355633556435565355663556735568355693557035571355723557335574355753557635577355783557935580355813558235583355843558535586355873558835589355903559135592355933559435595355963559735598355993560035601356023560335604356053560635607356083560935610356113561235613356143561535616356173561835619356203562135622356233562435625356263562735628356293563035631356323563335634356353563635637356383563935640356413564235643356443564535646356473564835649356503565135652356533565435655356563565735658356593566035661356623566335664356653566635667356683566935670356713567235673356743567535676356773567835679356803568135682356833568435685356863568735688356893569035691356923569335694356953569635697356983569935700357013570235703357043570535706357073570835709357103571135712357133571435715357163571735718357193572035721357223572335724357253572635727357283572935730357313573235733357343573535736357373573835739357403574135742357433574435745357463574735748357493575035751357523575335754357553575635757357583575935760357613576235763357643576535766357673576835769357703577135772357733577435775357763577735778357793578035781357823578335784357853578635787357883578935790357913579235793357943579535796357973579835799358003580135802358033580435805358063580735808358093581035811358123581335814358153581635817358183581935820358213582235823358243582535826358273582835829358303583135832358333583435835358363583735838358393584035841358423584335844358453584635847358483584935850358513585235853358543585535856358573585835859358603586135862358633586435865358663586735868358693587035871358723587335874358753587635877358783587935880358813588235883358843588535886358873588835889358903589135892358933589435895358963589735898358993590035901359023590335904359053590635907359083590935910359113591235913359143591535916359173591835919359203592135922359233592435925359263592735928359293593035931359323593335934359353593635937359383593935940359413594235943359443594535946359473594835949359503595135952359533595435955359563595735958359593596035961359623596335964359653596635967359683596935970359713597235973359743597535976359773597835979359803598135982359833598435985359863598735988359893599035991359923599335994359953599635997359983599936000360013600236003360043600536006360073600836009360103601136012360133601436015360163601736018360193602036021360223602336024360253602636027360283602936030360313603236033360343603536036360373603836039360403604136042360433604436045360463604736048360493605036051360523605336054360553605636057360583605936060360613606236063360643606536066360673606836069360703607136072360733607436075360763607736078360793608036081360823608336084360853608636087360883608936090360913609236093360943609536096360973609836099361003610136102361033610436105361063610736108361093611036111361123611336114361153611636117361183611936120361213612236123361243612536126361273612836129361303613136132361333613436135361363613736138361393614036141361423614336144361453614636147361483614936150361513615236153361543615536156361573615836159361603616136162361633616436165361663616736168361693617036171361723617336174361753617636177361783617936180361813618236183361843618536186361873618836189361903619136192361933619436195361963619736198361993620036201362023620336204362053620636207362083620936210362113621236213362143621536216362173621836219362203622136222362233622436225362263622736228362293623036231362323623336234362353623636237362383623936240362413624236243362443624536246362473624836249362503625136252362533625436255362563625736258362593626036261362623626336264362653626636267362683626936270362713627236273362743627536276362773627836279362803628136282362833628436285362863628736288362893629036291362923629336294362953629636297362983629936300363013630236303363043630536306363073630836309363103631136312363133631436315363163631736318363193632036321363223632336324363253632636327363283632936330363313633236333363343633536336363373633836339363403634136342363433634436345363463634736348363493635036351363523635336354363553635636357363583635936360363613636236363363643636536366363673636836369363703637136372363733637436375363763637736378363793638036381363823638336384363853638636387363883638936390363913639236393363943639536396363973639836399364003640136402364033640436405364063640736408364093641036411364123641336414364153641636417364183641936420364213642236423364243642536426364273642836429364303643136432364333643436435364363643736438364393644036441364423644336444364453644636447364483644936450364513645236453364543645536456364573645836459364603646136462364633646436465364663646736468364693647036471364723647336474364753647636477364783647936480364813648236483364843648536486364873648836489364903649136492364933649436495364963649736498364993650036501365023650336504365053650636507365083650936510365113651236513365143651536516365173651836519365203652136522365233652436525365263652736528365293653036531365323653336534365353653636537365383653936540365413654236543365443654536546365473654836549365503655136552365533655436555365563655736558365593656036561365623656336564365653656636567365683656936570365713657236573365743657536576365773657836579365803658136582365833658436585365863658736588365893659036591365923659336594365953659636597365983659936600366013660236603366043660536606366073660836609366103661136612366133661436615366163661736618366193662036621366223662336624366253662636627366283662936630366313663236633366343663536636366373663836639366403664136642366433664436645366463664736648366493665036651366523665336654366553665636657366583665936660366613666236663366643666536666366673666836669366703667136672366733667436675366763667736678366793668036681366823668336684366853668636687366883668936690366913669236693366943669536696366973669836699367003670136702367033670436705367063670736708367093671036711367123671336714367153671636717367183671936720367213672236723367243672536726367273672836729367303673136732367333673436735367363673736738367393674036741367423674336744367453674636747367483674936750367513675236753367543675536756367573675836759367603676136762367633676436765367663676736768367693677036771367723677336774367753677636777367783677936780367813678236783367843678536786367873678836789367903679136792367933679436795367963679736798367993680036801368023680336804368053680636807368083680936810368113681236813368143681536816368173681836819368203682136822368233682436825368263682736828368293683036831368323683336834368353683636837368383683936840368413684236843368443684536846368473684836849368503685136852368533685436855368563685736858368593686036861368623686336864368653686636867368683686936870368713687236873368743687536876368773687836879368803688136882368833688436885368863688736888368893689036891368923689336894368953689636897368983689936900369013690236903369043690536906369073690836909369103691136912369133691436915369163691736918369193692036921369223692336924369253692636927369283692936930369313693236933369343693536936369373693836939369403694136942369433694436945369463694736948369493695036951369523695336954369553695636957369583695936960369613696236963369643696536966369673696836969369703697136972369733697436975369763697736978369793698036981369823698336984369853698636987369883698936990369913699236993369943699536996369973699836999370003700137002370033700437005370063700737008370093701037011370123701337014370153701637017370183701937020370213702237023370243702537026370273702837029370303703137032370333703437035370363703737038370393704037041370423704337044370453704637047370483704937050370513705237053370543705537056370573705837059370603706137062370633706437065370663706737068370693707037071370723707337074370753707637077370783707937080370813708237083370843708537086370873708837089370903709137092370933709437095370963709737098370993710037101371023710337104371053710637107371083710937110371113711237113371143711537116371173711837119371203712137122371233712437125371263712737128371293713037131371323713337134371353713637137371383713937140371413714237143371443714537146371473714837149371503715137152371533715437155371563715737158371593716037161371623716337164371653716637167371683716937170371713717237173371743717537176371773717837179371803718137182371833718437185371863718737188371893719037191371923719337194371953719637197371983719937200372013720237203372043720537206372073720837209372103721137212372133721437215372163721737218372193722037221372223722337224372253722637227372283722937230372313723237233372343723537236372373723837239372403724137242372433724437245372463724737248372493725037251372523725337254372553725637257372583725937260372613726237263372643726537266372673726837269372703727137272372733727437275372763727737278372793728037281372823728337284372853728637287372883728937290372913729237293372943729537296372973729837299373003730137302373033730437305373063730737308373093731037311373123731337314373153731637317373183731937320373213732237323373243732537326373273732837329373303733137332373333733437335373363733737338373393734037341373423734337344373453734637347373483734937350373513735237353373543735537356373573735837359373603736137362373633736437365373663736737368373693737037371373723737337374373753737637377373783737937380373813738237383373843738537386373873738837389373903739137392373933739437395373963739737398373993740037401374023740337404374053740637407374083740937410374113741237413374143741537416374173741837419374203742137422374233742437425374263742737428374293743037431374323743337434374353743637437374383743937440374413744237443374443744537446374473744837449374503745137452374533745437455374563745737458374593746037461374623746337464374653746637467374683746937470374713747237473374743747537476374773747837479374803748137482374833748437485374863748737488374893749037491374923749337494374953749637497374983749937500375013750237503375043750537506375073750837509375103751137512375133751437515375163751737518375193752037521375223752337524375253752637527375283752937530375313753237533375343753537536375373753837539375403754137542375433754437545375463754737548375493755037551375523755337554375553755637557375583755937560375613756237563375643756537566375673756837569375703757137572375733757437575375763757737578375793758037581375823758337584375853758637587375883758937590375913759237593375943759537596375973759837599376003760137602376033760437605376063760737608376093761037611376123761337614376153761637617376183761937620376213762237623376243762537626376273762837629376303763137632376333763437635376363763737638376393764037641376423764337644376453764637647376483764937650376513765237653376543765537656376573765837659376603766137662376633766437665376663766737668376693767037671376723767337674376753767637677376783767937680376813768237683376843768537686376873768837689376903769137692376933769437695376963769737698376993770037701377023770337704377053770637707377083770937710377113771237713377143771537716377173771837719377203772137722377233772437725377263772737728377293773037731377323773337734377353773637737377383773937740377413774237743377443774537746377473774837749377503775137752377533775437755377563775737758377593776037761377623776337764377653776637767377683776937770377713777237773377743777537776377773777837779377803778137782377833778437785377863778737788377893779037791377923779337794377953779637797377983779937800378013780237803378043780537806378073780837809378103781137812378133781437815378163781737818378193782037821378223782337824378253782637827378283782937830378313783237833378343783537836378373783837839378403784137842378433784437845378463784737848378493785037851378523785337854378553785637857378583785937860378613786237863378643786537866378673786837869378703787137872378733787437875378763787737878378793788037881378823788337884378853788637887378883788937890378913789237893378943789537896378973789837899379003790137902379033790437905379063790737908379093791037911379123791337914379153791637917379183791937920379213792237923379243792537926379273792837929379303793137932379333793437935379363793737938379393794037941379423794337944379453794637947379483794937950379513795237953379543795537956379573795837959379603796137962379633796437965379663796737968379693797037971379723797337974379753797637977379783797937980379813798237983379843798537986379873798837989379903799137992379933799437995379963799737998379993800038001380023800338004380053800638007380083800938010380113801238013380143801538016380173801838019380203802138022380233802438025380263802738028380293803038031380323803338034380353803638037380383803938040380413804238043380443804538046380473804838049380503805138052380533805438055380563805738058380593806038061380623806338064380653806638067380683806938070380713807238073380743807538076380773807838079380803808138082380833808438085380863808738088380893809038091380923809338094380953809638097380983809938100381013810238103381043810538106381073810838109381103811138112381133811438115381163811738118381193812038121381223812338124381253812638127381283812938130381313813238133381343813538136381373813838139381403814138142381433814438145381463814738148381493815038151381523815338154381553815638157381583815938160381613816238163381643816538166381673816838169381703817138172381733817438175381763817738178381793818038181381823818338184381853818638187381883818938190381913819238193381943819538196381973819838199382003820138202382033820438205382063820738208382093821038211382123821338214382153821638217382183821938220382213822238223382243822538226382273822838229382303823138232382333823438235382363823738238382393824038241382423824338244382453824638247382483824938250382513825238253382543825538256382573825838259382603826138262382633826438265382663826738268382693827038271382723827338274382753827638277382783827938280382813828238283382843828538286382873828838289382903829138292382933829438295382963829738298382993830038301383023830338304383053830638307383083830938310383113831238313383143831538316383173831838319383203832138322383233832438325383263832738328383293833038331383323833338334383353833638337383383833938340383413834238343383443834538346383473834838349383503835138352383533835438355383563835738358383593836038361383623836338364383653836638367383683836938370383713837238373383743837538376383773837838379383803838138382383833838438385383863838738388383893839038391383923839338394383953839638397383983839938400384013840238403384043840538406384073840838409384103841138412384133841438415384163841738418384193842038421384223842338424384253842638427384283842938430384313843238433384343843538436384373843838439384403844138442384433844438445384463844738448384493845038451384523845338454384553845638457384583845938460384613846238463384643846538466384673846838469384703847138472384733847438475384763847738478384793848038481384823848338484384853848638487384883848938490384913849238493384943849538496384973849838499385003850138502385033850438505385063850738508385093851038511385123851338514385153851638517385183851938520385213852238523385243852538526385273852838529385303853138532385333853438535385363853738538385393854038541385423854338544385453854638547385483854938550385513855238553385543855538556385573855838559385603856138562385633856438565385663856738568385693857038571385723857338574385753857638577385783857938580385813858238583385843858538586385873858838589385903859138592385933859438595385963859738598385993860038601386023860338604386053860638607386083860938610386113861238613386143861538616386173861838619386203862138622386233862438625386263862738628386293863038631386323863338634386353863638637386383863938640386413864238643386443864538646386473864838649386503865138652386533865438655386563865738658386593866038661386623866338664386653866638667386683866938670386713867238673386743867538676386773867838679386803868138682386833868438685386863868738688386893869038691386923869338694386953869638697386983869938700387013870238703387043870538706387073870838709387103871138712387133871438715387163871738718387193872038721387223872338724387253872638727387283872938730387313873238733387343873538736387373873838739387403874138742387433874438745387463874738748387493875038751387523875338754387553875638757387583875938760387613876238763387643876538766387673876838769387703877138772387733877438775387763877738778387793878038781387823878338784387853878638787387883878938790387913879238793387943879538796387973879838799388003880138802388033880438805388063880738808388093881038811388123881338814388153881638817388183881938820388213882238823388243882538826388273882838829388303883138832388333883438835388363883738838388393884038841388423884338844388453884638847388483884938850388513885238853388543885538856388573885838859388603886138862388633886438865388663886738868388693887038871388723887338874388753887638877388783887938880388813888238883388843888538886388873888838889388903889138892388933889438895388963889738898388993890038901389023890338904389053890638907389083890938910389113891238913389143891538916389173891838919389203892138922389233892438925389263892738928389293893038931389323893338934389353893638937389383893938940389413894238943389443894538946389473894838949389503895138952389533895438955389563895738958389593896038961389623896338964389653896638967389683896938970389713897238973389743897538976389773897838979389803898138982389833898438985389863898738988389893899038991389923899338994389953899638997389983899939000390013900239003390043900539006390073900839009390103901139012390133901439015390163901739018390193902039021390223902339024390253902639027390283902939030390313903239033390343903539036390373903839039390403904139042390433904439045390463904739048390493905039051390523905339054390553905639057390583905939060390613906239063390643906539066390673906839069390703907139072390733907439075390763907739078390793908039081390823908339084390853908639087390883908939090390913909239093390943909539096390973909839099391003910139102391033910439105391063910739108391093911039111391123911339114391153911639117391183911939120391213912239123391243912539126391273912839129391303913139132391333913439135391363913739138391393914039141391423914339144391453914639147391483914939150391513915239153391543915539156391573915839159391603916139162391633916439165391663916739168391693917039171391723917339174391753917639177391783917939180391813918239183391843918539186391873918839189391903919139192391933919439195391963919739198391993920039201392023920339204392053920639207392083920939210392113921239213392143921539216392173921839219392203922139222392233922439225392263922739228392293923039231392323923339234392353923639237392383923939240392413924239243392443924539246392473924839249392503925139252392533925439255392563925739258392593926039261392623926339264392653926639267392683926939270392713927239273392743927539276392773927839279392803928139282392833928439285392863928739288392893929039291392923929339294392953929639297392983929939300393013930239303393043930539306393073930839309393103931139312393133931439315393163931739318393193932039321393223932339324393253932639327393283932939330393313933239333393343933539336393373933839339393403934139342393433934439345393463934739348393493935039351393523935339354393553935639357393583935939360393613936239363393643936539366393673936839369393703937139372393733937439375393763937739378393793938039381393823938339384393853938639387393883938939390393913939239393393943939539396393973939839399394003940139402394033940439405394063940739408394093941039411394123941339414394153941639417394183941939420394213942239423394243942539426394273942839429394303943139432394333943439435394363943739438394393944039441394423944339444394453944639447394483944939450394513945239453394543945539456394573945839459394603946139462394633946439465394663946739468394693947039471394723947339474394753947639477394783947939480394813948239483394843948539486394873948839489394903949139492394933949439495394963949739498394993950039501395023950339504395053950639507395083950939510395113951239513395143951539516395173951839519395203952139522395233952439525395263952739528395293953039531395323953339534395353953639537395383953939540395413954239543395443954539546395473954839549395503955139552395533955439555395563955739558395593956039561395623956339564395653956639567395683956939570395713957239573395743957539576395773957839579395803958139582395833958439585395863958739588395893959039591395923959339594395953959639597395983959939600396013960239603396043960539606396073960839609396103961139612396133961439615396163961739618396193962039621396223962339624396253962639627396283962939630396313963239633396343963539636396373963839639396403964139642396433964439645396463964739648396493965039651396523965339654396553965639657396583965939660396613966239663396643966539666396673966839669396703967139672396733967439675396763967739678396793968039681396823968339684396853968639687396883968939690396913969239693396943969539696396973969839699397003970139702397033970439705397063970739708397093971039711397123971339714397153971639717397183971939720397213972239723397243972539726397273972839729397303973139732397333973439735397363973739738397393974039741397423974339744397453974639747397483974939750397513975239753397543975539756397573975839759397603976139762397633976439765397663976739768397693977039771397723977339774397753977639777397783977939780397813978239783397843978539786397873978839789397903979139792397933979439795397963979739798397993980039801398023980339804398053980639807398083980939810398113981239813398143981539816398173981839819398203982139822398233982439825398263982739828398293983039831398323983339834398353983639837398383983939840398413984239843398443984539846398473984839849398503985139852398533985439855398563985739858398593986039861398623986339864398653986639867398683986939870398713987239873398743987539876398773987839879398803988139882398833988439885398863988739888398893989039891398923989339894398953989639897398983989939900399013990239903399043990539906399073990839909399103991139912399133991439915399163991739918399193992039921399223992339924399253992639927399283992939930399313993239933399343993539936399373993839939399403994139942399433994439945399463994739948399493995039951399523995339954399553995639957399583995939960399613996239963399643996539966399673996839969399703997139972399733997439975399763997739978399793998039981399823998339984399853998639987399883998939990399913999239993399943999539996399973999839999400004000140002400034000440005400064000740008400094001040011400124001340014400154001640017400184001940020400214002240023400244002540026400274002840029400304003140032400334003440035400364003740038400394004040041400424004340044400454004640047400484004940050400514005240053400544005540056400574005840059400604006140062400634006440065400664006740068400694007040071400724007340074400754007640077400784007940080400814008240083400844008540086400874008840089400904009140092400934009440095400964009740098400994010040101401024010340104401054010640107401084010940110401114011240113401144011540116401174011840119401204012140122401234012440125401264012740128401294013040131401324013340134401354013640137401384013940140401414014240143401444014540146401474014840149401504015140152401534015440155401564015740158401594016040161401624016340164401654016640167401684016940170401714017240173401744017540176401774017840179401804018140182401834018440185401864018740188401894019040191401924019340194401954019640197401984019940200402014020240203402044020540206402074020840209402104021140212402134021440215402164021740218402194022040221402224022340224402254022640227402284022940230402314023240233402344023540236402374023840239402404024140242402434024440245402464024740248402494025040251402524025340254402554025640257402584025940260402614026240263402644026540266402674026840269402704027140272402734027440275402764027740278402794028040281402824028340284402854028640287402884028940290402914029240293402944029540296402974029840299403004030140302403034030440305403064030740308403094031040311403124031340314403154031640317403184031940320403214032240323403244032540326403274032840329403304033140332403334033440335403364033740338403394034040341403424034340344403454034640347403484034940350403514035240353403544035540356403574035840359403604036140362403634036440365403664036740368403694037040371403724037340374403754037640377403784037940380403814038240383403844038540386403874038840389403904039140392403934039440395403964039740398403994040040401404024040340404404054040640407404084040940410404114041240413404144041540416404174041840419404204042140422404234042440425404264042740428404294043040431404324043340434404354043640437404384043940440404414044240443404444044540446404474044840449404504045140452404534045440455404564045740458404594046040461404624046340464404654046640467404684046940470404714047240473404744047540476404774047840479404804048140482404834048440485404864048740488404894049040491404924049340494404954049640497404984049940500405014050240503405044050540506405074050840509405104051140512405134051440515405164051740518405194052040521405224052340524405254052640527405284052940530405314053240533405344053540536405374053840539405404054140542405434054440545405464054740548405494055040551405524055340554405554055640557405584055940560405614056240563405644056540566405674056840569405704057140572405734057440575405764057740578405794058040581405824058340584405854058640587405884058940590405914059240593405944059540596405974059840599406004060140602406034060440605406064060740608406094061040611406124061340614406154061640617406184061940620406214062240623406244062540626406274062840629406304063140632406334063440635406364063740638406394064040641406424064340644406454064640647406484064940650406514065240653406544065540656406574065840659406604066140662406634066440665406664066740668406694067040671406724067340674406754067640677406784067940680406814068240683406844068540686406874068840689406904069140692406934069440695406964069740698406994070040701407024070340704407054070640707407084070940710407114071240713407144071540716407174071840719407204072140722407234072440725407264072740728407294073040731407324073340734407354073640737407384073940740407414074240743407444074540746407474074840749407504075140752407534075440755407564075740758407594076040761407624076340764407654076640767407684076940770407714077240773407744077540776407774077840779407804078140782407834078440785407864078740788407894079040791407924079340794407954079640797407984079940800408014080240803408044080540806408074080840809408104081140812408134081440815408164081740818408194082040821408224082340824408254082640827408284082940830408314083240833408344083540836408374083840839408404084140842408434084440845408464084740848408494085040851408524085340854408554085640857408584085940860408614086240863408644086540866408674086840869408704087140872408734087440875408764087740878408794088040881408824088340884408854088640887408884088940890408914089240893408944089540896408974089840899409004090140902409034090440905409064090740908409094091040911409124091340914409154091640917409184091940920409214092240923409244092540926409274092840929409304093140932409334093440935409364093740938409394094040941409424094340944409454094640947409484094940950409514095240953409544095540956409574095840959409604096140962409634096440965409664096740968409694097040971409724097340974409754097640977409784097940980409814098240983409844098540986409874098840989409904099140992409934099440995409964099740998409994100041001410024100341004410054100641007410084100941010410114101241013410144101541016410174101841019410204102141022410234102441025410264102741028410294103041031410324103341034410354103641037410384103941040410414104241043410444104541046410474104841049410504105141052410534105441055410564105741058410594106041061410624106341064410654106641067410684106941070410714107241073410744107541076410774107841079410804108141082410834108441085410864108741088410894109041091410924109341094410954109641097410984109941100411014110241103411044110541106411074110841109411104111141112411134111441115411164111741118411194112041121411224112341124411254112641127411284112941130411314113241133411344113541136411374113841139411404114141142411434114441145411464114741148411494115041151411524115341154411554115641157411584115941160411614116241163411644116541166411674116841169411704117141172411734117441175411764117741178411794118041181411824118341184411854118641187411884118941190411914119241193411944119541196411974119841199412004120141202412034120441205412064120741208412094121041211412124121341214412154121641217412184121941220412214122241223412244122541226412274122841229412304123141232412334123441235412364123741238412394124041241412424124341244412454124641247412484124941250412514125241253412544125541256412574125841259412604126141262412634126441265412664126741268412694127041271412724127341274412754127641277412784127941280412814128241283412844128541286412874128841289412904129141292412934129441295412964129741298412994130041301413024130341304413054130641307413084130941310413114131241313413144131541316413174131841319413204132141322413234132441325413264132741328413294133041331413324133341334413354133641337413384133941340413414134241343413444134541346413474134841349413504135141352413534135441355413564135741358413594136041361413624136341364413654136641367413684136941370413714137241373413744137541376413774137841379413804138141382413834138441385413864138741388413894139041391413924139341394413954139641397413984139941400414014140241403414044140541406414074140841409414104141141412414134141441415414164141741418414194142041421414224142341424414254142641427414284142941430414314143241433414344143541436414374143841439414404144141442414434144441445414464144741448414494145041451414524145341454414554145641457414584145941460414614146241463414644146541466414674146841469414704147141472414734147441475414764147741478414794148041481414824148341484414854148641487414884148941490414914149241493414944149541496414974149841499415004150141502415034150441505415064150741508415094151041511415124151341514415154151641517415184151941520415214152241523415244152541526415274152841529415304153141532415334153441535415364153741538415394154041541415424154341544415454154641547415484154941550415514155241553415544155541556415574155841559415604156141562415634156441565415664156741568415694157041571415724157341574415754157641577415784157941580415814158241583415844158541586415874158841589415904159141592415934159441595415964159741598415994160041601416024160341604416054160641607416084160941610416114161241613416144161541616416174161841619416204162141622416234162441625416264162741628416294163041631416324163341634416354163641637416384163941640416414164241643416444164541646416474164841649416504165141652416534165441655416564165741658416594166041661416624166341664416654166641667416684166941670416714167241673416744167541676416774167841679416804168141682416834168441685416864168741688416894169041691416924169341694416954169641697416984169941700417014170241703417044170541706417074170841709417104171141712417134171441715417164171741718417194172041721417224172341724417254172641727417284172941730417314173241733417344173541736417374173841739417404174141742417434174441745417464174741748417494175041751417524175341754417554175641757417584175941760417614176241763417644176541766417674176841769417704177141772417734177441775417764177741778417794178041781417824178341784417854178641787417884178941790417914179241793417944179541796417974179841799418004180141802418034180441805418064180741808418094181041811418124181341814418154181641817418184181941820418214182241823418244182541826418274182841829418304183141832418334183441835418364183741838418394184041841418424184341844418454184641847418484184941850418514185241853418544185541856418574185841859418604186141862418634186441865418664186741868418694187041871418724187341874418754187641877418784187941880418814188241883418844188541886418874188841889418904189141892418934189441895418964189741898418994190041901419024190341904419054190641907419084190941910419114191241913419144191541916419174191841919419204192141922419234192441925419264192741928419294193041931419324193341934419354193641937419384193941940419414194241943419444194541946419474194841949419504195141952419534195441955419564195741958419594196041961419624196341964419654196641967419684196941970419714197241973419744197541976419774197841979419804198141982419834198441985419864198741988419894199041991419924199341994419954199641997419984199942000420014200242003420044200542006420074200842009420104201142012420134201442015420164201742018420194202042021420224202342024420254202642027420284202942030420314203242033420344203542036420374203842039420404204142042420434204442045420464204742048420494205042051420524205342054420554205642057420584205942060420614206242063420644206542066420674206842069420704207142072420734207442075420764207742078420794208042081420824208342084420854208642087420884208942090420914209242093420944209542096420974209842099421004210142102421034210442105421064210742108421094211042111421124211342114421154211642117421184211942120421214212242123421244212542126421274212842129421304213142132421334213442135421364213742138421394214042141421424214342144421454214642147421484214942150421514215242153421544215542156421574215842159421604216142162421634216442165421664216742168421694217042171421724217342174421754217642177421784217942180421814218242183421844218542186421874218842189421904219142192421934219442195421964219742198421994220042201422024220342204422054220642207422084220942210422114221242213422144221542216422174221842219422204222142222422234222442225422264222742228422294223042231422324223342234422354223642237422384223942240422414224242243422444224542246422474224842249422504225142252422534225442255422564225742258422594226042261422624226342264422654226642267422684226942270422714227242273422744227542276422774227842279422804228142282422834228442285422864228742288422894229042291422924229342294422954229642297422984229942300423014230242303423044230542306423074230842309423104231142312423134231442315423164231742318423194232042321423224232342324423254232642327423284232942330423314233242333423344233542336423374233842339423404234142342423434234442345423464234742348423494235042351423524235342354423554235642357423584235942360423614236242363423644236542366423674236842369423704237142372423734237442375423764237742378423794238042381423824238342384423854238642387423884238942390423914239242393423944239542396423974239842399424004240142402424034240442405424064240742408424094241042411424124241342414424154241642417424184241942420424214242242423424244242542426424274242842429424304243142432424334243442435424364243742438424394244042441424424244342444424454244642447424484244942450424514245242453424544245542456424574245842459424604246142462424634246442465424664246742468424694247042471424724247342474424754247642477424784247942480424814248242483424844248542486424874248842489424904249142492424934249442495424964249742498424994250042501425024250342504425054250642507425084250942510425114251242513425144251542516425174251842519425204252142522425234252442525425264252742528425294253042531425324253342534425354253642537425384253942540425414254242543425444254542546425474254842549425504255142552425534255442555425564255742558425594256042561425624256342564425654256642567425684256942570425714257242573425744257542576425774257842579425804258142582425834258442585425864258742588425894259042591425924259342594425954259642597425984259942600426014260242603426044260542606426074260842609426104261142612426134261442615426164261742618426194262042621426224262342624426254262642627426284262942630426314263242633426344263542636426374263842639426404264142642426434264442645426464264742648426494265042651426524265342654426554265642657426584265942660426614266242663426644266542666426674266842669426704267142672426734267442675426764267742678426794268042681426824268342684426854268642687426884268942690426914269242693426944269542696426974269842699427004270142702427034270442705427064270742708427094271042711427124271342714427154271642717427184271942720427214272242723427244272542726427274272842729427304273142732427334273442735427364273742738427394274042741427424274342744427454274642747427484274942750427514275242753427544275542756427574275842759427604276142762427634276442765427664276742768427694277042771427724277342774427754277642777427784277942780427814278242783427844278542786427874278842789427904279142792427934279442795427964279742798427994280042801428024280342804428054280642807428084280942810428114281242813428144281542816428174281842819428204282142822428234282442825428264282742828428294283042831428324283342834428354283642837428384283942840428414284242843428444284542846428474284842849428504285142852428534285442855428564285742858428594286042861428624286342864428654286642867428684286942870428714287242873428744287542876428774287842879428804288142882428834288442885428864288742888428894289042891428924289342894428954289642897428984289942900429014290242903429044290542906429074290842909429104291142912429134291442915429164291742918429194292042921429224292342924429254292642927429284292942930429314293242933429344293542936429374293842939429404294142942429434294442945429464294742948429494295042951429524295342954429554295642957429584295942960429614296242963429644296542966429674296842969429704297142972429734297442975429764297742978429794298042981429824298342984429854298642987429884298942990429914299242993429944299542996429974299842999430004300143002430034300443005430064300743008430094301043011430124301343014430154301643017430184301943020430214302243023430244302543026430274302843029430304303143032430334303443035430364303743038430394304043041430424304343044430454304643047430484304943050430514305243053430544305543056430574305843059430604306143062430634306443065430664306743068430694307043071430724307343074430754307643077430784307943080430814308243083430844308543086430874308843089430904309143092430934309443095430964309743098430994310043101431024310343104431054310643107431084310943110431114311243113431144311543116431174311843119431204312143122431234312443125431264312743128431294313043131431324313343134431354313643137431384313943140431414314243143431444314543146431474314843149431504315143152431534315443155431564315743158431594316043161431624316343164431654316643167431684316943170431714317243173431744317543176431774317843179431804318143182431834318443185431864318743188431894319043191431924319343194431954319643197431984319943200432014320243203432044320543206432074320843209432104321143212432134321443215432164321743218432194322043221432224322343224432254322643227432284322943230432314323243233432344323543236432374323843239432404324143242432434324443245432464324743248432494325043251432524325343254432554325643257432584325943260432614326243263432644326543266432674326843269432704327143272432734327443275432764327743278432794328043281432824328343284432854328643287432884328943290432914329243293432944329543296432974329843299433004330143302433034330443305433064330743308433094331043311433124331343314433154331643317433184331943320433214332243323433244332543326433274332843329433304333143332433334333443335433364333743338433394334043341433424334343344433454334643347433484334943350433514335243353433544335543356433574335843359433604336143362433634336443365433664336743368433694337043371433724337343374433754337643377433784337943380433814338243383433844338543386433874338843389433904339143392433934339443395433964339743398433994340043401434024340343404434054340643407434084340943410434114341243413434144341543416434174341843419434204342143422434234342443425434264342743428434294343043431434324343343434434354343643437434384343943440434414344243443434444344543446434474344843449434504345143452434534345443455434564345743458434594346043461434624346343464434654346643467434684346943470434714347243473434744347543476434774347843479434804348143482434834348443485434864348743488434894349043491434924349343494434954349643497434984349943500435014350243503435044350543506435074350843509435104351143512435134351443515435164351743518435194352043521435224352343524435254352643527435284352943530435314353243533435344353543536435374353843539435404354143542435434354443545435464354743548435494355043551435524355343554435554355643557435584355943560435614356243563435644356543566435674356843569435704357143572435734357443575435764357743578435794358043581435824358343584435854358643587435884358943590435914359243593435944359543596435974359843599436004360143602436034360443605436064360743608436094361043611436124361343614436154361643617436184361943620436214362243623436244362543626436274362843629436304363143632436334363443635436364363743638436394364043641436424364343644436454364643647436484364943650436514365243653436544365543656436574365843659436604366143662436634366443665436664366743668436694367043671436724367343674436754367643677436784367943680436814368243683436844368543686436874368843689436904369143692436934369443695436964369743698436994370043701437024370343704437054370643707437084370943710437114371243713437144371543716437174371843719437204372143722437234372443725437264372743728437294373043731437324373343734437354373643737437384373943740437414374243743437444374543746437474374843749437504375143752437534375443755437564375743758437594376043761437624376343764437654376643767437684376943770437714377243773437744377543776437774377843779437804378143782437834378443785437864378743788437894379043791437924379343794437954379643797437984379943800438014380243803438044380543806438074380843809438104381143812438134381443815438164381743818438194382043821438224382343824438254382643827438284382943830438314383243833438344383543836438374383843839438404384143842438434384443845438464384743848438494385043851438524385343854438554385643857438584385943860438614386243863438644386543866438674386843869438704387143872438734387443875438764387743878438794388043881438824388343884438854388643887438884388943890438914389243893438944389543896438974389843899439004390143902439034390443905439064390743908439094391043911439124391343914439154391643917439184391943920439214392243923439244392543926439274392843929439304393143932439334393443935439364393743938439394394043941439424394343944439454394643947439484394943950439514395243953439544395543956439574395843959439604396143962439634396443965439664396743968439694397043971439724397343974439754397643977439784397943980439814398243983439844398543986439874398843989439904399143992439934399443995439964399743998439994400044001440024400344004440054400644007440084400944010440114401244013440144401544016440174401844019440204402144022440234402444025440264402744028440294403044031440324403344034440354403644037440384403944040440414404244043440444404544046440474404844049440504405144052440534405444055440564405744058440594406044061440624406344064440654406644067440684406944070440714407244073440744407544076440774407844079440804408144082440834408444085440864408744088440894409044091440924409344094440954409644097440984409944100441014410244103441044410544106441074410844109441104411144112441134411444115441164411744118441194412044121441224412344124441254412644127441284412944130441314413244133441344413544136441374413844139441404414144142441434414444145441464414744148441494415044151441524415344154441554415644157441584415944160441614416244163441644416544166441674416844169441704417144172441734417444175441764417744178441794418044181441824418344184441854418644187441884418944190441914419244193441944419544196441974419844199442004420144202442034420444205442064420744208442094421044211442124421344214442154421644217442184421944220442214422244223442244422544226442274422844229442304423144232442334423444235442364423744238442394424044241442424424344244442454424644247442484424944250442514425244253442544425544256442574425844259442604426144262442634426444265442664426744268442694427044271442724427344274442754427644277442784427944280442814428244283442844428544286442874428844289442904429144292442934429444295442964429744298442994430044301443024430344304443054430644307443084430944310443114431244313443144431544316443174431844319443204432144322443234432444325443264432744328443294433044331443324433344334443354433644337443384433944340443414434244343443444434544346443474434844349443504435144352443534435444355443564435744358443594436044361443624436344364443654436644367443684436944370443714437244373443744437544376443774437844379443804438144382443834438444385443864438744388443894439044391443924439344394443954439644397443984439944400444014440244403444044440544406444074440844409444104441144412444134441444415444164441744418444194442044421444224442344424444254442644427444284442944430444314443244433444344443544436444374443844439444404444144442444434444444445444464444744448444494445044451444524445344454444554445644457444584445944460444614446244463444644446544466444674446844469444704447144472444734447444475444764447744478444794448044481444824448344484444854448644487444884448944490444914449244493444944449544496444974449844499445004450144502445034450444505445064450744508445094451044511445124451344514445154451644517445184451944520445214452244523445244452544526445274452844529445304453144532445334453444535445364453744538445394454044541445424454344544445454454644547445484454944550445514455244553445544455544556445574455844559445604456144562445634456444565445664456744568445694457044571445724457344574445754457644577445784457944580445814458244583445844458544586445874458844589445904459144592445934459444595445964459744598445994460044601446024460344604446054460644607446084460944610446114461244613446144461544616446174461844619446204462144622446234462444625446264462744628446294463044631446324463344634446354463644637446384463944640446414464244643446444464544646446474464844649446504465144652446534465444655446564465744658446594466044661446624466344664446654466644667446684466944670446714467244673446744467544676446774467844679446804468144682446834468444685446864468744688446894469044691446924469344694446954469644697446984469944700447014470244703447044470544706447074470844709447104471144712447134471444715447164471744718447194472044721447224472344724447254472644727447284472944730447314473244733447344473544736447374473844739447404474144742447434474444745447464474744748447494475044751447524475344754447554475644757447584475944760447614476244763447644476544766447674476844769447704477144772447734477444775447764477744778447794478044781447824478344784447854478644787447884478944790447914479244793447944479544796447974479844799448004480144802448034480444805448064480744808448094481044811448124481344814448154481644817448184481944820448214482244823448244482544826448274482844829448304483144832448334483444835448364483744838448394484044841448424484344844448454484644847448484484944850448514485244853448544485544856448574485844859448604486144862448634486444865448664486744868448694487044871448724487344874448754487644877448784487944880448814488244883448844488544886448874488844889448904489144892448934489444895448964489744898448994490044901449024490344904449054490644907449084490944910449114491244913449144491544916449174491844919449204492144922449234492444925449264492744928449294493044931449324493344934449354493644937449384493944940449414494244943449444494544946449474494844949449504495144952449534495444955449564495744958449594496044961449624496344964449654496644967449684496944970449714497244973449744497544976449774497844979449804498144982449834498444985449864498744988449894499044991449924499344994449954499644997449984499945000450014500245003450044500545006450074500845009450104501145012450134501445015450164501745018450194502045021450224502345024450254502645027450284502945030450314503245033450344503545036450374503845039450404504145042450434504445045450464504745048450494505045051450524505345054450554505645057450584505945060450614506245063450644506545066450674506845069450704507145072450734507445075450764507745078450794508045081450824508345084450854508645087450884508945090450914509245093450944509545096450974509845099451004510145102451034510445105451064510745108451094511045111451124511345114451154511645117451184511945120451214512245123451244512545126451274512845129451304513145132451334513445135451364513745138451394514045141451424514345144451454514645147451484514945150451514515245153451544515545156451574515845159451604516145162451634516445165451664516745168451694517045171451724517345174451754517645177451784517945180451814518245183451844518545186451874518845189451904519145192451934519445195451964519745198451994520045201452024520345204452054520645207452084520945210452114521245213452144521545216452174521845219452204522145222452234522445225452264522745228452294523045231452324523345234452354523645237452384523945240452414524245243452444524545246452474524845249452504525145252452534525445255452564525745258452594526045261452624526345264452654526645267452684526945270452714527245273452744527545276452774527845279452804528145282452834528445285452864528745288452894529045291452924529345294452954529645297452984529945300453014530245303453044530545306453074530845309453104531145312453134531445315453164531745318453194532045321453224532345324453254532645327453284532945330453314533245333453344533545336453374533845339453404534145342453434534445345453464534745348453494535045351453524535345354453554535645357453584535945360453614536245363453644536545366453674536845369453704537145372453734537445375453764537745378453794538045381453824538345384453854538645387453884538945390453914539245393453944539545396453974539845399454004540145402454034540445405454064540745408454094541045411454124541345414454154541645417454184541945420454214542245423454244542545426454274542845429454304543145432454334543445435454364543745438454394544045441454424544345444454454544645447454484544945450454514545245453454544545545456454574545845459454604546145462454634546445465454664546745468454694547045471454724547345474454754547645477454784547945480454814548245483454844548545486454874548845489454904549145492454934549445495454964549745498454994550045501455024550345504455054550645507455084550945510455114551245513455144551545516455174551845519455204552145522455234552445525455264552745528455294553045531455324553345534455354553645537455384553945540455414554245543455444554545546455474554845549455504555145552455534555445555455564555745558455594556045561455624556345564455654556645567455684556945570455714557245573455744557545576455774557845579455804558145582455834558445585455864558745588455894559045591455924559345594455954559645597455984559945600456014560245603456044560545606456074560845609456104561145612456134561445615456164561745618456194562045621456224562345624456254562645627456284562945630456314563245633456344563545636456374563845639456404564145642456434564445645456464564745648456494565045651456524565345654456554565645657456584565945660456614566245663456644566545666456674566845669456704567145672456734567445675456764567745678456794568045681456824568345684456854568645687456884568945690456914569245693456944569545696456974569845699457004570145702457034570445705457064570745708457094571045711457124571345714457154571645717457184571945720457214572245723457244572545726457274572845729457304573145732457334573445735457364573745738457394574045741457424574345744457454574645747457484574945750457514575245753457544575545756457574575845759457604576145762457634576445765457664576745768457694577045771457724577345774457754577645777457784577945780457814578245783457844578545786457874578845789457904579145792457934579445795457964579745798457994580045801458024580345804458054580645807458084580945810458114581245813458144581545816458174581845819458204582145822458234582445825458264582745828458294583045831458324583345834458354583645837458384583945840458414584245843458444584545846458474584845849458504585145852458534585445855458564585745858458594586045861458624586345864458654586645867458684586945870458714587245873458744587545876458774587845879458804588145882458834588445885458864588745888458894589045891458924589345894458954589645897458984589945900459014590245903459044590545906459074590845909459104591145912459134591445915459164591745918459194592045921459224592345924459254592645927459284592945930459314593245933459344593545936459374593845939459404594145942459434594445945459464594745948459494595045951459524595345954459554595645957459584595945960459614596245963459644596545966459674596845969459704597145972459734597445975459764597745978459794598045981459824598345984459854598645987459884598945990459914599245993459944599545996459974599845999460004600146002460034600446005460064600746008460094601046011460124601346014460154601646017460184601946020460214602246023460244602546026460274602846029460304603146032460334603446035460364603746038460394604046041460424604346044460454604646047460484604946050460514605246053460544605546056460574605846059460604606146062460634606446065460664606746068460694607046071460724607346074460754607646077460784607946080460814608246083460844608546086460874608846089460904609146092460934609446095460964609746098460994610046101461024610346104461054610646107461084610946110461114611246113461144611546116461174611846119461204612146122461234612446125461264612746128461294613046131461324613346134461354613646137461384613946140461414614246143461444614546146461474614846149461504615146152461534615446155461564615746158461594616046161461624616346164461654616646167461684616946170461714617246173461744617546176461774617846179461804618146182461834618446185461864618746188461894619046191461924619346194461954619646197461984619946200462014620246203462044620546206462074620846209462104621146212462134621446215462164621746218462194622046221462224622346224462254622646227462284622946230462314623246233462344623546236462374623846239462404624146242462434624446245462464624746248462494625046251462524625346254462554625646257462584625946260462614626246263462644626546266462674626846269462704627146272462734627446275462764627746278462794628046281462824628346284462854628646287462884628946290462914629246293462944629546296462974629846299463004630146302463034630446305463064630746308463094631046311463124631346314463154631646317463184631946320463214632246323463244632546326463274632846329463304633146332463334633446335463364633746338463394634046341463424634346344463454634646347463484634946350463514635246353463544635546356463574635846359463604636146362463634636446365463664636746368463694637046371463724637346374463754637646377463784637946380463814638246383463844638546386463874638846389463904639146392463934639446395463964639746398463994640046401464024640346404464054640646407464084640946410464114641246413464144641546416464174641846419464204642146422464234642446425464264642746428464294643046431464324643346434464354643646437464384643946440464414644246443464444644546446464474644846449464504645146452464534645446455464564645746458464594646046461464624646346464464654646646467464684646946470464714647246473464744647546476464774647846479464804648146482464834648446485464864648746488464894649046491464924649346494464954649646497464984649946500465014650246503465044650546506465074650846509465104651146512465134651446515465164651746518465194652046521465224652346524465254652646527465284652946530465314653246533465344653546536465374653846539465404654146542465434654446545465464654746548465494655046551465524655346554465554655646557465584655946560465614656246563465644656546566465674656846569465704657146572465734657446575465764657746578465794658046581465824658346584465854658646587465884658946590465914659246593465944659546596465974659846599466004660146602466034660446605466064660746608466094661046611466124661346614466154661646617466184661946620466214662246623466244662546626466274662846629466304663146632466334663446635466364663746638466394664046641466424664346644466454664646647466484664946650466514665246653466544665546656466574665846659466604666146662466634666446665466664666746668466694667046671466724667346674466754667646677466784667946680466814668246683466844668546686466874668846689466904669146692466934669446695466964669746698466994670046701467024670346704467054670646707467084670946710467114671246713467144671546716467174671846719467204672146722467234672446725467264672746728467294673046731467324673346734467354673646737467384673946740467414674246743467444674546746467474674846749467504675146752467534675446755467564675746758467594676046761467624676346764467654676646767467684676946770467714677246773467744677546776467774677846779467804678146782467834678446785467864678746788467894679046791467924679346794467954679646797467984679946800468014680246803468044680546806468074680846809468104681146812468134681446815468164681746818468194682046821468224682346824468254682646827468284682946830468314683246833468344683546836468374683846839468404684146842468434684446845468464684746848468494685046851468524685346854468554685646857468584685946860468614686246863468644686546866468674686846869468704687146872468734687446875468764687746878468794688046881468824688346884468854688646887468884688946890468914689246893468944689546896468974689846899469004690146902469034690446905469064690746908469094691046911469124691346914469154691646917469184691946920469214692246923469244692546926469274692846929469304693146932469334693446935469364693746938469394694046941469424694346944469454694646947469484694946950469514695246953469544695546956469574695846959469604696146962469634696446965469664696746968469694697046971469724697346974469754697646977469784697946980469814698246983469844698546986469874698846989469904699146992469934699446995469964699746998469994700047001470024700347004470054700647007470084700947010470114701247013470144701547016470174701847019470204702147022470234702447025470264702747028470294703047031470324703347034470354703647037470384703947040470414704247043470444704547046470474704847049470504705147052470534705447055470564705747058470594706047061470624706347064470654706647067470684706947070470714707247073470744707547076470774707847079470804708147082470834708447085470864708747088470894709047091470924709347094470954709647097470984709947100471014710247103471044710547106471074710847109471104711147112471134711447115471164711747118471194712047121471224712347124471254712647127471284712947130471314713247133471344713547136471374713847139471404714147142471434714447145471464714747148471494715047151471524715347154471554715647157471584715947160471614716247163471644716547166471674716847169471704717147172471734717447175471764717747178471794718047181471824718347184471854718647187471884718947190471914719247193471944719547196471974719847199472004720147202472034720447205472064720747208472094721047211472124721347214472154721647217472184721947220472214722247223472244722547226472274722847229472304723147232472334723447235472364723747238472394724047241472424724347244472454724647247472484724947250472514725247253472544725547256472574725847259472604726147262472634726447265472664726747268472694727047271472724727347274472754727647277472784727947280472814728247283472844728547286472874728847289472904729147292472934729447295472964729747298472994730047301473024730347304473054730647307473084730947310473114731247313473144731547316473174731847319473204732147322473234732447325473264732747328473294733047331473324733347334473354733647337473384733947340473414734247343473444734547346473474734847349473504735147352473534735447355473564735747358473594736047361473624736347364473654736647367473684736947370473714737247373473744737547376473774737847379473804738147382473834738447385473864738747388473894739047391473924739347394473954739647397473984739947400474014740247403474044740547406474074740847409474104741147412474134741447415474164741747418474194742047421474224742347424474254742647427474284742947430474314743247433474344743547436474374743847439474404744147442474434744447445474464744747448474494745047451474524745347454474554745647457474584745947460474614746247463474644746547466474674746847469474704747147472474734747447475474764747747478474794748047481474824748347484474854748647487474884748947490474914749247493474944749547496474974749847499475004750147502475034750447505475064750747508475094751047511475124751347514475154751647517475184751947520475214752247523475244752547526475274752847529475304753147532475334753447535475364753747538475394754047541475424754347544475454754647547475484754947550475514755247553475544755547556475574755847559475604756147562475634756447565475664756747568475694757047571475724757347574475754757647577475784757947580475814758247583475844758547586475874758847589475904759147592475934759447595475964759747598475994760047601476024760347604476054760647607476084760947610476114761247613476144761547616476174761847619476204762147622476234762447625476264762747628476294763047631476324763347634476354763647637476384763947640476414764247643476444764547646476474764847649476504765147652476534765447655476564765747658476594766047661476624766347664476654766647667476684766947670476714767247673476744767547676476774767847679476804768147682476834768447685476864768747688476894769047691476924769347694476954769647697476984769947700477014770247703477044770547706477074770847709477104771147712477134771447715477164771747718477194772047721477224772347724477254772647727477284772947730477314773247733477344773547736477374773847739477404774147742477434774447745477464774747748477494775047751477524775347754477554775647757477584775947760477614776247763477644776547766477674776847769477704777147772477734777447775477764777747778477794778047781477824778347784477854778647787477884778947790477914779247793477944779547796477974779847799478004780147802478034780447805478064780747808478094781047811478124781347814478154781647817478184781947820478214782247823478244782547826478274782847829478304783147832478334783447835478364783747838478394784047841478424784347844478454784647847478484784947850478514785247853478544785547856478574785847859478604786147862478634786447865478664786747868478694787047871478724787347874478754787647877478784787947880478814788247883478844788547886478874788847889478904789147892478934789447895478964789747898478994790047901479024790347904479054790647907479084790947910479114791247913479144791547916479174791847919479204792147922479234792447925479264792747928479294793047931479324793347934479354793647937479384793947940479414794247943479444794547946479474794847949479504795147952479534795447955479564795747958479594796047961479624796347964479654796647967479684796947970479714797247973479744797547976479774797847979479804798147982479834798447985479864798747988479894799047991479924799347994479954799647997479984799948000480014800248003480044800548006480074800848009480104801148012480134801448015480164801748018480194802048021480224802348024480254802648027480284802948030480314803248033480344803548036480374803848039480404804148042480434804448045480464804748048480494805048051480524805348054480554805648057480584805948060480614806248063480644806548066480674806848069480704807148072480734807448075480764807748078480794808048081480824808348084480854808648087480884808948090480914809248093480944809548096480974809848099481004810148102481034810448105481064810748108481094811048111481124811348114481154811648117481184811948120481214812248123481244812548126481274812848129481304813148132481334813448135481364813748138481394814048141481424814348144481454814648147481484814948150481514815248153481544815548156481574815848159481604816148162481634816448165481664816748168481694817048171481724817348174481754817648177481784817948180481814818248183481844818548186481874818848189481904819148192481934819448195481964819748198481994820048201482024820348204482054820648207482084820948210482114821248213482144821548216482174821848219482204822148222482234822448225482264822748228482294823048231482324823348234482354823648237482384823948240482414824248243482444824548246482474824848249482504825148252482534825448255482564825748258482594826048261482624826348264482654826648267482684826948270482714827248273482744827548276482774827848279482804828148282482834828448285482864828748288482894829048291482924829348294482954829648297482984829948300483014830248303483044830548306483074830848309483104831148312483134831448315483164831748318483194832048321483224832348324483254832648327483284832948330483314833248333483344833548336483374833848339483404834148342483434834448345483464834748348483494835048351483524835348354483554835648357483584835948360483614836248363483644836548366483674836848369483704837148372483734837448375483764837748378483794838048381483824838348384483854838648387483884838948390483914839248393483944839548396483974839848399484004840148402484034840448405484064840748408484094841048411484124841348414484154841648417484184841948420484214842248423484244842548426484274842848429484304843148432484334843448435484364843748438484394844048441484424844348444484454844648447484484844948450484514845248453484544845548456484574845848459484604846148462484634846448465484664846748468484694847048471484724847348474484754847648477484784847948480484814848248483484844848548486484874848848489484904849148492484934849448495484964849748498484994850048501485024850348504485054850648507485084850948510485114851248513485144851548516485174851848519485204852148522485234852448525485264852748528485294853048531485324853348534485354853648537485384853948540485414854248543485444854548546485474854848549485504855148552485534855448555485564855748558485594856048561485624856348564485654856648567485684856948570485714857248573485744857548576485774857848579485804858148582485834858448585485864858748588485894859048591485924859348594485954859648597485984859948600486014860248603486044860548606486074860848609486104861148612486134861448615486164861748618486194862048621486224862348624486254862648627486284862948630486314863248633486344863548636486374863848639486404864148642486434864448645486464864748648486494865048651486524865348654486554865648657486584865948660486614866248663486644866548666486674866848669486704867148672486734867448675486764867748678486794868048681486824868348684486854868648687486884868948690486914869248693486944869548696486974869848699487004870148702487034870448705487064870748708487094871048711487124871348714487154871648717487184871948720487214872248723487244872548726487274872848729487304873148732487334873448735487364873748738487394874048741487424874348744487454874648747487484874948750487514875248753487544875548756487574875848759487604876148762487634876448765487664876748768487694877048771487724877348774487754877648777487784877948780487814878248783487844878548786487874878848789487904879148792487934879448795487964879748798487994880048801488024880348804488054880648807488084880948810488114881248813488144881548816488174881848819488204882148822488234882448825488264882748828488294883048831488324883348834488354883648837488384883948840488414884248843488444884548846488474884848849488504885148852488534885448855488564885748858488594886048861488624886348864488654886648867488684886948870488714887248873488744887548876488774887848879488804888148882488834888448885488864888748888488894889048891488924889348894488954889648897488984889948900489014890248903489044890548906489074890848909489104891148912489134891448915489164891748918489194892048921489224892348924489254892648927489284892948930489314893248933489344893548936489374893848939489404894148942489434894448945489464894748948489494895048951489524895348954489554895648957489584895948960489614896248963489644896548966489674896848969489704897148972489734897448975489764897748978489794898048981489824898348984489854898648987489884898948990489914899248993489944899548996489974899848999490004900149002490034900449005490064900749008490094901049011490124901349014490154901649017490184901949020490214902249023490244902549026490274902849029490304903149032490334903449035490364903749038490394904049041490424904349044490454904649047490484904949050490514905249053490544905549056490574905849059490604906149062490634906449065490664906749068490694907049071490724907349074490754907649077490784907949080490814908249083490844908549086490874908849089490904909149092490934909449095490964909749098490994910049101491024910349104491054910649107491084910949110491114911249113491144911549116491174911849119491204912149122491234912449125491264912749128491294913049131491324913349134491354913649137491384913949140491414914249143491444914549146491474914849149491504915149152491534915449155491564915749158491594916049161491624916349164491654916649167491684916949170491714917249173491744917549176491774917849179491804918149182491834918449185491864918749188491894919049191491924919349194491954919649197491984919949200492014920249203492044920549206492074920849209492104921149212492134921449215492164921749218492194922049221492224922349224492254922649227492284922949230492314923249233492344923549236492374923849239492404924149242492434924449245492464924749248492494925049251492524925349254492554925649257492584925949260492614926249263492644926549266492674926849269492704927149272492734927449275492764927749278492794928049281492824928349284492854928649287492884928949290492914929249293492944929549296492974929849299493004930149302493034930449305493064930749308493094931049311493124931349314493154931649317493184931949320493214932249323493244932549326493274932849329493304933149332493334933449335493364933749338493394934049341493424934349344493454934649347493484934949350493514935249353493544935549356493574935849359493604936149362493634936449365493664936749368493694937049371493724937349374493754937649377493784937949380493814938249383493844938549386493874938849389493904939149392493934939449395493964939749398493994940049401494024940349404494054940649407494084940949410494114941249413494144941549416494174941849419494204942149422494234942449425494264942749428494294943049431494324943349434494354943649437494384943949440494414944249443494444944549446494474944849449494504945149452494534945449455494564945749458494594946049461494624946349464494654946649467494684946949470494714947249473494744947549476494774947849479494804948149482494834948449485494864948749488494894949049491494924949349494494954949649497494984949949500495014950249503495044950549506495074950849509495104951149512495134951449515495164951749518495194952049521495224952349524495254952649527495284952949530495314953249533495344953549536495374953849539495404954149542495434954449545495464954749548495494955049551495524955349554495554955649557495584955949560495614956249563495644956549566495674956849569495704957149572495734957449575495764957749578495794958049581495824958349584495854958649587495884958949590495914959249593495944959549596495974959849599496004960149602496034960449605496064960749608496094961049611496124961349614496154961649617496184961949620496214962249623496244962549626496274962849629496304963149632496334963449635496364963749638496394964049641496424964349644496454964649647496484964949650496514965249653496544965549656496574965849659496604966149662496634966449665496664966749668496694967049671496724967349674496754967649677496784967949680496814968249683496844968549686496874968849689496904969149692496934969449695496964969749698496994970049701497024970349704497054970649707497084970949710497114971249713497144971549716497174971849719497204972149722497234972449725497264972749728497294973049731497324973349734497354973649737497384973949740497414974249743497444974549746497474974849749497504975149752497534975449755497564975749758497594976049761497624976349764497654976649767497684976949770497714977249773497744977549776497774977849779497804978149782497834978449785497864978749788497894979049791497924979349794497954979649797497984979949800498014980249803498044980549806498074980849809498104981149812498134981449815498164981749818498194982049821498224982349824498254982649827498284982949830498314983249833498344983549836498374983849839498404984149842498434984449845498464984749848498494985049851498524985349854498554985649857498584985949860498614986249863498644986549866498674986849869498704987149872498734987449875498764987749878498794988049881498824988349884498854988649887498884988949890498914989249893498944989549896498974989849899499004990149902499034990449905499064990749908499094991049911499124991349914499154991649917499184991949920499214992249923499244992549926499274992849929499304993149932499334993449935499364993749938499394994049941499424994349944499454994649947499484994949950499514995249953499544995549956499574995849959499604996149962499634996449965499664996749968499694997049971499724997349974499754997649977499784997949980499814998249983499844998549986499874998849989499904999149992499934999449995499964999749998499995000050001500025000350004500055000650007500085000950010500115001250013500145001550016500175001850019500205002150022500235002450025500265002750028500295003050031500325003350034500355003650037500385003950040500415004250043500445004550046500475004850049500505005150052500535005450055500565005750058500595006050061500625006350064500655006650067500685006950070500715007250073500745007550076500775007850079500805008150082500835008450085500865008750088500895009050091500925009350094500955009650097500985009950100501015010250103501045010550106501075010850109501105011150112501135011450115501165011750118501195012050121501225012350124501255012650127501285012950130501315013250133501345013550136501375013850139501405014150142501435014450145501465014750148501495015050151501525015350154501555015650157501585015950160501615016250163501645016550166501675016850169501705017150172501735017450175501765017750178501795018050181501825018350184501855018650187501885018950190501915019250193501945019550196501975019850199502005020150202502035020450205502065020750208502095021050211502125021350214502155021650217502185021950220502215022250223502245022550226502275022850229502305023150232502335023450235502365023750238502395024050241502425024350244502455024650247502485024950250502515025250253502545025550256502575025850259502605026150262502635026450265502665026750268502695027050271502725027350274502755027650277502785027950280502815028250283502845028550286502875028850289502905029150292502935029450295502965029750298502995030050301503025030350304503055030650307503085030950310503115031250313503145031550316503175031850319503205032150322503235032450325503265032750328503295033050331503325033350334503355033650337503385033950340503415034250343503445034550346503475034850349503505035150352503535035450355503565035750358503595036050361503625036350364503655036650367503685036950370503715037250373503745037550376503775037850379503805038150382503835038450385503865038750388503895039050391503925039350394503955039650397503985039950400504015040250403504045040550406504075040850409504105041150412504135041450415504165041750418504195042050421504225042350424504255042650427504285042950430504315043250433504345043550436504375043850439504405044150442504435044450445504465044750448504495045050451504525045350454504555045650457504585045950460504615046250463504645046550466504675046850469504705047150472504735047450475504765047750478504795048050481504825048350484504855048650487504885048950490504915049250493504945049550496504975049850499505005050150502505035050450505505065050750508505095051050511505125051350514505155051650517505185051950520505215052250523505245052550526505275052850529505305053150532505335053450535505365053750538505395054050541505425054350544505455054650547505485054950550505515055250553505545055550556505575055850559505605056150562505635056450565505665056750568505695057050571505725057350574505755057650577505785057950580505815058250583505845058550586505875058850589505905059150592505935059450595505965059750598505995060050601506025060350604506055060650607506085060950610506115061250613506145061550616506175061850619506205062150622506235062450625506265062750628506295063050631506325063350634506355063650637506385063950640506415064250643506445064550646506475064850649506505065150652506535065450655506565065750658506595066050661506625066350664506655066650667506685066950670506715067250673506745067550676506775067850679506805068150682506835068450685506865068750688506895069050691506925069350694506955069650697506985069950700507015070250703507045070550706507075070850709507105071150712507135071450715507165071750718507195072050721507225072350724507255072650727507285072950730507315073250733507345073550736507375073850739507405074150742507435074450745507465074750748507495075050751507525075350754507555075650757507585075950760507615076250763507645076550766507675076850769507705077150772507735077450775507765077750778507795078050781507825078350784507855078650787507885078950790507915079250793507945079550796507975079850799508005080150802508035080450805508065080750808508095081050811508125081350814508155081650817508185081950820508215082250823508245082550826508275082850829508305083150832508335083450835508365083750838508395084050841508425084350844508455084650847508485084950850508515085250853508545085550856508575085850859508605086150862508635086450865508665086750868508695087050871508725087350874508755087650877508785087950880508815088250883508845088550886508875088850889508905089150892508935089450895508965089750898508995090050901509025090350904509055090650907509085090950910509115091250913509145091550916509175091850919509205092150922509235092450925509265092750928509295093050931509325093350934509355093650937509385093950940509415094250943509445094550946509475094850949509505095150952509535095450955509565095750958509595096050961509625096350964509655096650967509685096950970509715097250973509745097550976509775097850979509805098150982509835098450985509865098750988509895099050991509925099350994509955099650997509985099951000510015100251003510045100551006510075100851009510105101151012510135101451015510165101751018510195102051021510225102351024510255102651027510285102951030510315103251033510345103551036510375103851039510405104151042510435104451045510465104751048510495105051051510525105351054510555105651057510585105951060510615106251063510645106551066510675106851069510705107151072510735107451075510765107751078510795108051081510825108351084510855108651087510885108951090510915109251093510945109551096510975109851099511005110151102511035110451105511065110751108511095111051111511125111351114511155111651117511185111951120511215112251123511245112551126511275112851129511305113151132511335113451135511365113751138511395114051141511425114351144511455114651147511485114951150511515115251153511545115551156511575115851159511605116151162511635116451165511665116751168511695117051171511725117351174511755117651177511785117951180511815118251183511845118551186511875118851189511905119151192511935119451195511965119751198511995120051201512025120351204512055120651207512085120951210512115121251213512145121551216512175121851219512205122151222512235122451225512265122751228512295123051231512325123351234512355123651237512385123951240512415124251243512445124551246512475124851249512505125151252512535125451255512565125751258512595126051261512625126351264512655126651267512685126951270512715127251273512745127551276512775127851279512805128151282512835128451285512865128751288512895129051291512925129351294512955129651297512985129951300513015130251303513045130551306513075130851309513105131151312513135131451315513165131751318513195132051321513225132351324513255132651327513285132951330513315133251333513345133551336513375133851339513405134151342513435134451345513465134751348513495135051351513525135351354513555135651357513585135951360513615136251363513645136551366513675136851369513705137151372513735137451375513765137751378513795138051381513825138351384513855138651387513885138951390513915139251393513945139551396513975139851399514005140151402514035140451405514065140751408514095141051411514125141351414514155141651417514185141951420514215142251423514245142551426514275142851429514305143151432514335143451435514365143751438514395144051441514425144351444514455144651447514485144951450514515145251453514545145551456514575145851459514605146151462514635146451465514665146751468514695147051471514725147351474514755147651477514785147951480514815148251483514845148551486514875148851489514905149151492514935149451495514965149751498514995150051501515025150351504515055150651507515085150951510515115151251513515145151551516515175151851519515205152151522515235152451525515265152751528515295153051531515325153351534515355153651537515385153951540515415154251543515445154551546515475154851549515505155151552515535155451555515565155751558515595156051561515625156351564515655156651567515685156951570515715157251573515745157551576515775157851579515805158151582515835158451585515865158751588515895159051591515925159351594515955159651597515985159951600516015160251603516045160551606516075160851609516105161151612516135161451615516165161751618516195162051621516225162351624516255162651627516285162951630516315163251633516345163551636516375163851639516405164151642516435164451645516465164751648516495165051651516525165351654516555165651657516585165951660516615166251663516645166551666516675166851669516705167151672516735167451675516765167751678516795168051681516825168351684516855168651687516885168951690516915169251693516945169551696516975169851699517005170151702517035170451705517065170751708517095171051711517125171351714517155171651717517185171951720517215172251723517245172551726517275172851729517305173151732517335173451735517365173751738517395174051741517425174351744517455174651747517485174951750517515175251753517545175551756517575175851759517605176151762517635176451765517665176751768517695177051771517725177351774517755177651777517785177951780517815178251783517845178551786517875178851789517905179151792517935179451795517965179751798517995180051801518025180351804518055180651807518085180951810518115181251813518145181551816518175181851819518205182151822518235182451825518265182751828518295183051831518325183351834518355183651837518385183951840518415184251843518445184551846518475184851849518505185151852518535185451855518565185751858518595186051861518625186351864518655186651867518685186951870518715187251873518745187551876518775187851879518805188151882518835188451885518865188751888518895189051891518925189351894518955189651897518985189951900519015190251903519045190551906519075190851909519105191151912519135191451915519165191751918519195192051921519225192351924519255192651927519285192951930519315193251933519345193551936519375193851939519405194151942519435194451945519465194751948519495195051951519525195351954519555195651957519585195951960519615196251963519645196551966519675196851969519705197151972519735197451975519765197751978519795198051981519825198351984519855198651987519885198951990519915199251993519945199551996519975199851999520005200152002520035200452005520065200752008520095201052011520125201352014520155201652017520185201952020520215202252023520245202552026520275202852029520305203152032520335203452035520365203752038520395204052041520425204352044520455204652047520485204952050520515205252053520545205552056520575205852059520605206152062520635206452065520665206752068520695207052071520725207352074520755207652077520785207952080520815208252083520845208552086520875208852089520905209152092520935209452095520965209752098520995210052101521025210352104521055210652107521085210952110521115211252113521145211552116521175211852119521205212152122521235212452125521265212752128521295213052131521325213352134521355213652137521385213952140521415214252143521445214552146521475214852149521505215152152521535215452155521565215752158521595216052161521625216352164521655216652167521685216952170521715217252173521745217552176521775217852179521805218152182521835218452185521865218752188521895219052191521925219352194521955219652197521985219952200522015220252203522045220552206522075220852209522105221152212522135221452215522165221752218522195222052221522225222352224522255222652227522285222952230522315223252233522345223552236522375223852239522405224152242522435224452245522465224752248522495225052251522525225352254522555225652257522585225952260522615226252263522645226552266522675226852269522705227152272522735227452275522765227752278522795228052281522825228352284522855228652287522885228952290522915229252293522945229552296522975229852299523005230152302523035230452305523065230752308523095231052311523125231352314523155231652317523185231952320523215232252323523245232552326523275232852329523305233152332523335233452335523365233752338523395234052341523425234352344523455234652347523485234952350523515235252353523545235552356523575235852359523605236152362523635236452365523665236752368523695237052371523725237352374523755237652377523785237952380523815238252383523845238552386523875238852389523905239152392523935239452395523965239752398523995240052401524025240352404524055240652407524085240952410524115241252413524145241552416524175241852419524205242152422524235242452425524265242752428524295243052431524325243352434524355243652437524385243952440524415244252443524445244552446524475244852449524505245152452524535245452455524565245752458524595246052461524625246352464524655246652467524685246952470524715247252473524745247552476524775247852479524805248152482524835248452485524865248752488524895249052491524925249352494524955249652497524985249952500525015250252503525045250552506525075250852509525105251152512525135251452515525165251752518525195252052521525225252352524525255252652527525285252952530525315253252533525345253552536525375253852539525405254152542525435254452545525465254752548525495255052551525525255352554525555255652557525585255952560525615256252563525645256552566525675256852569525705257152572525735257452575525765257752578525795258052581525825258352584525855258652587525885258952590525915259252593525945259552596525975259852599526005260152602526035260452605526065260752608526095261052611526125261352614526155261652617526185261952620526215262252623526245262552626526275262852629526305263152632526335263452635526365263752638526395264052641526425264352644526455264652647526485264952650526515265252653526545265552656526575265852659526605266152662526635266452665526665266752668526695267052671526725267352674526755267652677526785267952680526815268252683526845268552686526875268852689526905269152692526935269452695526965269752698526995270052701527025270352704527055270652707527085270952710527115271252713527145271552716527175271852719527205272152722527235272452725527265272752728527295273052731527325273352734527355273652737527385273952740527415274252743527445274552746527475274852749527505275152752527535275452755527565275752758527595276052761527625276352764527655276652767527685276952770527715277252773527745277552776527775277852779527805278152782527835278452785527865278752788527895279052791527925279352794527955279652797527985279952800528015280252803528045280552806528075280852809528105281152812528135281452815528165281752818528195282052821528225282352824528255282652827528285282952830528315283252833528345283552836528375283852839528405284152842528435284452845528465284752848528495285052851528525285352854528555285652857528585285952860528615286252863528645286552866528675286852869528705287152872528735287452875528765287752878528795288052881528825288352884528855288652887528885288952890528915289252893528945289552896528975289852899529005290152902529035290452905529065290752908529095291052911529125291352914529155291652917529185291952920529215292252923529245292552926529275292852929529305293152932529335293452935529365293752938529395294052941529425294352944529455294652947529485294952950529515295252953529545295552956529575295852959529605296152962529635296452965529665296752968529695297052971529725297352974529755297652977529785297952980529815298252983529845298552986529875298852989529905299152992529935299452995529965299752998529995300053001530025300353004530055300653007530085300953010530115301253013530145301553016530175301853019530205302153022530235302453025530265302753028530295303053031530325303353034530355303653037530385303953040530415304253043530445304553046530475304853049530505305153052530535305453055530565305753058530595306053061530625306353064530655306653067530685306953070530715307253073530745307553076530775307853079530805308153082530835308453085530865308753088530895309053091530925309353094530955309653097530985309953100531015310253103531045310553106531075310853109531105311153112531135311453115531165311753118531195312053121531225312353124531255312653127531285312953130531315313253133531345313553136531375313853139531405314153142531435314453145531465314753148531495315053151531525315353154531555315653157531585315953160531615316253163531645316553166531675316853169531705317153172531735317453175531765317753178531795318053181531825318353184531855318653187531885318953190531915319253193531945319553196531975319853199532005320153202532035320453205532065320753208532095321053211532125321353214532155321653217532185321953220532215322253223532245322553226532275322853229532305323153232532335323453235532365323753238532395324053241532425324353244532455324653247532485324953250532515325253253532545325553256532575325853259532605326153262532635326453265532665326753268532695327053271532725327353274532755327653277532785327953280532815328253283532845328553286532875328853289532905329153292532935329453295532965329753298532995330053301533025330353304533055330653307533085330953310533115331253313533145331553316533175331853319533205332153322533235332453325533265332753328533295333053331533325333353334533355333653337533385333953340533415334253343533445334553346533475334853349533505335153352533535335453355533565335753358533595336053361533625336353364533655336653367533685336953370533715337253373533745337553376533775337853379533805338153382533835338453385533865338753388533895339053391533925339353394533955339653397533985339953400534015340253403534045340553406534075340853409534105341153412534135341453415534165341753418534195342053421534225342353424534255342653427534285342953430534315343253433534345343553436534375343853439534405344153442534435344453445534465344753448534495345053451534525345353454534555345653457534585345953460534615346253463534645346553466534675346853469534705347153472534735347453475534765347753478534795348053481534825348353484534855348653487534885348953490534915349253493534945349553496534975349853499535005350153502535035350453505535065350753508535095351053511535125351353514535155351653517535185351953520535215352253523535245352553526535275352853529535305353153532535335353453535535365353753538535395354053541535425354353544535455354653547535485354953550535515355253553535545355553556535575355853559535605356153562535635356453565535665356753568535695357053571535725357353574535755357653577535785357953580535815358253583535845358553586535875358853589535905359153592535935359453595535965359753598535995360053601536025360353604536055360653607536085360953610536115361253613536145361553616536175361853619536205362153622536235362453625536265362753628536295363053631536325363353634536355363653637536385363953640536415364253643536445364553646536475364853649536505365153652536535365453655536565365753658536595366053661536625366353664536655366653667536685366953670536715367253673536745367553676536775367853679536805368153682536835368453685536865368753688536895369053691536925369353694536955369653697536985369953700537015370253703537045370553706537075370853709537105371153712537135371453715537165371753718537195372053721537225372353724537255372653727537285372953730537315373253733537345373553736537375373853739537405374153742537435374453745537465374753748537495375053751537525375353754537555375653757537585375953760537615376253763537645376553766537675376853769537705377153772537735377453775537765377753778537795378053781537825378353784537855378653787537885378953790537915379253793537945379553796537975379853799538005380153802538035380453805538065380753808538095381053811538125381353814538155381653817538185381953820538215382253823538245382553826538275382853829538305383153832538335383453835538365383753838538395384053841538425384353844538455384653847538485384953850538515385253853538545385553856538575385853859538605386153862538635386453865538665386753868538695387053871538725387353874538755387653877538785387953880538815388253883538845388553886538875388853889538905389153892538935389453895538965389753898538995390053901539025390353904539055390653907539085390953910539115391253913539145391553916539175391853919539205392153922539235392453925539265392753928539295393053931539325393353934539355393653937539385393953940539415394253943539445394553946539475394853949539505395153952539535395453955539565395753958539595396053961539625396353964539655396653967539685396953970539715397253973539745397553976539775397853979539805398153982539835398453985539865398753988539895399053991539925399353994539955399653997539985399954000540015400254003540045400554006540075400854009540105401154012540135401454015540165401754018540195402054021540225402354024540255402654027540285402954030540315403254033540345403554036540375403854039540405404154042540435404454045540465404754048540495405054051540525405354054540555405654057540585405954060540615406254063540645406554066540675406854069540705407154072540735407454075540765407754078540795408054081540825408354084540855408654087540885408954090540915409254093540945409554096540975409854099541005410154102541035410454105541065410754108541095411054111541125411354114541155411654117541185411954120541215412254123541245412554126541275412854129541305413154132541335413454135541365413754138541395414054141541425414354144541455414654147541485414954150541515415254153541545415554156541575415854159541605416154162541635416454165541665416754168541695417054171541725417354174541755417654177541785417954180541815418254183541845418554186541875418854189541905419154192541935419454195541965419754198541995420054201542025420354204542055420654207542085420954210542115421254213542145421554216542175421854219542205422154222542235422454225542265422754228542295423054231542325423354234542355423654237542385423954240542415424254243542445424554246542475424854249542505425154252542535425454255542565425754258542595426054261542625426354264542655426654267542685426954270542715427254273542745427554276542775427854279542805428154282542835428454285542865428754288542895429054291542925429354294542955429654297542985429954300543015430254303543045430554306543075430854309543105431154312543135431454315543165431754318543195432054321543225432354324543255432654327543285432954330543315433254333543345433554336543375433854339543405434154342543435434454345543465434754348543495435054351543525435354354543555435654357543585435954360543615436254363543645436554366543675436854369543705437154372543735437454375543765437754378543795438054381543825438354384543855438654387543885438954390543915439254393543945439554396543975439854399544005440154402544035440454405544065440754408544095441054411544125441354414544155441654417544185441954420544215442254423544245442554426544275442854429544305443154432544335443454435544365443754438544395444054441544425444354444544455444654447544485444954450544515445254453544545445554456544575445854459544605446154462544635446454465544665446754468544695447054471544725447354474544755447654477544785447954480544815448254483544845448554486544875448854489544905449154492544935449454495544965449754498544995450054501545025450354504545055450654507545085450954510545115451254513545145451554516545175451854519545205452154522545235452454525545265452754528545295453054531545325453354534545355453654537545385453954540545415454254543545445454554546545475454854549545505455154552545535455454555545565455754558545595456054561545625456354564545655456654567545685456954570545715457254573545745457554576545775457854579545805458154582545835458454585545865458754588545895459054591545925459354594545955459654597545985459954600546015460254603546045460554606546075460854609546105461154612546135461454615546165461754618546195462054621546225462354624546255462654627546285462954630546315463254633546345463554636546375463854639546405464154642546435464454645546465464754648546495465054651546525465354654546555465654657546585465954660546615466254663546645466554666546675466854669546705467154672546735467454675546765467754678546795468054681546825468354684546855468654687546885468954690546915469254693546945469554696546975469854699547005470154702547035470454705547065470754708547095471054711547125471354714547155471654717547185471954720547215472254723547245472554726547275472854729547305473154732547335473454735547365473754738547395474054741547425474354744547455474654747547485474954750547515475254753547545475554756547575475854759547605476154762547635476454765547665476754768547695477054771547725477354774547755477654777547785477954780547815478254783547845478554786547875478854789547905479154792547935479454795547965479754798547995480054801548025480354804548055480654807548085480954810548115481254813548145481554816548175481854819548205482154822548235482454825548265482754828548295483054831548325483354834548355483654837548385483954840548415484254843548445484554846548475484854849548505485154852548535485454855548565485754858548595486054861548625486354864548655486654867548685486954870548715487254873548745487554876548775487854879548805488154882548835488454885548865488754888548895489054891548925489354894548955489654897548985489954900549015490254903549045490554906549075490854909549105491154912549135491454915549165491754918549195492054921549225492354924549255492654927549285492954930549315493254933549345493554936549375493854939549405494154942549435494454945549465494754948549495495054951549525495354954549555495654957549585495954960549615496254963549645496554966549675496854969549705497154972549735497454975549765497754978549795498054981549825498354984549855498654987549885498954990549915499254993549945499554996549975499854999550005500155002550035500455005550065500755008550095501055011550125501355014550155501655017550185501955020550215502255023550245502555026550275502855029550305503155032550335503455035550365503755038550395504055041550425504355044550455504655047550485504955050550515505255053550545505555056550575505855059550605506155062550635506455065550665506755068550695507055071550725507355074550755507655077550785507955080550815508255083550845508555086550875508855089550905509155092550935509455095550965509755098550995510055101551025510355104551055510655107551085510955110551115511255113551145511555116551175511855119551205512155122551235512455125551265512755128551295513055131551325513355134551355513655137551385513955140551415514255143551445514555146551475514855149551505515155152551535515455155551565515755158551595516055161551625516355164551655516655167551685516955170551715517255173551745517555176551775517855179551805518155182551835518455185551865518755188551895519055191551925519355194551955519655197551985519955200552015520255203552045520555206552075520855209552105521155212552135521455215552165521755218552195522055221552225522355224552255522655227552285522955230552315523255233552345523555236552375523855239552405524155242552435524455245552465524755248552495525055251552525525355254552555525655257552585525955260552615526255263552645526555266552675526855269552705527155272552735527455275552765527755278552795528055281552825528355284552855528655287552885528955290552915529255293552945529555296552975529855299553005530155302553035530455305553065530755308553095531055311553125531355314553155531655317553185531955320553215532255323553245532555326553275532855329553305533155332553335533455335553365533755338553395534055341553425534355344553455534655347553485534955350553515535255353553545535555356553575535855359553605536155362553635536455365553665536755368553695537055371553725537355374553755537655377553785537955380553815538255383553845538555386553875538855389553905539155392553935539455395553965539755398553995540055401554025540355404554055540655407554085540955410554115541255413554145541555416554175541855419554205542155422554235542455425554265542755428554295543055431554325543355434554355543655437554385543955440554415544255443554445544555446554475544855449554505545155452554535545455455554565545755458554595546055461554625546355464554655546655467554685546955470554715547255473554745547555476554775547855479554805548155482554835548455485554865548755488554895549055491554925549355494554955549655497554985549955500555015550255503555045550555506555075550855509555105551155512555135551455515555165551755518555195552055521555225552355524555255552655527555285552955530555315553255533555345553555536555375553855539555405554155542555435554455545555465554755548555495555055551555525555355554555555555655557555585555955560555615556255563555645556555566555675556855569555705557155572555735557455575555765557755578555795558055581555825558355584555855558655587555885558955590555915559255593555945559555596555975559855599556005560155602556035560455605556065560755608556095561055611556125561355614556155561655617556185561955620556215562255623556245562555626556275562855629556305563155632556335563455635556365563755638556395564055641556425564355644556455564655647556485564955650556515565255653556545565555656556575565855659556605566155662556635566455665556665566755668556695567055671556725567355674556755567655677556785567955680556815568255683556845568555686556875568855689556905569155692556935569455695556965569755698556995570055701557025570355704557055570655707557085570955710557115571255713557145571555716557175571855719557205572155722557235572455725557265572755728557295573055731557325573355734557355573655737557385573955740557415574255743557445574555746557475574855749557505575155752557535575455755557565575755758557595576055761557625576355764557655576655767557685576955770557715577255773557745577555776557775577855779557805578155782557835578455785557865578755788557895579055791557925579355794557955579655797557985579955800558015580255803558045580555806558075580855809558105581155812558135581455815558165581755818558195582055821558225582355824558255582655827558285582955830558315583255833558345583555836558375583855839558405584155842558435584455845558465584755848558495585055851558525585355854558555585655857558585585955860558615586255863558645586555866558675586855869558705587155872558735587455875558765587755878558795588055881558825588355884558855588655887558885588955890558915589255893558945589555896558975589855899559005590155902559035590455905559065590755908559095591055911559125591355914559155591655917559185591955920559215592255923559245592555926559275592855929559305593155932559335593455935559365593755938559395594055941559425594355944559455594655947559485594955950559515595255953559545595555956559575595855959559605596155962559635596455965559665596755968559695597055971559725597355974559755597655977559785597955980559815598255983559845598555986559875598855989559905599155992559935599455995559965599755998559995600056001560025600356004560055600656007560085600956010560115601256013560145601556016560175601856019560205602156022560235602456025560265602756028560295603056031560325603356034560355603656037560385603956040560415604256043560445604556046560475604856049560505605156052560535605456055560565605756058560595606056061560625606356064560655606656067560685606956070560715607256073560745607556076560775607856079560805608156082560835608456085560865608756088560895609056091560925609356094560955609656097560985609956100561015610256103561045610556106561075610856109561105611156112561135611456115561165611756118561195612056121561225612356124561255612656127561285612956130561315613256133561345613556136561375613856139561405614156142561435614456145561465614756148561495615056151561525615356154561555615656157561585615956160561615616256163561645616556166561675616856169561705617156172561735617456175561765617756178561795618056181561825618356184561855618656187561885618956190561915619256193561945619556196561975619856199562005620156202562035620456205562065620756208562095621056211562125621356214562155621656217562185621956220562215622256223562245622556226562275622856229562305623156232562335623456235562365623756238562395624056241562425624356244562455624656247562485624956250562515625256253562545625556256562575625856259562605626156262562635626456265562665626756268562695627056271562725627356274562755627656277562785627956280562815628256283562845628556286562875628856289562905629156292562935629456295562965629756298562995630056301563025630356304563055630656307563085630956310563115631256313563145631556316563175631856319563205632156322563235632456325563265632756328563295633056331563325633356334563355633656337563385633956340563415634256343563445634556346563475634856349563505635156352563535635456355563565635756358563595636056361563625636356364563655636656367563685636956370563715637256373563745637556376563775637856379563805638156382563835638456385563865638756388563895639056391563925639356394563955639656397563985639956400564015640256403564045640556406564075640856409564105641156412564135641456415564165641756418564195642056421564225642356424564255642656427564285642956430564315643256433564345643556436564375643856439564405644156442564435644456445564465644756448564495645056451564525645356454564555645656457564585645956460564615646256463564645646556466564675646856469564705647156472564735647456475564765647756478564795648056481564825648356484564855648656487564885648956490564915649256493564945649556496564975649856499565005650156502565035650456505565065650756508565095651056511565125651356514565155651656517565185651956520565215652256523565245652556526565275652856529565305653156532565335653456535565365653756538565395654056541565425654356544565455654656547565485654956550565515655256553565545655556556565575655856559565605656156562565635656456565565665656756568565695657056571565725657356574565755657656577565785657956580565815658256583565845658556586565875658856589565905659156592565935659456595565965659756598565995660056601566025660356604566055660656607566085660956610566115661256613566145661556616566175661856619566205662156622566235662456625566265662756628566295663056631566325663356634566355663656637566385663956640566415664256643566445664556646566475664856649566505665156652566535665456655566565665756658566595666056661566625666356664566655666656667566685666956670566715667256673566745667556676566775667856679566805668156682566835668456685566865668756688566895669056691566925669356694566955669656697566985669956700567015670256703567045670556706567075670856709567105671156712567135671456715567165671756718567195672056721567225672356724567255672656727567285672956730567315673256733567345673556736567375673856739567405674156742567435674456745567465674756748567495675056751567525675356754567555675656757567585675956760567615676256763567645676556766567675676856769567705677156772567735677456775567765677756778567795678056781567825678356784567855678656787567885678956790567915679256793567945679556796567975679856799568005680156802568035680456805568065680756808568095681056811568125681356814568155681656817568185681956820568215682256823568245682556826568275682856829568305683156832568335683456835568365683756838568395684056841568425684356844568455684656847568485684956850568515685256853568545685556856568575685856859568605686156862568635686456865568665686756868568695687056871568725687356874568755687656877568785687956880568815688256883568845688556886568875688856889568905689156892568935689456895568965689756898568995690056901569025690356904569055690656907569085690956910569115691256913569145691556916569175691856919569205692156922569235692456925569265692756928569295693056931569325693356934569355693656937569385693956940569415694256943569445694556946569475694856949569505695156952569535695456955569565695756958569595696056961569625696356964569655696656967569685696956970569715697256973569745697556976569775697856979569805698156982569835698456985569865698756988569895699056991569925699356994569955699656997569985699957000570015700257003570045700557006570075700857009570105701157012570135701457015570165701757018570195702057021570225702357024570255702657027570285702957030570315703257033570345703557036570375703857039570405704157042570435704457045570465704757048570495705057051570525705357054570555705657057570585705957060570615706257063570645706557066570675706857069570705707157072570735707457075570765707757078570795708057081570825708357084570855708657087570885708957090570915709257093570945709557096570975709857099571005710157102571035710457105571065710757108571095711057111571125711357114571155711657117571185711957120571215712257123571245712557126571275712857129571305713157132571335713457135571365713757138571395714057141571425714357144571455714657147571485714957150571515715257153571545715557156571575715857159571605716157162571635716457165571665716757168571695717057171571725717357174571755717657177571785717957180571815718257183571845718557186571875718857189571905719157192571935719457195571965719757198571995720057201572025720357204572055720657207572085720957210572115721257213572145721557216572175721857219572205722157222572235722457225572265722757228572295723057231572325723357234572355723657237572385723957240572415724257243572445724557246572475724857249572505725157252572535725457255572565725757258572595726057261572625726357264572655726657267572685726957270572715727257273572745727557276572775727857279572805728157282572835728457285572865728757288572895729057291572925729357294572955729657297572985729957300573015730257303573045730557306573075730857309573105731157312573135731457315573165731757318573195732057321573225732357324573255732657327573285732957330573315733257333573345733557336573375733857339573405734157342573435734457345573465734757348573495735057351573525735357354573555735657357573585735957360573615736257363573645736557366573675736857369573705737157372573735737457375573765737757378573795738057381573825738357384573855738657387573885738957390573915739257393573945739557396573975739857399574005740157402574035740457405574065740757408574095741057411574125741357414574155741657417574185741957420574215742257423574245742557426574275742857429574305743157432574335743457435574365743757438574395744057441574425744357444574455744657447574485744957450574515745257453574545745557456574575745857459574605746157462574635746457465574665746757468574695747057471574725747357474574755747657477574785747957480574815748257483574845748557486574875748857489574905749157492574935749457495574965749757498574995750057501575025750357504575055750657507575085750957510575115751257513575145751557516575175751857519575205752157522575235752457525575265752757528575295753057531575325753357534575355753657537575385753957540575415754257543575445754557546575475754857549575505755157552575535755457555575565755757558575595756057561575625756357564575655756657567575685756957570575715757257573575745757557576575775757857579575805758157582575835758457585575865758757588575895759057591575925759357594575955759657597575985759957600576015760257603576045760557606576075760857609576105761157612576135761457615576165761757618576195762057621576225762357624576255762657627576285762957630576315763257633576345763557636576375763857639576405764157642576435764457645576465764757648576495765057651576525765357654576555765657657576585765957660576615766257663576645766557666576675766857669576705767157672576735767457675576765767757678576795768057681576825768357684576855768657687576885768957690576915769257693576945769557696576975769857699577005770157702577035770457705577065770757708577095771057711577125771357714577155771657717577185771957720577215772257723577245772557726577275772857729577305773157732577335773457735577365773757738577395774057741577425774357744577455774657747577485774957750577515775257753577545775557756577575775857759577605776157762577635776457765577665776757768577695777057771577725777357774577755777657777577785777957780577815778257783577845778557786577875778857789577905779157792577935779457795577965779757798577995780057801578025780357804578055780657807578085780957810578115781257813578145781557816578175781857819578205782157822578235782457825578265782757828578295783057831578325783357834578355783657837578385783957840578415784257843578445784557846578475784857849578505785157852578535785457855578565785757858578595786057861578625786357864578655786657867578685786957870578715787257873578745787557876578775787857879578805788157882578835788457885578865788757888578895789057891578925789357894578955789657897578985789957900579015790257903579045790557906579075790857909579105791157912579135791457915579165791757918579195792057921579225792357924579255792657927579285792957930579315793257933579345793557936579375793857939579405794157942579435794457945579465794757948579495795057951579525795357954579555795657957579585795957960579615796257963579645796557966579675796857969579705797157972579735797457975579765797757978579795798057981579825798357984579855798657987579885798957990579915799257993579945799557996579975799857999580005800158002580035800458005580065800758008580095801058011580125801358014580155801658017580185801958020580215802258023580245802558026580275802858029580305803158032580335803458035580365803758038580395804058041580425804358044580455804658047580485804958050580515805258053580545805558056580575805858059580605806158062580635806458065580665806758068580695807058071580725807358074580755807658077580785807958080580815808258083580845808558086580875808858089580905809158092580935809458095580965809758098580995810058101581025810358104581055810658107581085810958110581115811258113581145811558116581175811858119581205812158122581235812458125581265812758128581295813058131581325813358134581355813658137581385813958140581415814258143581445814558146581475814858149581505815158152581535815458155581565815758158581595816058161581625816358164581655816658167581685816958170581715817258173581745817558176581775817858179581805818158182581835818458185581865818758188581895819058191581925819358194581955819658197581985819958200582015820258203582045820558206582075820858209582105821158212582135821458215582165821758218582195822058221582225822358224582255822658227582285822958230582315823258233582345823558236582375823858239582405824158242582435824458245582465824758248582495825058251582525825358254582555825658257582585825958260582615826258263582645826558266582675826858269582705827158272582735827458275582765827758278582795828058281582825828358284582855828658287582885828958290582915829258293582945829558296582975829858299583005830158302583035830458305583065830758308583095831058311583125831358314583155831658317583185831958320583215832258323583245832558326583275832858329583305833158332583335833458335583365833758338583395834058341583425834358344583455834658347583485834958350583515835258353583545835558356583575835858359583605836158362583635836458365583665836758368583695837058371583725837358374583755837658377583785837958380583815838258383583845838558386583875838858389583905839158392583935839458395583965839758398583995840058401584025840358404584055840658407584085840958410584115841258413584145841558416584175841858419584205842158422584235842458425584265842758428584295843058431584325843358434584355843658437584385843958440584415844258443584445844558446584475844858449584505845158452584535845458455584565845758458584595846058461584625846358464584655846658467584685846958470584715847258473584745847558476584775847858479584805848158482584835848458485584865848758488584895849058491584925849358494584955849658497584985849958500585015850258503585045850558506585075850858509585105851158512585135851458515585165851758518585195852058521585225852358524585255852658527585285852958530585315853258533585345853558536585375853858539585405854158542585435854458545585465854758548585495855058551585525855358554585555855658557585585855958560585615856258563585645856558566585675856858569585705857158572585735857458575585765857758578585795858058581585825858358584585855858658587585885858958590585915859258593585945859558596585975859858599586005860158602586035860458605586065860758608586095861058611586125861358614586155861658617586185861958620586215862258623586245862558626586275862858629586305863158632586335863458635586365863758638586395864058641586425864358644586455864658647586485864958650586515865258653586545865558656586575865858659586605866158662586635866458665586665866758668586695867058671586725867358674586755867658677586785867958680586815868258683586845868558686586875868858689586905869158692586935869458695586965869758698586995870058701587025870358704587055870658707587085870958710587115871258713587145871558716587175871858719587205872158722587235872458725587265872758728587295873058731587325873358734587355873658737587385873958740587415874258743587445874558746587475874858749587505875158752587535875458755587565875758758587595876058761587625876358764587655876658767587685876958770587715877258773587745877558776587775877858779587805878158782587835878458785587865878758788587895879058791587925879358794587955879658797587985879958800588015880258803588045880558806588075880858809588105881158812588135881458815588165881758818588195882058821588225882358824588255882658827588285882958830588315883258833588345883558836588375883858839588405884158842588435884458845588465884758848588495885058851588525885358854588555885658857588585885958860588615886258863588645886558866588675886858869588705887158872588735887458875588765887758878588795888058881588825888358884588855888658887588885888958890588915889258893588945889558896588975889858899589005890158902589035890458905589065890758908589095891058911589125891358914589155891658917589185891958920589215892258923589245892558926589275892858929589305893158932589335893458935589365893758938589395894058941589425894358944589455894658947589485894958950589515895258953589545895558956589575895858959589605896158962589635896458965589665896758968589695897058971589725897358974589755897658977589785897958980589815898258983589845898558986589875898858989589905899158992589935899458995589965899758998589995900059001590025900359004590055900659007590085900959010590115901259013590145901559016590175901859019590205902159022590235902459025590265902759028590295903059031590325903359034590355903659037590385903959040590415904259043590445904559046590475904859049590505905159052590535905459055590565905759058590595906059061590625906359064590655906659067590685906959070590715907259073590745907559076590775907859079590805908159082590835908459085590865908759088590895909059091590925909359094590955909659097590985909959100591015910259103591045910559106591075910859109591105911159112591135911459115591165911759118591195912059121591225912359124591255912659127591285912959130591315913259133591345913559136591375913859139591405914159142591435914459145591465914759148591495915059151591525915359154591555915659157591585915959160591615916259163591645916559166591675916859169591705917159172591735917459175591765917759178591795918059181591825918359184591855918659187591885918959190591915919259193591945919559196591975919859199592005920159202592035920459205592065920759208592095921059211592125921359214592155921659217592185921959220592215922259223592245922559226592275922859229592305923159232592335923459235592365923759238592395924059241592425924359244592455924659247592485924959250592515925259253592545925559256592575925859259592605926159262592635926459265592665926759268592695927059271592725927359274592755927659277592785927959280592815928259283592845928559286592875928859289592905929159292592935929459295592965929759298592995930059301593025930359304593055930659307593085930959310593115931259313593145931559316593175931859319593205932159322593235932459325593265932759328593295933059331593325933359334593355933659337593385933959340593415934259343593445934559346593475934859349593505935159352593535935459355593565935759358593595936059361593625936359364593655936659367593685936959370593715937259373593745937559376593775937859379593805938159382593835938459385593865938759388593895939059391593925939359394593955939659397593985939959400594015940259403594045940559406594075940859409594105941159412594135941459415594165941759418594195942059421594225942359424594255942659427594285942959430594315943259433594345943559436594375943859439594405944159442594435944459445594465944759448594495945059451594525945359454594555945659457594585945959460594615946259463594645946559466594675946859469594705947159472594735947459475594765947759478594795948059481594825948359484594855948659487594885948959490594915949259493594945949559496594975949859499595005950159502595035950459505595065950759508595095951059511595125951359514595155951659517595185951959520595215952259523595245952559526595275952859529595305953159532595335953459535595365953759538595395954059541595425954359544595455954659547595485954959550595515955259553595545955559556595575955859559595605956159562595635956459565595665956759568595695957059571595725957359574595755957659577595785957959580595815958259583595845958559586595875958859589595905959159592595935959459595595965959759598595995960059601596025960359604596055960659607596085960959610596115961259613596145961559616596175961859619596205962159622596235962459625596265962759628596295963059631596325963359634596355963659637596385963959640596415964259643596445964559646596475964859649596505965159652596535965459655596565965759658596595966059661596625966359664596655966659667596685966959670596715967259673596745967559676596775967859679596805968159682596835968459685596865968759688596895969059691596925969359694596955969659697596985969959700597015970259703597045970559706597075970859709597105971159712597135971459715597165971759718597195972059721597225972359724597255972659727597285972959730597315973259733597345973559736597375973859739597405974159742597435974459745597465974759748597495975059751597525975359754597555975659757597585975959760597615976259763597645976559766597675976859769597705977159772597735977459775597765977759778597795978059781597825978359784597855978659787597885978959790597915979259793597945979559796597975979859799598005980159802598035980459805598065980759808598095981059811598125981359814598155981659817598185981959820598215982259823598245982559826598275982859829598305983159832598335983459835598365983759838598395984059841598425984359844598455984659847598485984959850598515985259853598545985559856598575985859859598605986159862598635986459865598665986759868598695987059871598725987359874598755987659877598785987959880598815988259883598845988559886598875988859889598905989159892598935989459895598965989759898598995990059901599025990359904599055990659907599085990959910599115991259913599145991559916599175991859919599205992159922599235992459925599265992759928599295993059931599325993359934599355993659937599385993959940599415994259943599445994559946599475994859949599505995159952599535995459955599565995759958599595996059961599625996359964599655996659967599685996959970599715997259973599745997559976599775997859979599805998159982599835998459985599865998759988599895999059991599925999359994599955999659997599985999960000600016000260003600046000560006600076000860009600106001160012600136001460015600166001760018600196002060021600226002360024600256002660027600286002960030600316003260033600346003560036600376003860039600406004160042600436004460045600466004760048600496005060051600526005360054600556005660057600586005960060600616006260063600646006560066600676006860069600706007160072600736007460075600766007760078600796008060081600826008360084600856008660087600886008960090600916009260093600946009560096600976009860099601006010160102601036010460105601066010760108601096011060111601126011360114601156011660117601186011960120601216012260123601246012560126601276012860129601306013160132601336013460135601366013760138601396014060141601426014360144601456014660147601486014960150601516015260153601546015560156601576015860159601606016160162601636016460165601666016760168601696017060171601726017360174601756017660177601786017960180601816018260183601846018560186601876018860189601906019160192601936019460195601966019760198601996020060201602026020360204602056020660207602086020960210602116021260213602146021560216602176021860219602206022160222602236022460225602266022760228602296023060231602326023360234602356023660237602386023960240602416024260243602446024560246602476024860249602506025160252602536025460255602566025760258602596026060261602626026360264602656026660267602686026960270602716027260273602746027560276602776027860279602806028160282602836028460285602866028760288602896029060291602926029360294602956029660297602986029960300603016030260303603046030560306603076030860309603106031160312603136031460315603166031760318603196032060321603226032360324603256032660327603286032960330603316033260333603346033560336603376033860339603406034160342603436034460345603466034760348603496035060351603526035360354603556035660357603586035960360603616036260363603646036560366603676036860369603706037160372603736037460375603766037760378603796038060381603826038360384603856038660387603886038960390603916039260393603946039560396603976039860399604006040160402604036040460405604066040760408604096041060411604126041360414604156041660417604186041960420604216042260423604246042560426604276042860429604306043160432604336043460435604366043760438604396044060441604426044360444604456044660447604486044960450604516045260453604546045560456604576045860459604606046160462604636046460465604666046760468604696047060471604726047360474604756047660477604786047960480604816048260483604846048560486604876048860489604906049160492604936049460495604966049760498604996050060501605026050360504605056050660507605086050960510605116051260513605146051560516605176051860519605206052160522605236052460525605266052760528605296053060531605326053360534605356053660537605386053960540605416054260543605446054560546605476054860549605506055160552605536055460555605566055760558605596056060561605626056360564605656056660567605686056960570605716057260573605746057560576605776057860579605806058160582605836058460585605866058760588605896059060591605926059360594605956059660597605986059960600606016060260603606046060560606606076060860609606106061160612606136061460615606166061760618606196062060621606226062360624606256062660627606286062960630606316063260633606346063560636606376063860639606406064160642606436064460645606466064760648606496065060651606526065360654606556065660657606586065960660606616066260663606646066560666606676066860669606706067160672606736067460675606766067760678606796068060681606826068360684606856068660687606886068960690606916069260693606946069560696606976069860699607006070160702607036070460705607066070760708607096071060711607126071360714607156071660717607186071960720607216072260723607246072560726607276072860729607306073160732607336073460735607366073760738607396074060741607426074360744607456074660747607486074960750607516075260753607546075560756607576075860759607606076160762607636076460765607666076760768607696077060771607726077360774607756077660777607786077960780607816078260783607846078560786607876078860789607906079160792607936079460795607966079760798607996080060801608026080360804608056080660807608086080960810608116081260813608146081560816608176081860819608206082160822608236082460825608266082760828608296083060831608326083360834608356083660837608386083960840608416084260843608446084560846608476084860849608506085160852608536085460855608566085760858608596086060861608626086360864608656086660867608686086960870608716087260873608746087560876608776087860879608806088160882608836088460885608866088760888608896089060891608926089360894608956089660897608986089960900609016090260903609046090560906609076090860909609106091160912609136091460915609166091760918609196092060921609226092360924609256092660927609286092960930609316093260933609346093560936609376093860939609406094160942609436094460945609466094760948609496095060951609526095360954609556095660957609586095960960609616096260963609646096560966609676096860969609706097160972609736097460975609766097760978609796098060981609826098360984609856098660987609886098960990609916099260993609946099560996609976099860999610006100161002610036100461005610066100761008610096101061011610126101361014610156101661017610186101961020610216102261023610246102561026610276102861029610306103161032610336103461035610366103761038610396104061041610426104361044610456104661047610486104961050610516105261053610546105561056610576105861059610606106161062610636106461065610666106761068610696107061071610726107361074610756107661077610786107961080610816108261083610846108561086610876108861089610906109161092610936109461095610966109761098610996110061101611026110361104611056110661107611086110961110611116111261113611146111561116611176111861119611206112161122611236112461125611266112761128611296113061131611326113361134611356113661137611386113961140611416114261143611446114561146611476114861149611506115161152611536115461155611566115761158611596116061161611626116361164611656116661167611686116961170611716117261173611746117561176611776117861179611806118161182611836118461185611866118761188611896119061191611926119361194611956119661197611986119961200612016120261203612046120561206612076120861209612106121161212612136121461215612166121761218612196122061221612226122361224612256122661227612286122961230612316123261233612346123561236612376123861239612406124161242612436124461245612466124761248612496125061251612526125361254612556125661257612586125961260612616126261263612646126561266612676126861269612706127161272612736127461275612766127761278612796128061281612826128361284612856128661287612886128961290612916129261293612946129561296612976129861299613006130161302613036130461305613066130761308613096131061311613126131361314613156131661317613186131961320613216132261323613246132561326613276132861329613306133161332613336133461335613366133761338613396134061341613426134361344613456134661347613486134961350613516135261353613546135561356613576135861359613606136161362613636136461365613666136761368613696137061371613726137361374613756137661377613786137961380613816138261383613846138561386613876138861389613906139161392613936139461395613966139761398613996140061401614026140361404614056140661407614086140961410614116141261413614146141561416614176141861419614206142161422614236142461425614266142761428614296143061431614326143361434614356143661437614386143961440614416144261443614446144561446614476144861449614506145161452614536145461455614566145761458614596146061461614626146361464614656146661467614686146961470614716147261473614746147561476614776147861479614806148161482614836148461485614866148761488614896149061491614926149361494614956149661497614986149961500615016150261503615046150561506615076150861509615106151161512615136151461515615166151761518615196152061521615226152361524615256152661527615286152961530615316153261533615346153561536615376153861539615406154161542615436154461545615466154761548615496155061551615526155361554615556155661557615586155961560615616156261563615646156561566615676156861569615706157161572615736157461575615766157761578615796158061581615826158361584615856158661587615886158961590615916159261593615946159561596615976159861599616006160161602616036160461605616066160761608616096161061611616126161361614616156161661617616186161961620616216162261623616246162561626616276162861629616306163161632616336163461635616366163761638616396164061641616426164361644616456164661647616486164961650616516165261653616546165561656616576165861659616606166161662616636166461665616666166761668616696167061671616726167361674616756167661677616786167961680616816168261683616846168561686616876168861689616906169161692616936169461695616966169761698616996170061701617026170361704617056170661707617086170961710617116171261713617146171561716617176171861719617206172161722617236172461725617266172761728617296173061731617326173361734617356173661737617386173961740617416174261743617446174561746617476174861749617506175161752617536175461755617566175761758617596176061761617626176361764617656176661767617686176961770617716177261773617746177561776617776177861779617806178161782617836178461785617866178761788617896179061791617926179361794617956179661797617986179961800618016180261803618046180561806618076180861809618106181161812618136181461815618166181761818618196182061821618226182361824618256182661827618286182961830618316183261833618346183561836618376183861839618406184161842618436184461845618466184761848618496185061851618526185361854618556185661857618586185961860618616186261863618646186561866618676186861869618706187161872618736187461875618766187761878618796188061881618826188361884618856188661887618886188961890618916189261893618946189561896618976189861899619006190161902619036190461905619066190761908619096191061911619126191361914619156191661917619186191961920619216192261923619246192561926619276192861929619306193161932619336193461935619366193761938619396194061941619426194361944619456194661947619486194961950619516195261953619546195561956619576195861959619606196161962619636196461965619666196761968619696197061971619726197361974619756197661977619786197961980619816198261983619846198561986619876198861989619906199161992619936199461995619966199761998619996200062001620026200362004620056200662007620086200962010620116201262013620146201562016620176201862019620206202162022620236202462025620266202762028620296203062031620326203362034620356203662037620386203962040620416204262043620446204562046620476204862049620506205162052620536205462055620566205762058620596206062061620626206362064620656206662067620686206962070620716207262073620746207562076620776207862079620806208162082620836208462085620866208762088620896209062091620926209362094620956209662097620986209962100621016210262103621046210562106621076210862109621106211162112621136211462115621166211762118621196212062121621226212362124621256212662127621286212962130621316213262133621346213562136621376213862139621406214162142621436214462145621466214762148621496215062151621526215362154621556215662157621586215962160621616216262163621646216562166621676216862169621706217162172621736217462175621766217762178621796218062181621826218362184621856218662187621886218962190621916219262193621946219562196621976219862199622006220162202622036220462205622066220762208622096221062211622126221362214622156221662217622186221962220622216222262223622246222562226622276222862229622306223162232622336223462235622366223762238622396224062241622426224362244622456224662247622486224962250622516225262253622546225562256622576225862259622606226162262622636226462265622666226762268622696227062271622726227362274622756227662277622786227962280622816228262283622846228562286622876228862289622906229162292622936229462295622966229762298622996230062301623026230362304623056230662307623086230962310623116231262313623146231562316623176231862319623206232162322623236232462325623266232762328623296233062331623326233362334623356233662337623386233962340623416234262343623446234562346623476234862349623506235162352623536235462355623566235762358623596236062361623626236362364623656236662367623686236962370623716237262373623746237562376623776237862379623806238162382623836238462385623866238762388623896239062391623926239362394623956239662397623986239962400624016240262403624046240562406624076240862409624106241162412624136241462415624166241762418624196242062421624226242362424624256242662427624286242962430624316243262433624346243562436624376243862439624406244162442624436244462445624466244762448624496245062451624526245362454624556245662457624586245962460624616246262463624646246562466624676246862469624706247162472624736247462475624766247762478624796248062481624826248362484624856248662487624886248962490624916249262493624946249562496624976249862499625006250162502625036250462505625066250762508625096251062511625126251362514625156251662517625186251962520625216252262523625246252562526625276252862529625306253162532625336253462535625366253762538625396254062541625426254362544625456254662547625486254962550625516255262553625546255562556625576255862559625606256162562625636256462565625666256762568625696257062571625726257362574625756257662577625786257962580625816258262583625846258562586625876258862589625906259162592625936259462595625966259762598625996260062601626026260362604626056260662607626086260962610626116261262613626146261562616626176261862619626206262162622626236262462625626266262762628626296263062631626326263362634626356263662637626386263962640626416264262643626446264562646626476264862649626506265162652626536265462655626566265762658626596266062661626626266362664626656266662667626686266962670626716267262673626746267562676626776267862679626806268162682626836268462685626866268762688626896269062691626926269362694626956269662697626986269962700627016270262703627046270562706627076270862709627106271162712627136271462715627166271762718627196272062721627226272362724627256272662727627286272962730627316273262733627346273562736627376273862739627406274162742627436274462745627466274762748627496275062751627526275362754627556275662757627586275962760627616276262763627646276562766627676276862769627706277162772627736277462775627766277762778627796278062781627826278362784627856278662787627886278962790627916279262793627946279562796627976279862799628006280162802628036280462805628066280762808628096281062811628126281362814628156281662817628186281962820628216282262823628246282562826628276282862829628306283162832628336283462835628366283762838628396284062841628426284362844628456284662847628486284962850628516285262853628546285562856628576285862859628606286162862628636286462865628666286762868628696287062871628726287362874628756287662877628786287962880628816288262883628846288562886628876288862889628906289162892628936289462895628966289762898628996290062901629026290362904629056290662907629086290962910629116291262913629146291562916629176291862919629206292162922629236292462925629266292762928629296293062931629326293362934629356293662937629386293962940629416294262943629446294562946629476294862949629506295162952629536295462955629566295762958629596296062961629626296362964629656296662967629686296962970629716297262973629746297562976629776297862979629806298162982629836298462985629866298762988629896299062991629926299362994629956299662997629986299963000630016300263003630046300563006630076300863009630106301163012630136301463015630166301763018630196302063021630226302363024630256302663027630286302963030630316303263033630346303563036630376303863039630406304163042630436304463045630466304763048630496305063051630526305363054630556305663057630586305963060630616306263063630646306563066630676306863069630706307163072630736307463075630766307763078630796308063081630826308363084630856308663087630886308963090630916309263093630946309563096630976309863099631006310163102631036310463105631066310763108631096311063111631126311363114631156311663117631186311963120631216312263123631246312563126631276312863129631306313163132631336313463135631366313763138631396314063141631426314363144631456314663147631486314963150631516315263153631546315563156631576315863159631606316163162631636316463165631666316763168631696317063171631726317363174631756317663177631786317963180631816318263183631846318563186631876318863189631906319163192631936319463195631966319763198631996320063201632026320363204632056320663207632086320963210632116321263213632146321563216632176321863219632206322163222632236322463225632266322763228632296323063231632326323363234632356323663237632386323963240632416324263243632446324563246632476324863249632506325163252632536325463255632566325763258632596326063261632626326363264632656326663267632686326963270632716327263273632746327563276632776327863279632806328163282632836328463285632866328763288632896329063291632926329363294632956329663297632986329963300633016330263303633046330563306633076330863309633106331163312633136331463315633166331763318633196332063321633226332363324633256332663327633286332963330633316333263333633346333563336633376333863339633406334163342633436334463345633466334763348633496335063351633526335363354633556335663357633586335963360633616336263363633646336563366633676336863369633706337163372633736337463375633766337763378633796338063381633826338363384633856338663387633886338963390633916339263393633946339563396633976339863399634006340163402634036340463405634066340763408634096341063411634126341363414634156341663417634186341963420634216342263423634246342563426634276342863429634306343163432634336343463435634366343763438634396344063441634426344363444634456344663447634486344963450634516345263453634546345563456634576345863459634606346163462634636346463465634666346763468634696347063471634726347363474634756347663477634786347963480634816348263483634846348563486634876348863489634906349163492634936349463495634966349763498634996350063501635026350363504635056350663507635086350963510635116351263513635146351563516635176351863519635206352163522635236352463525635266352763528635296353063531635326353363534635356353663537635386353963540635416354263543635446354563546635476354863549635506355163552635536355463555635566355763558635596356063561635626356363564635656356663567635686356963570635716357263573635746357563576635776357863579635806358163582635836358463585635866358763588635896359063591635926359363594635956359663597635986359963600636016360263603636046360563606636076360863609636106361163612636136361463615636166361763618636196362063621636226362363624636256362663627636286362963630636316363263633636346363563636636376363863639636406364163642636436364463645636466364763648636496365063651636526365363654636556365663657636586365963660636616366263663636646366563666636676366863669636706367163672636736367463675636766367763678636796368063681636826368363684636856368663687636886368963690636916369263693636946369563696636976369863699637006370163702637036370463705637066370763708637096371063711637126371363714637156371663717637186371963720637216372263723637246372563726637276372863729637306373163732637336373463735637366373763738637396374063741637426374363744637456374663747637486374963750637516375263753637546375563756637576375863759637606376163762637636376463765637666376763768637696377063771637726377363774637756377663777637786377963780637816378263783637846378563786637876378863789637906379163792637936379463795637966379763798637996380063801638026380363804638056380663807638086380963810638116381263813638146381563816638176381863819638206382163822638236382463825638266382763828638296383063831638326383363834638356383663837638386383963840638416384263843638446384563846638476384863849638506385163852638536385463855638566385763858638596386063861638626386363864638656386663867638686386963870638716387263873638746387563876638776387863879638806388163882638836388463885638866388763888638896389063891638926389363894638956389663897638986389963900639016390263903639046390563906639076390863909639106391163912639136391463915639166391763918639196392063921639226392363924639256392663927639286392963930639316393263933639346393563936639376393863939639406394163942639436394463945639466394763948639496395063951639526395363954639556395663957639586395963960639616396263963639646396563966639676396863969639706397163972639736397463975639766397763978639796398063981639826398363984639856398663987639886398963990639916399263993639946399563996639976399863999640006400164002640036400464005640066400764008640096401064011640126401364014640156401664017640186401964020640216402264023640246402564026640276402864029640306403164032640336403464035640366403764038640396404064041640426404364044640456404664047640486404964050640516405264053640546405564056640576405864059640606406164062640636406464065640666406764068640696407064071640726407364074640756407664077640786407964080640816408264083640846408564086640876408864089640906409164092640936409464095640966409764098640996410064101641026410364104641056410664107641086410964110641116411264113641146411564116641176411864119641206412164122641236412464125641266412764128641296413064131641326413364134641356413664137641386413964140641416414264143641446414564146641476414864149641506415164152641536415464155641566415764158641596416064161641626416364164641656416664167641686416964170641716417264173641746417564176641776417864179641806418164182641836418464185641866418764188641896419064191641926419364194641956419664197641986419964200642016420264203642046420564206642076420864209642106421164212642136421464215642166421764218642196422064221642226422364224642256422664227642286422964230642316423264233642346423564236642376423864239642406424164242642436424464245642466424764248642496425064251642526425364254642556425664257642586425964260642616426264263642646426564266642676426864269642706427164272642736427464275642766427764278642796428064281642826428364284642856428664287642886428964290642916429264293642946429564296642976429864299643006430164302643036430464305643066430764308643096431064311643126431364314643156431664317643186431964320643216432264323643246432564326643276432864329643306433164332643336433464335643366433764338643396434064341643426434364344643456434664347643486434964350643516435264353643546435564356643576435864359643606436164362643636436464365643666436764368643696437064371643726437364374643756437664377643786437964380643816438264383643846438564386643876438864389643906439164392643936439464395643966439764398643996440064401644026440364404644056440664407644086440964410644116441264413644146441564416644176441864419644206442164422644236442464425644266442764428644296443064431644326443364434644356443664437644386443964440644416444264443644446444564446644476444864449644506445164452644536445464455644566445764458644596446064461644626446364464644656446664467644686446964470644716447264473644746447564476644776447864479644806448164482644836448464485644866448764488644896449064491644926449364494644956449664497644986449964500645016450264503645046450564506645076450864509645106451164512645136451464515645166451764518645196452064521645226452364524645256452664527645286452964530645316453264533645346453564536645376453864539645406454164542645436454464545645466454764548645496455064551645526455364554645556455664557645586455964560645616456264563645646456564566645676456864569645706457164572645736457464575645766457764578645796458064581645826458364584645856458664587645886458964590645916459264593645946459564596645976459864599646006460164602646036460464605646066460764608646096461064611646126461364614646156461664617646186461964620646216462264623646246462564626646276462864629646306463164632646336463464635646366463764638646396464064641646426464364644646456464664647646486464964650646516465264653646546465564656646576465864659646606466164662646636466464665646666466764668646696467064671646726467364674646756467664677646786467964680646816468264683646846468564686646876468864689646906469164692646936469464695646966469764698646996470064701647026470364704647056470664707647086470964710647116471264713647146471564716647176471864719647206472164722647236472464725647266472764728647296473064731647326473364734647356473664737647386473964740647416474264743647446474564746647476474864749647506475164752647536475464755647566475764758647596476064761647626476364764647656476664767647686476964770647716477264773647746477564776647776477864779647806478164782647836478464785647866478764788647896479064791647926479364794647956479664797647986479964800648016480264803648046480564806648076480864809648106481164812648136481464815648166481764818648196482064821648226482364824648256482664827648286482964830648316483264833648346483564836648376483864839648406484164842648436484464845648466484764848648496485064851648526485364854648556485664857648586485964860648616486264863648646486564866648676486864869648706487164872648736487464875648766487764878648796488064881648826488364884648856488664887648886488964890648916489264893648946489564896648976489864899649006490164902649036490464905649066490764908649096491064911649126491364914649156491664917649186491964920649216492264923649246492564926649276492864929649306493164932649336493464935649366493764938649396494064941649426494364944649456494664947649486494964950649516495264953649546495564956649576495864959649606496164962649636496464965649666496764968649696497064971649726497364974649756497664977649786497964980649816498264983649846498564986649876498864989649906499164992649936499464995649966499764998649996500065001650026500365004650056500665007650086500965010650116501265013650146501565016650176501865019650206502165022650236502465025650266502765028650296503065031650326503365034650356503665037650386503965040650416504265043650446504565046650476504865049650506505165052650536505465055650566505765058650596506065061650626506365064650656506665067650686506965070650716507265073650746507565076650776507865079650806508165082650836508465085650866508765088650896509065091650926509365094650956509665097650986509965100651016510265103651046510565106651076510865109651106511165112651136511465115651166511765118651196512065121651226512365124651256512665127651286512965130651316513265133651346513565136651376513865139651406514165142651436514465145651466514765148651496515065151651526515365154651556515665157651586515965160651616516265163651646516565166651676516865169651706517165172651736517465175651766517765178651796518065181651826518365184651856518665187651886518965190651916519265193651946519565196651976519865199652006520165202652036520465205652066520765208652096521065211652126521365214652156521665217652186521965220652216522265223652246522565226652276522865229652306523165232652336523465235652366523765238652396524065241652426524365244652456524665247652486524965250652516525265253652546525565256652576525865259652606526165262652636526465265652666526765268652696527065271652726527365274652756527665277652786527965280652816528265283652846528565286652876528865289652906529165292652936529465295652966529765298652996530065301653026530365304653056530665307653086530965310653116531265313653146531565316653176531865319653206532165322653236532465325653266532765328653296533065331653326533365334653356533665337653386533965340653416534265343653446534565346653476534865349653506535165352653536535465355653566535765358653596536065361653626536365364653656536665367653686536965370653716537265373653746537565376653776537865379653806538165382653836538465385653866538765388653896539065391653926539365394653956539665397653986539965400654016540265403654046540565406654076540865409654106541165412654136541465415654166541765418654196542065421654226542365424654256542665427654286542965430654316543265433654346543565436654376543865439654406544165442654436544465445654466544765448654496545065451654526545365454654556545665457654586545965460654616546265463654646546565466654676546865469654706547165472654736547465475654766547765478654796548065481654826548365484654856548665487654886548965490654916549265493654946549565496654976549865499655006550165502655036550465505655066550765508655096551065511655126551365514655156551665517655186551965520655216552265523655246552565526655276552865529655306553165532655336553465535655366553765538655396554065541655426554365544655456554665547655486554965550655516555265553655546555565556655576555865559655606556165562655636556465565655666556765568655696557065571655726557365574655756557665577655786557965580655816558265583655846558565586655876558865589655906559165592655936559465595655966559765598655996560065601656026560365604656056560665607656086560965610656116561265613656146561565616656176561865619656206562165622656236562465625656266562765628656296563065631656326563365634656356563665637656386563965640656416564265643656446564565646656476564865649656506565165652656536565465655656566565765658656596566065661656626566365664656656566665667656686566965670656716567265673656746567565676656776567865679656806568165682656836568465685656866568765688656896569065691656926569365694656956569665697656986569965700657016570265703657046570565706657076570865709657106571165712657136571465715657166571765718657196572065721657226572365724657256572665727657286572965730657316573265733657346573565736657376573865739657406574165742657436574465745657466574765748657496575065751657526575365754657556575665757657586575965760657616576265763657646576565766657676576865769657706577165772657736577465775657766577765778657796578065781657826578365784657856578665787657886578965790657916579265793657946579565796657976579865799658006580165802658036580465805658066580765808658096581065811658126581365814658156581665817658186581965820658216582265823658246582565826658276582865829658306583165832658336583465835658366583765838658396584065841658426584365844658456584665847658486584965850658516585265853658546585565856658576585865859658606586165862658636586465865658666586765868658696587065871658726587365874658756587665877658786587965880658816588265883658846588565886658876588865889658906589165892658936589465895658966589765898658996590065901659026590365904659056590665907659086590965910659116591265913659146591565916659176591865919659206592165922659236592465925659266592765928659296593065931659326593365934659356593665937659386593965940659416594265943659446594565946659476594865949659506595165952659536595465955659566595765958659596596065961659626596365964659656596665967659686596965970659716597265973659746597565976659776597865979659806598165982659836598465985659866598765988659896599065991659926599365994659956599665997659986599966000660016600266003660046600566006660076600866009660106601166012660136601466015660166601766018660196602066021660226602366024660256602666027660286602966030660316603266033660346603566036660376603866039660406604166042660436604466045660466604766048660496605066051660526605366054660556605666057660586605966060660616606266063660646606566066660676606866069660706607166072660736607466075660766607766078660796608066081660826608366084660856608666087660886608966090660916609266093660946609566096660976609866099661006610166102661036610466105661066610766108661096611066111661126611366114661156611666117661186611966120661216612266123661246612566126661276612866129661306613166132661336613466135661366613766138661396614066141661426614366144661456614666147661486614966150661516615266153661546615566156661576615866159661606616166162661636616466165661666616766168661696617066171661726617366174661756617666177661786617966180661816618266183661846618566186661876618866189661906619166192661936619466195661966619766198661996620066201662026620366204662056620666207662086620966210662116621266213662146621566216662176621866219662206622166222662236622466225662266622766228662296623066231662326623366234662356623666237662386623966240662416624266243662446624566246662476624866249662506625166252662536625466255662566625766258662596626066261662626626366264662656626666267662686626966270662716627266273662746627566276662776627866279662806628166282662836628466285662866628766288662896629066291662926629366294662956629666297662986629966300663016630266303663046630566306663076630866309663106631166312663136631466315663166631766318663196632066321663226632366324663256632666327663286632966330663316633266333663346633566336663376633866339663406634166342663436634466345663466634766348663496635066351663526635366354663556635666357663586635966360663616636266363663646636566366663676636866369663706637166372663736637466375663766637766378663796638066381663826638366384663856638666387663886638966390663916639266393663946639566396663976639866399664006640166402664036640466405664066640766408664096641066411664126641366414664156641666417664186641966420664216642266423664246642566426664276642866429664306643166432664336643466435664366643766438664396644066441664426644366444664456644666447664486644966450664516645266453664546645566456664576645866459664606646166462664636646466465664666646766468664696647066471664726647366474664756647666477664786647966480664816648266483664846648566486664876648866489664906649166492664936649466495664966649766498664996650066501665026650366504665056650666507665086650966510665116651266513665146651566516665176651866519665206652166522665236652466525665266652766528665296653066531665326653366534665356653666537665386653966540665416654266543665446654566546665476654866549665506655166552665536655466555665566655766558665596656066561665626656366564665656656666567665686656966570665716657266573665746657566576665776657866579665806658166582665836658466585665866658766588665896659066591665926659366594665956659666597665986659966600666016660266603666046660566606666076660866609666106661166612666136661466615666166661766618666196662066621666226662366624666256662666627666286662966630666316663266633666346663566636666376663866639666406664166642666436664466645666466664766648666496665066651666526665366654666556665666657666586665966660666616666266663666646666566666666676666866669666706667166672666736667466675666766667766678666796668066681666826668366684666856668666687666886668966690666916669266693666946669566696666976669866699667006670166702667036670466705667066670766708667096671066711667126671366714667156671666717667186671966720667216672266723667246672566726667276672866729667306673166732667336673466735667366673766738667396674066741667426674366744667456674666747667486674966750667516675266753667546675566756667576675866759667606676166762667636676466765667666676766768667696677066771667726677366774667756677666777667786677966780667816678266783667846678566786667876678866789667906679166792667936679466795667966679766798667996680066801668026680366804668056680666807668086680966810668116681266813668146681566816668176681866819668206682166822668236682466825668266682766828668296683066831668326683366834668356683666837668386683966840668416684266843668446684566846668476684866849668506685166852668536685466855668566685766858668596686066861668626686366864668656686666867668686686966870668716687266873668746687566876668776687866879668806688166882668836688466885668866688766888668896689066891668926689366894668956689666897668986689966900669016690266903669046690566906669076690866909669106691166912669136691466915669166691766918669196692066921669226692366924669256692666927669286692966930669316693266933669346693566936669376693866939669406694166942669436694466945669466694766948669496695066951669526695366954669556695666957669586695966960669616696266963669646696566966669676696866969669706697166972669736697466975669766697766978669796698066981669826698366984669856698666987669886698966990669916699266993669946699566996669976699866999670006700167002670036700467005670066700767008670096701067011670126701367014670156701667017670186701967020670216702267023670246702567026670276702867029670306703167032670336703467035670366703767038670396704067041670426704367044670456704667047670486704967050670516705267053670546705567056670576705867059670606706167062670636706467065670666706767068670696707067071670726707367074670756707667077670786707967080670816708267083670846708567086670876708867089670906709167092670936709467095670966709767098670996710067101671026710367104671056710667107671086710967110671116711267113671146711567116671176711867119671206712167122671236712467125671266712767128671296713067131671326713367134671356713667137671386713967140671416714267143671446714567146671476714867149671506715167152671536715467155671566715767158671596716067161671626716367164671656716667167671686716967170671716717267173671746717567176671776717867179671806718167182671836718467185671866718767188671896719067191671926719367194671956719667197671986719967200672016720267203672046720567206672076720867209672106721167212672136721467215672166721767218672196722067221672226722367224672256722667227672286722967230672316723267233672346723567236672376723867239672406724167242672436724467245672466724767248672496725067251672526725367254672556725667257672586725967260672616726267263672646726567266672676726867269672706727167272672736727467275672766727767278672796728067281672826728367284672856728667287672886728967290672916729267293672946729567296672976729867299673006730167302673036730467305673066730767308673096731067311673126731367314673156731667317673186731967320673216732267323673246732567326673276732867329673306733167332673336733467335673366733767338673396734067341673426734367344673456734667347673486734967350673516735267353673546735567356673576735867359673606736167362673636736467365673666736767368673696737067371673726737367374673756737667377673786737967380673816738267383673846738567386673876738867389673906739167392673936739467395673966739767398673996740067401674026740367404674056740667407674086740967410674116741267413674146741567416674176741867419674206742167422674236742467425674266742767428674296743067431674326743367434674356743667437674386743967440674416744267443674446744567446674476744867449674506745167452674536745467455674566745767458674596746067461674626746367464674656746667467674686746967470674716747267473674746747567476674776747867479674806748167482674836748467485674866748767488674896749067491674926749367494674956749667497674986749967500675016750267503675046750567506675076750867509675106751167512675136751467515675166751767518675196752067521675226752367524675256752667527675286752967530675316753267533675346753567536675376753867539675406754167542675436754467545675466754767548675496755067551675526755367554675556755667557675586755967560675616756267563675646756567566675676756867569675706757167572675736757467575675766757767578675796758067581675826758367584675856758667587675886758967590675916759267593675946759567596675976759867599676006760167602676036760467605676066760767608676096761067611676126761367614676156761667617676186761967620676216762267623676246762567626676276762867629676306763167632676336763467635676366763767638676396764067641676426764367644676456764667647676486764967650676516765267653676546765567656676576765867659676606766167662676636766467665676666766767668676696767067671676726767367674676756767667677676786767967680676816768267683676846768567686676876768867689676906769167692676936769467695676966769767698676996770067701677026770367704677056770667707677086770967710677116771267713677146771567716677176771867719677206772167722677236772467725677266772767728677296773067731677326773367734677356773667737677386773967740677416774267743677446774567746677476774867749677506775167752677536775467755677566775767758677596776067761677626776367764677656776667767677686776967770677716777267773677746777567776677776777867779677806778167782677836778467785677866778767788677896779067791677926779367794677956779667797677986779967800678016780267803678046780567806678076780867809678106781167812678136781467815678166781767818678196782067821678226782367824678256782667827678286782967830678316783267833678346783567836678376783867839678406784167842678436784467845678466784767848678496785067851678526785367854678556785667857678586785967860678616786267863678646786567866678676786867869678706787167872678736787467875678766787767878678796788067881678826788367884678856788667887678886788967890678916789267893678946789567896678976789867899679006790167902679036790467905679066790767908679096791067911679126791367914679156791667917679186791967920679216792267923679246792567926679276792867929679306793167932679336793467935679366793767938679396794067941679426794367944679456794667947679486794967950679516795267953679546795567956679576795867959679606796167962679636796467965679666796767968679696797067971679726797367974679756797667977679786797967980679816798267983679846798567986679876798867989679906799167992679936799467995679966799767998679996800068001680026800368004680056800668007680086800968010680116801268013680146801568016680176801868019680206802168022680236802468025680266802768028680296803068031680326803368034680356803668037680386803968040680416804268043680446804568046680476804868049680506805168052680536805468055680566805768058680596806068061680626806368064680656806668067680686806968070680716807268073680746807568076680776807868079680806808168082680836808468085680866808768088680896809068091680926809368094680956809668097680986809968100681016810268103681046810568106681076810868109681106811168112681136811468115681166811768118681196812068121681226812368124681256812668127681286812968130681316813268133681346813568136681376813868139681406814168142681436814468145681466814768148681496815068151681526815368154681556815668157681586815968160681616816268163681646816568166681676816868169681706817168172681736817468175681766817768178681796818068181681826818368184681856818668187681886818968190681916819268193681946819568196681976819868199682006820168202682036820468205682066820768208682096821068211682126821368214682156821668217682186821968220682216822268223682246822568226682276822868229682306823168232682336823468235682366823768238682396824068241682426824368244682456824668247682486824968250682516825268253682546825568256682576825868259682606826168262682636826468265682666826768268682696827068271682726827368274682756827668277682786827968280682816828268283682846828568286682876828868289682906829168292682936829468295682966829768298682996830068301683026830368304683056830668307683086830968310683116831268313683146831568316683176831868319683206832168322683236832468325683266832768328683296833068331683326833368334683356833668337683386833968340683416834268343683446834568346683476834868349683506835168352683536835468355683566835768358683596836068361683626836368364683656836668367683686836968370683716837268373683746837568376683776837868379683806838168382683836838468385683866838768388683896839068391683926839368394683956839668397683986839968400684016840268403684046840568406684076840868409684106841168412684136841468415684166841768418684196842068421684226842368424684256842668427684286842968430684316843268433684346843568436684376843868439684406844168442684436844468445684466844768448684496845068451684526845368454684556845668457684586845968460684616846268463684646846568466684676846868469684706847168472684736847468475684766847768478684796848068481684826848368484684856848668487684886848968490684916849268493684946849568496684976849868499685006850168502685036850468505685066850768508685096851068511685126851368514685156851668517685186851968520685216852268523685246852568526685276852868529685306853168532685336853468535685366853768538685396854068541685426854368544685456854668547685486854968550685516855268553685546855568556685576855868559685606856168562685636856468565685666856768568685696857068571685726857368574685756857668577685786857968580685816858268583685846858568586685876858868589685906859168592685936859468595685966859768598685996860068601686026860368604686056860668607686086860968610686116861268613686146861568616686176861868619686206862168622686236862468625686266862768628686296863068631686326863368634686356863668637686386863968640686416864268643686446864568646686476864868649686506865168652686536865468655686566865768658686596866068661686626866368664686656866668667686686866968670686716867268673686746867568676686776867868679686806868168682686836868468685686866868768688686896869068691686926869368694686956869668697686986869968700687016870268703687046870568706687076870868709687106871168712687136871468715687166871768718687196872068721687226872368724687256872668727687286872968730687316873268733687346873568736687376873868739687406874168742687436874468745687466874768748687496875068751687526875368754687556875668757687586875968760687616876268763687646876568766687676876868769687706877168772687736877468775687766877768778687796878068781687826878368784687856878668787687886878968790687916879268793687946879568796687976879868799688006880168802688036880468805688066880768808688096881068811688126881368814688156881668817688186881968820688216882268823688246882568826688276882868829688306883168832688336883468835688366883768838688396884068841688426884368844688456884668847688486884968850688516885268853688546885568856688576885868859688606886168862688636886468865688666886768868688696887068871688726887368874688756887668877688786887968880688816888268883688846888568886688876888868889688906889168892688936889468895688966889768898688996890068901689026890368904689056890668907689086890968910689116891268913689146891568916689176891868919689206892168922689236892468925689266892768928689296893068931689326893368934689356893668937689386893968940689416894268943689446894568946689476894868949689506895168952689536895468955689566895768958689596896068961689626896368964689656896668967689686896968970689716897268973689746897568976689776897868979689806898168982689836898468985689866898768988689896899068991689926899368994689956899668997689986899969000690016900269003690046900569006690076900869009690106901169012690136901469015690166901769018690196902069021690226902369024690256902669027690286902969030690316903269033690346903569036690376903869039690406904169042690436904469045690466904769048690496905069051690526905369054690556905669057690586905969060690616906269063690646906569066690676906869069690706907169072690736907469075690766907769078690796908069081690826908369084690856908669087690886908969090690916909269093690946909569096690976909869099691006910169102691036910469105691066910769108691096911069111691126911369114691156911669117691186911969120691216912269123691246912569126691276912869129691306913169132691336913469135691366913769138691396914069141691426914369144691456914669147691486914969150691516915269153691546915569156691576915869159691606916169162691636916469165691666916769168691696917069171691726917369174691756917669177691786917969180691816918269183691846918569186691876918869189691906919169192691936919469195691966919769198691996920069201692026920369204692056920669207692086920969210692116921269213692146921569216692176921869219692206922169222692236922469225692266922769228692296923069231692326923369234692356923669237692386923969240692416924269243692446924569246692476924869249692506925169252692536925469255692566925769258692596926069261692626926369264692656926669267692686926969270692716927269273692746927569276692776927869279692806928169282692836928469285692866928769288692896929069291692926929369294692956929669297692986929969300693016930269303693046930569306693076930869309693106931169312693136931469315693166931769318693196932069321693226932369324693256932669327693286932969330693316933269333693346933569336693376933869339693406934169342693436934469345693466934769348693496935069351693526935369354693556935669357693586935969360693616936269363693646936569366693676936869369693706937169372693736937469375693766937769378693796938069381693826938369384693856938669387693886938969390693916939269393693946939569396693976939869399694006940169402694036940469405694066940769408694096941069411694126941369414694156941669417694186941969420694216942269423694246942569426694276942869429694306943169432694336943469435694366943769438694396944069441694426944369444694456944669447694486944969450694516945269453694546945569456694576945869459694606946169462694636946469465694666946769468694696947069471694726947369474694756947669477694786947969480694816948269483694846948569486694876948869489694906949169492694936949469495694966949769498694996950069501695026950369504695056950669507695086950969510695116951269513695146951569516695176951869519695206952169522695236952469525695266952769528695296953069531695326953369534695356953669537695386953969540695416954269543695446954569546695476954869549695506955169552695536955469555695566955769558695596956069561695626956369564695656956669567695686956969570695716957269573695746957569576695776957869579695806958169582695836958469585695866958769588695896959069591695926959369594695956959669597695986959969600696016960269603696046960569606696076960869609696106961169612696136961469615696166961769618696196962069621696226962369624696256962669627696286962969630696316963269633696346963569636696376963869639696406964169642696436964469645696466964769648696496965069651696526965369654696556965669657696586965969660696616966269663696646966569666696676966869669696706967169672696736967469675696766967769678696796968069681696826968369684696856968669687696886968969690696916969269693696946969569696696976969869699697006970169702697036970469705697066970769708697096971069711697126971369714697156971669717697186971969720697216972269723697246972569726697276972869729697306973169732697336973469735697366973769738697396974069741697426974369744697456974669747697486974969750697516975269753697546975569756697576975869759697606976169762697636976469765697666976769768697696977069771697726977369774697756977669777697786977969780697816978269783697846978569786697876978869789697906979169792697936979469795697966979769798697996980069801698026980369804698056980669807698086980969810698116981269813698146981569816698176981869819698206982169822698236982469825698266982769828698296983069831698326983369834698356983669837698386983969840698416984269843698446984569846698476984869849698506985169852698536985469855698566985769858698596986069861698626986369864698656986669867698686986969870698716987269873698746987569876698776987869879698806988169882698836988469885698866988769888698896989069891698926989369894698956989669897698986989969900699016990269903699046990569906699076990869909699106991169912699136991469915699166991769918699196992069921699226992369924699256992669927699286992969930699316993269933699346993569936699376993869939699406994169942699436994469945699466994769948699496995069951699526995369954699556995669957699586995969960699616996269963699646996569966699676996869969699706997169972699736997469975699766997769978699796998069981699826998369984699856998669987699886998969990699916999269993699946999569996699976999869999700007000170002700037000470005700067000770008700097001070011700127001370014700157001670017700187001970020700217002270023700247002570026700277002870029700307003170032700337003470035700367003770038700397004070041700427004370044700457004670047700487004970050700517005270053700547005570056700577005870059700607006170062700637006470065700667006770068700697007070071700727007370074700757007670077700787007970080700817008270083700847008570086700877008870089700907009170092700937009470095700967009770098700997010070101701027010370104701057010670107701087010970110701117011270113701147011570116701177011870119701207012170122701237012470125701267012770128701297013070131701327013370134701357013670137701387013970140701417014270143701447014570146701477014870149701507015170152701537015470155701567015770158701597016070161701627016370164701657016670167701687016970170701717017270173701747017570176701777017870179701807018170182701837018470185701867018770188701897019070191701927019370194701957019670197701987019970200702017020270203702047020570206702077020870209702107021170212702137021470215702167021770218702197022070221702227022370224702257022670227702287022970230702317023270233702347023570236702377023870239702407024170242702437024470245702467024770248702497025070251702527025370254702557025670257702587025970260702617026270263702647026570266702677026870269702707027170272702737027470275702767027770278702797028070281702827028370284702857028670287702887028970290702917029270293702947029570296702977029870299703007030170302703037030470305703067030770308703097031070311703127031370314703157031670317703187031970320703217032270323703247032570326703277032870329703307033170332703337033470335703367033770338703397034070341703427034370344703457034670347703487034970350703517035270353703547035570356703577035870359703607036170362703637036470365703667036770368703697037070371703727037370374703757037670377703787037970380703817038270383703847038570386703877038870389703907039170392703937039470395703967039770398703997040070401704027040370404704057040670407704087040970410704117041270413704147041570416704177041870419704207042170422704237042470425704267042770428704297043070431704327043370434704357043670437704387043970440704417044270443704447044570446704477044870449704507045170452704537045470455704567045770458704597046070461704627046370464704657046670467704687046970470704717047270473704747047570476704777047870479704807048170482704837048470485704867048770488704897049070491704927049370494704957049670497704987049970500705017050270503705047050570506705077050870509705107051170512705137051470515705167051770518705197052070521705227052370524705257052670527705287052970530705317053270533705347053570536705377053870539705407054170542705437054470545705467054770548705497055070551705527055370554705557055670557705587055970560705617056270563705647056570566705677056870569705707057170572705737057470575705767057770578705797058070581705827058370584705857058670587705887058970590705917059270593705947059570596705977059870599706007060170602706037060470605706067060770608706097061070611706127061370614706157061670617706187061970620706217062270623706247062570626706277062870629706307063170632706337063470635706367063770638706397064070641706427064370644706457064670647706487064970650706517065270653706547065570656706577065870659706607066170662706637066470665706667066770668706697067070671706727067370674706757067670677706787067970680706817068270683706847068570686706877068870689706907069170692706937069470695706967069770698706997070070701707027070370704707057070670707707087070970710707117071270713707147071570716707177071870719707207072170722707237072470725707267072770728707297073070731707327073370734707357073670737707387073970740707417074270743707447074570746707477074870749707507075170752707537075470755707567075770758707597076070761707627076370764707657076670767707687076970770707717077270773707747077570776707777077870779707807078170782707837078470785707867078770788707897079070791707927079370794707957079670797707987079970800708017080270803708047080570806708077080870809708107081170812708137081470815708167081770818708197082070821708227082370824708257082670827708287082970830708317083270833708347083570836708377083870839708407084170842708437084470845708467084770848708497085070851708527085370854708557085670857708587085970860708617086270863708647086570866708677086870869708707087170872708737087470875708767087770878708797088070881708827088370884708857088670887708887088970890708917089270893708947089570896708977089870899709007090170902709037090470905709067090770908709097091070911709127091370914709157091670917709187091970920709217092270923709247092570926709277092870929709307093170932709337093470935709367093770938709397094070941709427094370944709457094670947709487094970950709517095270953709547095570956709577095870959709607096170962709637096470965709667096770968709697097070971709727097370974709757097670977709787097970980709817098270983709847098570986709877098870989709907099170992709937099470995709967099770998709997100071001710027100371004710057100671007710087100971010710117101271013710147101571016710177101871019710207102171022710237102471025710267102771028710297103071031710327103371034710357103671037710387103971040710417104271043710447104571046710477104871049710507105171052710537105471055710567105771058710597106071061710627106371064710657106671067710687106971070710717107271073710747107571076710777107871079710807108171082710837108471085710867108771088710897109071091710927109371094710957109671097710987109971100711017110271103711047110571106711077110871109711107111171112711137111471115711167111771118711197112071121711227112371124711257112671127711287112971130711317113271133711347113571136711377113871139711407114171142711437114471145711467114771148711497115071151711527115371154711557115671157711587115971160711617116271163711647116571166711677116871169711707117171172711737117471175711767117771178711797118071181711827118371184711857118671187711887118971190711917119271193711947119571196711977119871199712007120171202712037120471205712067120771208712097121071211712127121371214712157121671217712187121971220712217122271223712247122571226712277122871229712307123171232712337123471235712367123771238712397124071241712427124371244712457124671247712487124971250712517125271253712547125571256712577125871259712607126171262712637126471265712667126771268712697127071271712727127371274712757127671277712787127971280712817128271283712847128571286712877128871289712907129171292712937129471295712967129771298712997130071301713027130371304713057130671307713087130971310713117131271313713147131571316713177131871319713207132171322713237132471325713267132771328713297133071331713327133371334713357133671337713387133971340713417134271343713447134571346713477134871349713507135171352713537135471355713567135771358713597136071361713627136371364713657136671367713687136971370713717137271373713747137571376713777137871379713807138171382713837138471385713867138771388713897139071391713927139371394713957139671397713987139971400714017140271403714047140571406714077140871409714107141171412714137141471415714167141771418714197142071421714227142371424714257142671427714287142971430714317143271433714347143571436714377143871439714407144171442714437144471445714467144771448714497145071451714527145371454714557145671457714587145971460714617146271463714647146571466714677146871469714707147171472714737147471475714767147771478714797148071481714827148371484714857148671487714887148971490714917149271493714947149571496714977149871499715007150171502715037150471505715067150771508715097151071511715127151371514715157151671517715187151971520715217152271523715247152571526715277152871529715307153171532715337153471535715367153771538715397154071541715427154371544715457154671547715487154971550715517155271553715547155571556715577155871559715607156171562715637156471565715667156771568715697157071571715727157371574715757157671577715787157971580715817158271583715847158571586715877158871589715907159171592715937159471595715967159771598715997160071601716027160371604716057160671607716087160971610716117161271613716147161571616716177161871619716207162171622716237162471625716267162771628716297163071631716327163371634716357163671637716387163971640716417164271643716447164571646716477164871649716507165171652716537165471655716567165771658716597166071661716627166371664716657166671667716687166971670716717167271673716747167571676716777167871679716807168171682716837168471685716867168771688716897169071691716927169371694716957169671697716987169971700717017170271703717047170571706717077170871709717107171171712717137171471715717167171771718717197172071721717227172371724717257172671727717287172971730717317173271733717347173571736717377173871739717407174171742717437174471745717467174771748717497175071751717527175371754717557175671757717587175971760717617176271763717647176571766717677176871769717707177171772717737177471775717767177771778717797178071781717827178371784717857178671787717887178971790717917179271793717947179571796717977179871799718007180171802718037180471805718067180771808718097181071811718127181371814718157181671817718187181971820718217182271823718247182571826718277182871829718307183171832718337183471835718367183771838718397184071841718427184371844718457184671847718487184971850718517185271853718547185571856718577185871859718607186171862718637186471865718667186771868718697187071871718727187371874718757187671877718787187971880718817188271883718847188571886718877188871889718907189171892718937189471895718967189771898718997190071901719027190371904719057190671907719087190971910719117191271913719147191571916719177191871919719207192171922719237192471925719267192771928719297193071931719327193371934719357193671937719387193971940719417194271943719447194571946719477194871949719507195171952719537195471955719567195771958719597196071961719627196371964719657196671967719687196971970719717197271973719747197571976719777197871979719807198171982719837198471985719867198771988719897199071991719927199371994719957199671997719987199972000720017200272003720047200572006720077200872009720107201172012720137201472015720167201772018720197202072021720227202372024720257202672027720287202972030720317203272033720347203572036720377203872039720407204172042720437204472045720467204772048720497205072051720527205372054720557205672057720587205972060720617206272063720647206572066720677206872069720707207172072720737207472075720767207772078720797208072081720827208372084720857208672087720887208972090720917209272093720947209572096720977209872099721007210172102721037210472105721067210772108721097211072111721127211372114721157211672117721187211972120721217212272123721247212572126721277212872129721307213172132721337213472135721367213772138721397214072141721427214372144721457214672147721487214972150721517215272153721547215572156721577215872159721607216172162721637216472165721667216772168721697217072171721727217372174721757217672177721787217972180721817218272183721847218572186721877218872189721907219172192721937219472195721967219772198721997220072201722027220372204722057220672207722087220972210722117221272213722147221572216722177221872219722207222172222722237222472225722267222772228722297223072231722327223372234722357223672237722387223972240722417224272243722447224572246722477224872249722507225172252722537225472255722567225772258722597226072261722627226372264722657226672267722687226972270722717227272273722747227572276722777227872279722807228172282722837228472285722867228772288722897229072291722927229372294722957229672297722987229972300723017230272303723047230572306723077230872309723107231172312723137231472315723167231772318723197232072321723227232372324723257232672327723287232972330723317233272333723347233572336723377233872339723407234172342723437234472345723467234772348723497235072351723527235372354723557235672357723587235972360723617236272363723647236572366723677236872369723707237172372723737237472375723767237772378723797238072381723827238372384723857238672387723887238972390723917239272393723947239572396723977239872399724007240172402724037240472405724067240772408724097241072411724127241372414724157241672417724187241972420724217242272423724247242572426724277242872429724307243172432724337243472435724367243772438724397244072441724427244372444724457244672447724487244972450724517245272453724547245572456724577245872459724607246172462724637246472465724667246772468724697247072471724727247372474724757247672477724787247972480724817248272483724847248572486724877248872489724907249172492724937249472495724967249772498724997250072501725027250372504725057250672507725087250972510725117251272513725147251572516725177251872519725207252172522725237252472525725267252772528725297253072531725327253372534725357253672537725387253972540725417254272543725447254572546725477254872549725507255172552725537255472555725567255772558725597256072561725627256372564725657256672567725687256972570725717257272573725747257572576725777257872579725807258172582725837258472585725867258772588725897259072591725927259372594725957259672597725987259972600726017260272603726047260572606726077260872609726107261172612726137261472615726167261772618726197262072621726227262372624726257262672627726287262972630726317263272633726347263572636726377263872639726407264172642726437264472645726467264772648726497265072651726527265372654726557265672657726587265972660726617266272663726647266572666726677266872669726707267172672726737267472675726767267772678726797268072681726827268372684726857268672687726887268972690726917269272693726947269572696726977269872699727007270172702727037270472705727067270772708727097271072711727127271372714727157271672717727187271972720727217272272723727247272572726727277272872729727307273172732727337273472735727367273772738727397274072741727427274372744727457274672747727487274972750727517275272753727547275572756727577275872759727607276172762727637276472765727667276772768727697277072771727727277372774727757277672777727787277972780727817278272783727847278572786727877278872789727907279172792727937279472795727967279772798727997280072801728027280372804728057280672807728087280972810728117281272813728147281572816728177281872819728207282172822728237282472825728267282772828728297283072831728327283372834728357283672837728387283972840728417284272843728447284572846728477284872849728507285172852728537285472855728567285772858728597286072861728627286372864728657286672867728687286972870728717287272873728747287572876728777287872879728807288172882728837288472885728867288772888728897289072891728927289372894728957289672897728987289972900729017290272903729047290572906729077290872909729107291172912729137291472915729167291772918729197292072921729227292372924729257292672927729287292972930729317293272933729347293572936729377293872939729407294172942729437294472945729467294772948729497295072951729527295372954729557295672957729587295972960729617296272963729647296572966729677296872969729707297172972729737297472975729767297772978729797298072981729827298372984729857298672987729887298972990729917299272993729947299572996729977299872999730007300173002730037300473005730067300773008730097301073011730127301373014730157301673017730187301973020730217302273023730247302573026730277302873029730307303173032730337303473035730367303773038730397304073041730427304373044730457304673047730487304973050730517305273053730547305573056730577305873059730607306173062730637306473065730667306773068730697307073071730727307373074730757307673077730787307973080730817308273083730847308573086730877308873089730907309173092730937309473095730967309773098730997310073101731027310373104731057310673107731087310973110731117311273113731147311573116731177311873119731207312173122731237312473125731267312773128731297313073131731327313373134731357313673137731387313973140731417314273143731447314573146731477314873149731507315173152731537315473155731567315773158731597316073161731627316373164731657316673167731687316973170731717317273173731747317573176731777317873179731807318173182731837318473185731867318773188731897319073191731927319373194731957319673197731987319973200732017320273203732047320573206732077320873209732107321173212732137321473215732167321773218732197322073221732227322373224732257322673227732287322973230732317323273233732347323573236732377323873239732407324173242732437324473245732467324773248732497325073251732527325373254732557325673257732587325973260732617326273263732647326573266732677326873269732707327173272732737327473275732767327773278732797328073281732827328373284732857328673287732887328973290732917329273293732947329573296732977329873299733007330173302733037330473305733067330773308733097331073311733127331373314733157331673317733187331973320733217332273323733247332573326733277332873329733307333173332733337333473335733367333773338733397334073341733427334373344733457334673347733487334973350733517335273353733547335573356733577335873359733607336173362733637336473365733667336773368733697337073371733727337373374733757337673377733787337973380733817338273383733847338573386733877338873389733907339173392733937339473395733967339773398733997340073401734027340373404734057340673407734087340973410734117341273413734147341573416734177341873419734207342173422734237342473425734267342773428734297343073431734327343373434734357343673437734387343973440734417344273443734447344573446734477344873449734507345173452734537345473455734567345773458734597346073461734627346373464734657346673467734687346973470734717347273473734747347573476734777347873479734807348173482734837348473485734867348773488734897349073491734927349373494734957349673497734987349973500735017350273503735047350573506735077350873509735107351173512735137351473515735167351773518735197352073521735227352373524735257352673527735287352973530735317353273533735347353573536735377353873539735407354173542735437354473545735467354773548735497355073551735527355373554735557355673557735587355973560735617356273563735647356573566735677356873569735707357173572735737357473575735767357773578735797358073581735827358373584735857358673587735887358973590735917359273593735947359573596735977359873599736007360173602736037360473605736067360773608736097361073611736127361373614736157361673617736187361973620736217362273623736247362573626736277362873629736307363173632736337363473635736367363773638736397364073641736427364373644736457364673647736487364973650736517365273653736547365573656736577365873659736607366173662736637366473665736667366773668736697367073671736727367373674736757367673677736787367973680736817368273683736847368573686736877368873689736907369173692736937369473695736967369773698736997370073701737027370373704737057370673707737087370973710737117371273713737147371573716737177371873719737207372173722737237372473725737267372773728737297373073731737327373373734737357373673737737387373973740737417374273743737447374573746737477374873749737507375173752737537375473755737567375773758737597376073761737627376373764737657376673767737687376973770737717377273773737747377573776737777377873779737807378173782737837378473785737867378773788737897379073791737927379373794737957379673797737987379973800738017380273803738047380573806738077380873809738107381173812738137381473815738167381773818738197382073821738227382373824738257382673827738287382973830738317383273833738347383573836738377383873839738407384173842738437384473845738467384773848738497385073851738527385373854738557385673857738587385973860738617386273863738647386573866738677386873869738707387173872738737387473875738767387773878738797388073881738827388373884738857388673887738887388973890738917389273893738947389573896738977389873899739007390173902739037390473905739067390773908739097391073911739127391373914739157391673917739187391973920739217392273923739247392573926739277392873929739307393173932739337393473935739367393773938739397394073941739427394373944739457394673947739487394973950739517395273953739547395573956739577395873959739607396173962739637396473965739667396773968739697397073971739727397373974739757397673977739787397973980739817398273983739847398573986739877398873989739907399173992739937399473995739967399773998739997400074001740027400374004740057400674007740087400974010740117401274013740147401574016740177401874019740207402174022740237402474025740267402774028740297403074031740327403374034740357403674037740387403974040740417404274043740447404574046740477404874049740507405174052740537405474055740567405774058740597406074061740627406374064740657406674067740687406974070740717407274073740747407574076740777407874079740807408174082740837408474085740867408774088740897409074091740927409374094740957409674097740987409974100741017410274103741047410574106741077410874109741107411174112741137411474115741167411774118741197412074121741227412374124741257412674127741287412974130741317413274133741347413574136741377413874139741407414174142741437414474145741467414774148741497415074151741527415374154741557415674157741587415974160741617416274163741647416574166741677416874169741707417174172741737417474175741767417774178741797418074181741827418374184741857418674187741887418974190741917419274193741947419574196741977419874199742007420174202742037420474205742067420774208742097421074211742127421374214742157421674217742187421974220742217422274223742247422574226742277422874229742307423174232742337423474235742367423774238742397424074241742427424374244742457424674247742487424974250742517425274253742547425574256742577425874259742607426174262742637426474265742667426774268742697427074271742727427374274742757427674277742787427974280742817428274283742847428574286742877428874289742907429174292742937429474295742967429774298742997430074301743027430374304743057430674307743087430974310743117431274313743147431574316743177431874319743207432174322743237432474325743267432774328743297433074331743327433374334743357433674337743387433974340743417434274343743447434574346743477434874349743507435174352743537435474355743567435774358743597436074361743627436374364743657436674367743687436974370743717437274373743747437574376743777437874379743807438174382743837438474385743867438774388743897439074391743927439374394743957439674397743987439974400744017440274403744047440574406744077440874409744107441174412744137441474415744167441774418744197442074421744227442374424744257442674427744287442974430744317443274433744347443574436744377443874439744407444174442744437444474445744467444774448744497445074451744527445374454744557445674457744587445974460744617446274463744647446574466744677446874469744707447174472744737447474475744767447774478744797448074481744827448374484744857448674487744887448974490744917449274493744947449574496744977449874499745007450174502745037450474505745067450774508745097451074511745127451374514745157451674517745187451974520745217452274523745247452574526745277452874529745307453174532745337453474535745367453774538745397454074541745427454374544745457454674547745487454974550745517455274553745547455574556745577455874559745607456174562745637456474565745667456774568745697457074571745727457374574745757457674577745787457974580745817458274583745847458574586745877458874589745907459174592745937459474595745967459774598745997460074601746027460374604746057460674607746087460974610746117461274613746147461574616746177461874619746207462174622746237462474625746267462774628746297463074631746327463374634746357463674637746387463974640746417464274643746447464574646746477464874649746507465174652746537465474655746567465774658746597466074661746627466374664746657466674667746687466974670746717467274673746747467574676746777467874679746807468174682746837468474685746867468774688746897469074691746927469374694746957469674697746987469974700747017470274703747047470574706747077470874709747107471174712747137471474715747167471774718747197472074721747227472374724747257472674727747287472974730747317473274733747347473574736747377473874739747407474174742747437474474745747467474774748747497475074751747527475374754747557475674757747587475974760747617476274763747647476574766747677476874769747707477174772747737477474775747767477774778747797478074781747827478374784747857478674787747887478974790747917479274793747947479574796747977479874799748007480174802748037480474805748067480774808748097481074811748127481374814748157481674817748187481974820748217482274823748247482574826748277482874829748307483174832748337483474835748367483774838748397484074841748427484374844748457484674847748487484974850748517485274853748547485574856748577485874859748607486174862748637486474865748667486774868748697487074871748727487374874748757487674877748787487974880748817488274883748847488574886748877488874889748907489174892748937489474895748967489774898748997490074901749027490374904749057490674907749087490974910749117491274913749147491574916749177491874919749207492174922749237492474925749267492774928749297493074931749327493374934749357493674937749387493974940749417494274943749447494574946749477494874949749507495174952749537495474955749567495774958749597496074961749627496374964749657496674967749687496974970749717497274973749747497574976749777497874979749807498174982749837498474985749867498774988749897499074991749927499374994749957499674997749987499975000750017500275003750047500575006750077500875009750107501175012750137501475015750167501775018750197502075021750227502375024750257502675027750287502975030750317503275033750347503575036750377503875039750407504175042750437504475045750467504775048750497505075051750527505375054750557505675057750587505975060750617506275063750647506575066750677506875069750707507175072750737507475075750767507775078750797508075081750827508375084750857508675087750887508975090750917509275093750947509575096750977509875099751007510175102751037510475105751067510775108751097511075111751127511375114751157511675117751187511975120751217512275123751247512575126751277512875129751307513175132751337513475135751367513775138751397514075141751427514375144751457514675147751487514975150751517515275153751547515575156751577515875159751607516175162751637516475165751667516775168751697517075171751727517375174751757517675177751787517975180751817518275183751847518575186751877518875189751907519175192751937519475195751967519775198751997520075201752027520375204752057520675207752087520975210752117521275213752147521575216752177521875219752207522175222752237522475225752267522775228752297523075231752327523375234752357523675237752387523975240752417524275243752447524575246752477524875249752507525175252752537525475255752567525775258752597526075261752627526375264752657526675267752687526975270752717527275273752747527575276752777527875279752807528175282752837528475285752867528775288752897529075291752927529375294752957529675297752987529975300753017530275303753047530575306753077530875309753107531175312753137531475315753167531775318753197532075321753227532375324753257532675327753287532975330753317533275333753347533575336753377533875339753407534175342753437534475345753467534775348753497535075351753527535375354753557535675357753587535975360753617536275363753647536575366753677536875369753707537175372753737537475375753767537775378753797538075381753827538375384753857538675387753887538975390753917539275393753947539575396753977539875399754007540175402754037540475405754067540775408754097541075411754127541375414754157541675417754187541975420754217542275423754247542575426754277542875429754307543175432754337543475435754367543775438754397544075441754427544375444754457544675447754487544975450754517545275453754547545575456754577545875459754607546175462754637546475465754667546775468754697547075471754727547375474754757547675477754787547975480754817548275483754847548575486754877548875489754907549175492754937549475495754967549775498754997550075501755027550375504755057550675507755087550975510755117551275513755147551575516755177551875519755207552175522755237552475525755267552775528755297553075531755327553375534755357553675537755387553975540755417554275543755447554575546755477554875549755507555175552755537555475555755567555775558755597556075561755627556375564755657556675567755687556975570755717557275573755747557575576755777557875579755807558175582755837558475585755867558775588755897559075591755927559375594755957559675597755987559975600756017560275603756047560575606756077560875609756107561175612756137561475615756167561775618756197562075621756227562375624756257562675627756287562975630756317563275633756347563575636756377563875639756407564175642756437564475645756467564775648756497565075651756527565375654756557565675657756587565975660756617566275663756647566575666756677566875669756707567175672756737567475675756767567775678756797568075681756827568375684756857568675687756887568975690756917569275693756947569575696756977569875699757007570175702757037570475705757067570775708757097571075711757127571375714757157571675717757187571975720757217572275723757247572575726757277572875729757307573175732757337573475735757367573775738757397574075741757427574375744757457574675747757487574975750757517575275753757547575575756757577575875759757607576175762757637576475765757667576775768757697577075771757727577375774757757577675777757787577975780757817578275783757847578575786757877578875789757907579175792757937579475795757967579775798757997580075801758027580375804758057580675807758087580975810758117581275813758147581575816758177581875819758207582175822758237582475825758267582775828758297583075831758327583375834758357583675837758387583975840758417584275843758447584575846758477584875849758507585175852758537585475855758567585775858758597586075861758627586375864758657586675867758687586975870758717587275873758747587575876758777587875879758807588175882758837588475885758867588775888758897589075891758927589375894758957589675897758987589975900759017590275903759047590575906759077590875909759107591175912759137591475915759167591775918759197592075921759227592375924759257592675927759287592975930759317593275933759347593575936759377593875939759407594175942759437594475945759467594775948759497595075951759527595375954759557595675957759587595975960759617596275963759647596575966759677596875969759707597175972759737597475975759767597775978759797598075981759827598375984759857598675987759887598975990759917599275993759947599575996759977599875999760007600176002760037600476005760067600776008760097601076011760127601376014760157601676017760187601976020760217602276023760247602576026760277602876029760307603176032760337603476035760367603776038760397604076041760427604376044760457604676047760487604976050760517605276053760547605576056760577605876059760607606176062760637606476065760667606776068760697607076071760727607376074760757607676077760787607976080760817608276083760847608576086760877608876089760907609176092760937609476095760967609776098760997610076101761027610376104761057610676107761087610976110761117611276113761147611576116761177611876119761207612176122761237612476125761267612776128761297613076131761327613376134761357613676137761387613976140761417614276143761447614576146761477614876149761507615176152761537615476155761567615776158761597616076161761627616376164761657616676167761687616976170761717617276173761747617576176761777617876179761807618176182761837618476185761867618776188761897619076191761927619376194761957619676197761987619976200762017620276203762047620576206762077620876209762107621176212762137621476215762167621776218762197622076221762227622376224762257622676227762287622976230762317623276233762347623576236762377623876239762407624176242762437624476245762467624776248762497625076251762527625376254762557625676257762587625976260762617626276263762647626576266762677626876269762707627176272762737627476275762767627776278762797628076281762827628376284762857628676287762887628976290762917629276293762947629576296762977629876299763007630176302763037630476305763067630776308763097631076311763127631376314763157631676317763187631976320763217632276323763247632576326763277632876329763307633176332763337633476335763367633776338763397634076341763427634376344763457634676347763487634976350763517635276353763547635576356763577635876359763607636176362763637636476365763667636776368763697637076371763727637376374763757637676377763787637976380763817638276383763847638576386763877638876389763907639176392763937639476395763967639776398763997640076401764027640376404764057640676407764087640976410764117641276413764147641576416764177641876419764207642176422764237642476425764267642776428764297643076431764327643376434764357643676437764387643976440764417644276443764447644576446764477644876449764507645176452764537645476455764567645776458764597646076461764627646376464764657646676467764687646976470764717647276473764747647576476764777647876479764807648176482764837648476485764867648776488764897649076491764927649376494764957649676497764987649976500765017650276503765047650576506765077650876509765107651176512765137651476515765167651776518765197652076521765227652376524765257652676527765287652976530765317653276533765347653576536765377653876539765407654176542765437654476545765467654776548765497655076551765527655376554765557655676557765587655976560765617656276563765647656576566765677656876569765707657176572765737657476575765767657776578765797658076581765827658376584765857658676587765887658976590765917659276593765947659576596765977659876599766007660176602766037660476605766067660776608766097661076611766127661376614766157661676617766187661976620766217662276623766247662576626766277662876629766307663176632766337663476635766367663776638766397664076641766427664376644766457664676647766487664976650766517665276653766547665576656766577665876659766607666176662766637666476665766667666776668766697667076671766727667376674766757667676677766787667976680766817668276683766847668576686766877668876689766907669176692766937669476695766967669776698766997670076701767027670376704767057670676707767087670976710767117671276713767147671576716767177671876719767207672176722767237672476725767267672776728767297673076731767327673376734767357673676737767387673976740767417674276743767447674576746767477674876749767507675176752767537675476755767567675776758767597676076761767627676376764767657676676767767687676976770767717677276773767747677576776767777677876779767807678176782767837678476785767867678776788767897679076791767927679376794767957679676797767987679976800768017680276803768047680576806768077680876809768107681176812768137681476815768167681776818768197682076821768227682376824768257682676827768287682976830768317683276833768347683576836768377683876839768407684176842768437684476845768467684776848768497685076851768527685376854768557685676857768587685976860768617686276863768647686576866768677686876869768707687176872768737687476875768767687776878768797688076881768827688376884768857688676887768887688976890768917689276893768947689576896768977689876899769007690176902769037690476905769067690776908769097691076911769127691376914769157691676917769187691976920769217692276923769247692576926769277692876929769307693176932769337693476935769367693776938769397694076941769427694376944769457694676947769487694976950769517695276953769547695576956769577695876959769607696176962769637696476965769667696776968769697697076971769727697376974769757697676977769787697976980769817698276983769847698576986769877698876989769907699176992769937699476995769967699776998769997700077001770027700377004770057700677007770087700977010770117701277013770147701577016770177701877019770207702177022770237702477025770267702777028770297703077031770327703377034770357703677037770387703977040770417704277043770447704577046770477704877049770507705177052770537705477055770567705777058770597706077061770627706377064770657706677067770687706977070770717707277073770747707577076770777707877079770807708177082770837708477085770867708777088770897709077091770927709377094770957709677097770987709977100771017710277103771047710577106771077710877109771107711177112771137711477115771167711777118771197712077121771227712377124771257712677127771287712977130771317713277133771347713577136771377713877139771407714177142771437714477145771467714777148771497715077151771527715377154771557715677157771587715977160771617716277163771647716577166771677716877169771707717177172771737717477175771767717777178771797718077181771827718377184771857718677187771887718977190771917719277193771947719577196771977719877199772007720177202772037720477205772067720777208772097721077211772127721377214772157721677217772187721977220772217722277223772247722577226772277722877229772307723177232772337723477235772367723777238772397724077241772427724377244772457724677247772487724977250772517725277253772547725577256772577725877259772607726177262772637726477265772667726777268772697727077271772727727377274772757727677277772787727977280772817728277283772847728577286772877728877289772907729177292772937729477295772967729777298772997730077301773027730377304773057730677307773087730977310773117731277313773147731577316773177731877319773207732177322773237732477325773267732777328773297733077331773327733377334773357733677337773387733977340773417734277343773447734577346773477734877349773507735177352773537735477355773567735777358773597736077361773627736377364773657736677367773687736977370773717737277373773747737577376773777737877379773807738177382773837738477385773867738777388773897739077391773927739377394773957739677397773987739977400774017740277403774047740577406774077740877409774107741177412774137741477415774167741777418774197742077421774227742377424774257742677427774287742977430774317743277433774347743577436774377743877439774407744177442774437744477445774467744777448774497745077451774527745377454774557745677457774587745977460774617746277463774647746577466774677746877469774707747177472774737747477475774767747777478774797748077481774827748377484774857748677487774887748977490774917749277493774947749577496774977749877499775007750177502775037750477505775067750777508775097751077511775127751377514775157751677517775187751977520775217752277523775247752577526775277752877529775307753177532775337753477535775367753777538775397754077541775427754377544775457754677547775487754977550775517755277553775547755577556775577755877559775607756177562775637756477565775667756777568775697757077571775727757377574775757757677577775787757977580775817758277583775847758577586775877758877589775907759177592775937759477595775967759777598775997760077601776027760377604776057760677607776087760977610776117761277613776147761577616776177761877619776207762177622776237762477625776267762777628776297763077631776327763377634776357763677637776387763977640776417764277643776447764577646776477764877649776507765177652776537765477655776567765777658776597766077661776627766377664776657766677667776687766977670776717767277673776747767577676776777767877679776807768177682776837768477685776867768777688776897769077691776927769377694776957769677697776987769977700777017770277703777047770577706777077770877709777107771177712777137771477715777167771777718777197772077721777227772377724777257772677727777287772977730777317773277733777347773577736777377773877739777407774177742777437774477745777467774777748777497775077751777527775377754777557775677757777587775977760777617776277763777647776577766777677776877769777707777177772777737777477775777767777777778777797778077781777827778377784777857778677787777887778977790777917779277793777947779577796777977779877799778007780177802778037780477805778067780777808778097781077811778127781377814778157781677817778187781977820778217782277823778247782577826778277782877829778307783177832778337783477835778367783777838778397784077841778427784377844778457784677847778487784977850778517785277853778547785577856778577785877859778607786177862778637786477865778667786777868778697787077871778727787377874778757787677877778787787977880778817788277883778847788577886778877788877889778907789177892778937789477895778967789777898778997790077901779027790377904779057790677907779087790977910779117791277913779147791577916779177791877919779207792177922779237792477925779267792777928779297793077931779327793377934779357793677937779387793977940779417794277943779447794577946779477794877949779507795177952779537795477955779567795777958779597796077961779627796377964779657796677967779687796977970779717797277973779747797577976779777797877979779807798177982779837798477985779867798777988779897799077991779927799377994779957799677997779987799978000780017800278003780047800578006780077800878009780107801178012780137801478015780167801778018780197802078021780227802378024780257802678027780287802978030780317803278033780347803578036780377803878039780407804178042780437804478045780467804778048780497805078051780527805378054780557805678057780587805978060780617806278063780647806578066780677806878069780707807178072780737807478075780767807778078780797808078081780827808378084780857808678087780887808978090780917809278093780947809578096780977809878099781007810178102781037810478105781067810778108781097811078111781127811378114781157811678117781187811978120781217812278123781247812578126781277812878129781307813178132781337813478135781367813778138781397814078141781427814378144781457814678147781487814978150781517815278153781547815578156781577815878159781607816178162781637816478165781667816778168781697817078171781727817378174781757817678177781787817978180781817818278183781847818578186781877818878189781907819178192781937819478195781967819778198781997820078201782027820378204782057820678207782087820978210782117821278213782147821578216782177821878219782207822178222782237822478225782267822778228782297823078231782327823378234782357823678237782387823978240782417824278243782447824578246782477824878249782507825178252782537825478255782567825778258782597826078261782627826378264782657826678267782687826978270782717827278273782747827578276782777827878279782807828178282782837828478285782867828778288782897829078291782927829378294782957829678297782987829978300783017830278303783047830578306783077830878309783107831178312783137831478315783167831778318783197832078321783227832378324783257832678327783287832978330783317833278333783347833578336783377833878339783407834178342783437834478345783467834778348783497835078351783527835378354783557835678357783587835978360783617836278363783647836578366783677836878369783707837178372783737837478375783767837778378783797838078381783827838378384783857838678387783887838978390783917839278393783947839578396783977839878399784007840178402784037840478405784067840778408784097841078411784127841378414784157841678417784187841978420784217842278423784247842578426784277842878429784307843178432784337843478435784367843778438784397844078441784427844378444784457844678447784487844978450784517845278453784547845578456784577845878459784607846178462784637846478465784667846778468784697847078471784727847378474784757847678477784787847978480784817848278483784847848578486784877848878489784907849178492784937849478495784967849778498784997850078501785027850378504785057850678507785087850978510785117851278513785147851578516785177851878519785207852178522785237852478525785267852778528785297853078531785327853378534785357853678537785387853978540785417854278543785447854578546785477854878549785507855178552785537855478555785567855778558785597856078561785627856378564785657856678567785687856978570785717857278573785747857578576785777857878579785807858178582785837858478585785867858778588785897859078591785927859378594785957859678597785987859978600786017860278603786047860578606786077860878609786107861178612786137861478615786167861778618786197862078621786227862378624786257862678627786287862978630786317863278633786347863578636786377863878639786407864178642786437864478645786467864778648786497865078651786527865378654786557865678657786587865978660786617866278663786647866578666786677866878669786707867178672786737867478675786767867778678786797868078681786827868378684786857868678687786887868978690786917869278693786947869578696786977869878699787007870178702787037870478705787067870778708787097871078711787127871378714787157871678717787187871978720787217872278723787247872578726787277872878729787307873178732787337873478735787367873778738787397874078741787427874378744787457874678747787487874978750787517875278753787547875578756787577875878759787607876178762787637876478765787667876778768787697877078771787727877378774787757877678777787787877978780787817878278783787847878578786787877878878789787907879178792787937879478795787967879778798787997880078801788027880378804788057880678807788087880978810788117881278813788147881578816788177881878819788207882178822788237882478825788267882778828788297883078831788327883378834788357883678837788387883978840788417884278843788447884578846788477884878849788507885178852788537885478855788567885778858788597886078861788627886378864788657886678867788687886978870788717887278873788747887578876788777887878879788807888178882788837888478885788867888778888788897889078891788927889378894788957889678897788987889978900789017890278903789047890578906789077890878909789107891178912789137891478915789167891778918789197892078921789227892378924789257892678927789287892978930789317893278933789347893578936789377893878939789407894178942789437894478945789467894778948789497895078951789527895378954789557895678957789587895978960789617896278963789647896578966789677896878969789707897178972789737897478975789767897778978789797898078981789827898378984789857898678987789887898978990789917899278993789947899578996789977899878999790007900179002790037900479005790067900779008790097901079011790127901379014790157901679017790187901979020790217902279023790247902579026790277902879029790307903179032790337903479035790367903779038790397904079041790427904379044790457904679047790487904979050790517905279053790547905579056790577905879059790607906179062790637906479065790667906779068790697907079071790727907379074790757907679077790787907979080790817908279083790847908579086790877908879089790907909179092790937909479095790967909779098790997910079101791027910379104791057910679107791087910979110791117911279113791147911579116791177911879119791207912179122791237912479125791267912779128791297913079131791327913379134791357913679137791387913979140791417914279143791447914579146791477914879149791507915179152791537915479155791567915779158791597916079161791627916379164791657916679167791687916979170791717917279173791747917579176791777917879179791807918179182791837918479185791867918779188791897919079191791927919379194791957919679197791987919979200792017920279203792047920579206792077920879209792107921179212792137921479215792167921779218792197922079221792227922379224792257922679227792287922979230792317923279233792347923579236792377923879239792407924179242792437924479245792467924779248792497925079251792527925379254792557925679257792587925979260792617926279263792647926579266792677926879269792707927179272792737927479275792767927779278792797928079281792827928379284792857928679287792887928979290792917929279293792947929579296792977929879299793007930179302793037930479305793067930779308793097931079311793127931379314793157931679317793187931979320793217932279323793247932579326793277932879329793307933179332793337933479335793367933779338793397934079341793427934379344793457934679347793487934979350793517935279353793547935579356793577935879359793607936179362793637936479365793667936779368793697937079371793727937379374793757937679377793787937979380793817938279383793847938579386793877938879389793907939179392793937939479395793967939779398793997940079401794027940379404794057940679407794087940979410794117941279413794147941579416794177941879419794207942179422794237942479425794267942779428794297943079431794327943379434794357943679437794387943979440794417944279443794447944579446794477944879449794507945179452794537945479455794567945779458794597946079461794627946379464794657946679467794687946979470794717947279473794747947579476794777947879479794807948179482794837948479485794867948779488794897949079491794927949379494794957949679497794987949979500795017950279503795047950579506795077950879509795107951179512795137951479515795167951779518795197952079521795227952379524795257952679527795287952979530795317953279533795347953579536795377953879539795407954179542795437954479545795467954779548795497955079551795527955379554795557955679557795587955979560795617956279563795647956579566795677956879569795707957179572795737957479575795767957779578795797958079581795827958379584795857958679587795887958979590795917959279593795947959579596795977959879599796007960179602796037960479605796067960779608796097961079611796127961379614796157961679617796187961979620796217962279623796247962579626796277962879629796307963179632796337963479635796367963779638796397964079641796427964379644796457964679647796487964979650796517965279653796547965579656796577965879659796607966179662796637966479665796667966779668796697967079671796727967379674796757967679677796787967979680796817968279683796847968579686796877968879689796907969179692796937969479695796967969779698796997970079701797027970379704797057970679707797087970979710797117971279713797147971579716797177971879719797207972179722797237972479725797267972779728797297973079731797327973379734797357973679737797387973979740797417974279743797447974579746797477974879749797507975179752797537975479755797567975779758797597976079761797627976379764797657976679767797687976979770797717977279773797747977579776797777977879779797807978179782797837978479785797867978779788797897979079791797927979379794797957979679797797987979979800798017980279803798047980579806798077980879809798107981179812798137981479815798167981779818798197982079821798227982379824798257982679827798287982979830798317983279833798347983579836798377983879839798407984179842798437984479845798467984779848798497985079851798527985379854798557985679857798587985979860798617986279863798647986579866798677986879869798707987179872798737987479875798767987779878798797988079881798827988379884798857988679887798887988979890798917989279893798947989579896798977989879899799007990179902799037990479905799067990779908799097991079911799127991379914799157991679917799187991979920799217992279923799247992579926799277992879929799307993179932799337993479935799367993779938799397994079941799427994379944799457994679947799487994979950799517995279953799547995579956799577995879959799607996179962799637996479965799667996779968799697997079971799727997379974799757997679977799787997979980799817998279983799847998579986799877998879989799907999179992799937999479995799967999779998799998000080001800028000380004800058000680007800088000980010800118001280013800148001580016800178001880019800208002180022800238002480025800268002780028800298003080031800328003380034800358003680037800388003980040800418004280043800448004580046800478004880049800508005180052800538005480055800568005780058800598006080061800628006380064800658006680067800688006980070800718007280073800748007580076800778007880079800808008180082800838008480085800868008780088800898009080091800928009380094800958009680097800988009980100801018010280103801048010580106801078010880109801108011180112801138011480115801168011780118801198012080121801228012380124801258012680127801288012980130801318013280133801348013580136801378013880139801408014180142801438014480145801468014780148801498015080151801528015380154801558015680157801588015980160801618016280163801648016580166801678016880169801708017180172801738017480175801768017780178801798018080181801828018380184801858018680187801888018980190801918019280193801948019580196801978019880199802008020180202802038020480205802068020780208802098021080211802128021380214802158021680217802188021980220802218022280223802248022580226802278022880229802308023180232802338023480235802368023780238802398024080241802428024380244802458024680247802488024980250802518025280253802548025580256802578025880259802608026180262802638026480265802668026780268802698027080271802728027380274802758027680277802788027980280802818028280283802848028580286802878028880289802908029180292802938029480295802968029780298802998030080301803028030380304803058030680307803088030980310803118031280313803148031580316803178031880319803208032180322803238032480325803268032780328803298033080331803328033380334803358033680337803388033980340803418034280343803448034580346803478034880349803508035180352803538035480355803568035780358803598036080361803628036380364803658036680367803688036980370803718037280373803748037580376803778037880379803808038180382803838038480385803868038780388803898039080391803928039380394803958039680397803988039980400804018040280403804048040580406804078040880409804108041180412804138041480415804168041780418804198042080421804228042380424804258042680427804288042980430804318043280433804348043580436804378043880439804408044180442804438044480445804468044780448804498045080451804528045380454804558045680457804588045980460804618046280463804648046580466804678046880469804708047180472804738047480475804768047780478804798048080481804828048380484804858048680487804888048980490804918049280493804948049580496804978049880499805008050180502805038050480505805068050780508805098051080511805128051380514805158051680517805188051980520805218052280523805248052580526805278052880529805308053180532805338053480535805368053780538805398054080541805428054380544805458054680547805488054980550805518055280553805548055580556805578055880559805608056180562805638056480565805668056780568805698057080571805728057380574805758057680577805788057980580805818058280583805848058580586805878058880589805908059180592805938059480595805968059780598805998060080601806028060380604806058060680607806088060980610806118061280613806148061580616806178061880619806208062180622806238062480625806268062780628806298063080631806328063380634806358063680637806388063980640806418064280643806448064580646806478064880649806508065180652806538065480655806568065780658806598066080661806628066380664806658066680667806688066980670806718067280673806748067580676806778067880679806808068180682806838068480685806868068780688806898069080691806928069380694806958069680697806988069980700807018070280703807048070580706807078070880709807108071180712807138071480715807168071780718807198072080721807228072380724807258072680727807288072980730807318073280733807348073580736807378073880739807408074180742807438074480745807468074780748807498075080751807528075380754807558075680757807588075980760807618076280763807648076580766807678076880769807708077180772807738077480775807768077780778807798078080781807828078380784807858078680787807888078980790807918079280793807948079580796807978079880799808008080180802808038080480805808068080780808808098081080811808128081380814808158081680817808188081980820808218082280823808248082580826808278082880829808308083180832808338083480835808368083780838808398084080841808428084380844808458084680847808488084980850808518085280853808548085580856808578085880859808608086180862808638086480865808668086780868808698087080871808728087380874808758087680877808788087980880808818088280883808848088580886808878088880889808908089180892808938089480895808968089780898808998090080901809028090380904809058090680907809088090980910809118091280913809148091580916809178091880919809208092180922809238092480925809268092780928809298093080931809328093380934809358093680937809388093980940809418094280943809448094580946809478094880949809508095180952809538095480955809568095780958809598096080961809628096380964809658096680967809688096980970809718097280973809748097580976809778097880979809808098180982809838098480985809868098780988809898099080991809928099380994809958099680997809988099981000810018100281003810048100581006810078100881009810108101181012810138101481015810168101781018810198102081021810228102381024810258102681027810288102981030810318103281033810348103581036810378103881039810408104181042810438104481045810468104781048810498105081051810528105381054810558105681057810588105981060810618106281063810648106581066810678106881069810708107181072810738107481075810768107781078810798108081081810828108381084810858108681087810888108981090810918109281093810948109581096810978109881099811008110181102811038110481105811068110781108811098111081111811128111381114811158111681117811188111981120811218112281123811248112581126811278112881129811308113181132811338113481135811368113781138811398114081141811428114381144811458114681147811488114981150811518115281153811548115581156811578115881159811608116181162811638116481165811668116781168811698117081171811728117381174811758117681177811788117981180811818118281183811848118581186811878118881189811908119181192811938119481195811968119781198811998120081201812028120381204812058120681207812088120981210812118121281213812148121581216812178121881219812208122181222812238122481225812268122781228812298123081231812328123381234812358123681237812388123981240812418124281243812448124581246812478124881249812508125181252812538125481255812568125781258812598126081261812628126381264812658126681267812688126981270812718127281273812748127581276812778127881279812808128181282812838128481285812868128781288812898129081291812928129381294812958129681297812988129981300813018130281303813048130581306813078130881309813108131181312813138131481315813168131781318813198132081321813228132381324813258132681327813288132981330813318133281333813348133581336813378133881339813408134181342813438134481345813468134781348813498135081351813528135381354813558135681357813588135981360813618136281363813648136581366813678136881369813708137181372813738137481375813768137781378813798138081381813828138381384813858138681387813888138981390813918139281393813948139581396813978139881399814008140181402814038140481405814068140781408814098141081411814128141381414814158141681417814188141981420814218142281423814248142581426814278142881429814308143181432814338143481435814368143781438814398144081441814428144381444814458144681447814488144981450814518145281453814548145581456814578145881459814608146181462814638146481465814668146781468814698147081471814728147381474814758147681477814788147981480814818148281483814848148581486814878148881489814908149181492814938149481495814968149781498814998150081501815028150381504815058150681507815088150981510815118151281513815148151581516815178151881519815208152181522815238152481525815268152781528815298153081531815328153381534815358153681537815388153981540815418154281543815448154581546815478154881549815508155181552815538155481555815568155781558815598156081561815628156381564815658156681567815688156981570815718157281573815748157581576815778157881579815808158181582815838158481585815868158781588815898159081591815928159381594815958159681597815988159981600816018160281603816048160581606816078160881609816108161181612816138161481615816168161781618816198162081621816228162381624816258162681627816288162981630816318163281633816348163581636816378163881639816408164181642816438164481645816468164781648816498165081651816528165381654816558165681657816588165981660816618166281663816648166581666816678166881669816708167181672816738167481675816768167781678816798168081681816828168381684816858168681687816888168981690816918169281693816948169581696816978169881699817008170181702817038170481705817068170781708817098171081711817128171381714817158171681717817188171981720817218172281723817248172581726817278172881729817308173181732817338173481735817368173781738817398174081741817428174381744817458174681747817488174981750817518175281753817548175581756817578175881759817608176181762817638176481765817668176781768817698177081771817728177381774817758177681777817788177981780817818178281783817848178581786817878178881789817908179181792817938179481795817968179781798817998180081801818028180381804818058180681807818088180981810818118181281813818148181581816818178181881819818208182181822818238182481825818268182781828818298183081831818328183381834818358183681837818388183981840818418184281843818448184581846818478184881849818508185181852818538185481855818568185781858818598186081861818628186381864818658186681867818688186981870818718187281873818748187581876818778187881879818808188181882818838188481885818868188781888818898189081891818928189381894818958189681897818988189981900819018190281903819048190581906819078190881909819108191181912819138191481915819168191781918819198192081921819228192381924819258192681927819288192981930819318193281933819348193581936819378193881939819408194181942819438194481945819468194781948819498195081951819528195381954819558195681957819588195981960819618196281963819648196581966819678196881969819708197181972819738197481975819768197781978819798198081981819828198381984819858198681987819888198981990819918199281993819948199581996819978199881999820008200182002820038200482005820068200782008820098201082011820128201382014820158201682017820188201982020820218202282023820248202582026820278202882029820308203182032820338203482035820368203782038820398204082041820428204382044820458204682047820488204982050820518205282053820548205582056820578205882059820608206182062820638206482065820668206782068820698207082071820728207382074820758207682077820788207982080820818208282083820848208582086820878208882089820908209182092820938209482095820968209782098820998210082101821028210382104821058210682107821088210982110821118211282113821148211582116821178211882119821208212182122821238212482125821268212782128821298213082131821328213382134821358213682137821388213982140821418214282143821448214582146821478214882149821508215182152821538215482155821568215782158821598216082161821628216382164821658216682167821688216982170821718217282173821748217582176821778217882179821808218182182821838218482185821868218782188821898219082191821928219382194821958219682197821988219982200822018220282203822048220582206822078220882209822108221182212822138221482215822168221782218822198222082221822228222382224822258222682227822288222982230822318223282233822348223582236822378223882239822408224182242822438224482245822468224782248822498225082251822528225382254822558225682257822588225982260822618226282263822648226582266822678226882269822708227182272822738227482275822768227782278822798228082281822828228382284822858228682287822888228982290822918229282293822948229582296822978229882299823008230182302823038230482305823068230782308823098231082311823128231382314823158231682317823188231982320823218232282323823248232582326823278232882329823308233182332823338233482335823368233782338823398234082341823428234382344823458234682347823488234982350823518235282353823548235582356823578235882359823608236182362823638236482365823668236782368823698237082371823728237382374823758237682377823788237982380823818238282383823848238582386823878238882389823908239182392823938239482395823968239782398823998240082401824028240382404824058240682407824088240982410824118241282413824148241582416824178241882419824208242182422824238242482425824268242782428824298243082431824328243382434824358243682437824388243982440824418244282443824448244582446824478244882449824508245182452824538245482455824568245782458824598246082461824628246382464824658246682467824688246982470824718247282473824748247582476824778247882479824808248182482824838248482485824868248782488824898249082491824928249382494824958249682497824988249982500825018250282503825048250582506825078250882509825108251182512825138251482515825168251782518825198252082521825228252382524825258252682527825288252982530825318253282533825348253582536825378253882539825408254182542825438254482545825468254782548825498255082551825528255382554825558255682557825588255982560825618256282563825648256582566825678256882569825708257182572825738257482575825768257782578825798258082581825828258382584825858258682587825888258982590825918259282593825948259582596825978259882599826008260182602826038260482605826068260782608826098261082611826128261382614826158261682617826188261982620826218262282623826248262582626826278262882629826308263182632826338263482635826368263782638826398264082641826428264382644826458264682647826488264982650826518265282653826548265582656826578265882659826608266182662826638266482665826668266782668826698267082671826728267382674826758267682677826788267982680826818268282683826848268582686826878268882689826908269182692826938269482695826968269782698826998270082701827028270382704827058270682707827088270982710827118271282713827148271582716827178271882719827208272182722827238272482725827268272782728827298273082731827328273382734827358273682737827388273982740827418274282743827448274582746827478274882749827508275182752827538275482755827568275782758827598276082761827628276382764827658276682767827688276982770827718277282773827748277582776827778277882779827808278182782827838278482785827868278782788827898279082791827928279382794827958279682797827988279982800828018280282803828048280582806828078280882809828108281182812828138281482815828168281782818828198282082821828228282382824828258282682827828288282982830828318283282833828348283582836828378283882839828408284182842828438284482845828468284782848828498285082851828528285382854828558285682857828588285982860828618286282863828648286582866828678286882869828708287182872828738287482875828768287782878828798288082881828828288382884828858288682887828888288982890828918289282893828948289582896828978289882899829008290182902829038290482905829068290782908829098291082911829128291382914829158291682917829188291982920829218292282923829248292582926829278292882929829308293182932829338293482935829368293782938829398294082941829428294382944829458294682947829488294982950829518295282953829548295582956829578295882959829608296182962829638296482965829668296782968829698297082971829728297382974829758297682977829788297982980829818298282983829848298582986829878298882989829908299182992829938299482995829968299782998829998300083001830028300383004830058300683007830088300983010830118301283013830148301583016830178301883019830208302183022830238302483025830268302783028830298303083031830328303383034830358303683037830388303983040830418304283043830448304583046830478304883049830508305183052830538305483055830568305783058830598306083061830628306383064830658306683067830688306983070830718307283073830748307583076830778307883079830808308183082830838308483085830868308783088830898309083091830928309383094830958309683097830988309983100831018310283103831048310583106831078310883109831108311183112831138311483115831168311783118831198312083121831228312383124831258312683127831288312983130831318313283133831348313583136831378313883139831408314183142831438314483145831468314783148831498315083151831528315383154831558315683157831588315983160831618316283163831648316583166831678316883169831708317183172831738317483175831768317783178831798318083181831828318383184831858318683187831888318983190831918319283193831948319583196831978319883199832008320183202832038320483205832068320783208832098321083211832128321383214832158321683217832188321983220832218322283223832248322583226832278322883229832308323183232832338323483235832368323783238832398324083241832428324383244832458324683247832488324983250832518325283253832548325583256832578325883259832608326183262832638326483265832668326783268832698327083271832728327383274832758327683277832788327983280832818328283283832848328583286832878328883289832908329183292832938329483295832968329783298832998330083301833028330383304833058330683307833088330983310833118331283313833148331583316833178331883319833208332183322833238332483325833268332783328833298333083331833328333383334833358333683337833388333983340833418334283343833448334583346833478334883349833508335183352833538335483355833568335783358833598336083361833628336383364833658336683367833688336983370833718337283373833748337583376833778337883379833808338183382833838338483385833868338783388833898339083391833928339383394833958339683397833988339983400834018340283403834048340583406834078340883409834108341183412834138341483415834168341783418834198342083421834228342383424834258342683427834288342983430834318343283433834348343583436834378343883439834408344183442834438344483445834468344783448834498345083451834528345383454834558345683457834588345983460834618346283463834648346583466834678346883469834708347183472834738347483475834768347783478834798348083481834828348383484834858348683487834888348983490834918349283493834948349583496834978349883499835008350183502835038350483505835068350783508835098351083511835128351383514835158351683517835188351983520835218352283523835248352583526835278352883529835308353183532835338353483535835368353783538835398354083541835428354383544835458354683547835488354983550835518355283553835548355583556835578355883559835608356183562835638356483565835668356783568835698357083571835728357383574835758357683577835788357983580835818358283583835848358583586835878358883589835908359183592835938359483595835968359783598835998360083601836028360383604836058360683607836088360983610836118361283613836148361583616836178361883619836208362183622836238362483625836268362783628836298363083631836328363383634836358363683637836388363983640836418364283643836448364583646836478364883649836508365183652836538365483655836568365783658836598366083661836628366383664836658366683667836688366983670836718367283673836748367583676836778367883679836808368183682836838368483685836868368783688836898369083691836928369383694836958369683697836988369983700837018370283703837048370583706837078370883709837108371183712837138371483715837168371783718837198372083721837228372383724837258372683727837288372983730837318373283733837348373583736837378373883739837408374183742837438374483745837468374783748837498375083751837528375383754837558375683757837588375983760837618376283763837648376583766837678376883769837708377183772837738377483775837768377783778837798378083781837828378383784837858378683787837888378983790837918379283793837948379583796837978379883799838008380183802838038380483805838068380783808838098381083811838128381383814838158381683817838188381983820838218382283823838248382583826838278382883829838308383183832838338383483835838368383783838838398384083841838428384383844838458384683847838488384983850838518385283853838548385583856838578385883859838608386183862838638386483865838668386783868838698387083871838728387383874838758387683877838788387983880838818388283883838848388583886838878388883889838908389183892838938389483895838968389783898838998390083901839028390383904839058390683907839088390983910839118391283913839148391583916839178391883919839208392183922839238392483925839268392783928839298393083931839328393383934839358393683937839388393983940839418394283943839448394583946839478394883949839508395183952839538395483955839568395783958839598396083961839628396383964839658396683967839688396983970839718397283973839748397583976839778397883979839808398183982839838398483985839868398783988839898399083991839928399383994839958399683997839988399984000840018400284003840048400584006840078400884009840108401184012840138401484015840168401784018840198402084021840228402384024840258402684027840288402984030840318403284033840348403584036840378403884039840408404184042840438404484045840468404784048840498405084051840528405384054840558405684057840588405984060840618406284063840648406584066840678406884069840708407184072840738407484075840768407784078840798408084081840828408384084840858408684087840888408984090840918409284093840948409584096840978409884099841008410184102841038410484105841068410784108841098411084111841128411384114841158411684117841188411984120841218412284123841248412584126841278412884129841308413184132841338413484135841368413784138841398414084141841428414384144841458414684147841488414984150841518415284153841548415584156841578415884159841608416184162841638416484165841668416784168841698417084171841728417384174841758417684177841788417984180841818418284183841848418584186841878418884189841908419184192841938419484195841968419784198841998420084201842028420384204842058420684207842088420984210842118421284213842148421584216842178421884219842208422184222842238422484225842268422784228842298423084231842328423384234842358423684237842388423984240842418424284243842448424584246842478424884249842508425184252842538425484255842568425784258842598426084261842628426384264842658426684267842688426984270842718427284273842748427584276842778427884279842808428184282842838428484285842868428784288842898429084291842928429384294842958429684297842988429984300843018430284303843048430584306843078430884309843108431184312843138431484315843168431784318843198432084321843228432384324843258432684327843288432984330843318433284333843348433584336843378433884339843408434184342843438434484345843468434784348843498435084351843528435384354843558435684357843588435984360843618436284363843648436584366843678436884369843708437184372843738437484375843768437784378843798438084381843828438384384843858438684387843888438984390843918439284393843948439584396843978439884399844008440184402844038440484405844068440784408844098441084411844128441384414844158441684417844188441984420844218442284423844248442584426844278442884429844308443184432844338443484435844368443784438844398444084441844428444384444844458444684447844488444984450844518445284453844548445584456844578445884459844608446184462844638446484465844668446784468844698447084471844728447384474844758447684477844788447984480844818448284483844848448584486844878448884489844908449184492844938449484495844968449784498844998450084501845028450384504845058450684507845088450984510845118451284513845148451584516845178451884519845208452184522845238452484525845268452784528845298453084531845328453384534845358453684537845388453984540845418454284543845448454584546845478454884549845508455184552845538455484555845568455784558845598456084561845628456384564845658456684567845688456984570845718457284573845748457584576845778457884579845808458184582845838458484585845868458784588845898459084591845928459384594845958459684597845988459984600846018460284603846048460584606846078460884609846108461184612846138461484615846168461784618846198462084621846228462384624846258462684627846288462984630846318463284633846348463584636846378463884639846408464184642846438464484645846468464784648846498465084651846528465384654846558465684657846588465984660846618466284663846648466584666846678466884669846708467184672846738467484675846768467784678846798468084681846828468384684846858468684687846888468984690846918469284693846948469584696846978469884699847008470184702847038470484705847068470784708847098471084711847128471384714847158471684717847188471984720847218472284723847248472584726847278472884729847308473184732847338473484735847368473784738847398474084741847428474384744847458474684747847488474984750847518475284753847548475584756847578475884759847608476184762847638476484765847668476784768847698477084771847728477384774847758477684777847788477984780847818478284783847848478584786847878478884789847908479184792847938479484795847968479784798847998480084801848028480384804848058480684807848088480984810848118481284813848148481584816848178481884819848208482184822848238482484825848268482784828848298483084831848328483384834848358483684837848388483984840848418484284843848448484584846848478484884849848508485184852848538485484855848568485784858848598486084861848628486384864848658486684867848688486984870848718487284873848748487584876848778487884879848808488184882848838488484885848868488784888848898489084891848928489384894848958489684897848988489984900849018490284903849048490584906849078490884909849108491184912849138491484915849168491784918849198492084921849228492384924849258492684927849288492984930849318493284933849348493584936849378493884939849408494184942849438494484945849468494784948849498495084951849528495384954849558495684957849588495984960849618496284963849648496584966849678496884969849708497184972849738497484975849768497784978849798498084981849828498384984849858498684987849888498984990849918499284993849948499584996849978499884999850008500185002850038500485005850068500785008850098501085011850128501385014850158501685017850188501985020850218502285023850248502585026850278502885029850308503185032850338503485035850368503785038850398504085041850428504385044850458504685047850488504985050850518505285053850548505585056850578505885059850608506185062850638506485065850668506785068850698507085071850728507385074850758507685077850788507985080850818508285083850848508585086850878508885089850908509185092850938509485095850968509785098850998510085101851028510385104851058510685107851088510985110851118511285113851148511585116851178511885119851208512185122851238512485125851268512785128851298513085131851328513385134851358513685137851388513985140851418514285143851448514585146851478514885149851508515185152851538515485155851568515785158851598516085161851628516385164851658516685167851688516985170851718517285173851748517585176851778517885179851808518185182851838518485185851868518785188851898519085191851928519385194851958519685197851988519985200852018520285203852048520585206852078520885209852108521185212852138521485215852168521785218852198522085221852228522385224852258522685227852288522985230852318523285233852348523585236852378523885239852408524185242852438524485245852468524785248852498525085251852528525385254852558525685257852588525985260852618526285263852648526585266852678526885269852708527185272852738527485275852768527785278852798528085281852828528385284852858528685287852888528985290852918529285293852948529585296852978529885299853008530185302853038530485305853068530785308853098531085311853128531385314853158531685317853188531985320853218532285323853248532585326853278532885329853308533185332853338533485335853368533785338853398534085341853428534385344853458534685347853488534985350853518535285353853548535585356853578535885359853608536185362853638536485365853668536785368853698537085371853728537385374853758537685377853788537985380853818538285383853848538585386853878538885389853908539185392853938539485395853968539785398853998540085401854028540385404854058540685407854088540985410854118541285413854148541585416854178541885419854208542185422854238542485425854268542785428854298543085431854328543385434854358543685437854388543985440854418544285443854448544585446854478544885449854508545185452854538545485455854568545785458854598546085461854628546385464854658546685467854688546985470854718547285473854748547585476854778547885479854808548185482854838548485485854868548785488854898549085491854928549385494854958549685497854988549985500855018550285503855048550585506855078550885509855108551185512855138551485515855168551785518855198552085521855228552385524855258552685527855288552985530855318553285533855348553585536855378553885539855408554185542855438554485545855468554785548855498555085551855528555385554855558555685557855588555985560855618556285563855648556585566855678556885569855708557185572855738557485575855768557785578855798558085581855828558385584855858558685587855888558985590855918559285593855948559585596855978559885599856008560185602856038560485605856068560785608856098561085611856128561385614856158561685617856188561985620856218562285623856248562585626856278562885629856308563185632856338563485635856368563785638856398564085641856428564385644856458564685647856488564985650856518565285653856548565585656856578565885659856608566185662856638566485665856668566785668856698567085671856728567385674856758567685677856788567985680856818568285683856848568585686856878568885689856908569185692856938569485695856968569785698856998570085701857028570385704857058570685707857088570985710857118571285713857148571585716857178571885719857208572185722857238572485725857268572785728857298573085731857328573385734857358573685737857388573985740857418574285743857448574585746857478574885749857508575185752857538575485755857568575785758857598576085761857628576385764857658576685767857688576985770857718577285773857748577585776857778577885779857808578185782857838578485785857868578785788857898579085791857928579385794857958579685797857988579985800858018580285803858048580585806858078580885809858108581185812858138581485815858168581785818858198582085821858228582385824858258582685827858288582985830858318583285833858348583585836858378583885839858408584185842858438584485845858468584785848858498585085851858528585385854858558585685857858588585985860858618586285863858648586585866858678586885869858708587185872858738587485875858768587785878858798588085881858828588385884858858588685887858888588985890858918589285893858948589585896858978589885899859008590185902859038590485905859068590785908859098591085911859128591385914859158591685917859188591985920859218592285923859248592585926859278592885929859308593185932859338593485935859368593785938859398594085941859428594385944859458594685947859488594985950859518595285953859548595585956859578595885959859608596185962859638596485965859668596785968859698597085971859728597385974859758597685977859788597985980859818598285983859848598585986859878598885989859908599185992859938599485995859968599785998859998600086001860028600386004860058600686007860088600986010860118601286013860148601586016860178601886019860208602186022860238602486025860268602786028860298603086031860328603386034860358603686037860388603986040860418604286043860448604586046860478604886049860508605186052860538605486055860568605786058860598606086061860628606386064860658606686067860688606986070860718607286073860748607586076860778607886079860808608186082860838608486085860868608786088860898609086091860928609386094860958609686097860988609986100861018610286103861048610586106861078610886109861108611186112861138611486115861168611786118861198612086121861228612386124861258612686127861288612986130861318613286133861348613586136861378613886139861408614186142861438614486145861468614786148861498615086151861528615386154861558615686157861588615986160861618616286163861648616586166861678616886169861708617186172861738617486175861768617786178861798618086181861828618386184861858618686187861888618986190861918619286193861948619586196861978619886199862008620186202862038620486205862068620786208862098621086211862128621386214862158621686217862188621986220862218622286223862248622586226862278622886229862308623186232862338623486235862368623786238862398624086241862428624386244862458624686247862488624986250862518625286253862548625586256862578625886259862608626186262862638626486265862668626786268862698627086271862728627386274862758627686277862788627986280862818628286283862848628586286862878628886289862908629186292862938629486295862968629786298862998630086301863028630386304863058630686307863088630986310863118631286313863148631586316863178631886319863208632186322863238632486325863268632786328863298633086331863328633386334863358633686337863388633986340863418634286343863448634586346863478634886349863508635186352863538635486355863568635786358863598636086361863628636386364863658636686367863688636986370863718637286373863748637586376863778637886379863808638186382863838638486385863868638786388863898639086391863928639386394863958639686397863988639986400864018640286403864048640586406864078640886409864108641186412864138641486415864168641786418864198642086421864228642386424864258642686427864288642986430864318643286433864348643586436864378643886439864408644186442864438644486445864468644786448864498645086451864528645386454864558645686457864588645986460864618646286463864648646586466864678646886469864708647186472864738647486475864768647786478864798648086481864828648386484864858648686487864888648986490864918649286493864948649586496864978649886499865008650186502865038650486505865068650786508865098651086511865128651386514865158651686517865188651986520865218652286523865248652586526865278652886529865308653186532865338653486535865368653786538865398654086541865428654386544865458654686547865488654986550865518655286553865548655586556865578655886559865608656186562865638656486565865668656786568865698657086571865728657386574865758657686577865788657986580865818658286583865848658586586865878658886589865908659186592865938659486595865968659786598865998660086601866028660386604866058660686607866088660986610866118661286613866148661586616866178661886619866208662186622866238662486625866268662786628866298663086631866328663386634866358663686637866388663986640866418664286643866448664586646866478664886649866508665186652866538665486655866568665786658866598666086661866628666386664866658666686667866688666986670866718667286673866748667586676866778667886679866808668186682866838668486685866868668786688866898669086691866928669386694866958669686697866988669986700867018670286703867048670586706867078670886709867108671186712867138671486715867168671786718867198672086721867228672386724867258672686727867288672986730867318673286733867348673586736867378673886739867408674186742867438674486745867468674786748867498675086751867528675386754867558675686757867588675986760867618676286763867648676586766867678676886769867708677186772867738677486775867768677786778867798678086781867828678386784867858678686787867888678986790867918679286793867948679586796867978679886799868008680186802868038680486805868068680786808868098681086811868128681386814868158681686817868188681986820868218682286823868248682586826868278682886829868308683186832868338683486835868368683786838868398684086841868428684386844868458684686847868488684986850868518685286853868548685586856868578685886859868608686186862868638686486865868668686786868868698687086871868728687386874868758687686877868788687986880868818688286883868848688586886868878688886889868908689186892868938689486895868968689786898868998690086901869028690386904869058690686907869088690986910869118691286913869148691586916869178691886919869208692186922869238692486925869268692786928869298693086931869328693386934869358693686937869388693986940869418694286943869448694586946869478694886949869508695186952869538695486955869568695786958869598696086961869628696386964869658696686967869688696986970869718697286973869748697586976869778697886979869808698186982869838698486985869868698786988869898699086991869928699386994869958699686997869988699987000870018700287003870048700587006870078700887009870108701187012870138701487015870168701787018870198702087021870228702387024870258702687027870288702987030870318703287033870348703587036870378703887039870408704187042870438704487045870468704787048870498705087051870528705387054870558705687057870588705987060870618706287063870648706587066870678706887069870708707187072870738707487075870768707787078870798708087081870828708387084870858708687087870888708987090870918709287093870948709587096870978709887099871008710187102871038710487105871068710787108871098711087111871128711387114871158711687117871188711987120871218712287123871248712587126871278712887129871308713187132871338713487135871368713787138871398714087141871428714387144871458714687147871488714987150871518715287153871548715587156871578715887159871608716187162871638716487165871668716787168871698717087171871728717387174871758717687177871788717987180871818718287183871848718587186871878718887189871908719187192871938719487195871968719787198871998720087201872028720387204872058720687207872088720987210872118721287213872148721587216872178721887219872208722187222872238722487225872268722787228872298723087231872328723387234872358723687237872388723987240872418724287243872448724587246872478724887249872508725187252872538725487255872568725787258872598726087261872628726387264872658726687267872688726987270872718727287273872748727587276872778727887279872808728187282872838728487285872868728787288872898729087291872928729387294872958729687297872988729987300873018730287303873048730587306873078730887309873108731187312873138731487315873168731787318873198732087321873228732387324873258732687327873288732987330873318733287333873348733587336873378733887339873408734187342873438734487345873468734787348873498735087351873528735387354873558735687357873588735987360873618736287363873648736587366873678736887369873708737187372873738737487375873768737787378873798738087381873828738387384873858738687387873888738987390873918739287393873948739587396873978739887399874008740187402874038740487405874068740787408874098741087411874128741387414874158741687417874188741987420874218742287423874248742587426874278742887429874308743187432874338743487435874368743787438874398744087441874428744387444874458744687447874488744987450874518745287453874548745587456874578745887459874608746187462874638746487465874668746787468874698747087471874728747387474874758747687477874788747987480874818748287483874848748587486874878748887489874908749187492874938749487495874968749787498874998750087501875028750387504875058750687507875088750987510875118751287513875148751587516875178751887519875208752187522875238752487525875268752787528875298753087531875328753387534875358753687537875388753987540875418754287543875448754587546875478754887549875508755187552875538755487555875568755787558875598756087561875628756387564875658756687567875688756987570875718757287573875748757587576875778757887579875808758187582875838758487585875868758787588875898759087591875928759387594875958759687597875988759987600876018760287603876048760587606876078760887609876108761187612876138761487615876168761787618876198762087621876228762387624876258762687627876288762987630876318763287633876348763587636876378763887639876408764187642876438764487645876468764787648876498765087651876528765387654876558765687657876588765987660876618766287663876648766587666876678766887669876708767187672876738767487675876768767787678876798768087681876828768387684876858768687687876888768987690876918769287693876948769587696876978769887699877008770187702877038770487705877068770787708877098771087711877128771387714877158771687717877188771987720877218772287723877248772587726877278772887729877308773187732877338773487735877368773787738877398774087741877428774387744877458774687747877488774987750877518775287753877548775587756877578775887759877608776187762877638776487765877668776787768877698777087771877728777387774877758777687777877788777987780877818778287783877848778587786877878778887789877908779187792877938779487795877968779787798877998780087801878028780387804878058780687807878088780987810878118781287813878148781587816878178781887819878208782187822878238782487825878268782787828878298783087831878328783387834878358783687837878388783987840878418784287843878448784587846878478784887849878508785187852878538785487855878568785787858878598786087861878628786387864878658786687867878688786987870878718787287873878748787587876878778787887879878808788187882878838788487885878868788787888878898789087891878928789387894878958789687897878988789987900879018790287903879048790587906879078790887909879108791187912879138791487915879168791787918879198792087921879228792387924879258792687927879288792987930879318793287933879348793587936879378793887939879408794187942879438794487945879468794787948879498795087951879528795387954879558795687957879588795987960879618796287963879648796587966879678796887969879708797187972879738797487975879768797787978879798798087981879828798387984879858798687987879888798987990879918799287993879948799587996879978799887999880008800188002880038800488005880068800788008880098801088011880128801388014880158801688017880188801988020880218802288023880248802588026880278802888029880308803188032880338803488035880368803788038880398804088041880428804388044880458804688047880488804988050880518805288053880548805588056880578805888059880608806188062880638806488065880668806788068880698807088071880728807388074880758807688077880788807988080880818808288083880848808588086880878808888089880908809188092880938809488095880968809788098880998810088101881028810388104881058810688107881088810988110881118811288113881148811588116881178811888119881208812188122881238812488125881268812788128881298813088131881328813388134881358813688137881388813988140881418814288143881448814588146881478814888149881508815188152881538815488155881568815788158881598816088161881628816388164881658816688167881688816988170881718817288173881748817588176881778817888179881808818188182881838818488185881868818788188881898819088191881928819388194881958819688197881988819988200882018820288203882048820588206882078820888209882108821188212882138821488215882168821788218882198822088221882228822388224882258822688227882288822988230882318823288233882348823588236882378823888239882408824188242882438824488245882468824788248882498825088251882528825388254882558825688257882588825988260882618826288263882648826588266882678826888269882708827188272882738827488275882768827788278882798828088281882828828388284882858828688287882888828988290882918829288293882948829588296882978829888299883008830188302883038830488305883068830788308883098831088311883128831388314883158831688317883188831988320883218832288323883248832588326883278832888329883308833188332883338833488335883368833788338883398834088341883428834388344883458834688347883488834988350883518835288353883548835588356883578835888359883608836188362883638836488365883668836788368883698837088371883728837388374883758837688377883788837988380883818838288383883848838588386883878838888389883908839188392883938839488395883968839788398883998840088401884028840388404884058840688407884088840988410884118841288413884148841588416884178841888419884208842188422884238842488425884268842788428884298843088431884328843388434884358843688437884388843988440884418844288443884448844588446884478844888449884508845188452884538845488455884568845788458884598846088461884628846388464884658846688467884688846988470884718847288473884748847588476884778847888479884808848188482884838848488485884868848788488884898849088491884928849388494884958849688497884988849988500885018850288503885048850588506885078850888509885108851188512885138851488515885168851788518885198852088521885228852388524885258852688527885288852988530885318853288533885348853588536885378853888539885408854188542885438854488545885468854788548885498855088551885528855388554885558855688557885588855988560885618856288563885648856588566885678856888569885708857188572885738857488575885768857788578885798858088581885828858388584885858858688587885888858988590885918859288593885948859588596885978859888599886008860188602886038860488605886068860788608886098861088611886128861388614886158861688617886188861988620886218862288623886248862588626886278862888629886308863188632886338863488635886368863788638886398864088641886428864388644886458864688647886488864988650886518865288653886548865588656886578865888659886608866188662886638866488665886668866788668886698867088671886728867388674886758867688677886788867988680886818868288683886848868588686886878868888689886908869188692886938869488695886968869788698886998870088701887028870388704887058870688707887088870988710887118871288713887148871588716887178871888719887208872188722887238872488725887268872788728887298873088731887328873388734887358873688737887388873988740887418874288743887448874588746887478874888749887508875188752887538875488755887568875788758887598876088761887628876388764887658876688767887688876988770887718877288773887748877588776887778877888779887808878188782887838878488785887868878788788887898879088791887928879388794887958879688797887988879988800888018880288803888048880588806888078880888809888108881188812888138881488815888168881788818888198882088821888228882388824888258882688827888288882988830888318883288833888348883588836888378883888839888408884188842888438884488845888468884788848888498885088851888528885388854888558885688857888588885988860888618886288863888648886588866888678886888869888708887188872888738887488875888768887788878888798888088881888828888388884888858888688887888888888988890888918889288893888948889588896888978889888899889008890188902889038890488905889068890788908889098891088911889128891388914889158891688917889188891988920889218892288923889248892588926889278892888929889308893188932889338893488935889368893788938889398894088941889428894388944889458894688947889488894988950889518895288953889548895588956889578895888959889608896188962889638896488965889668896788968889698897088971889728897388974889758897688977889788897988980889818898288983889848898588986889878898888989889908899188992889938899488995889968899788998889998900089001890028900389004890058900689007890088900989010890118901289013890148901589016890178901889019890208902189022890238902489025890268902789028890298903089031890328903389034890358903689037890388903989040890418904289043890448904589046890478904889049890508905189052890538905489055890568905789058890598906089061890628906389064890658906689067890688906989070890718907289073890748907589076890778907889079890808908189082890838908489085890868908789088890898909089091890928909389094890958909689097890988909989100891018910289103891048910589106891078910889109891108911189112891138911489115891168911789118891198912089121891228912389124891258912689127891288912989130891318913289133891348913589136891378913889139891408914189142891438914489145891468914789148891498915089151891528915389154891558915689157891588915989160891618916289163891648916589166891678916889169891708917189172891738917489175891768917789178891798918089181891828918389184891858918689187891888918989190891918919289193891948919589196891978919889199892008920189202892038920489205892068920789208892098921089211892128921389214892158921689217892188921989220892218922289223892248922589226892278922889229892308923189232892338923489235892368923789238892398924089241892428924389244892458924689247892488924989250892518925289253892548925589256892578925889259892608926189262892638926489265892668926789268892698927089271892728927389274892758927689277892788927989280892818928289283892848928589286892878928889289892908929189292892938929489295892968929789298892998930089301893028930389304893058930689307893088930989310893118931289313893148931589316893178931889319893208932189322893238932489325893268932789328893298933089331893328933389334893358933689337893388933989340893418934289343893448934589346893478934889349893508935189352893538935489355893568935789358893598936089361893628936389364893658936689367893688936989370893718937289373893748937589376893778937889379893808938189382893838938489385893868938789388893898939089391893928939389394893958939689397893988939989400894018940289403894048940589406894078940889409894108941189412894138941489415894168941789418894198942089421894228942389424894258942689427894288942989430894318943289433894348943589436894378943889439894408944189442894438944489445894468944789448894498945089451894528945389454894558945689457894588945989460894618946289463894648946589466894678946889469894708947189472894738947489475894768947789478894798948089481894828948389484894858948689487894888948989490894918949289493894948949589496894978949889499895008950189502895038950489505895068950789508895098951089511895128951389514895158951689517895188951989520895218952289523895248952589526895278952889529895308953189532895338953489535895368953789538895398954089541895428954389544895458954689547895488954989550895518955289553895548955589556895578955889559895608956189562895638956489565895668956789568895698957089571895728957389574895758957689577895788957989580895818958289583895848958589586895878958889589895908959189592895938959489595895968959789598895998960089601896028960389604896058960689607896088960989610896118961289613896148961589616896178961889619896208962189622896238962489625896268962789628896298963089631896328963389634896358963689637896388963989640896418964289643896448964589646896478964889649896508965189652896538965489655896568965789658896598966089661896628966389664896658966689667896688966989670896718967289673896748967589676896778967889679896808968189682896838968489685896868968789688896898969089691896928969389694896958969689697896988969989700897018970289703897048970589706897078970889709897108971189712897138971489715897168971789718897198972089721897228972389724897258972689727897288972989730897318973289733897348973589736897378973889739897408974189742897438974489745897468974789748897498975089751897528975389754897558975689757897588975989760897618976289763897648976589766897678976889769897708977189772897738977489775897768977789778897798978089781897828978389784897858978689787897888978989790897918979289793897948979589796897978979889799898008980189802898038980489805898068980789808898098981089811898128981389814898158981689817898188981989820898218982289823898248982589826898278982889829898308983189832898338983489835898368983789838898398984089841898428984389844898458984689847898488984989850898518985289853898548985589856898578985889859898608986189862898638986489865898668986789868898698987089871898728987389874898758987689877898788987989880898818988289883898848988589886898878988889889898908989189892898938989489895898968989789898898998990089901899028990389904899058990689907899088990989910899118991289913899148991589916899178991889919899208992189922899238992489925899268992789928899298993089931899328993389934899358993689937899388993989940899418994289943899448994589946899478994889949899508995189952899538995489955899568995789958899598996089961899628996389964899658996689967899688996989970899718997289973899748997589976899778997889979899808998189982899838998489985899868998789988899898999089991899928999389994899958999689997899988999990000900019000290003900049000590006900079000890009900109001190012900139001490015900169001790018900199002090021900229002390024900259002690027900289002990030900319003290033900349003590036900379003890039900409004190042900439004490045900469004790048900499005090051900529005390054900559005690057900589005990060900619006290063900649006590066900679006890069900709007190072900739007490075900769007790078900799008090081900829008390084900859008690087900889008990090900919009290093900949009590096900979009890099901009010190102901039010490105901069010790108901099011090111901129011390114901159011690117901189011990120901219012290123901249012590126901279012890129901309013190132901339013490135901369013790138901399014090141901429014390144901459014690147901489014990150901519015290153901549015590156901579015890159901609016190162901639016490165901669016790168901699017090171901729017390174901759017690177901789017990180901819018290183901849018590186901879018890189901909019190192901939019490195901969019790198901999020090201902029020390204902059020690207902089020990210902119021290213902149021590216902179021890219902209022190222902239022490225902269022790228902299023090231902329023390234902359023690237902389023990240902419024290243902449024590246902479024890249902509025190252902539025490255902569025790258902599026090261902629026390264902659026690267902689026990270902719027290273902749027590276902779027890279902809028190282902839028490285902869028790288902899029090291902929029390294902959029690297902989029990300903019030290303903049030590306903079030890309903109031190312903139031490315903169031790318903199032090321903229032390324903259032690327903289032990330903319033290333903349033590336903379033890339903409034190342903439034490345903469034790348903499035090351903529035390354903559035690357903589035990360903619036290363903649036590366903679036890369903709037190372903739037490375903769037790378903799038090381903829038390384903859038690387903889038990390903919039290393903949039590396903979039890399904009040190402904039040490405904069040790408904099041090411904129041390414904159041690417904189041990420904219042290423904249042590426904279042890429904309043190432904339043490435904369043790438904399044090441904429044390444904459044690447904489044990450904519045290453904549045590456904579045890459904609046190462904639046490465904669046790468904699047090471904729047390474904759047690477904789047990480904819048290483904849048590486904879048890489904909049190492904939049490495904969049790498904999050090501905029050390504905059050690507905089050990510905119051290513905149051590516905179051890519905209052190522905239052490525905269052790528905299053090531905329053390534905359053690537905389053990540905419054290543905449054590546905479054890549905509055190552905539055490555905569055790558905599056090561905629056390564905659056690567905689056990570905719057290573905749057590576905779057890579905809058190582905839058490585905869058790588905899059090591905929059390594905959059690597905989059990600906019060290603906049060590606906079060890609906109061190612906139061490615906169061790618906199062090621906229062390624906259062690627906289062990630906319063290633906349063590636906379063890639906409064190642906439064490645906469064790648906499065090651906529065390654906559065690657906589065990660906619066290663906649066590666906679066890669906709067190672906739067490675906769067790678906799068090681906829068390684906859068690687906889068990690906919069290693906949069590696906979069890699907009070190702907039070490705907069070790708907099071090711907129071390714907159071690717907189071990720907219072290723907249072590726907279072890729907309073190732907339073490735907369073790738907399074090741907429074390744907459074690747907489074990750907519075290753907549075590756907579075890759907609076190762907639076490765907669076790768907699077090771907729077390774907759077690777907789077990780907819078290783907849078590786907879078890789907909079190792907939079490795907969079790798907999080090801908029080390804908059080690807908089080990810908119081290813908149081590816908179081890819908209082190822908239082490825908269082790828908299083090831908329083390834908359083690837908389083990840908419084290843908449084590846908479084890849908509085190852908539085490855908569085790858908599086090861908629086390864908659086690867908689086990870908719087290873908749087590876908779087890879908809088190882908839088490885908869088790888908899089090891908929089390894908959089690897908989089990900909019090290903909049090590906909079090890909909109091190912909139091490915909169091790918909199092090921909229092390924909259092690927909289092990930909319093290933909349093590936909379093890939909409094190942909439094490945909469094790948909499095090951909529095390954909559095690957909589095990960909619096290963909649096590966909679096890969909709097190972909739097490975909769097790978909799098090981909829098390984909859098690987909889098990990909919099290993909949099590996909979099890999910009100191002910039100491005910069100791008910099101091011910129101391014910159101691017910189101991020910219102291023910249102591026910279102891029910309103191032910339103491035910369103791038910399104091041910429104391044910459104691047910489104991050910519105291053910549105591056910579105891059910609106191062910639106491065910669106791068910699107091071910729107391074910759107691077910789107991080910819108291083910849108591086910879108891089910909109191092910939109491095910969109791098910999110091101911029110391104911059110691107911089110991110911119111291113911149111591116911179111891119911209112191122911239112491125911269112791128911299113091131911329113391134911359113691137911389113991140911419114291143911449114591146911479114891149911509115191152911539115491155911569115791158911599116091161911629116391164911659116691167911689116991170911719117291173911749117591176911779117891179911809118191182911839118491185911869118791188911899119091191911929119391194911959119691197911989119991200912019120291203912049120591206912079120891209912109121191212912139121491215912169121791218912199122091221912229122391224912259122691227912289122991230912319123291233912349123591236912379123891239912409124191242912439124491245912469124791248912499125091251912529125391254912559125691257912589125991260912619126291263912649126591266912679126891269912709127191272912739127491275912769127791278912799128091281912829128391284912859128691287912889128991290912919129291293912949129591296912979129891299913009130191302913039130491305913069130791308913099131091311913129131391314913159131691317913189131991320913219132291323913249132591326913279132891329913309133191332913339133491335913369133791338913399134091341913429134391344913459134691347913489134991350913519135291353913549135591356913579135891359913609136191362913639136491365913669136791368913699137091371913729137391374913759137691377913789137991380913819138291383913849138591386913879138891389913909139191392913939139491395913969139791398913999140091401914029140391404914059140691407914089140991410914119141291413914149141591416914179141891419914209142191422914239142491425914269142791428914299143091431914329143391434914359143691437914389143991440914419144291443914449144591446914479144891449914509145191452914539145491455914569145791458914599146091461914629146391464914659146691467914689146991470914719147291473914749147591476914779147891479914809148191482914839148491485914869148791488914899149091491914929149391494914959149691497914989149991500915019150291503915049150591506915079150891509915109151191512915139151491515915169151791518915199152091521915229152391524915259152691527915289152991530915319153291533915349153591536915379153891539915409154191542915439154491545915469154791548915499155091551915529155391554915559155691557915589155991560915619156291563915649156591566915679156891569915709157191572915739157491575915769157791578915799158091581915829158391584915859158691587915889158991590915919159291593915949159591596915979159891599916009160191602916039160491605916069160791608916099161091611916129161391614916159161691617916189161991620916219162291623916249162591626916279162891629916309163191632916339163491635916369163791638916399164091641916429164391644916459164691647916489164991650916519165291653916549165591656916579165891659916609166191662916639166491665916669166791668916699167091671916729167391674916759167691677916789167991680916819168291683916849168591686916879168891689916909169191692916939169491695916969169791698916999170091701917029170391704917059170691707917089170991710917119171291713917149171591716917179171891719917209172191722917239172491725917269172791728917299173091731917329173391734917359173691737917389173991740917419174291743917449174591746917479174891749917509175191752917539175491755917569175791758917599176091761917629176391764917659176691767917689176991770917719177291773917749177591776917779177891779917809178191782917839178491785917869178791788917899179091791917929179391794917959179691797917989179991800918019180291803918049180591806918079180891809918109181191812918139181491815918169181791818918199182091821918229182391824918259182691827918289182991830918319183291833918349183591836918379183891839918409184191842918439184491845918469184791848918499185091851918529185391854918559185691857918589185991860918619186291863918649186591866918679186891869918709187191872918739187491875918769187791878918799188091881918829188391884918859188691887918889188991890918919189291893918949189591896918979189891899919009190191902919039190491905919069190791908919099191091911919129191391914919159191691917919189191991920919219192291923919249192591926919279192891929919309193191932919339193491935919369193791938919399194091941919429194391944919459194691947919489194991950919519195291953919549195591956919579195891959919609196191962919639196491965919669196791968919699197091971919729197391974919759197691977919789197991980919819198291983919849198591986919879198891989919909199191992919939199491995919969199791998919999200092001920029200392004920059200692007920089200992010920119201292013920149201592016920179201892019920209202192022920239202492025920269202792028920299203092031920329203392034920359203692037920389203992040920419204292043920449204592046920479204892049920509205192052920539205492055920569205792058920599206092061920629206392064920659206692067920689206992070920719207292073920749207592076920779207892079920809208192082920839208492085920869208792088920899209092091920929209392094920959209692097920989209992100921019210292103921049210592106921079210892109921109211192112921139211492115921169211792118921199212092121921229212392124921259212692127921289212992130921319213292133921349213592136921379213892139921409214192142921439214492145921469214792148921499215092151921529215392154921559215692157921589215992160921619216292163921649216592166921679216892169921709217192172921739217492175921769217792178921799218092181921829218392184921859218692187921889218992190921919219292193921949219592196921979219892199922009220192202922039220492205922069220792208922099221092211922129221392214922159221692217922189221992220922219222292223922249222592226922279222892229922309223192232922339223492235922369223792238922399224092241922429224392244922459224692247922489224992250922519225292253922549225592256922579225892259922609226192262922639226492265922669226792268922699227092271922729227392274922759227692277922789227992280922819228292283922849228592286922879228892289922909229192292922939229492295922969229792298922999230092301923029230392304923059230692307923089230992310923119231292313923149231592316923179231892319923209232192322923239232492325923269232792328923299233092331923329233392334923359233692337923389233992340923419234292343923449234592346923479234892349923509235192352923539235492355923569235792358923599236092361923629236392364923659236692367923689236992370923719237292373923749237592376923779237892379923809238192382923839238492385923869238792388923899239092391923929239392394923959239692397923989239992400924019240292403924049240592406924079240892409924109241192412924139241492415924169241792418924199242092421924229242392424924259242692427924289242992430924319243292433924349243592436924379243892439924409244192442924439244492445924469244792448924499245092451924529245392454924559245692457924589245992460924619246292463924649246592466924679246892469924709247192472924739247492475924769247792478924799248092481924829248392484924859248692487924889248992490924919249292493924949249592496924979249892499925009250192502925039250492505925069250792508925099251092511925129251392514925159251692517925189251992520925219252292523925249252592526925279252892529925309253192532925339253492535925369253792538925399254092541925429254392544925459254692547925489254992550925519255292553925549255592556925579255892559925609256192562925639256492565925669256792568925699257092571925729257392574925759257692577925789257992580925819258292583925849258592586925879258892589925909259192592925939259492595925969259792598925999260092601926029260392604926059260692607926089260992610926119261292613926149261592616926179261892619926209262192622926239262492625926269262792628926299263092631926329263392634926359263692637926389263992640926419264292643926449264592646926479264892649926509265192652926539265492655926569265792658926599266092661926629266392664926659266692667926689266992670926719267292673926749267592676926779267892679926809268192682926839268492685926869268792688926899269092691926929269392694926959269692697926989269992700927019270292703927049270592706927079270892709927109271192712927139271492715927169271792718927199272092721927229272392724927259272692727927289272992730927319273292733927349273592736927379273892739927409274192742927439274492745927469274792748927499275092751927529275392754927559275692757927589275992760927619276292763927649276592766927679276892769927709277192772927739277492775927769277792778927799278092781927829278392784927859278692787927889278992790927919279292793927949279592796927979279892799928009280192802928039280492805928069280792808928099281092811928129281392814928159281692817928189281992820928219282292823928249282592826928279282892829928309283192832928339283492835928369283792838928399284092841928429284392844928459284692847928489284992850928519285292853928549285592856928579285892859928609286192862928639286492865928669286792868928699287092871928729287392874928759287692877928789287992880928819288292883928849288592886928879288892889928909289192892928939289492895928969289792898928999290092901929029290392904929059290692907929089290992910929119291292913929149291592916929179291892919929209292192922929239292492925929269292792928929299293092931929329293392934929359293692937929389293992940929419294292943929449294592946929479294892949929509295192952929539295492955929569295792958929599296092961929629296392964929659296692967929689296992970929719297292973929749297592976929779297892979929809298192982929839298492985929869298792988929899299092991929929299392994929959299692997929989299993000930019300293003930049300593006930079300893009930109301193012930139301493015930169301793018930199302093021930229302393024930259302693027930289302993030930319303293033930349303593036930379303893039930409304193042930439304493045930469304793048930499305093051930529305393054930559305693057930589305993060930619306293063930649306593066930679306893069930709307193072930739307493075930769307793078930799308093081930829308393084930859308693087930889308993090930919309293093930949309593096930979309893099931009310193102931039310493105931069310793108931099311093111931129311393114931159311693117931189311993120931219312293123931249312593126931279312893129931309313193132931339313493135931369313793138931399314093141931429314393144931459314693147931489314993150931519315293153931549315593156931579315893159931609316193162931639316493165931669316793168931699317093171931729317393174931759317693177931789317993180931819318293183931849318593186931879318893189931909319193192931939319493195931969319793198931999320093201932029320393204932059320693207932089320993210932119321293213932149321593216932179321893219932209322193222932239322493225932269322793228932299323093231932329323393234932359323693237932389323993240932419324293243932449324593246932479324893249932509325193252932539325493255932569325793258932599326093261932629326393264932659326693267932689326993270932719327293273932749327593276932779327893279932809328193282932839328493285932869328793288932899329093291932929329393294932959329693297932989329993300933019330293303933049330593306933079330893309933109331193312933139331493315933169331793318933199332093321933229332393324933259332693327933289332993330933319333293333933349333593336933379333893339933409334193342933439334493345933469334793348933499335093351933529335393354933559335693357933589335993360933619336293363933649336593366933679336893369933709337193372933739337493375933769337793378933799338093381933829338393384933859338693387933889338993390933919339293393933949339593396933979339893399934009340193402934039340493405934069340793408934099341093411934129341393414934159341693417934189341993420934219342293423934249342593426934279342893429934309343193432934339343493435934369343793438934399344093441934429344393444934459344693447934489344993450934519345293453934549345593456934579345893459934609346193462934639346493465934669346793468934699347093471934729347393474934759347693477934789347993480934819348293483934849348593486934879348893489934909349193492934939349493495934969349793498934999350093501935029350393504935059350693507935089350993510935119351293513935149351593516935179351893519935209352193522935239352493525935269352793528935299353093531935329353393534935359353693537935389353993540935419354293543935449354593546935479354893549935509355193552935539355493555935569355793558935599356093561935629356393564935659356693567935689356993570935719357293573935749357593576935779357893579935809358193582935839358493585935869358793588935899359093591935929359393594935959359693597935989359993600936019360293603936049360593606936079360893609936109361193612936139361493615936169361793618936199362093621936229362393624936259362693627936289362993630936319363293633936349363593636936379363893639936409364193642936439364493645936469364793648936499365093651936529365393654936559365693657936589365993660936619366293663936649366593666936679366893669936709367193672936739367493675936769367793678936799368093681936829368393684936859368693687936889368993690936919369293693936949369593696936979369893699937009370193702937039370493705937069370793708937099371093711937129371393714937159371693717937189371993720937219372293723937249372593726937279372893729937309373193732937339373493735937369373793738937399374093741937429374393744937459374693747937489374993750937519375293753937549375593756937579375893759937609376193762937639376493765937669376793768937699377093771937729377393774937759377693777937789377993780937819378293783937849378593786937879378893789937909379193792937939379493795937969379793798937999380093801938029380393804938059380693807938089380993810938119381293813938149381593816938179381893819938209382193822938239382493825938269382793828938299383093831938329383393834938359383693837938389383993840938419384293843938449384593846938479384893849938509385193852938539385493855938569385793858938599386093861938629386393864938659386693867938689386993870938719387293873938749387593876938779387893879938809388193882938839388493885938869388793888938899389093891938929389393894938959389693897938989389993900939019390293903939049390593906939079390893909939109391193912939139391493915939169391793918939199392093921939229392393924939259392693927939289392993930939319393293933939349393593936939379393893939939409394193942939439394493945939469394793948939499395093951939529395393954939559395693957939589395993960939619396293963939649396593966939679396893969939709397193972939739397493975939769397793978939799398093981939829398393984939859398693987939889398993990939919399293993939949399593996939979399893999940009400194002940039400494005940069400794008940099401094011940129401394014940159401694017940189401994020940219402294023940249402594026940279402894029940309403194032940339403494035940369403794038940399404094041940429404394044940459404694047940489404994050940519405294053940549405594056940579405894059940609406194062940639406494065940669406794068940699407094071940729407394074940759407694077940789407994080940819408294083940849408594086940879408894089940909409194092940939409494095940969409794098940999410094101941029410394104941059410694107941089410994110941119411294113941149411594116941179411894119941209412194122941239412494125941269412794128941299413094131941329413394134941359413694137941389413994140941419414294143941449414594146941479414894149941509415194152941539415494155941569415794158941599416094161941629416394164941659416694167941689416994170941719417294173941749417594176941779417894179941809418194182941839418494185941869418794188941899419094191941929419394194941959419694197941989419994200942019420294203942049420594206942079420894209942109421194212942139421494215942169421794218942199422094221942229422394224942259422694227942289422994230942319423294233942349423594236942379423894239942409424194242942439424494245942469424794248942499425094251942529425394254942559425694257942589425994260942619426294263942649426594266942679426894269942709427194272942739427494275942769427794278942799428094281942829428394284942859428694287942889428994290942919429294293942949429594296942979429894299943009430194302943039430494305943069430794308943099431094311943129431394314943159431694317943189431994320943219432294323943249432594326943279432894329943309433194332943339433494335943369433794338943399434094341943429434394344943459434694347943489434994350943519435294353943549435594356943579435894359943609436194362943639436494365943669436794368943699437094371943729437394374943759437694377943789437994380943819438294383943849438594386943879438894389943909439194392943939439494395943969439794398943999440094401944029440394404944059440694407944089440994410944119441294413944149441594416944179441894419944209442194422944239442494425944269442794428944299443094431944329443394434944359443694437944389443994440944419444294443944449444594446944479444894449944509445194452944539445494455944569445794458944599446094461944629446394464944659446694467944689446994470944719447294473944749447594476944779447894479944809448194482944839448494485944869448794488944899449094491944929449394494944959449694497944989449994500945019450294503945049450594506945079450894509945109451194512945139451494515945169451794518945199452094521945229452394524945259452694527945289452994530945319453294533945349453594536945379453894539945409454194542945439454494545945469454794548945499455094551945529455394554945559455694557945589455994560945619456294563945649456594566945679456894569945709457194572945739457494575945769457794578945799458094581945829458394584945859458694587945889458994590945919459294593945949459594596945979459894599946009460194602946039460494605946069460794608946099461094611946129461394614946159461694617946189461994620946219462294623946249462594626946279462894629946309463194632946339463494635946369463794638946399464094641946429464394644946459464694647946489464994650946519465294653946549465594656946579465894659946609466194662946639466494665946669466794668946699467094671946729467394674946759467694677946789467994680946819468294683946849468594686946879468894689946909469194692946939469494695946969469794698946999470094701947029470394704947059470694707947089470994710947119471294713947149471594716947179471894719947209472194722947239472494725947269472794728947299473094731947329473394734947359473694737947389473994740947419474294743947449474594746947479474894749947509475194752947539475494755947569475794758947599476094761947629476394764947659476694767947689476994770947719477294773947749477594776947779477894779947809478194782947839478494785947869478794788947899479094791947929479394794947959479694797947989479994800948019480294803948049480594806948079480894809948109481194812948139481494815948169481794818948199482094821948229482394824948259482694827948289482994830948319483294833948349483594836948379483894839948409484194842948439484494845948469484794848948499485094851948529485394854948559485694857948589485994860948619486294863948649486594866948679486894869948709487194872948739487494875948769487794878948799488094881948829488394884948859488694887948889488994890948919489294893948949489594896948979489894899949009490194902949039490494905949069490794908949099491094911949129491394914949159491694917949189491994920949219492294923949249492594926949279492894929949309493194932949339493494935949369493794938949399494094941949429494394944949459494694947949489494994950949519495294953949549495594956949579495894959949609496194962949639496494965949669496794968949699497094971949729497394974949759497694977949789497994980949819498294983949849498594986949879498894989949909499194992949939499494995949969499794998949999500095001950029500395004950059500695007950089500995010950119501295013950149501595016950179501895019950209502195022950239502495025950269502795028950299503095031950329503395034950359503695037950389503995040950419504295043950449504595046950479504895049950509505195052950539505495055950569505795058950599506095061950629506395064950659506695067950689506995070950719507295073950749507595076950779507895079950809508195082950839508495085950869508795088950899509095091950929509395094950959509695097950989509995100951019510295103951049510595106951079510895109951109511195112951139511495115951169511795118951199512095121951229512395124951259512695127951289512995130951319513295133951349513595136951379513895139951409514195142951439514495145951469514795148951499515095151951529515395154951559515695157951589515995160951619516295163951649516595166951679516895169951709517195172951739517495175951769517795178951799518095181951829518395184951859518695187951889518995190951919519295193951949519595196951979519895199952009520195202952039520495205952069520795208952099521095211952129521395214952159521695217952189521995220952219522295223952249522595226952279522895229952309523195232952339523495235952369523795238952399524095241952429524395244952459524695247952489524995250952519525295253952549525595256952579525895259952609526195262952639526495265952669526795268952699527095271952729527395274952759527695277952789527995280952819528295283952849528595286952879528895289952909529195292952939529495295952969529795298952999530095301953029530395304953059530695307953089530995310953119531295313953149531595316953179531895319953209532195322953239532495325953269532795328953299533095331953329533395334953359533695337953389533995340953419534295343953449534595346953479534895349953509535195352953539535495355953569535795358953599536095361953629536395364953659536695367953689536995370953719537295373953749537595376953779537895379953809538195382953839538495385953869538795388953899539095391953929539395394953959539695397953989539995400954019540295403954049540595406954079540895409954109541195412954139541495415954169541795418954199542095421954229542395424954259542695427954289542995430954319543295433954349543595436954379543895439954409544195442954439544495445954469544795448954499545095451954529545395454954559545695457954589545995460954619546295463954649546595466954679546895469954709547195472954739547495475954769547795478954799548095481954829548395484954859548695487954889548995490954919549295493954949549595496954979549895499955009550195502955039550495505955069550795508955099551095511955129551395514955159551695517955189551995520955219552295523955249552595526955279552895529955309553195532955339553495535955369553795538955399554095541955429554395544955459554695547955489554995550955519555295553955549555595556955579555895559955609556195562955639556495565955669556795568955699557095571955729557395574955759557695577955789557995580955819558295583955849558595586955879558895589955909559195592955939559495595955969559795598955999560095601956029560395604956059560695607956089560995610956119561295613956149561595616956179561895619956209562195622956239562495625956269562795628956299563095631956329563395634956359563695637956389563995640956419564295643956449564595646956479564895649956509565195652956539565495655956569565795658956599566095661956629566395664956659566695667956689566995670956719567295673956749567595676956779567895679956809568195682956839568495685956869568795688956899569095691956929569395694956959569695697956989569995700957019570295703957049570595706957079570895709957109571195712957139571495715957169571795718957199572095721957229572395724957259572695727957289572995730957319573295733957349573595736957379573895739957409574195742957439574495745957469574795748957499575095751957529575395754957559575695757957589575995760957619576295763957649576595766957679576895769957709577195772957739577495775957769577795778957799578095781957829578395784957859578695787957889578995790957919579295793957949579595796957979579895799958009580195802958039580495805958069580795808958099581095811958129581395814958159581695817958189581995820958219582295823958249582595826958279582895829958309583195832958339583495835958369583795838958399584095841958429584395844958459584695847958489584995850958519585295853958549585595856958579585895859958609586195862958639586495865958669586795868958699587095871958729587395874958759587695877958789587995880958819588295883958849588595886958879588895889958909589195892958939589495895958969589795898958999590095901959029590395904959059590695907959089590995910959119591295913959149591595916959179591895919959209592195922959239592495925959269592795928959299593095931959329593395934959359593695937959389593995940959419594295943959449594595946959479594895949959509595195952959539595495955959569595795958959599596095961959629596395964959659596695967959689596995970959719597295973959749597595976959779597895979959809598195982959839598495985959869598795988959899599095991959929599395994959959599695997959989599996000960019600296003960049600596006960079600896009960109601196012960139601496015960169601796018960199602096021960229602396024960259602696027960289602996030960319603296033960349603596036960379603896039960409604196042960439604496045960469604796048960499605096051960529605396054960559605696057960589605996060960619606296063960649606596066960679606896069960709607196072960739607496075960769607796078960799608096081960829608396084960859608696087960889608996090960919609296093960949609596096960979609896099961009610196102961039610496105961069610796108961099611096111961129611396114961159611696117961189611996120961219612296123961249612596126961279612896129961309613196132961339613496135961369613796138961399614096141961429614396144961459614696147961489614996150961519615296153961549615596156961579615896159961609616196162961639616496165961669616796168961699617096171961729617396174961759617696177961789617996180961819618296183961849618596186961879618896189961909619196192961939619496195961969619796198961999620096201962029620396204962059620696207962089620996210962119621296213962149621596216962179621896219962209622196222962239622496225962269622796228962299623096231962329623396234962359623696237962389623996240962419624296243962449624596246962479624896249962509625196252962539625496255962569625796258962599626096261962629626396264962659626696267962689626996270962719627296273962749627596276962779627896279962809628196282962839628496285962869628796288962899629096291962929629396294962959629696297962989629996300963019630296303963049630596306963079630896309963109631196312963139631496315963169631796318963199632096321963229632396324963259632696327963289632996330963319633296333963349633596336963379633896339963409634196342963439634496345963469634796348963499635096351963529635396354963559635696357963589635996360963619636296363963649636596366963679636896369963709637196372963739637496375963769637796378963799638096381963829638396384963859638696387963889638996390963919639296393963949639596396963979639896399964009640196402964039640496405964069640796408964099641096411964129641396414964159641696417964189641996420964219642296423964249642596426964279642896429964309643196432964339643496435964369643796438964399644096441964429644396444964459644696447964489644996450964519645296453964549645596456964579645896459964609646196462964639646496465964669646796468964699647096471964729647396474964759647696477964789647996480964819648296483964849648596486964879648896489964909649196492964939649496495964969649796498964999650096501965029650396504965059650696507965089650996510965119651296513965149651596516965179651896519965209652196522965239652496525965269652796528965299653096531965329653396534965359653696537965389653996540965419654296543965449654596546965479654896549965509655196552965539655496555965569655796558965599656096561965629656396564965659656696567965689656996570965719657296573965749657596576965779657896579965809658196582965839658496585965869658796588965899659096591965929659396594965959659696597965989659996600966019660296603966049660596606966079660896609966109661196612966139661496615966169661796618966199662096621966229662396624966259662696627966289662996630966319663296633966349663596636966379663896639966409664196642966439664496645966469664796648966499665096651966529665396654966559665696657966589665996660966619666296663966649666596666966679666896669966709667196672966739667496675966769667796678966799668096681966829668396684966859668696687966889668996690966919669296693966949669596696966979669896699967009670196702967039670496705967069670796708967099671096711967129671396714967159671696717967189671996720967219672296723967249672596726967279672896729967309673196732967339673496735967369673796738967399674096741967429674396744967459674696747967489674996750967519675296753967549675596756967579675896759967609676196762967639676496765967669676796768967699677096771967729677396774967759677696777967789677996780967819678296783967849678596786967879678896789967909679196792967939679496795967969679796798967999680096801968029680396804968059680696807968089680996810968119681296813968149681596816968179681896819968209682196822968239682496825968269682796828968299683096831968329683396834968359683696837968389683996840968419684296843968449684596846968479684896849968509685196852968539685496855968569685796858968599686096861968629686396864968659686696867968689686996870968719687296873968749687596876968779687896879968809688196882968839688496885968869688796888968899689096891968929689396894968959689696897968989689996900969019690296903969049690596906969079690896909969109691196912969139691496915969169691796918969199692096921969229692396924969259692696927969289692996930969319693296933969349693596936969379693896939969409694196942969439694496945969469694796948969499695096951969529695396954969559695696957969589695996960969619696296963969649696596966969679696896969969709697196972969739697496975969769697796978969799698096981969829698396984969859698696987969889698996990969919699296993969949699596996969979699896999970009700197002970039700497005970069700797008970099701097011970129701397014970159701697017970189701997020970219702297023970249702597026970279702897029970309703197032970339703497035970369703797038970399704097041970429704397044970459704697047970489704997050970519705297053970549705597056970579705897059970609706197062970639706497065970669706797068970699707097071970729707397074970759707697077970789707997080970819708297083970849708597086970879708897089970909709197092970939709497095970969709797098970999710097101971029710397104971059710697107971089710997110971119711297113971149711597116971179711897119971209712197122971239712497125971269712797128971299713097131971329713397134971359713697137971389713997140971419714297143971449714597146971479714897149971509715197152971539715497155971569715797158971599716097161971629716397164971659716697167971689716997170971719717297173971749717597176971779717897179971809718197182971839718497185971869718797188971899719097191971929719397194971959719697197971989719997200972019720297203972049720597206972079720897209972109721197212972139721497215972169721797218972199722097221972229722397224972259722697227972289722997230972319723297233972349723597236972379723897239972409724197242972439724497245972469724797248972499725097251972529725397254972559725697257972589725997260972619726297263972649726597266972679726897269972709727197272972739727497275972769727797278972799728097281972829728397284972859728697287972889728997290972919729297293972949729597296972979729897299973009730197302973039730497305973069730797308973099731097311973129731397314973159731697317973189731997320973219732297323973249732597326973279732897329973309733197332973339733497335973369733797338973399734097341973429734397344973459734697347973489734997350973519735297353973549735597356973579735897359973609736197362973639736497365973669736797368973699737097371973729737397374973759737697377973789737997380973819738297383973849738597386973879738897389973909739197392973939739497395973969739797398973999740097401974029740397404974059740697407974089740997410974119741297413974149741597416974179741897419974209742197422974239742497425974269742797428974299743097431974329743397434974359743697437974389743997440974419744297443974449744597446974479744897449974509745197452974539745497455974569745797458974599746097461974629746397464974659746697467974689746997470974719747297473974749747597476974779747897479974809748197482974839748497485974869748797488974899749097491974929749397494974959749697497974989749997500975019750297503975049750597506975079750897509975109751197512975139751497515975169751797518975199752097521975229752397524975259752697527975289752997530975319753297533975349753597536975379753897539975409754197542975439754497545975469754797548975499755097551975529755397554975559755697557975589755997560975619756297563975649756597566975679756897569975709757197572975739757497575975769757797578975799758097581975829758397584975859758697587975889758997590975919759297593975949759597596975979759897599976009760197602976039760497605976069760797608976099761097611976129761397614976159761697617976189761997620976219762297623976249762597626976279762897629976309763197632976339763497635976369763797638976399764097641976429764397644976459764697647976489764997650976519765297653976549765597656976579765897659976609766197662976639766497665976669766797668976699767097671976729767397674976759767697677976789767997680976819768297683976849768597686976879768897689976909769197692976939769497695976969769797698976999770097701977029770397704977059770697707977089770997710977119771297713977149771597716977179771897719977209772197722977239772497725977269772797728977299773097731977329773397734977359773697737977389773997740977419774297743977449774597746977479774897749977509775197752977539775497755977569775797758977599776097761977629776397764977659776697767977689776997770977719777297773977749777597776977779777897779977809778197782977839778497785977869778797788977899779097791977929779397794977959779697797977989779997800978019780297803978049780597806978079780897809978109781197812978139781497815978169781797818978199782097821978229782397824978259782697827978289782997830978319783297833978349783597836978379783897839978409784197842978439784497845978469784797848978499785097851978529785397854978559785697857978589785997860978619786297863978649786597866978679786897869978709787197872978739787497875978769787797878978799788097881978829788397884978859788697887978889788997890978919789297893978949789597896978979789897899979009790197902979039790497905979069790797908979099791097911979129791397914979159791697917979189791997920979219792297923979249792597926979279792897929979309793197932979339793497935979369793797938979399794097941979429794397944979459794697947979489794997950979519795297953979549795597956979579795897959979609796197962979639796497965979669796797968979699797097971979729797397974979759797697977979789797997980979819798297983979849798597986979879798897989979909799197992979939799497995979969799797998979999800098001980029800398004980059800698007980089800998010980119801298013980149801598016980179801898019980209802198022980239802498025980269802798028980299803098031980329803398034980359803698037980389803998040980419804298043980449804598046980479804898049980509805198052980539805498055980569805798058980599806098061980629806398064980659806698067980689806998070980719807298073980749807598076980779807898079980809808198082980839808498085980869808798088980899809098091980929809398094980959809698097980989809998100981019810298103981049810598106981079810898109981109811198112981139811498115981169811798118981199812098121981229812398124981259812698127981289812998130981319813298133981349813598136981379813898139981409814198142981439814498145981469814798148981499815098151981529815398154981559815698157981589815998160981619816298163981649816598166981679816898169981709817198172981739817498175981769817798178981799818098181981829818398184981859818698187981889818998190981919819298193981949819598196981979819898199982009820198202982039820498205982069820798208982099821098211982129821398214982159821698217982189821998220982219822298223982249822598226982279822898229982309823198232982339823498235982369823798238982399824098241982429824398244982459824698247982489824998250982519825298253982549825598256982579825898259982609826198262982639826498265982669826798268982699827098271982729827398274982759827698277982789827998280982819828298283982849828598286982879828898289982909829198292982939829498295982969829798298982999830098301983029830398304983059830698307983089830998310983119831298313983149831598316983179831898319983209832198322983239832498325983269832798328983299833098331983329833398334983359833698337983389833998340983419834298343983449834598346983479834898349983509835198352983539835498355983569835798358983599836098361983629836398364983659836698367983689836998370983719837298373983749837598376983779837898379983809838198382983839838498385983869838798388983899839098391983929839398394983959839698397983989839998400984019840298403984049840598406984079840898409984109841198412984139841498415984169841798418984199842098421984229842398424984259842698427984289842998430984319843298433984349843598436984379843898439984409844198442984439844498445984469844798448984499845098451984529845398454984559845698457984589845998460984619846298463984649846598466984679846898469984709847198472984739847498475984769847798478984799848098481984829848398484984859848698487984889848998490984919849298493984949849598496984979849898499985009850198502985039850498505985069850798508985099851098511985129851398514985159851698517985189851998520985219852298523985249852598526985279852898529985309853198532985339853498535985369853798538985399854098541985429854398544985459854698547985489854998550985519855298553985549855598556985579855898559985609856198562985639856498565985669856798568985699857098571985729857398574985759857698577985789857998580985819858298583985849858598586985879858898589985909859198592985939859498595985969859798598985999860098601986029860398604986059860698607986089860998610986119861298613986149861598616986179861898619986209862198622986239862498625986269862798628986299863098631986329863398634986359863698637986389863998640986419864298643986449864598646986479864898649986509865198652986539865498655986569865798658986599866098661986629866398664986659866698667986689866998670986719867298673986749867598676986779867898679986809868198682986839868498685986869868798688986899869098691986929869398694986959869698697986989869998700987019870298703987049870598706987079870898709987109871198712987139871498715987169871798718987199872098721987229872398724987259872698727987289872998730987319873298733987349873598736987379873898739987409874198742987439874498745987469874798748987499875098751987529875398754987559875698757987589875998760987619876298763987649876598766987679876898769987709877198772987739877498775987769877798778987799878098781987829878398784987859878698787987889878998790987919879298793987949879598796987979879898799988009880198802988039880498805988069880798808988099881098811988129881398814988159881698817988189881998820988219882298823988249882598826988279882898829988309883198832988339883498835988369883798838988399884098841988429884398844988459884698847988489884998850988519885298853988549885598856988579885898859988609886198862988639886498865988669886798868988699887098871988729887398874988759887698877988789887998880988819888298883988849888598886988879888898889988909889198892988939889498895988969889798898988999890098901989029890398904989059890698907989089890998910989119891298913989149891598916989179891898919989209892198922989239892498925989269892798928989299893098931989329893398934989359893698937989389893998940989419894298943989449894598946989479894898949989509895198952989539895498955989569895798958989599896098961989629896398964989659896698967989689896998970989719897298973989749897598976989779897898979989809898198982989839898498985989869898798988989899899098991989929899398994989959899698997989989899999000990019900299003990049900599006990079900899009990109901199012990139901499015990169901799018990199902099021990229902399024990259902699027990289902999030990319903299033990349903599036990379903899039990409904199042990439904499045990469904799048990499905099051990529905399054990559905699057990589905999060990619906299063990649906599066990679906899069990709907199072990739907499075990769907799078990799908099081990829908399084990859908699087990889908999090990919909299093990949909599096990979909899099991009910199102991039910499105991069910799108991099911099111991129911399114991159911699117991189911999120991219912299123991249912599126991279912899129991309913199132991339913499135991369913799138991399914099141991429914399144991459914699147991489914999150991519915299153991549915599156991579915899159991609916199162991639916499165991669916799168991699917099171991729917399174991759917699177991789917999180991819918299183991849918599186991879918899189991909919199192991939919499195991969919799198991999920099201992029920399204992059920699207992089920999210992119921299213992149921599216992179921899219992209922199222992239922499225992269922799228992299923099231992329923399234992359923699237992389923999240992419924299243992449924599246992479924899249992509925199252992539925499255992569925799258992599926099261992629926399264992659926699267992689926999270992719927299273992749927599276992779927899279992809928199282992839928499285992869928799288992899929099291992929929399294992959929699297992989929999300993019930299303993049930599306993079930899309993109931199312993139931499315993169931799318993199932099321993229932399324993259932699327993289932999330993319933299333993349933599336993379933899339993409934199342993439934499345993469934799348993499935099351993529935399354993559935699357993589935999360993619936299363993649936599366993679936899369993709937199372993739937499375993769937799378993799938099381993829938399384993859938699387993889938999390993919939299393993949939599396993979939899399994009940199402994039940499405994069940799408994099941099411994129941399414994159941699417994189941999420994219942299423994249942599426994279942899429994309943199432994339943499435994369943799438994399944099441994429944399444994459944699447994489944999450994519945299453994549945599456994579945899459994609946199462994639946499465994669946799468994699947099471994729947399474994759947699477994789947999480994819948299483994849948599486994879948899489994909949199492994939949499495994969949799498994999950099501995029950399504995059950699507995089950999510995119951299513995149951599516995179951899519995209952199522995239952499525995269952799528995299953099531995329953399534995359953699537995389953999540995419954299543995449954599546995479954899549995509955199552995539955499555995569955799558995599956099561995629956399564995659956699567995689956999570995719957299573995749957599576995779957899579995809958199582995839958499585995869958799588995899959099591995929959399594995959959699597995989959999600996019960299603996049960599606996079960899609996109961199612996139961499615996169961799618996199962099621996229962399624996259962699627996289962999630996319963299633996349963599636996379963899639996409964199642996439964499645996469964799648996499965099651996529965399654996559965699657996589965999660996619966299663996649966599666996679966899669996709967199672996739967499675996769967799678996799968099681996829968399684996859968699687996889968999690996919969299693996949969599696996979969899699997009970199702997039970499705997069970799708997099971099711997129971399714997159971699717997189971999720997219972299723997249972599726997279972899729997309973199732997339973499735997369973799738997399974099741997429974399744997459974699747997489974999750997519975299753997549975599756997579975899759997609976199762997639976499765997669976799768997699977099771997729977399774997759977699777997789977999780997819978299783997849978599786997879978899789997909979199792997939979499795997969979799798997999980099801998029980399804998059980699807998089980999810998119981299813998149981599816998179981899819998209982199822998239982499825998269982799828998299983099831998329983399834998359983699837998389983999840998419984299843998449984599846998479984899849998509985199852998539985499855998569985799858998599986099861998629986399864998659986699867998689986999870998719987299873998749987599876998779987899879998809988199882998839988499885998869988799888998899989099891998929989399894998959989699897998989989999900999019990299903999049990599906999079990899909999109991199912999139991499915999169991799918999199992099921999229992399924999259992699927999289992999930999319993299933999349993599936999379993899939999409994199942999439994499945999469994799948999499995099951999529995399954999559995699957999589995999960999619996299963999649996599966999679996899969999709997199972999739997499975999769997799978999799998099981999829998399984999859998699987999889998999990999919999299993999949999599996999979999899999100000100001100002100003100004100005100006100007100008100009100010100011100012100013100014100015100016100017100018100019100020100021100022100023100024100025100026100027100028100029100030100031100032100033100034100035100036100037100038100039100040100041100042100043100044100045100046100047100048100049100050100051100052100053100054100055100056100057100058100059100060100061100062100063100064100065100066100067100068100069100070100071100072100073100074100075100076100077100078100079100080100081100082100083100084100085100086100087100088100089100090100091100092100093100094100095100096100097100098100099100100100101100102100103100104100105100106100107100108100109100110100111100112100113100114100115100116100117100118100119100120100121100122100123100124100125100126100127100128100129100130100131100132100133100134100135100136100137100138100139100140100141100142100143100144100145100146100147100148100149100150100151100152100153100154100155100156100157100158100159100160100161100162100163100164100165100166100167100168100169100170100171100172100173100174100175100176100177100178100179100180100181100182100183100184100185100186100187100188100189100190100191100192100193100194100195100196100197100198100199100200100201100202100203100204100205100206100207100208100209100210100211100212100213100214100215100216100217100218100219100220100221100222100223100224100225100226100227100228100229100230100231100232100233100234100235100236100237100238100239100240100241100242100243100244100245100246100247100248100249100250100251100252100253100254100255100256100257100258100259100260100261100262100263100264100265100266100267100268100269100270100271100272100273100274100275100276100277100278100279100280100281100282100283100284100285100286100287100288100289100290100291100292100293100294100295100296100297100298100299100300100301100302100303100304100305100306100307100308100309100310100311100312100313100314100315100316100317100318100319100320100321100322100323100324100325100326100327100328100329100330100331100332100333100334100335100336100337100338100339100340100341100342100343100344100345100346100347100348100349100350100351100352100353100354100355100356100357100358100359100360100361100362100363100364100365100366100367100368100369100370100371100372100373100374100375100376100377100378100379100380100381100382100383100384100385100386100387100388100389100390100391100392100393100394100395100396100397100398100399100400100401100402100403100404100405100406100407100408100409100410100411100412100413100414100415100416100417100418100419100420100421100422100423100424100425100426100427100428100429100430100431100432100433100434100435100436100437100438100439100440100441100442100443100444100445100446100447100448100449100450100451100452100453100454100455100456100457100458100459100460100461100462100463100464100465100466100467100468100469100470100471100472100473100474100475100476100477100478100479100480100481100482100483100484100485100486100487100488100489100490100491100492100493100494100495100496100497100498100499100500100501100502100503100504100505100506100507100508100509100510100511100512100513100514100515100516100517100518100519100520100521100522100523100524100525100526100527100528100529100530100531100532100533100534100535100536100537100538100539100540100541100542100543100544100545100546100547100548100549100550100551100552100553100554100555100556100557100558100559100560100561100562100563100564100565100566100567100568100569100570100571100572100573100574100575100576100577100578100579100580100581100582100583100584100585100586100587100588100589100590100591100592100593100594100595100596100597100598100599100600100601100602100603100604100605100606100607100608100609100610100611100612100613100614100615100616100617100618100619100620100621100622100623100624100625100626100627100628100629100630100631100632100633100634100635100636100637100638100639100640100641100642100643100644100645100646100647100648100649100650100651100652100653100654100655100656100657100658100659100660100661100662100663100664100665100666100667100668100669100670100671100672100673100674100675100676100677100678100679100680100681100682100683100684100685100686100687100688100689100690100691100692100693100694100695100696100697100698100699100700100701100702100703100704100705100706100707100708100709100710100711100712100713100714100715100716100717100718100719100720100721100722100723100724100725100726100727100728100729100730100731100732100733100734100735100736100737100738100739100740100741100742100743100744100745100746100747100748100749100750100751100752100753100754100755100756100757100758100759100760100761100762100763100764100765100766100767100768100769100770100771100772100773100774100775100776100777100778100779100780100781100782100783100784100785100786100787100788100789100790100791100792100793100794100795100796100797100798100799100800100801100802100803100804100805100806100807100808100809100810100811100812100813100814100815100816100817100818100819100820100821100822100823100824100825100826100827100828100829100830100831100832100833100834100835100836100837100838100839100840100841100842100843100844100845100846100847100848100849100850100851100852100853100854100855100856100857100858100859100860100861100862100863100864100865100866100867100868100869100870100871100872100873100874100875100876100877100878100879100880100881100882100883100884100885100886100887100888100889100890100891100892100893100894100895100896100897100898100899100900100901100902100903100904100905100906100907100908100909100910100911100912100913100914100915100916100917100918100919100920100921100922100923100924100925100926100927100928100929100930100931100932100933100934100935100936100937100938100939100940100941100942100943100944100945100946100947100948100949100950100951100952100953100954100955100956100957100958100959100960100961100962100963100964100965100966100967100968100969100970100971100972100973100974100975100976100977100978100979100980100981100982100983100984100985100986100987100988100989100990100991100992100993100994100995100996100997100998100999101000101001101002101003101004101005101006101007101008101009101010101011101012101013101014101015101016101017101018101019101020101021101022101023101024101025101026101027101028101029101030101031101032101033101034101035101036101037101038101039101040101041101042101043101044101045101046101047101048101049101050101051101052101053101054101055101056101057101058101059101060101061101062101063101064101065101066101067101068101069101070101071101072101073101074101075101076101077101078101079101080101081101082101083101084101085101086101087101088101089101090101091101092101093101094101095101096101097101098101099101100101101101102101103101104101105101106101107101108101109101110101111101112101113101114101115101116101117101118101119101120101121101122101123101124101125101126101127101128101129101130101131101132101133101134101135101136101137101138101139101140101141101142101143101144101145101146101147101148101149101150101151101152101153101154101155101156101157101158101159101160101161101162101163101164101165101166101167101168101169101170101171101172101173101174101175101176101177101178101179101180101181101182101183101184101185101186101187101188101189101190101191101192101193101194101195101196101197101198101199101200101201101202101203101204101205101206101207101208101209101210101211101212101213101214101215101216101217101218101219101220101221101222101223101224101225101226101227101228101229101230101231101232101233101234101235101236101237101238101239101240101241101242101243101244101245101246101247101248101249101250101251101252101253101254101255101256101257101258101259101260101261101262101263101264101265101266101267101268101269101270101271101272101273101274101275101276101277101278101279101280101281101282101283101284101285101286101287101288101289101290101291101292101293101294101295101296101297101298101299101300101301101302101303101304101305101306101307101308101309101310101311101312101313101314101315101316101317101318101319101320101321101322101323101324101325101326101327101328101329101330101331101332101333101334101335101336101337101338101339101340101341101342101343101344101345101346101347101348101349101350101351101352101353101354101355101356101357101358101359101360101361101362101363101364101365101366101367101368101369101370101371101372101373101374101375101376101377101378101379101380101381101382101383101384101385101386101387101388101389101390101391101392101393101394101395101396101397101398101399101400101401101402101403101404101405101406101407101408101409101410101411101412101413101414101415101416101417101418101419101420101421101422101423101424101425101426101427101428101429101430101431101432101433101434101435101436101437101438101439101440101441101442101443101444101445101446101447101448101449101450101451101452101453101454101455101456101457101458101459101460101461101462101463101464101465101466101467101468101469101470101471101472101473101474101475101476101477101478101479101480101481101482101483101484101485101486101487101488101489101490101491101492101493101494101495101496101497101498101499101500101501101502101503101504101505101506101507101508101509101510101511101512101513101514101515101516101517101518101519101520101521101522101523101524101525101526101527101528101529101530101531101532101533101534101535101536101537101538101539101540101541101542101543101544101545101546101547101548101549101550101551101552101553101554101555101556101557101558101559101560101561101562101563101564101565101566101567101568101569101570101571101572101573101574101575101576101577101578101579101580101581101582101583101584101585101586101587101588101589101590101591101592101593101594101595101596101597101598101599101600101601101602101603101604101605101606101607101608101609101610101611101612101613101614101615101616101617101618101619101620101621101622101623101624101625101626101627101628101629101630101631101632101633101634101635101636101637101638101639101640101641101642101643101644101645101646101647101648101649101650101651101652101653101654101655101656101657101658101659101660101661101662101663101664101665101666101667101668101669101670101671101672101673101674101675101676101677101678101679101680101681101682101683101684101685101686101687101688101689101690101691101692101693101694101695101696101697101698101699101700101701101702101703101704101705101706101707101708101709101710101711101712101713101714101715101716101717101718101719101720101721101722101723101724101725101726101727101728101729101730101731101732101733101734101735101736101737101738101739101740101741101742101743101744101745101746101747101748101749101750101751101752101753101754101755101756101757101758101759101760101761101762101763101764101765101766101767101768101769101770101771101772101773101774101775101776101777101778101779101780101781101782101783101784101785101786101787101788101789101790101791101792101793101794101795101796101797101798101799101800101801101802101803101804101805101806101807101808101809101810101811101812101813101814101815101816101817101818101819101820101821101822101823101824101825101826101827101828101829101830101831101832101833101834101835101836101837101838101839101840101841101842101843101844101845101846101847101848101849101850101851101852101853101854101855101856101857101858101859101860101861101862101863101864101865101866101867101868101869101870101871101872101873101874101875101876101877101878101879101880101881101882101883101884101885101886101887101888101889101890101891101892101893101894101895101896101897101898101899101900101901101902101903101904101905101906101907101908101909101910101911101912101913101914101915101916101917101918101919101920101921101922101923101924101925101926101927101928101929101930101931101932101933101934101935101936101937101938101939101940101941101942101943101944101945101946101947101948101949101950101951101952101953101954101955101956101957101958101959101960101961101962101963101964101965101966101967101968101969101970101971101972101973101974101975101976101977101978101979101980101981101982101983101984101985101986101987101988101989101990101991101992101993101994101995101996101997101998101999102000102001102002102003102004102005102006102007102008102009102010102011102012102013102014102015102016102017102018102019102020102021102022102023102024102025102026102027102028102029102030102031102032102033102034102035102036102037102038102039102040102041102042102043102044102045102046102047102048102049102050102051102052102053102054102055102056102057102058102059102060102061102062102063102064102065102066102067102068102069102070102071102072102073102074102075102076102077102078102079102080102081102082102083102084102085102086102087102088102089102090102091102092102093102094102095102096102097102098102099102100102101102102102103102104102105102106102107102108102109102110102111102112102113102114102115102116102117102118102119102120102121102122102123102124102125102126102127102128102129102130102131102132102133102134102135102136102137102138102139102140102141102142102143102144102145102146102147102148102149102150102151102152102153102154102155102156102157102158102159102160102161102162102163102164102165102166102167102168102169102170102171102172102173102174102175102176102177102178102179102180102181102182102183102184102185102186102187102188102189102190102191102192102193102194102195102196102197102198102199102200102201102202102203102204102205102206102207102208102209102210102211102212102213102214102215102216102217102218102219102220102221102222102223102224102225102226102227102228102229102230102231102232102233102234102235102236102237102238102239102240102241102242102243102244102245102246102247102248102249102250102251102252102253102254102255102256102257102258102259102260102261102262102263102264102265102266102267102268102269102270102271102272102273102274102275102276102277102278102279102280102281102282102283102284102285102286102287102288102289102290102291102292102293102294102295102296102297102298102299102300102301102302102303102304102305102306102307102308102309102310102311102312102313102314102315102316102317102318102319102320102321102322102323102324102325102326102327102328102329102330102331102332102333102334102335102336102337102338102339102340102341102342102343102344102345102346102347102348102349102350102351102352102353102354102355102356102357102358102359102360102361102362102363102364102365102366102367102368102369102370102371102372102373102374102375102376102377102378102379102380102381102382102383102384102385102386102387102388102389102390102391102392102393102394102395102396102397102398102399102400102401102402102403102404102405102406102407102408102409102410102411102412102413102414102415102416102417102418102419102420102421102422102423102424102425102426102427102428102429102430102431102432102433102434102435102436102437102438102439102440102441102442102443102444102445102446102447102448102449102450102451102452102453102454102455102456102457102458102459102460102461102462102463102464102465102466102467102468102469102470102471102472102473102474102475102476102477102478102479102480102481102482102483102484102485102486102487102488102489102490102491102492102493102494102495102496102497102498102499102500102501102502102503102504102505102506102507102508102509102510102511102512102513102514102515102516102517102518102519102520102521102522102523102524102525102526102527102528102529102530102531102532102533102534102535102536102537102538102539102540102541102542102543102544102545102546102547102548102549102550102551102552102553102554102555102556102557102558102559102560102561102562102563102564102565102566102567102568102569102570102571102572102573102574102575102576102577102578102579102580102581102582102583102584102585102586102587102588102589102590102591102592102593102594102595102596102597102598102599102600102601102602102603102604102605102606102607102608102609102610102611102612102613102614102615102616102617102618102619102620102621102622102623102624102625102626102627102628102629102630102631102632102633102634102635102636102637102638102639102640102641102642102643102644102645102646102647102648102649102650102651102652102653102654102655102656102657102658102659102660102661102662102663102664102665102666102667102668102669102670102671102672102673102674102675102676102677102678102679102680102681102682102683102684102685102686102687102688102689102690102691102692102693102694102695102696102697102698102699102700102701102702102703102704102705102706102707102708102709102710102711102712102713102714102715102716102717102718102719102720102721102722102723102724102725102726102727102728102729102730102731102732102733102734102735102736102737102738102739102740102741102742102743102744102745102746102747102748102749102750102751102752102753102754102755102756102757102758102759102760102761102762102763102764102765102766102767102768102769102770102771102772102773102774102775102776102777102778102779102780102781102782102783102784102785102786102787102788102789102790102791102792102793102794102795102796102797102798102799102800102801102802102803102804102805102806102807102808102809102810102811102812102813102814102815102816102817102818102819102820102821102822102823102824102825102826102827102828102829102830102831102832102833102834102835102836102837102838102839102840102841102842102843102844102845102846102847102848102849102850102851102852102853102854102855102856102857102858102859102860102861102862102863102864102865102866102867102868102869102870102871102872102873102874102875102876102877102878102879102880102881102882102883102884102885102886102887102888102889102890102891102892102893102894102895102896102897102898102899102900102901102902102903102904102905102906102907102908102909102910102911102912102913102914102915102916102917102918102919102920102921102922102923102924102925102926102927102928102929102930102931102932102933102934102935102936102937102938102939102940102941102942102943102944102945102946102947102948102949102950102951102952102953102954102955102956102957102958102959102960102961102962102963102964102965102966102967102968102969102970102971102972102973102974102975102976102977102978102979102980102981102982102983102984102985102986102987102988102989102990102991102992102993102994102995102996102997102998102999103000103001103002103003103004103005103006103007103008103009103010103011103012103013103014103015103016103017103018103019103020103021103022103023103024103025103026103027103028103029103030103031103032103033103034103035103036103037103038103039103040103041103042103043103044103045103046103047103048103049103050103051103052103053103054103055103056103057103058103059103060103061103062103063103064103065103066103067103068103069103070103071103072103073103074103075103076103077103078103079103080103081103082103083103084103085103086103087103088103089103090103091103092103093103094103095103096103097103098103099103100103101103102103103103104103105103106103107103108103109103110103111103112103113103114103115103116103117103118103119103120103121103122103123103124103125103126103127103128103129103130103131103132103133103134103135103136103137103138103139103140103141103142103143103144103145103146103147103148103149103150103151103152103153103154103155103156103157103158103159103160103161103162103163103164103165103166103167103168103169103170103171103172103173103174103175103176103177103178103179103180103181103182103183103184103185103186103187103188103189103190103191103192103193103194103195103196103197103198103199103200103201103202103203103204103205103206103207103208103209103210103211103212103213103214103215103216103217103218103219103220103221103222103223103224103225103226103227103228103229103230103231103232103233103234103235103236103237103238103239103240103241103242103243103244103245103246103247103248103249103250103251103252103253103254103255103256103257103258103259103260103261103262103263103264103265103266103267103268103269103270103271103272103273103274103275103276103277103278103279103280103281103282103283103284103285103286103287103288103289103290103291103292103293103294103295103296103297103298103299103300103301103302103303103304103305103306103307103308103309103310103311103312103313103314103315103316103317103318103319103320103321103322103323103324103325103326103327103328103329103330103331103332103333103334103335103336103337103338103339103340103341103342103343103344103345103346103347103348103349103350103351103352103353103354103355103356103357103358103359103360103361103362103363103364103365103366103367103368103369103370103371103372103373103374103375103376103377103378103379103380103381103382103383103384103385103386103387103388103389103390103391103392103393103394103395103396103397103398103399103400103401103402103403103404103405103406103407103408103409103410103411103412103413103414103415103416103417103418103419103420103421103422103423103424103425103426103427103428103429103430103431103432103433103434103435103436103437103438103439103440103441103442103443103444103445103446103447103448103449103450103451103452103453103454103455103456103457103458103459103460103461103462103463103464103465103466103467103468103469103470103471103472103473103474103475103476103477103478103479103480103481103482103483103484103485103486103487103488103489103490103491103492103493103494103495103496103497103498103499103500103501103502103503103504103505103506103507103508103509103510103511103512103513103514103515103516103517103518103519103520103521103522103523103524103525103526103527103528103529103530103531103532103533103534103535103536103537103538103539103540103541103542103543103544103545103546103547103548103549103550103551103552103553103554103555103556103557103558103559103560103561103562103563103564103565103566103567103568103569103570103571103572103573103574103575103576103577103578103579103580103581103582103583103584103585103586103587103588103589103590103591103592103593103594103595103596103597103598103599103600103601103602103603103604103605103606103607103608103609103610103611103612103613103614103615103616103617103618103619103620103621103622103623103624103625103626103627103628103629103630103631103632103633103634103635103636103637103638103639103640103641103642103643103644103645103646103647103648103649103650103651103652103653103654103655103656103657103658103659103660103661103662103663103664103665103666103667103668103669103670103671103672103673103674103675103676103677103678103679103680103681103682103683103684103685103686103687103688103689103690103691103692103693103694103695103696103697103698103699103700103701103702103703103704103705103706103707103708103709103710103711103712103713103714103715103716103717103718103719103720103721103722103723103724103725103726103727103728103729103730103731103732103733103734103735103736103737103738103739103740103741103742103743103744103745103746103747103748103749103750103751103752103753103754103755103756103757103758103759103760103761103762103763103764103765103766103767103768103769103770103771103772103773103774103775103776103777103778103779103780103781103782103783103784103785103786103787103788103789103790103791103792103793103794103795103796103797103798103799103800103801103802103803103804103805103806103807103808103809103810103811103812103813103814103815103816103817103818103819103820103821103822103823103824103825103826103827103828103829103830103831103832103833103834103835103836103837103838103839103840103841103842103843103844103845103846103847103848103849103850103851103852103853103854103855103856103857103858103859103860103861103862103863103864103865103866103867103868103869103870103871103872103873103874103875103876103877103878103879103880103881103882103883103884103885103886103887103888103889103890103891103892103893103894103895103896103897103898103899103900103901103902103903103904103905103906103907103908103909103910103911103912103913103914103915103916103917103918103919103920103921103922103923103924103925103926103927103928103929103930103931103932103933103934103935103936103937103938103939103940103941103942103943103944103945103946103947103948103949103950103951103952103953103954103955103956103957103958103959103960103961103962103963103964103965103966103967103968103969103970103971103972103973103974103975103976103977103978103979103980103981103982103983103984103985103986103987103988103989103990103991103992103993103994103995103996103997103998103999104000104001104002104003104004104005104006104007104008104009104010104011104012104013104014104015104016104017104018104019104020104021104022104023104024104025104026104027104028104029104030104031104032104033104034104035104036104037104038104039104040104041104042104043104044104045104046104047104048104049104050104051104052104053104054104055104056104057104058104059104060104061104062104063104064104065104066104067104068104069104070104071104072104073104074104075104076104077104078104079104080104081104082104083104084104085104086104087104088104089104090104091104092104093104094104095104096104097104098104099104100104101104102104103104104104105104106104107104108104109104110104111104112104113104114104115104116104117104118104119104120104121104122104123104124104125104126104127104128104129104130104131104132104133104134104135104136104137104138104139104140104141104142104143104144104145104146104147104148104149104150104151104152104153104154104155104156104157104158104159104160104161104162104163104164104165104166104167104168104169104170104171104172104173104174104175104176104177104178104179104180104181104182104183104184104185104186104187104188104189104190104191104192104193104194104195104196104197104198104199104200104201104202104203104204104205104206104207104208104209104210104211104212104213104214104215104216104217104218104219104220104221104222104223104224104225104226104227104228104229104230104231104232104233104234104235104236104237104238104239104240104241104242104243104244104245104246104247104248104249104250104251104252104253104254104255104256104257104258104259104260104261104262104263104264104265104266104267104268104269104270104271104272104273104274104275104276104277104278104279104280104281104282104283104284104285104286104287104288104289104290104291104292104293104294104295104296104297104298104299104300104301104302104303104304104305104306104307104308104309104310104311104312104313104314104315104316104317104318104319104320104321104322104323104324104325104326104327104328104329104330104331104332104333104334104335104336104337104338104339104340104341104342104343104344104345104346104347104348104349104350104351104352104353104354104355104356104357104358104359104360104361104362104363104364104365104366104367104368104369104370104371104372104373104374104375104376104377104378104379104380104381104382104383104384104385104386104387104388104389104390104391104392104393104394104395104396104397104398104399104400104401104402104403104404104405104406104407104408104409104410104411104412104413104414104415104416104417104418104419104420104421104422104423104424104425104426104427104428104429104430104431104432104433104434104435104436104437104438104439104440104441104442104443104444104445104446104447104448104449104450104451104452104453104454104455104456104457104458104459104460104461104462104463104464104465104466104467104468104469104470104471104472104473104474104475104476104477104478104479104480104481104482104483104484104485104486104487104488104489104490104491104492104493104494104495104496104497104498104499104500104501104502104503104504104505104506104507104508104509104510104511104512104513104514104515104516104517104518104519104520104521104522104523104524104525104526104527104528104529104530104531104532104533104534104535104536104537104538104539104540104541104542104543104544104545104546104547104548104549104550104551104552104553104554104555104556104557104558104559104560104561104562104563104564104565104566104567104568104569104570104571104572104573104574104575104576104577104578104579104580104581104582104583104584104585104586104587104588104589104590104591104592104593104594104595104596104597104598104599104600104601104602104603104604104605104606104607104608104609104610104611104612104613104614104615104616104617104618104619104620104621104622104623104624104625104626104627104628104629104630104631104632104633104634104635104636104637104638104639104640104641104642104643104644104645104646104647104648104649104650104651104652104653104654104655104656104657104658104659104660104661104662104663104664104665104666104667104668104669104670104671104672104673104674104675104676104677104678104679104680104681104682104683104684104685104686104687104688104689104690104691104692104693104694104695104696104697104698104699104700104701104702104703104704104705104706104707104708104709104710104711104712104713104714104715104716104717104718104719104720104721104722104723104724104725104726104727104728104729104730104731104732104733104734104735104736104737104738104739104740104741104742104743104744104745104746104747104748104749104750104751104752104753104754104755104756104757104758104759104760104761104762104763104764104765104766104767104768104769104770104771104772104773104774104775104776104777104778104779104780104781104782104783104784104785104786104787104788104789104790104791104792104793104794104795104796104797104798104799104800104801104802104803104804104805104806104807104808104809104810104811104812104813104814104815104816104817104818104819104820104821104822104823104824104825104826104827104828104829104830104831104832104833104834104835104836104837104838104839104840104841104842104843104844104845104846104847104848104849104850104851104852104853104854104855104856104857104858104859104860104861104862104863104864104865104866104867104868104869104870104871104872104873104874104875104876104877104878104879104880104881104882104883104884104885104886104887104888104889104890104891104892104893104894104895104896104897104898104899104900104901104902104903104904104905104906104907104908104909104910104911104912104913104914104915104916104917104918104919104920104921104922104923104924104925104926104927104928104929104930104931104932104933104934104935104936104937104938104939104940104941104942104943104944104945104946104947104948104949104950104951104952104953104954104955104956104957104958104959104960104961104962104963104964104965104966104967104968104969104970104971104972104973104974104975104976104977104978104979104980104981104982104983104984104985104986104987104988104989104990104991104992104993104994104995104996104997104998104999105000105001105002105003105004105005105006105007105008105009105010105011105012105013105014105015105016105017105018105019105020105021105022105023105024105025105026105027105028105029105030105031105032105033105034105035105036105037105038105039105040105041105042105043105044105045105046105047105048105049105050105051105052105053105054105055105056105057105058105059105060105061105062105063105064105065105066105067105068105069105070105071105072105073105074105075105076105077105078105079105080105081105082105083105084105085105086105087105088105089105090105091105092105093105094105095105096105097105098105099105100105101105102105103105104105105105106105107105108105109105110105111105112105113105114105115105116105117105118105119105120105121105122105123105124105125105126105127105128105129105130105131105132105133105134105135105136105137105138105139105140105141105142105143105144105145105146105147105148105149105150105151105152105153105154105155105156105157105158105159105160105161105162105163105164105165105166105167105168105169105170105171105172105173105174105175105176105177105178105179105180105181105182105183105184105185105186105187105188105189105190105191105192105193105194105195105196105197105198105199105200105201105202105203105204105205105206105207105208105209105210105211105212105213105214105215105216105217105218105219105220105221105222105223105224105225105226105227105228105229105230105231105232105233105234105235105236105237105238105239105240105241105242105243105244105245105246105247105248105249105250105251105252105253105254105255105256105257105258105259105260105261105262105263105264105265105266105267105268105269105270105271105272105273105274105275105276105277105278105279105280105281105282105283105284105285105286105287105288105289105290105291105292105293105294105295105296105297105298105299105300105301105302105303105304105305105306105307105308105309105310105311105312105313105314105315105316105317105318105319105320105321105322105323105324105325105326105327105328105329105330105331105332105333105334105335105336105337105338105339105340105341105342105343105344105345105346105347105348105349105350105351105352105353105354105355105356105357105358105359105360105361105362105363105364105365105366105367105368105369105370105371105372105373105374105375105376105377105378105379105380105381105382105383105384105385105386105387105388105389105390105391105392105393105394105395105396105397105398105399105400105401105402105403105404105405105406105407105408105409105410105411105412105413105414105415105416105417105418105419105420105421105422105423105424105425105426105427105428105429105430105431105432105433105434105435105436105437105438105439105440105441105442105443105444105445105446105447105448105449105450105451105452105453105454105455105456105457105458105459105460105461105462105463105464105465105466105467105468105469105470105471105472105473105474105475105476105477105478105479105480105481105482105483105484105485105486105487105488105489105490105491105492105493105494105495105496105497105498105499105500105501105502105503105504105505105506105507105508105509105510105511105512105513105514105515105516105517105518105519105520105521105522105523105524105525105526105527105528105529105530105531105532105533105534105535105536105537105538105539105540105541105542105543105544105545105546105547105548105549105550105551105552105553105554105555105556105557105558105559105560105561105562105563105564105565105566105567105568105569105570105571105572105573105574105575105576105577105578105579105580105581105582105583105584105585105586105587105588105589105590105591105592105593105594105595105596105597105598105599105600105601105602105603105604105605105606105607105608105609105610105611105612105613105614105615105616105617105618105619105620105621105622105623105624105625105626105627105628105629105630105631105632105633105634105635105636105637105638105639105640105641105642105643105644105645105646105647105648105649105650105651105652105653105654105655105656105657105658105659105660105661105662105663105664105665105666105667105668105669105670105671105672105673105674105675105676105677105678105679105680105681105682105683105684105685105686105687105688105689105690105691105692105693105694105695105696105697105698105699105700105701105702105703105704105705105706105707105708105709105710105711105712105713105714105715105716105717105718105719105720105721105722105723105724105725105726105727105728105729105730105731105732105733105734105735105736105737105738105739105740105741105742105743105744105745105746105747105748105749105750105751105752105753105754105755105756105757105758105759105760105761105762105763105764105765105766105767105768105769105770105771105772105773105774105775105776105777105778105779105780105781105782105783105784105785105786105787105788105789105790105791105792105793105794105795105796105797105798105799105800105801105802105803105804105805105806105807105808105809105810105811105812105813105814105815105816105817105818105819105820105821105822105823105824105825105826105827105828105829105830105831105832105833105834105835105836105837105838105839105840105841105842105843105844105845105846105847105848105849105850105851105852105853105854105855105856105857105858105859105860105861105862105863105864105865105866105867105868105869105870105871105872105873105874105875105876105877105878105879105880105881105882105883105884105885105886105887105888105889105890105891105892105893105894105895105896105897105898105899105900105901105902105903105904105905105906105907105908105909105910105911105912105913105914105915105916105917105918105919105920105921105922105923105924105925105926105927105928105929105930105931105932105933105934105935105936105937105938105939105940105941105942105943105944105945105946105947105948105949105950105951105952105953105954105955105956105957105958105959105960105961105962105963105964105965105966105967105968105969105970105971105972105973105974105975105976105977105978105979105980105981105982105983105984105985105986105987105988105989105990105991105992105993105994105995105996105997105998105999106000106001106002106003106004106005106006106007106008106009106010106011106012106013106014106015106016106017106018106019106020106021106022106023106024106025106026106027106028106029106030106031106032106033106034106035106036106037106038106039106040106041106042106043106044106045106046106047106048106049106050106051106052106053106054106055106056106057106058106059106060106061106062106063106064106065106066106067106068106069106070106071106072106073106074106075106076106077106078106079106080106081106082106083106084106085106086106087106088106089106090106091106092106093106094106095106096106097106098106099106100106101106102106103106104106105106106106107106108106109106110106111106112106113106114106115106116106117106118106119106120106121106122106123106124106125106126106127106128106129106130106131106132106133106134106135106136106137106138106139106140106141106142106143106144106145106146106147106148106149106150106151106152106153106154106155106156106157106158106159106160106161106162106163106164106165106166106167106168106169106170106171106172106173106174106175106176106177106178106179106180106181106182106183106184106185106186106187106188106189106190106191106192106193106194106195106196106197106198106199106200106201106202106203106204106205106206106207106208106209106210106211106212106213106214106215106216106217106218106219106220106221106222106223106224106225106226106227106228106229106230106231106232106233106234106235106236106237106238106239106240106241106242106243106244106245106246106247106248106249106250106251106252106253106254106255106256106257106258106259106260106261106262106263106264106265106266106267106268106269106270106271106272106273106274106275106276106277106278106279106280106281106282106283106284106285106286106287106288106289106290106291106292106293106294106295106296106297106298106299106300106301106302106303106304106305106306106307106308106309106310106311106312106313106314106315106316106317106318106319106320106321106322106323106324106325106326106327106328106329106330106331106332106333106334106335106336106337106338106339106340106341106342106343106344106345106346106347106348106349106350106351106352106353106354106355106356106357106358106359106360106361106362106363106364106365106366106367106368106369106370106371106372106373106374106375106376106377106378106379106380106381106382106383106384106385106386106387106388106389106390106391106392106393106394106395106396106397106398106399106400106401106402106403106404106405106406106407106408106409106410106411106412106413106414106415106416106417106418106419106420106421106422106423106424106425106426106427106428106429106430106431106432106433106434106435106436106437106438106439106440106441106442106443106444106445106446106447106448106449106450106451106452106453106454106455106456106457106458106459106460106461106462106463106464106465106466106467106468106469106470106471106472106473106474106475106476106477106478106479106480106481106482106483106484106485106486106487106488106489106490106491106492106493106494106495106496106497106498106499106500106501106502106503106504106505106506106507106508106509106510106511106512106513106514106515106516106517106518106519106520106521106522106523106524106525106526106527106528106529106530106531106532106533106534106535106536106537106538106539106540106541106542106543106544106545106546106547106548106549106550106551106552106553106554106555106556106557106558106559106560106561106562106563106564106565106566106567106568106569106570106571106572106573106574106575106576106577106578106579106580106581106582106583106584106585106586106587106588106589106590106591106592106593106594106595106596106597106598106599106600106601106602106603106604106605106606106607106608106609106610106611106612106613106614106615106616106617106618106619106620106621106622106623106624106625106626106627106628106629106630106631106632106633106634106635106636106637106638106639106640106641106642106643106644106645106646106647106648106649106650106651106652106653106654106655106656106657106658106659106660106661106662106663106664106665106666106667106668106669106670106671106672106673106674106675106676106677106678106679106680106681106682106683106684106685106686106687106688106689106690106691106692106693106694106695106696106697106698106699106700106701106702106703106704106705106706106707106708106709106710106711106712106713106714106715106716106717106718106719106720106721106722106723106724106725106726106727106728106729106730106731106732106733106734106735106736106737106738106739106740106741106742106743106744106745106746106747106748106749106750106751106752106753106754106755106756106757106758106759106760106761106762106763106764106765106766106767106768106769106770106771106772106773106774106775106776106777106778106779106780106781106782106783106784106785106786106787106788106789106790106791106792106793106794106795106796106797106798106799106800106801106802106803106804106805106806106807106808106809106810106811106812106813106814106815106816106817106818106819106820106821106822106823106824106825106826106827106828106829106830106831106832106833106834106835106836106837106838106839106840106841106842106843106844106845106846106847106848106849106850106851106852106853106854106855106856106857106858106859106860106861106862106863106864106865106866106867106868106869106870106871106872106873106874106875106876106877106878106879106880106881106882106883106884106885106886106887106888106889106890106891106892106893106894106895106896106897106898106899106900106901106902106903106904106905106906106907106908106909106910106911106912106913106914106915106916106917106918106919106920106921106922106923106924106925106926106927106928106929106930106931106932106933106934106935106936106937106938106939106940106941106942106943106944106945106946106947106948106949106950106951106952106953106954106955106956106957106958106959106960106961106962106963106964106965106966106967106968106969106970106971106972106973106974106975106976106977106978106979106980106981106982106983106984106985106986106987106988106989106990106991106992106993106994106995106996106997106998106999107000107001107002107003107004107005107006107007107008107009107010107011107012107013107014107015107016107017107018107019107020107021107022107023107024107025107026107027107028107029107030107031107032107033107034107035107036107037107038107039107040107041107042107043107044107045107046107047107048107049107050107051107052107053107054107055107056107057107058107059107060107061107062107063107064107065107066107067107068107069107070107071107072107073107074107075107076107077107078107079107080107081107082107083107084107085107086107087107088107089107090107091107092107093107094107095107096107097107098107099107100107101107102107103107104107105107106107107107108107109107110107111107112107113107114107115107116107117107118107119107120107121107122107123107124107125107126107127107128107129107130107131107132107133107134107135107136107137107138107139107140107141107142107143107144107145107146107147107148107149107150107151107152107153107154107155107156107157107158107159107160107161107162107163107164107165107166107167107168107169107170107171107172107173107174107175107176107177107178107179107180107181107182107183107184107185107186107187107188107189107190107191107192107193107194107195107196107197107198107199107200107201107202107203107204107205107206107207107208107209107210107211107212107213107214107215107216107217107218107219107220107221107222107223107224107225107226107227107228107229107230107231107232107233107234107235107236107237107238107239107240107241107242107243107244107245107246107247107248107249107250107251107252107253107254107255107256107257107258107259107260107261107262107263107264107265107266107267107268107269107270107271107272107273107274107275107276107277107278107279107280107281107282107283107284107285107286107287107288107289107290107291107292107293107294107295107296107297107298107299107300107301107302107303107304107305107306107307107308107309107310107311107312107313107314107315107316107317107318107319107320107321107322107323107324107325107326107327107328107329107330107331107332107333107334107335107336107337107338107339107340107341107342107343107344107345107346107347107348107349107350107351107352107353107354107355107356107357107358107359107360107361107362107363107364107365107366107367107368107369107370107371107372107373107374107375107376107377107378107379107380107381107382107383107384107385107386107387107388107389107390107391107392107393107394107395107396107397107398107399107400107401107402107403107404107405107406107407107408107409107410107411107412107413107414107415107416107417107418107419107420107421107422107423107424107425107426107427107428107429107430107431107432107433107434107435107436107437107438107439107440107441107442107443107444107445107446107447107448107449107450107451107452107453107454107455107456107457107458107459107460107461107462107463107464107465107466107467107468107469107470107471107472107473107474107475107476107477107478107479107480107481107482107483107484107485107486107487107488107489107490107491107492107493107494107495107496107497107498107499107500107501107502107503107504107505107506107507107508107509107510107511107512107513107514107515107516107517107518107519107520107521107522107523107524107525107526107527107528107529107530107531107532107533107534107535107536107537107538107539107540107541107542107543107544107545107546107547107548107549107550107551107552107553107554107555107556107557107558107559107560107561107562107563107564107565107566107567107568107569107570107571107572107573107574107575107576107577107578107579107580107581107582107583107584107585107586107587107588107589107590107591107592107593107594107595107596107597107598107599107600107601107602107603107604107605107606107607107608107609107610107611107612107613107614107615107616107617107618107619107620107621107622107623107624107625107626107627107628107629107630107631107632107633107634107635107636107637107638107639107640107641107642107643107644107645107646107647107648107649107650107651107652107653107654107655107656107657107658107659107660107661107662107663107664107665107666107667107668107669107670107671107672107673107674107675107676107677107678107679107680107681107682107683107684107685107686107687107688107689107690107691107692107693107694107695107696107697107698107699107700107701107702107703107704107705107706107707107708107709107710107711107712107713107714107715107716107717107718107719107720107721107722107723107724107725107726107727107728107729107730107731107732107733107734107735107736107737107738107739107740107741107742107743107744107745107746107747107748107749107750107751107752107753107754107755107756107757107758107759107760107761107762107763107764107765107766107767107768107769107770107771107772107773107774107775107776107777107778107779107780107781107782107783107784107785107786107787107788107789107790107791107792107793107794107795107796107797107798107799107800107801107802107803107804107805107806107807107808107809107810107811107812107813107814107815107816107817107818107819107820107821107822107823107824107825107826107827107828107829107830107831107832107833107834107835107836107837107838107839107840107841107842107843107844107845107846107847107848107849107850107851107852107853107854107855107856107857107858107859107860107861107862107863107864107865107866107867107868107869107870107871107872107873107874107875107876107877107878107879107880107881107882107883107884107885107886107887107888107889107890107891107892107893107894107895107896107897107898107899107900107901107902107903107904107905107906107907107908107909107910107911107912107913107914107915107916107917107918107919107920107921107922107923107924107925107926107927107928107929107930107931107932107933107934107935107936107937107938107939107940107941107942107943107944107945107946107947107948107949107950107951107952107953107954107955107956107957107958107959107960107961107962107963107964107965107966107967107968107969107970107971107972107973107974107975107976107977107978107979107980107981107982107983107984107985107986107987107988107989107990107991107992107993107994107995107996107997107998107999108000108001108002108003108004108005108006108007108008108009108010108011108012108013108014108015108016108017108018108019108020108021108022108023108024108025108026108027108028108029108030108031108032108033108034108035108036108037108038108039108040108041108042108043108044108045108046108047108048108049108050108051108052108053108054108055108056108057108058108059108060108061108062108063108064108065108066108067108068108069108070108071108072108073108074108075108076108077108078108079108080108081108082108083108084108085108086108087108088108089108090108091108092108093108094108095108096108097108098108099108100108101108102108103108104108105108106108107108108108109108110108111108112108113108114108115108116108117108118108119108120108121108122108123108124108125108126108127108128108129108130108131108132108133108134108135108136108137108138108139108140108141108142108143108144108145108146108147108148108149108150108151108152108153108154108155108156108157108158108159108160108161108162108163108164108165108166108167108168108169108170108171108172108173108174108175108176108177108178108179108180108181108182108183108184108185108186108187108188108189108190108191108192108193108194108195108196108197108198108199108200108201108202108203108204108205108206108207108208108209108210108211108212108213108214108215108216108217108218108219108220108221108222108223108224108225108226108227108228108229108230108231108232108233108234108235108236108237108238108239108240108241108242108243108244108245108246108247108248108249108250108251108252108253108254108255108256108257108258108259108260108261108262108263108264108265108266108267108268108269108270108271108272108273108274108275108276108277108278108279108280108281108282108283108284108285108286108287108288108289108290108291108292108293108294108295108296108297108298108299108300108301108302108303108304108305108306108307108308108309108310108311108312108313108314108315108316108317108318108319108320108321108322108323108324108325108326108327108328108329108330108331108332108333108334108335108336108337108338108339108340108341108342108343108344108345108346108347108348108349108350108351108352108353108354108355108356108357108358108359108360108361108362108363108364108365108366108367108368108369108370108371108372108373108374108375108376108377108378108379108380108381108382108383108384108385108386108387108388108389108390108391108392108393108394108395108396108397108398108399108400108401108402108403108404108405108406108407108408108409108410108411108412108413108414108415108416108417108418108419108420108421108422108423108424108425108426108427108428108429108430108431108432108433108434108435108436108437108438108439108440108441108442108443108444108445108446108447108448108449108450108451108452108453108454108455108456108457108458108459108460108461108462108463108464108465108466108467108468108469108470108471108472108473108474108475108476108477108478108479108480108481108482108483108484108485108486108487108488108489108490108491108492108493108494108495108496108497108498108499108500108501108502108503108504108505108506108507108508108509108510108511108512108513108514108515108516108517108518108519108520108521108522108523108524108525108526108527108528108529108530108531108532108533108534108535108536108537108538108539108540108541108542108543108544108545108546108547108548108549108550108551108552108553108554108555108556108557108558108559108560108561108562108563108564108565108566108567108568108569108570108571108572108573108574108575108576108577108578108579108580108581108582108583108584108585108586108587108588108589108590108591108592108593108594108595108596108597108598108599108600108601108602108603108604108605108606108607108608108609108610108611108612108613108614108615108616108617108618108619108620108621108622108623108624108625108626108627108628108629108630108631108632108633108634108635108636108637108638108639108640108641108642108643108644108645108646108647108648108649108650108651108652108653108654108655108656108657108658108659108660108661108662108663108664108665108666108667108668108669108670108671108672108673108674108675108676108677108678108679108680108681108682108683108684108685108686108687108688108689108690108691108692108693108694108695108696108697108698108699108700108701108702108703108704108705108706108707108708108709108710108711108712108713108714108715108716108717108718108719108720108721108722108723108724108725108726108727108728108729108730108731108732108733108734108735108736108737108738108739108740108741108742108743108744108745108746108747108748108749108750108751108752108753108754108755108756108757108758108759108760108761108762108763108764108765108766108767108768108769108770108771108772108773108774108775108776108777108778108779108780108781108782108783108784108785108786108787108788108789108790108791108792108793108794108795108796108797108798108799108800108801108802108803108804108805108806108807108808108809108810108811108812108813108814108815108816108817108818108819108820108821108822108823108824108825108826108827108828108829108830108831108832108833108834108835108836108837108838108839108840108841108842108843108844108845108846108847108848108849108850108851108852108853108854108855108856108857108858108859108860108861108862108863108864108865108866108867108868108869108870108871108872108873108874108875108876108877108878108879108880108881108882108883108884108885108886108887108888108889108890108891108892108893108894108895108896108897108898108899108900108901108902108903108904108905108906108907108908108909108910108911108912108913108914108915108916108917108918108919108920108921108922108923108924108925108926108927108928108929108930108931108932108933108934108935108936108937108938108939108940108941108942108943108944108945108946108947108948108949108950108951108952108953108954108955108956108957108958108959108960108961108962108963108964108965108966108967108968108969108970108971108972108973108974108975108976108977108978108979108980108981108982108983108984108985108986108987108988108989108990108991108992108993108994108995108996108997108998108999109000109001109002109003109004109005109006109007109008109009109010109011109012109013109014109015109016109017109018109019109020109021109022109023109024109025109026109027109028109029109030109031109032109033109034109035109036109037109038109039109040109041109042109043109044109045109046109047109048109049109050109051109052109053109054109055109056109057109058109059109060109061109062109063109064109065109066109067109068109069109070109071109072109073109074109075109076109077109078109079109080109081109082109083109084109085109086109087109088109089109090109091109092109093109094109095109096109097109098109099109100109101109102109103109104109105109106109107109108109109109110109111109112109113109114109115109116109117109118109119109120109121109122109123109124109125109126109127109128109129109130109131109132109133109134109135109136109137109138109139109140109141109142109143109144109145109146109147109148109149109150109151109152109153109154109155109156109157109158109159109160109161109162109163109164109165109166109167109168109169109170109171109172109173109174109175109176109177109178109179109180109181109182109183109184109185109186109187109188109189109190109191109192109193109194109195109196109197109198109199109200109201109202109203109204109205109206109207109208109209109210109211109212109213109214109215109216109217109218109219109220109221109222109223109224109225109226109227109228109229109230109231109232109233109234109235109236109237109238109239109240109241109242109243109244109245109246109247109248109249109250109251109252109253109254109255109256109257109258109259109260109261109262109263109264109265109266109267109268109269109270109271109272109273109274109275109276109277109278109279109280109281109282109283109284109285109286109287109288109289109290109291109292109293109294109295109296109297109298109299109300109301109302109303109304109305109306109307109308109309109310109311109312109313109314109315109316109317109318109319109320109321109322109323109324109325109326109327109328109329109330109331109332109333109334109335109336109337109338109339109340109341109342109343109344109345109346109347109348109349109350109351109352109353109354109355109356109357109358109359109360109361109362109363109364109365109366109367109368109369109370109371109372109373109374109375109376109377109378109379109380109381109382109383109384109385109386109387109388109389109390109391109392109393109394109395109396109397109398109399109400109401109402109403109404109405109406109407109408109409109410109411109412109413109414109415109416109417109418109419109420109421109422109423109424109425109426109427109428109429109430109431109432109433109434109435109436109437109438109439109440109441109442109443109444109445109446109447109448109449109450109451109452109453109454109455109456109457109458109459109460109461109462109463109464109465109466109467109468109469109470109471109472109473109474109475109476109477109478109479109480109481109482109483109484109485109486109487109488109489109490109491109492109493109494109495109496109497109498109499109500109501109502109503109504109505109506109507109508109509109510109511109512109513109514109515109516109517109518109519109520109521109522109523109524109525109526109527109528109529109530109531109532109533109534109535109536109537109538109539109540109541109542109543109544109545109546109547109548109549109550109551109552109553109554109555109556109557109558109559109560109561109562109563109564109565109566109567109568109569109570109571109572109573109574109575109576109577109578109579109580109581109582109583109584109585109586109587109588109589109590109591109592109593109594109595109596109597109598109599109600109601109602109603109604109605109606109607109608109609109610109611109612109613109614109615109616109617109618109619109620109621109622109623109624109625109626109627109628109629109630109631109632109633109634109635109636109637109638109639109640109641109642109643109644109645109646109647109648109649109650109651109652109653109654109655109656109657109658109659109660109661109662109663109664109665109666109667109668109669109670109671109672109673109674109675109676109677109678109679109680109681109682109683109684109685109686109687109688109689109690109691109692109693109694109695109696109697109698109699109700109701109702109703109704109705109706109707109708109709109710109711109712109713109714109715109716109717109718109719109720109721109722109723109724109725109726109727109728109729109730109731109732109733109734109735109736109737109738109739109740109741109742109743109744109745109746109747109748109749109750109751109752109753109754109755109756109757109758109759109760109761109762109763109764109765109766109767109768109769109770109771109772109773109774109775109776109777109778109779109780109781109782109783109784109785109786109787109788109789109790109791109792109793109794109795109796109797109798109799109800109801109802109803109804109805109806109807109808109809109810109811109812109813109814109815109816109817109818109819109820109821109822109823109824109825109826109827109828109829109830109831109832109833109834109835109836109837109838109839109840109841109842109843109844109845109846109847109848109849109850109851109852109853109854109855109856109857109858109859109860109861109862109863109864109865109866109867109868109869109870109871109872109873109874109875109876109877109878109879109880109881109882109883109884109885109886109887109888109889109890109891109892109893109894109895109896109897109898109899109900109901109902109903109904109905109906109907109908109909109910109911109912109913109914109915109916109917109918109919109920109921109922109923109924109925109926109927109928109929109930109931109932109933109934109935109936109937109938109939109940109941109942109943109944109945109946109947109948109949109950109951109952109953109954109955109956109957109958109959109960109961109962109963109964109965109966109967109968109969109970109971109972109973109974109975109976109977109978109979109980109981109982109983109984109985109986109987109988109989109990109991109992109993109994109995109996109997109998109999110000110001110002110003110004110005110006110007110008110009110010110011110012110013110014110015110016110017110018110019110020110021110022110023110024110025110026110027110028110029110030110031110032110033110034110035110036110037110038110039110040110041110042110043110044110045110046110047110048110049110050110051110052110053110054110055110056110057110058110059110060110061110062110063110064110065110066110067110068110069110070110071110072110073110074110075110076110077110078110079110080110081110082110083110084110085110086110087110088110089110090110091110092110093110094110095110096110097110098110099110100110101110102110103110104110105110106110107110108110109110110110111110112110113110114110115110116110117110118110119110120110121110122110123110124110125110126110127110128110129110130110131110132110133110134110135110136110137110138110139110140110141110142110143110144110145110146110147110148110149110150110151110152110153110154110155110156110157110158110159110160110161110162110163110164110165110166110167110168110169110170110171110172110173110174110175110176110177110178110179110180110181110182110183110184110185110186110187110188110189110190110191110192110193110194110195110196110197110198110199110200110201110202110203110204110205110206110207110208110209110210110211110212110213110214110215110216110217110218110219110220110221110222110223110224110225110226110227110228110229110230110231110232110233110234110235110236110237110238110239110240110241110242110243110244110245110246110247110248110249110250110251110252110253110254110255110256110257110258110259110260110261110262110263110264110265110266110267110268110269110270110271110272110273110274110275110276110277110278110279110280110281110282110283110284110285110286110287110288110289110290110291110292110293110294110295110296110297110298110299110300110301110302110303110304110305110306110307110308110309110310110311110312110313110314110315110316110317110318110319110320110321110322110323110324110325110326110327110328110329110330110331110332110333110334110335110336110337110338110339110340110341110342110343110344110345110346110347110348110349110350110351110352110353110354110355110356110357110358110359110360110361110362110363110364110365110366110367110368110369110370110371110372110373110374110375110376110377110378110379110380110381110382110383110384110385110386110387110388110389110390110391110392110393110394110395110396110397110398110399110400110401110402110403110404110405110406110407110408110409110410110411110412110413110414110415110416110417110418110419110420110421110422110423110424110425110426110427110428110429110430110431110432110433110434110435110436110437110438110439110440110441110442110443110444110445110446110447110448110449110450110451110452110453110454110455110456110457110458110459110460110461110462110463110464110465110466110467110468110469110470110471110472110473110474110475110476110477110478110479110480110481110482110483110484110485110486110487110488110489110490110491110492110493110494110495110496110497110498110499110500110501110502110503110504110505110506110507110508110509110510110511110512110513110514110515110516110517110518110519110520110521110522110523110524110525110526110527110528110529110530110531110532110533110534110535110536110537110538110539110540110541110542110543110544110545110546110547110548110549110550110551110552110553110554110555110556110557110558110559110560110561110562110563110564110565110566110567110568110569110570110571110572110573110574110575110576110577110578110579110580110581110582110583110584110585110586110587110588110589110590110591110592110593110594110595110596110597110598110599110600110601110602110603110604110605110606110607110608110609110610110611110612110613110614110615110616110617110618110619110620110621110622110623110624110625110626110627110628110629110630110631110632110633110634110635110636110637110638110639110640110641110642110643110644110645110646110647110648110649110650110651110652110653110654110655110656110657110658110659110660110661110662110663110664110665110666110667110668110669110670110671110672110673110674110675110676110677110678110679110680110681110682110683110684110685110686110687110688110689110690110691110692110693110694110695110696110697110698110699110700110701110702110703110704110705110706110707110708110709110710110711110712110713110714110715110716110717110718110719110720110721110722110723110724110725110726110727110728110729110730110731110732110733110734110735110736110737110738110739110740110741110742110743110744110745110746110747110748110749110750110751110752110753110754110755110756110757110758110759110760110761110762110763110764110765110766110767110768110769110770110771110772110773110774110775110776110777110778110779110780110781110782110783110784110785110786110787110788110789110790110791110792110793110794110795110796110797110798110799110800110801110802110803110804110805110806110807110808110809110810110811110812110813110814110815110816110817110818110819110820110821110822110823110824110825110826110827110828110829110830110831110832110833110834110835110836110837110838110839110840110841110842110843110844110845110846110847110848110849110850110851110852110853110854110855110856110857110858110859110860110861110862110863110864110865110866110867110868110869110870110871110872110873110874110875110876110877110878110879110880110881110882110883110884110885110886110887110888110889110890110891110892110893110894110895110896110897110898110899110900110901110902110903110904110905110906110907110908110909110910110911110912110913110914110915110916110917110918110919110920110921110922110923110924110925110926110927110928110929110930110931110932110933110934110935110936110937110938110939110940110941110942110943110944110945110946110947110948110949110950110951110952110953110954110955110956110957110958110959110960110961110962110963110964110965110966110967110968110969110970110971110972110973110974110975110976110977110978110979110980110981110982110983110984110985110986110987110988110989110990110991110992110993110994110995110996110997110998110999111000111001111002111003111004111005111006111007111008111009111010111011111012111013111014111015111016111017111018111019111020111021111022111023111024111025111026111027111028111029111030111031111032111033111034111035111036111037111038111039111040111041111042111043111044111045111046111047111048111049111050111051111052111053111054111055111056111057111058111059111060111061111062111063111064111065111066111067111068111069111070111071111072111073111074111075111076111077111078111079111080111081111082111083111084111085111086111087111088111089111090111091111092111093111094111095111096111097111098111099111100111101111102111103111104111105111106111107111108111109111110111111111112111113111114111115111116111117111118111119111120111121111122111123111124111125111126111127111128111129111130111131111132111133111134111135111136111137111138111139111140111141111142111143111144111145111146111147111148111149111150111151111152111153111154111155111156111157111158111159111160111161111162111163111164111165111166111167111168111169111170111171111172111173111174111175111176111177111178111179111180111181111182111183111184111185111186111187111188111189111190111191111192111193111194111195111196111197111198111199111200111201111202111203111204111205111206111207111208111209111210111211111212111213111214111215111216111217111218111219111220111221111222111223111224111225111226111227111228111229111230111231111232111233111234111235111236111237111238111239111240111241111242111243111244111245111246111247111248111249111250111251111252111253111254111255111256111257111258111259111260111261111262111263111264111265111266111267111268111269111270111271111272111273111274111275111276111277111278111279111280111281111282111283111284111285111286111287111288111289111290111291111292111293111294111295111296111297111298111299111300111301111302111303111304111305111306111307111308111309111310111311111312111313111314111315111316111317111318111319111320111321111322111323111324111325111326111327111328111329111330111331111332111333111334111335111336111337111338111339111340111341111342111343111344111345111346111347111348111349111350111351111352111353111354111355111356111357111358111359111360111361111362111363111364111365111366111367111368111369111370111371111372111373111374111375111376111377111378111379111380111381111382111383111384111385111386111387111388111389111390111391111392111393111394111395111396111397111398111399111400111401111402111403111404111405111406111407111408111409111410111411111412111413111414111415111416111417111418111419111420111421111422111423111424111425111426111427111428111429111430111431111432111433111434111435111436111437111438111439111440111441111442111443111444111445111446111447111448111449111450111451111452111453111454111455111456111457111458111459111460111461111462111463111464111465111466111467111468111469111470111471111472111473111474111475111476111477111478111479111480111481111482111483111484111485111486111487111488111489111490111491111492111493111494111495111496111497111498111499111500111501111502111503111504111505111506111507111508111509111510111511111512111513111514111515111516111517111518111519111520111521111522111523111524111525111526111527111528111529111530111531111532111533111534111535111536111537111538111539111540111541111542111543111544111545111546111547111548111549111550111551111552111553111554111555111556111557111558111559111560111561111562111563111564111565111566111567111568111569111570111571111572111573111574111575111576111577111578111579111580111581111582111583111584111585111586111587111588111589111590111591111592111593111594111595111596111597111598111599111600111601111602111603111604111605111606111607111608111609111610111611111612111613111614111615111616111617111618111619111620111621111622111623111624111625111626111627111628111629111630111631111632111633111634111635111636111637111638111639111640111641111642111643111644111645111646111647111648111649111650111651111652111653111654111655111656111657111658111659111660111661111662111663111664111665111666111667111668111669111670111671111672111673111674111675111676111677111678111679111680111681111682111683111684111685111686111687111688111689111690111691111692111693111694111695111696111697111698111699111700111701111702111703111704111705111706111707111708111709111710111711111712111713111714111715111716111717111718111719111720111721111722111723111724111725111726111727111728111729111730111731111732111733111734111735111736111737111738111739111740111741111742111743111744111745111746111747111748111749111750111751111752111753111754111755111756111757111758111759111760111761111762111763111764111765111766111767111768111769111770111771111772111773111774111775111776111777111778111779111780111781111782111783111784111785111786111787111788111789111790111791111792111793111794111795111796111797111798111799111800111801111802111803111804111805111806111807111808111809111810111811111812111813111814111815111816111817111818111819111820111821111822111823111824111825111826111827111828111829111830111831111832111833111834111835111836111837111838111839111840111841111842111843111844111845111846111847111848111849111850111851111852111853111854111855111856111857111858111859111860111861111862111863111864111865111866111867111868111869111870111871111872111873111874111875111876111877111878111879111880111881111882111883111884111885111886111887111888111889111890111891111892111893111894111895111896111897111898111899111900111901111902111903111904111905111906111907111908111909111910111911111912111913111914111915111916111917111918111919111920111921111922111923111924111925111926111927111928111929111930111931111932111933111934111935111936111937111938111939111940111941111942111943111944111945111946111947111948111949111950111951111952111953111954111955111956111957111958111959111960111961111962111963111964111965111966111967111968111969111970111971111972111973111974111975111976111977111978111979111980111981111982111983111984111985111986111987111988111989111990111991111992111993111994111995111996111997111998111999112000112001112002112003112004112005112006112007112008112009112010112011112012112013112014112015112016112017112018112019112020112021112022112023112024112025112026112027112028112029112030112031112032112033112034112035112036112037112038112039112040112041112042112043112044112045112046112047112048112049112050112051112052112053112054112055112056112057112058112059112060112061112062112063112064112065112066112067112068112069112070112071112072112073112074112075112076112077112078112079112080112081112082112083112084112085112086112087112088112089112090112091112092112093112094112095112096112097112098112099112100112101112102112103112104112105112106112107112108112109112110112111112112112113112114112115112116112117112118112119112120112121112122112123112124112125112126112127112128112129112130112131112132112133112134112135112136112137112138112139112140112141112142112143112144112145112146112147112148112149112150112151112152112153112154112155112156112157112158112159112160112161112162112163112164112165112166112167112168112169112170112171112172112173112174112175112176112177112178112179112180112181112182112183112184112185112186112187112188112189112190112191112192112193112194112195112196112197112198112199112200112201112202112203112204112205112206112207112208112209112210112211112212112213112214112215112216112217112218112219112220112221112222112223112224112225112226112227112228112229112230112231112232112233112234112235112236112237112238112239112240112241112242112243112244112245112246112247112248112249112250112251112252112253112254112255112256112257112258112259112260112261112262112263112264112265112266112267112268112269112270112271112272112273112274112275112276112277112278112279112280112281112282112283112284112285112286112287112288112289112290112291112292112293112294112295112296112297112298112299112300112301112302112303112304112305112306112307112308112309112310112311112312112313112314112315112316112317112318112319112320112321112322112323112324112325112326112327112328112329112330112331112332112333112334112335112336112337112338112339112340112341112342112343112344112345112346112347112348112349112350112351112352112353112354112355112356112357112358112359112360112361112362112363112364112365112366112367112368112369112370112371112372112373112374112375112376112377112378112379112380112381112382112383112384112385112386112387112388112389112390112391112392112393112394112395112396112397112398112399112400112401112402112403112404112405112406112407112408112409112410112411112412112413112414112415112416112417112418112419112420112421112422112423112424112425112426112427112428112429112430112431112432112433112434112435112436112437112438112439112440112441112442112443112444112445112446112447112448112449112450112451112452112453112454112455112456112457112458112459112460112461112462112463112464112465112466112467112468112469112470112471112472112473112474112475112476112477112478112479112480112481112482112483112484112485112486112487112488112489112490112491112492112493112494112495112496112497112498112499112500112501112502112503112504112505112506112507112508112509112510112511112512112513112514112515112516112517112518112519112520112521112522112523112524112525112526112527112528112529112530112531112532112533112534112535112536112537112538112539112540112541112542112543112544112545112546112547112548112549112550112551112552112553112554112555112556112557112558112559112560112561112562112563112564112565112566112567112568112569112570112571112572112573112574112575112576112577112578112579112580112581112582112583112584112585112586112587112588112589112590112591112592112593112594112595112596112597112598112599112600112601112602112603112604112605112606112607112608112609112610112611112612112613112614112615112616112617112618112619112620112621112622112623112624112625112626112627112628112629112630112631112632112633112634112635112636112637112638112639112640112641112642112643112644112645112646112647112648112649112650112651112652112653112654112655112656112657112658112659112660112661112662112663112664112665112666112667112668112669112670112671112672112673112674112675112676112677112678112679112680112681112682112683112684112685112686112687112688112689112690112691112692112693112694112695112696112697112698112699112700112701112702112703112704112705112706112707112708112709112710112711112712112713112714112715112716112717112718112719112720112721112722112723112724112725112726112727112728112729112730112731112732112733112734112735112736112737112738112739112740112741112742112743112744112745112746112747112748112749112750112751112752112753112754112755112756112757112758112759112760112761112762112763112764112765112766112767112768112769112770112771112772112773112774112775112776112777112778112779112780112781112782112783112784112785112786112787112788112789112790112791112792112793112794112795112796112797112798112799112800112801112802112803112804112805112806112807112808112809112810112811112812112813112814112815112816112817112818112819112820112821112822112823112824112825112826112827112828112829112830112831112832112833112834112835112836112837112838112839112840112841112842112843112844112845112846112847112848112849112850112851112852112853112854112855112856112857112858112859112860112861112862112863112864112865112866112867112868112869112870112871112872112873112874112875112876112877112878112879112880112881112882112883112884112885112886112887112888112889112890112891112892112893112894112895112896112897112898112899112900112901112902112903112904112905112906112907112908112909112910112911112912112913112914112915112916112917112918112919112920112921112922112923112924112925112926112927112928112929112930112931112932112933112934112935112936112937112938112939112940112941112942112943112944112945112946112947112948112949112950112951112952112953112954112955112956112957112958112959112960112961112962112963112964112965112966112967112968112969112970112971112972112973112974112975112976112977112978112979112980112981112982112983112984112985112986112987112988112989112990112991112992112993112994112995112996112997112998112999113000113001113002113003113004113005113006113007113008113009113010113011113012113013113014113015113016113017113018113019113020113021113022113023113024113025113026113027113028113029113030113031113032113033113034113035113036113037113038113039113040113041113042113043113044113045113046113047113048113049113050113051113052113053113054113055113056113057113058113059113060113061113062113063113064113065113066113067113068113069113070113071113072113073113074113075113076113077113078113079113080113081113082113083113084113085113086113087113088113089113090113091113092113093113094113095113096113097113098113099113100113101113102113103113104113105113106113107113108113109113110113111113112113113113114113115113116113117113118113119113120113121113122113123113124113125113126113127113128113129113130113131113132113133113134113135113136113137113138113139113140113141113142113143113144113145113146113147113148113149113150113151113152113153113154113155113156113157113158113159113160113161113162113163113164113165113166113167113168113169113170113171113172113173113174113175113176113177113178113179113180113181113182113183113184113185113186113187113188113189113190113191113192113193113194113195113196113197113198113199113200113201113202113203113204113205113206113207113208113209113210113211113212113213113214113215113216113217113218113219113220113221113222113223113224113225113226113227113228113229113230113231113232113233113234113235113236113237113238113239113240113241113242113243113244113245113246113247113248113249113250113251113252113253113254113255113256113257113258113259113260113261113262113263113264113265113266113267113268113269113270113271113272113273113274113275113276113277113278113279113280113281113282113283113284113285113286113287113288113289113290113291113292113293113294113295113296113297113298113299113300113301113302113303113304113305113306113307113308113309113310113311113312113313113314113315113316113317113318113319113320113321113322113323113324113325113326113327113328113329113330113331113332113333113334113335113336113337113338113339113340113341113342113343113344113345113346113347113348113349113350113351113352113353113354113355113356113357113358113359113360113361113362113363113364113365113366113367113368113369113370113371113372113373113374113375113376113377113378113379113380113381113382113383113384113385113386113387113388113389113390113391113392113393113394113395113396113397113398113399113400113401113402113403113404113405113406113407113408113409113410113411113412113413113414113415113416113417113418113419113420113421113422113423113424113425113426113427113428113429113430113431113432113433113434113435113436113437113438113439113440113441113442113443113444113445113446113447113448113449113450113451113452113453113454113455113456113457113458113459113460113461113462113463113464113465113466113467113468113469113470113471113472113473113474113475113476113477113478113479113480113481113482113483113484113485113486113487113488113489113490113491113492113493113494113495113496113497113498113499113500113501113502113503113504113505113506113507113508113509113510113511113512113513113514113515113516113517113518113519113520113521113522113523113524113525113526113527113528113529113530113531113532113533113534113535113536113537113538113539113540113541113542113543113544113545113546113547113548113549113550113551113552113553113554113555113556113557113558113559113560113561113562113563113564113565113566113567113568113569113570113571113572113573113574113575113576113577113578113579113580113581113582113583113584113585113586113587113588113589113590113591113592113593113594113595113596113597113598113599113600113601113602113603113604113605113606113607113608113609113610113611113612113613113614113615113616113617113618113619113620113621113622113623113624113625113626113627113628113629113630113631113632113633113634113635113636113637113638113639113640113641113642113643113644113645113646113647113648113649113650113651113652113653113654113655113656113657113658113659113660113661113662113663113664113665113666113667113668113669113670113671113672113673113674113675113676113677113678113679113680113681113682113683113684113685113686113687113688113689113690113691113692113693113694113695113696113697113698113699113700113701113702113703113704113705113706113707113708113709113710113711113712113713113714113715113716113717113718113719113720113721113722113723113724113725113726113727113728113729113730113731113732113733113734113735113736113737113738113739113740113741113742113743113744113745113746113747113748113749113750113751113752113753113754113755113756113757113758113759113760113761113762113763113764113765113766113767113768113769113770113771113772113773113774113775113776113777113778113779113780113781113782113783113784113785113786113787113788113789113790113791113792113793113794113795113796113797113798113799113800113801113802113803113804113805113806113807113808113809113810113811113812113813113814113815113816113817113818113819113820113821113822113823113824113825113826113827113828113829113830113831113832113833113834113835113836113837113838113839113840113841113842113843113844113845113846113847113848113849113850113851113852113853113854113855113856113857113858113859113860113861113862113863113864113865113866113867113868113869113870113871113872113873113874113875113876113877113878113879113880113881113882113883113884113885113886113887113888113889113890113891113892113893113894113895113896113897113898113899113900113901113902113903113904113905113906113907113908113909113910113911113912113913113914113915113916113917113918113919113920113921113922113923113924113925113926113927113928113929113930113931113932113933113934113935113936113937113938113939113940113941113942113943113944113945113946113947113948113949113950113951113952113953113954113955113956113957113958113959113960113961113962113963113964113965113966113967113968113969113970113971113972113973113974113975113976113977113978113979113980113981113982113983113984113985113986113987113988113989113990113991113992113993113994113995113996113997113998113999114000114001114002114003114004114005114006114007114008114009114010114011114012114013114014114015114016114017114018114019114020114021114022114023114024114025114026114027114028114029114030114031114032114033114034114035114036114037114038114039114040114041114042114043114044114045114046114047114048114049114050114051114052114053114054114055114056114057114058114059114060114061114062114063114064114065114066114067114068114069114070114071114072114073114074114075114076114077114078114079114080114081114082114083114084114085114086114087114088114089114090114091114092114093114094114095114096114097114098114099114100114101114102114103114104114105114106114107114108114109114110114111114112114113114114114115114116114117114118114119114120114121114122114123114124114125114126114127114128114129114130114131114132114133114134114135114136114137114138114139114140114141114142114143114144114145114146114147114148114149114150114151114152114153114154114155114156114157114158114159114160114161114162114163114164114165114166114167114168114169114170114171114172114173114174114175114176114177114178114179114180114181114182114183114184114185114186114187114188114189114190114191114192114193114194114195114196114197114198114199114200114201114202114203114204114205114206114207114208114209114210114211114212114213114214114215114216114217114218114219114220114221114222114223114224114225114226114227114228114229114230114231114232114233114234114235114236114237114238114239114240114241114242114243114244114245114246114247114248114249114250114251114252114253114254114255114256114257114258114259114260114261114262114263114264114265114266114267114268114269114270114271114272114273114274114275114276114277114278114279114280114281114282114283114284114285114286114287114288114289114290114291114292114293114294114295114296114297114298114299114300114301114302114303114304114305114306114307114308114309114310114311114312114313114314114315114316114317114318114319114320114321114322114323114324114325114326114327114328114329114330114331114332114333114334114335114336114337114338114339114340114341114342114343114344114345114346114347114348114349114350114351114352114353114354114355114356114357114358114359114360114361114362114363114364114365114366114367114368114369114370114371114372114373114374114375114376114377114378114379114380114381114382114383114384114385114386114387114388114389114390114391114392114393114394114395114396114397114398114399114400114401114402114403114404114405114406114407114408114409114410114411114412114413114414114415114416114417114418114419114420114421114422114423114424114425114426114427114428114429114430114431114432114433114434114435114436114437114438114439114440114441114442114443114444114445114446114447114448114449114450114451114452114453114454114455114456114457114458114459114460114461114462114463114464114465114466114467114468114469114470114471114472114473114474114475114476114477114478114479114480114481114482114483114484114485114486114487114488114489114490114491114492114493114494114495114496114497114498114499114500114501114502114503114504114505114506114507114508114509114510114511114512114513114514114515114516114517114518114519114520114521114522114523114524114525114526114527114528114529114530114531114532114533114534114535114536114537114538114539114540114541114542114543114544114545114546114547114548114549114550114551114552114553114554114555114556114557114558114559114560114561114562114563114564114565114566114567114568114569114570114571114572114573114574114575114576114577114578114579114580114581114582114583114584114585114586114587114588114589114590114591114592114593114594114595114596114597114598114599114600114601114602114603114604114605114606114607114608114609114610114611114612114613114614114615114616114617114618114619114620114621114622114623114624114625114626114627114628114629114630114631114632114633114634114635114636114637114638114639114640114641114642114643114644114645114646114647114648114649114650114651114652114653114654114655114656114657114658114659114660114661114662114663114664114665114666114667114668114669114670114671114672114673114674114675114676114677114678114679114680114681114682114683114684114685114686114687114688114689114690114691114692114693114694114695114696114697114698114699114700114701114702114703114704114705114706114707114708114709114710114711114712114713114714114715114716114717114718114719114720114721114722114723114724114725114726114727114728114729114730114731114732114733114734114735114736114737114738114739114740114741114742114743114744114745114746114747114748114749114750114751114752114753114754114755114756114757114758114759114760114761114762114763114764114765114766114767114768114769114770114771114772114773114774114775114776114777114778114779114780114781114782114783114784114785114786114787114788114789114790114791114792114793114794114795114796114797114798114799114800114801114802114803114804114805114806114807114808114809114810114811114812114813114814114815114816114817114818114819114820114821114822114823114824114825114826114827114828114829114830114831114832114833114834114835114836114837114838114839114840114841114842114843114844114845114846114847114848114849114850114851114852114853114854114855114856114857114858114859114860114861114862114863114864114865114866114867114868114869114870114871114872114873114874114875114876114877114878114879114880114881114882114883114884114885114886114887114888114889114890114891114892114893114894114895114896114897114898114899114900114901114902114903114904114905114906114907114908114909114910114911114912114913114914114915114916114917114918114919114920114921114922114923114924114925114926114927114928114929114930114931114932114933114934114935114936114937114938114939114940114941114942114943114944114945114946114947114948114949114950114951114952114953114954114955114956114957114958114959114960114961114962114963114964114965114966114967114968114969114970114971114972114973114974114975114976114977114978114979114980114981114982114983114984114985114986114987114988114989114990114991114992114993114994114995114996114997114998114999115000115001115002115003115004115005115006115007115008115009115010115011115012115013115014115015115016115017115018115019115020115021115022115023115024115025115026115027115028115029115030115031115032115033115034115035115036115037115038115039115040115041115042115043115044115045115046115047115048115049115050115051115052115053115054115055115056115057115058115059115060115061115062115063115064115065115066115067115068115069115070115071115072115073115074115075115076115077115078115079115080115081115082115083115084115085115086115087115088115089115090115091115092115093115094115095115096115097115098115099115100115101115102115103115104115105115106115107115108115109115110115111115112115113115114115115115116115117115118115119115120115121115122115123115124115125115126115127115128115129115130115131115132115133115134115135115136115137115138115139115140115141115142115143115144115145115146115147115148115149115150115151115152115153115154115155115156115157115158115159115160115161115162115163115164115165115166115167115168115169115170115171115172115173115174115175115176115177115178115179115180115181115182115183115184115185115186115187115188115189115190115191115192115193115194115195115196115197115198115199115200115201115202115203115204115205115206115207115208115209115210115211115212115213115214115215115216115217115218115219115220115221115222115223115224115225115226115227115228115229115230115231115232115233115234115235115236115237115238115239115240115241115242115243115244115245115246115247115248115249115250115251115252115253115254115255115256115257115258115259115260115261115262115263115264115265115266115267115268115269115270115271115272115273115274115275115276115277115278115279115280115281115282115283115284115285115286115287115288115289115290115291115292115293115294115295115296115297115298115299115300115301115302115303115304115305115306115307115308115309115310115311115312115313115314115315115316115317115318115319115320115321115322115323115324115325115326115327115328115329115330115331115332115333115334115335115336115337115338115339115340115341115342115343115344115345115346115347115348115349115350115351115352115353115354115355115356115357115358115359115360115361115362115363115364115365115366115367115368115369115370115371115372115373115374115375115376115377115378115379115380115381115382115383115384115385115386115387115388115389115390115391115392115393115394115395115396115397115398115399115400115401115402115403115404115405115406115407115408115409115410115411115412115413115414115415115416115417115418115419115420115421115422115423115424115425115426115427115428115429115430115431115432115433115434115435115436115437115438115439115440115441115442115443115444115445115446115447115448115449115450115451115452115453115454115455115456115457115458115459115460115461115462115463115464115465115466115467115468115469115470115471115472115473115474115475115476115477115478115479115480115481115482115483115484115485115486115487115488115489115490115491115492115493115494115495115496115497115498115499115500115501115502115503115504115505115506115507115508115509115510115511115512115513115514115515115516115517115518115519115520115521115522115523115524115525115526115527115528115529115530115531115532115533115534115535115536115537115538115539115540115541115542115543115544115545115546115547115548115549115550115551115552115553115554115555115556115557115558115559115560115561115562115563115564115565115566115567115568115569115570115571115572115573115574115575115576115577115578115579115580115581115582115583115584115585115586115587115588115589115590115591115592115593115594115595115596115597115598115599115600115601115602115603115604115605115606115607115608115609115610115611115612115613115614115615115616115617115618115619115620115621115622115623115624115625115626115627115628115629115630115631115632115633115634115635115636115637115638115639115640115641115642115643115644115645115646115647115648115649115650115651115652115653115654115655115656115657115658115659115660115661115662115663115664115665115666115667115668115669115670115671115672115673115674115675115676115677115678115679115680115681115682115683115684115685115686115687115688115689115690115691115692115693115694115695115696115697115698115699115700115701115702115703115704115705115706115707115708115709115710115711115712115713115714115715115716115717115718115719115720115721115722115723115724115725115726115727115728115729115730115731115732115733115734115735115736115737115738115739115740115741115742115743115744115745115746115747115748115749115750115751115752115753115754115755115756115757115758115759115760115761115762115763115764115765115766115767115768115769115770115771115772115773115774115775115776115777115778115779115780115781115782115783115784115785115786115787115788115789115790115791115792115793115794115795115796115797115798115799115800115801115802115803115804115805115806115807115808115809115810115811115812115813115814115815115816115817115818115819115820115821115822115823115824115825115826115827115828115829115830115831115832115833115834115835115836115837115838115839115840115841115842115843115844115845115846115847115848115849115850115851115852115853115854115855115856115857115858115859115860115861115862115863115864115865115866115867115868115869115870115871115872115873115874115875115876115877115878115879115880115881115882115883115884115885115886115887115888115889115890115891115892115893115894115895115896115897115898115899115900115901115902115903115904115905115906115907115908115909115910115911115912115913115914115915115916115917115918115919115920115921115922115923115924115925115926115927115928115929115930115931115932115933115934115935115936115937115938115939115940115941115942115943115944115945115946115947115948115949115950115951115952115953115954115955115956115957115958115959115960115961115962115963115964115965115966115967115968115969115970115971115972115973115974115975115976115977115978115979115980115981115982115983115984115985115986115987115988115989115990115991115992115993115994115995115996115997115998115999116000116001116002116003116004116005116006116007116008116009116010116011116012116013116014116015116016116017116018116019116020116021116022116023116024116025116026116027116028116029116030116031116032116033116034116035116036116037116038116039116040116041116042116043116044116045116046116047116048116049116050116051116052116053116054116055116056116057116058116059116060116061116062116063116064116065116066116067116068116069116070116071116072116073116074116075116076116077116078116079116080116081116082116083116084116085116086116087116088116089116090116091116092116093116094116095116096116097116098116099116100116101116102116103116104116105116106116107116108116109116110116111116112116113116114116115116116116117116118116119116120116121116122116123116124116125116126116127116128116129116130116131116132116133116134116135116136116137116138116139116140116141116142116143116144116145116146116147116148116149116150116151116152116153116154116155116156116157116158116159116160116161116162116163116164116165116166116167116168116169116170116171116172116173116174116175116176116177116178116179116180116181116182116183116184116185116186116187116188116189116190116191116192116193116194116195116196116197116198116199116200116201116202116203116204116205116206116207116208116209116210116211116212116213116214116215116216116217116218116219116220116221116222116223116224116225116226116227116228116229116230116231116232116233116234116235116236116237116238116239116240116241116242116243116244116245116246116247116248116249116250116251116252116253116254116255116256116257116258116259116260116261116262116263116264116265116266116267116268116269116270116271116272116273116274116275116276116277116278116279116280116281116282116283116284116285116286116287116288116289116290116291116292116293116294116295116296116297116298116299116300116301116302116303116304116305116306116307116308116309116310116311116312116313116314116315116316116317116318116319116320116321116322116323116324116325116326116327116328116329116330116331116332116333116334116335116336116337116338116339116340116341116342116343116344116345116346116347116348116349116350116351116352116353116354116355116356116357116358116359116360116361116362116363116364116365116366116367116368116369116370116371116372116373116374116375116376116377116378116379116380116381116382116383116384116385116386116387116388116389116390116391116392116393116394116395116396116397116398116399116400116401116402116403116404116405116406116407116408116409116410116411116412116413116414116415116416116417116418116419116420116421116422116423116424116425116426116427116428116429116430116431116432116433116434116435116436116437116438116439116440116441116442116443116444116445116446116447116448116449116450116451116452116453116454116455116456116457116458116459116460116461116462116463116464116465116466116467116468116469116470116471116472116473116474116475116476116477116478116479116480116481116482116483116484116485116486116487116488116489116490116491116492116493116494116495116496116497116498116499116500116501116502116503116504116505116506116507116508116509116510116511116512116513116514116515116516116517116518116519116520116521116522116523116524116525116526116527116528116529116530116531116532116533116534116535116536116537116538116539116540116541116542116543116544116545116546116547116548116549116550116551116552116553116554116555116556116557116558116559116560116561116562116563116564116565116566116567116568116569116570116571116572116573116574116575116576116577116578116579116580116581116582116583116584116585116586116587116588116589116590116591116592116593116594116595116596116597116598116599116600116601116602116603116604116605116606116607116608116609116610116611116612116613116614116615116616116617116618116619116620116621116622116623116624116625116626116627116628116629116630116631116632116633116634116635116636116637116638116639116640116641116642116643116644116645116646116647116648116649116650116651116652116653116654116655116656116657116658116659116660116661116662116663116664116665116666116667116668116669116670116671116672116673116674116675116676116677116678116679116680116681116682116683116684116685116686116687116688116689116690116691116692116693116694116695116696116697116698116699116700116701116702116703116704116705116706116707116708116709116710116711116712116713116714116715116716116717116718116719116720116721116722116723116724116725116726116727116728116729116730116731116732116733116734116735116736116737116738116739116740116741116742116743116744116745116746116747116748116749116750116751116752116753116754116755116756116757116758116759116760116761116762116763116764116765116766116767116768116769116770116771116772116773116774116775116776116777116778116779116780116781116782116783116784116785116786116787116788116789116790116791116792116793116794116795116796116797116798116799116800116801116802116803116804116805116806116807116808116809116810116811116812116813116814116815116816116817116818116819116820116821116822116823116824116825116826116827116828116829116830116831116832116833116834116835116836116837116838116839116840116841116842116843116844116845116846116847116848116849116850116851116852116853116854116855116856116857116858116859116860116861116862116863116864116865116866116867116868116869116870116871116872116873116874116875116876116877116878116879116880116881116882116883116884116885116886116887116888116889116890116891116892116893116894116895116896116897116898116899116900116901116902116903116904116905116906116907116908116909116910116911116912116913116914116915116916116917116918116919116920116921116922116923116924116925116926116927116928116929116930116931116932116933116934116935116936116937116938116939116940116941116942116943116944116945116946116947116948116949116950116951116952116953116954116955116956116957116958116959116960116961116962116963116964116965116966116967116968116969116970116971116972116973116974116975116976116977116978116979116980116981116982116983116984116985116986116987116988116989116990116991116992116993116994116995116996116997116998116999117000117001117002117003117004117005117006117007117008117009117010117011117012117013117014117015117016117017117018117019117020117021117022117023117024117025117026117027117028117029117030117031117032117033117034117035117036117037117038117039117040117041117042117043117044117045117046117047117048117049117050117051117052117053117054117055117056117057117058117059117060117061117062117063117064117065117066117067117068117069117070117071117072117073117074117075117076117077117078117079117080117081117082117083117084117085117086117087117088117089117090117091117092117093117094117095117096117097117098117099117100117101117102117103117104117105117106117107117108117109117110117111117112117113117114117115117116117117117118117119117120117121117122117123117124117125117126117127117128117129117130117131117132117133117134117135117136117137
  1. unit pic32mx795f512h;
  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. TTMR23_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. TTMR23Registers = record
  455. T2CONbits : TTMR23_T2CON;
  456. T2CON : longWord;
  457. T2CONCLR : longWord;
  458. T2CONSET : longWord;
  459. T2CONINV : longWord;
  460. TMR2 : longWord;
  461. TMR2CLR : longWord;
  462. TMR2SET : longWord;
  463. TMR2INV : longWord;
  464. PR2 : longWord;
  465. PR2CLR : longWord;
  466. PR2SET : longWord;
  467. PR2INV : longWord;
  468. end;
  469. TTMR3_T3CON = record
  470. private
  471. function getON : TBits_1; inline;
  472. function getSIDL : TBits_1; inline;
  473. function getTCKPS : TBits_3; inline;
  474. function getTCKPS0 : TBits_1; inline;
  475. function getTCKPS1 : TBits_1; inline;
  476. function getTCKPS2 : TBits_1; inline;
  477. function getTGATE : TBits_1; inline;
  478. function getTON : TBits_1; inline;
  479. function getTSIDL : TBits_1; inline;
  480. function getw : TBits_32; inline;
  481. procedure setON(thebits : TBits_1); inline;
  482. procedure setSIDL(thebits : TBits_1); inline;
  483. procedure setTCKPS(thebits : TBits_3); inline;
  484. procedure setTCKPS0(thebits : TBits_1); inline;
  485. procedure setTCKPS1(thebits : TBits_1); inline;
  486. procedure setTCKPS2(thebits : TBits_1); inline;
  487. procedure setTGATE(thebits : TBits_1); inline;
  488. procedure setTON(thebits : TBits_1); inline;
  489. procedure setTSIDL(thebits : TBits_1); inline;
  490. procedure setw(thebits : TBits_32); inline;
  491. public
  492. procedure clearON; inline;
  493. procedure clearSIDL; inline;
  494. procedure clearTCKPS0; inline;
  495. procedure clearTCKPS1; inline;
  496. procedure clearTCKPS2; inline;
  497. procedure clearTGATE; inline;
  498. procedure clearTON; inline;
  499. procedure clearTSIDL; inline;
  500. procedure setON; inline;
  501. procedure setSIDL; inline;
  502. procedure setTCKPS0; inline;
  503. procedure setTCKPS1; inline;
  504. procedure setTCKPS2; inline;
  505. procedure setTGATE; inline;
  506. procedure setTON; inline;
  507. procedure setTSIDL; inline;
  508. property ON : TBits_1 read getON write setON;
  509. property SIDL : TBits_1 read getSIDL write setSIDL;
  510. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  511. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  512. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  513. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  514. property TGATE : TBits_1 read getTGATE write setTGATE;
  515. property TON : TBits_1 read getTON write setTON;
  516. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  517. property w : TBits_32 read getw write setw;
  518. end;
  519. type
  520. TTMR3Registers = record
  521. T3CONbits : TTMR3_T3CON;
  522. T3CON : longWord;
  523. T3CONCLR : longWord;
  524. T3CONSET : longWord;
  525. T3CONINV : longWord;
  526. TMR3 : longWord;
  527. TMR3CLR : longWord;
  528. TMR3SET : longWord;
  529. TMR3INV : longWord;
  530. PR3 : longWord;
  531. PR3CLR : longWord;
  532. PR3SET : longWord;
  533. PR3INV : longWord;
  534. end;
  535. TTMR4_T4CON = record
  536. private
  537. function getON : TBits_1; inline;
  538. function getSIDL : TBits_1; inline;
  539. function getT32 : TBits_1; inline;
  540. function getTCKPS : TBits_3; inline;
  541. function getTCKPS0 : TBits_1; inline;
  542. function getTCKPS1 : TBits_1; inline;
  543. function getTCKPS2 : TBits_1; inline;
  544. function getTGATE : TBits_1; inline;
  545. function getTON : TBits_1; inline;
  546. function getTSIDL : TBits_1; inline;
  547. function getw : TBits_32; inline;
  548. procedure setON(thebits : TBits_1); inline;
  549. procedure setSIDL(thebits : TBits_1); inline;
  550. procedure setT32(thebits : TBits_1); inline;
  551. procedure setTCKPS(thebits : TBits_3); inline;
  552. procedure setTCKPS0(thebits : TBits_1); inline;
  553. procedure setTCKPS1(thebits : TBits_1); inline;
  554. procedure setTCKPS2(thebits : TBits_1); inline;
  555. procedure setTGATE(thebits : TBits_1); inline;
  556. procedure setTON(thebits : TBits_1); inline;
  557. procedure setTSIDL(thebits : TBits_1); inline;
  558. procedure setw(thebits : TBits_32); inline;
  559. public
  560. procedure clearON; inline;
  561. procedure clearSIDL; inline;
  562. procedure clearT32; inline;
  563. procedure clearTCKPS0; inline;
  564. procedure clearTCKPS1; inline;
  565. procedure clearTCKPS2; inline;
  566. procedure clearTGATE; inline;
  567. procedure clearTON; inline;
  568. procedure clearTSIDL; inline;
  569. procedure setON; inline;
  570. procedure setSIDL; inline;
  571. procedure setT32; inline;
  572. procedure setTCKPS0; inline;
  573. procedure setTCKPS1; inline;
  574. procedure setTCKPS2; inline;
  575. procedure setTGATE; inline;
  576. procedure setTON; inline;
  577. procedure setTSIDL; inline;
  578. property ON : TBits_1 read getON write setON;
  579. property SIDL : TBits_1 read getSIDL write setSIDL;
  580. property T32 : TBits_1 read getT32 write setT32;
  581. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  582. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  583. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  584. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  585. property TGATE : TBits_1 read getTGATE write setTGATE;
  586. property TON : TBits_1 read getTON write setTON;
  587. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  588. property w : TBits_32 read getw write setw;
  589. end;
  590. type
  591. TTMR4Registers = record
  592. T4CONbits : TTMR4_T4CON;
  593. T4CON : longWord;
  594. T4CONCLR : longWord;
  595. T4CONSET : longWord;
  596. T4CONINV : longWord;
  597. TMR4 : longWord;
  598. TMR4CLR : longWord;
  599. TMR4SET : longWord;
  600. TMR4INV : longWord;
  601. PR4 : longWord;
  602. PR4CLR : longWord;
  603. PR4SET : longWord;
  604. PR4INV : longWord;
  605. end;
  606. TTMR5_T5CON = record
  607. private
  608. function getON : TBits_1; inline;
  609. function getSIDL : TBits_1; inline;
  610. function getTCKPS : TBits_3; inline;
  611. function getTCKPS0 : TBits_1; inline;
  612. function getTCKPS1 : TBits_1; inline;
  613. function getTCKPS2 : TBits_1; inline;
  614. function getTGATE : TBits_1; inline;
  615. function getTON : TBits_1; inline;
  616. function getTSIDL : TBits_1; inline;
  617. function getw : TBits_32; inline;
  618. procedure setON(thebits : TBits_1); inline;
  619. procedure setSIDL(thebits : TBits_1); inline;
  620. procedure setTCKPS(thebits : TBits_3); inline;
  621. procedure setTCKPS0(thebits : TBits_1); inline;
  622. procedure setTCKPS1(thebits : TBits_1); inline;
  623. procedure setTCKPS2(thebits : TBits_1); inline;
  624. procedure setTGATE(thebits : TBits_1); inline;
  625. procedure setTON(thebits : TBits_1); inline;
  626. procedure setTSIDL(thebits : TBits_1); inline;
  627. procedure setw(thebits : TBits_32); inline;
  628. public
  629. procedure clearON; inline;
  630. procedure clearSIDL; inline;
  631. procedure clearTCKPS0; inline;
  632. procedure clearTCKPS1; inline;
  633. procedure clearTCKPS2; inline;
  634. procedure clearTGATE; inline;
  635. procedure clearTON; inline;
  636. procedure clearTSIDL; inline;
  637. procedure setON; inline;
  638. procedure setSIDL; inline;
  639. procedure setTCKPS0; inline;
  640. procedure setTCKPS1; inline;
  641. procedure setTCKPS2; inline;
  642. procedure setTGATE; inline;
  643. procedure setTON; inline;
  644. procedure setTSIDL; inline;
  645. property ON : TBits_1 read getON write setON;
  646. property SIDL : TBits_1 read getSIDL write setSIDL;
  647. property TCKPS : TBits_3 read getTCKPS write setTCKPS;
  648. property TCKPS0 : TBits_1 read getTCKPS0 write setTCKPS0;
  649. property TCKPS1 : TBits_1 read getTCKPS1 write setTCKPS1;
  650. property TCKPS2 : TBits_1 read getTCKPS2 write setTCKPS2;
  651. property TGATE : TBits_1 read getTGATE write setTGATE;
  652. property TON : TBits_1 read getTON write setTON;
  653. property TSIDL : TBits_1 read getTSIDL write setTSIDL;
  654. property w : TBits_32 read getw write setw;
  655. end;
  656. type
  657. TTMR5Registers = record
  658. T5CONbits : TTMR5_T5CON;
  659. T5CON : longWord;
  660. T5CONCLR : longWord;
  661. T5CONSET : longWord;
  662. T5CONINV : longWord;
  663. TMR5 : longWord;
  664. TMR5CLR : longWord;
  665. TMR5SET : longWord;
  666. TMR5INV : longWord;
  667. PR5 : longWord;
  668. PR5CLR : longWord;
  669. PR5SET : longWord;
  670. PR5INV : longWord;
  671. end;
  672. TICAP1_IC1CON = record
  673. private
  674. function getC32 : TBits_1; inline;
  675. function getFEDGE : TBits_1; inline;
  676. function getICBNE : TBits_1; inline;
  677. function getICI : TBits_2; inline;
  678. function getICI0 : TBits_1; inline;
  679. function getICI1 : TBits_1; inline;
  680. function getICM : TBits_3; inline;
  681. function getICM0 : TBits_1; inline;
  682. function getICM1 : TBits_1; inline;
  683. function getICM2 : TBits_1; inline;
  684. function getICOV : TBits_1; inline;
  685. function getICSIDL : TBits_1; inline;
  686. function getICTMR : TBits_1; inline;
  687. function getON : TBits_1; inline;
  688. function getSIDL : TBits_1; inline;
  689. function getw : TBits_32; inline;
  690. procedure setC32(thebits : TBits_1); inline;
  691. procedure setFEDGE(thebits : TBits_1); inline;
  692. procedure setICBNE(thebits : TBits_1); inline;
  693. procedure setICI(thebits : TBits_2); inline;
  694. procedure setICI0(thebits : TBits_1); inline;
  695. procedure setICI1(thebits : TBits_1); inline;
  696. procedure setICM(thebits : TBits_3); inline;
  697. procedure setICM0(thebits : TBits_1); inline;
  698. procedure setICM1(thebits : TBits_1); inline;
  699. procedure setICM2(thebits : TBits_1); inline;
  700. procedure setICOV(thebits : TBits_1); inline;
  701. procedure setICSIDL(thebits : TBits_1); inline;
  702. procedure setICTMR(thebits : TBits_1); inline;
  703. procedure setON(thebits : TBits_1); inline;
  704. procedure setSIDL(thebits : TBits_1); inline;
  705. procedure setw(thebits : TBits_32); inline;
  706. public
  707. procedure clearC32; inline;
  708. procedure clearFEDGE; inline;
  709. procedure clearICBNE; inline;
  710. procedure clearICI0; inline;
  711. procedure clearICI1; inline;
  712. procedure clearICM0; inline;
  713. procedure clearICM1; inline;
  714. procedure clearICM2; inline;
  715. procedure clearICOV; inline;
  716. procedure clearICSIDL; inline;
  717. procedure clearICTMR; inline;
  718. procedure clearON; inline;
  719. procedure clearSIDL; inline;
  720. procedure setC32; inline;
  721. procedure setFEDGE; inline;
  722. procedure setICBNE; inline;
  723. procedure setICI0; inline;
  724. procedure setICI1; inline;
  725. procedure setICM0; inline;
  726. procedure setICM1; inline;
  727. procedure setICM2; inline;
  728. procedure setICOV; inline;
  729. procedure setICSIDL; inline;
  730. procedure setICTMR; inline;
  731. procedure setON; inline;
  732. procedure setSIDL; inline;
  733. property C32 : TBits_1 read getC32 write setC32;
  734. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  735. property ICBNE : TBits_1 read getICBNE write setICBNE;
  736. property ICI : TBits_2 read getICI write setICI;
  737. property ICI0 : TBits_1 read getICI0 write setICI0;
  738. property ICI1 : TBits_1 read getICI1 write setICI1;
  739. property ICM : TBits_3 read getICM write setICM;
  740. property ICM0 : TBits_1 read getICM0 write setICM0;
  741. property ICM1 : TBits_1 read getICM1 write setICM1;
  742. property ICM2 : TBits_1 read getICM2 write setICM2;
  743. property ICOV : TBits_1 read getICOV write setICOV;
  744. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  745. property ICTMR : TBits_1 read getICTMR write setICTMR;
  746. property ON : TBits_1 read getON write setON;
  747. property SIDL : TBits_1 read getSIDL write setSIDL;
  748. property w : TBits_32 read getw write setw;
  749. end;
  750. type
  751. TICAP1Registers = record
  752. IC1CONbits : TICAP1_IC1CON;
  753. IC1CON : longWord;
  754. IC1CONCLR : longWord;
  755. IC1CONSET : longWord;
  756. IC1CONINV : longWord;
  757. IC1BUF : longWord;
  758. end;
  759. TICAP2_IC2CON = record
  760. private
  761. function getC32 : TBits_1; inline;
  762. function getFEDGE : TBits_1; inline;
  763. function getICBNE : TBits_1; inline;
  764. function getICI : TBits_2; inline;
  765. function getICI0 : TBits_1; inline;
  766. function getICI1 : TBits_1; inline;
  767. function getICM : TBits_3; inline;
  768. function getICM0 : TBits_1; inline;
  769. function getICM1 : TBits_1; inline;
  770. function getICM2 : TBits_1; inline;
  771. function getICOV : TBits_1; inline;
  772. function getICSIDL : TBits_1; inline;
  773. function getICTMR : TBits_1; inline;
  774. function getON : TBits_1; inline;
  775. function getSIDL : TBits_1; inline;
  776. function getw : TBits_32; inline;
  777. procedure setC32(thebits : TBits_1); inline;
  778. procedure setFEDGE(thebits : TBits_1); inline;
  779. procedure setICBNE(thebits : TBits_1); inline;
  780. procedure setICI(thebits : TBits_2); inline;
  781. procedure setICI0(thebits : TBits_1); inline;
  782. procedure setICI1(thebits : TBits_1); inline;
  783. procedure setICM(thebits : TBits_3); inline;
  784. procedure setICM0(thebits : TBits_1); inline;
  785. procedure setICM1(thebits : TBits_1); inline;
  786. procedure setICM2(thebits : TBits_1); inline;
  787. procedure setICOV(thebits : TBits_1); inline;
  788. procedure setICSIDL(thebits : TBits_1); inline;
  789. procedure setICTMR(thebits : TBits_1); inline;
  790. procedure setON(thebits : TBits_1); inline;
  791. procedure setSIDL(thebits : TBits_1); inline;
  792. procedure setw(thebits : TBits_32); inline;
  793. public
  794. procedure clearC32; inline;
  795. procedure clearFEDGE; inline;
  796. procedure clearICBNE; inline;
  797. procedure clearICI0; inline;
  798. procedure clearICI1; inline;
  799. procedure clearICM0; inline;
  800. procedure clearICM1; inline;
  801. procedure clearICM2; inline;
  802. procedure clearICOV; inline;
  803. procedure clearICSIDL; inline;
  804. procedure clearICTMR; inline;
  805. procedure clearON; inline;
  806. procedure clearSIDL; inline;
  807. procedure setC32; inline;
  808. procedure setFEDGE; inline;
  809. procedure setICBNE; inline;
  810. procedure setICI0; inline;
  811. procedure setICI1; inline;
  812. procedure setICM0; inline;
  813. procedure setICM1; inline;
  814. procedure setICM2; inline;
  815. procedure setICOV; inline;
  816. procedure setICSIDL; inline;
  817. procedure setICTMR; inline;
  818. procedure setON; inline;
  819. procedure setSIDL; inline;
  820. property C32 : TBits_1 read getC32 write setC32;
  821. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  822. property ICBNE : TBits_1 read getICBNE write setICBNE;
  823. property ICI : TBits_2 read getICI write setICI;
  824. property ICI0 : TBits_1 read getICI0 write setICI0;
  825. property ICI1 : TBits_1 read getICI1 write setICI1;
  826. property ICM : TBits_3 read getICM write setICM;
  827. property ICM0 : TBits_1 read getICM0 write setICM0;
  828. property ICM1 : TBits_1 read getICM1 write setICM1;
  829. property ICM2 : TBits_1 read getICM2 write setICM2;
  830. property ICOV : TBits_1 read getICOV write setICOV;
  831. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  832. property ICTMR : TBits_1 read getICTMR write setICTMR;
  833. property ON : TBits_1 read getON write setON;
  834. property SIDL : TBits_1 read getSIDL write setSIDL;
  835. property w : TBits_32 read getw write setw;
  836. end;
  837. type
  838. TICAP2Registers = record
  839. IC2CONbits : TICAP2_IC2CON;
  840. IC2CON : longWord;
  841. IC2CONCLR : longWord;
  842. IC2CONSET : longWord;
  843. IC2CONINV : longWord;
  844. IC2BUF : longWord;
  845. end;
  846. TICAP3_IC3CON = record
  847. private
  848. function getC32 : TBits_1; inline;
  849. function getFEDGE : TBits_1; inline;
  850. function getICBNE : TBits_1; inline;
  851. function getICI : TBits_2; inline;
  852. function getICI0 : TBits_1; inline;
  853. function getICI1 : TBits_1; inline;
  854. function getICM : TBits_3; inline;
  855. function getICM0 : TBits_1; inline;
  856. function getICM1 : TBits_1; inline;
  857. function getICM2 : TBits_1; inline;
  858. function getICOV : TBits_1; inline;
  859. function getICSIDL : TBits_1; inline;
  860. function getICTMR : TBits_1; inline;
  861. function getON : TBits_1; inline;
  862. function getSIDL : TBits_1; inline;
  863. function getw : TBits_32; inline;
  864. procedure setC32(thebits : TBits_1); inline;
  865. procedure setFEDGE(thebits : TBits_1); inline;
  866. procedure setICBNE(thebits : TBits_1); inline;
  867. procedure setICI(thebits : TBits_2); inline;
  868. procedure setICI0(thebits : TBits_1); inline;
  869. procedure setICI1(thebits : TBits_1); inline;
  870. procedure setICM(thebits : TBits_3); inline;
  871. procedure setICM0(thebits : TBits_1); inline;
  872. procedure setICM1(thebits : TBits_1); inline;
  873. procedure setICM2(thebits : TBits_1); inline;
  874. procedure setICOV(thebits : TBits_1); inline;
  875. procedure setICSIDL(thebits : TBits_1); inline;
  876. procedure setICTMR(thebits : TBits_1); inline;
  877. procedure setON(thebits : TBits_1); inline;
  878. procedure setSIDL(thebits : TBits_1); inline;
  879. procedure setw(thebits : TBits_32); inline;
  880. public
  881. procedure clearC32; inline;
  882. procedure clearFEDGE; inline;
  883. procedure clearICBNE; inline;
  884. procedure clearICI0; inline;
  885. procedure clearICI1; inline;
  886. procedure clearICM0; inline;
  887. procedure clearICM1; inline;
  888. procedure clearICM2; inline;
  889. procedure clearICOV; inline;
  890. procedure clearICSIDL; inline;
  891. procedure clearICTMR; inline;
  892. procedure clearON; inline;
  893. procedure clearSIDL; inline;
  894. procedure setC32; inline;
  895. procedure setFEDGE; inline;
  896. procedure setICBNE; inline;
  897. procedure setICI0; inline;
  898. procedure setICI1; inline;
  899. procedure setICM0; inline;
  900. procedure setICM1; inline;
  901. procedure setICM2; inline;
  902. procedure setICOV; inline;
  903. procedure setICSIDL; inline;
  904. procedure setICTMR; inline;
  905. procedure setON; inline;
  906. procedure setSIDL; inline;
  907. property C32 : TBits_1 read getC32 write setC32;
  908. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  909. property ICBNE : TBits_1 read getICBNE write setICBNE;
  910. property ICI : TBits_2 read getICI write setICI;
  911. property ICI0 : TBits_1 read getICI0 write setICI0;
  912. property ICI1 : TBits_1 read getICI1 write setICI1;
  913. property ICM : TBits_3 read getICM write setICM;
  914. property ICM0 : TBits_1 read getICM0 write setICM0;
  915. property ICM1 : TBits_1 read getICM1 write setICM1;
  916. property ICM2 : TBits_1 read getICM2 write setICM2;
  917. property ICOV : TBits_1 read getICOV write setICOV;
  918. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  919. property ICTMR : TBits_1 read getICTMR write setICTMR;
  920. property ON : TBits_1 read getON write setON;
  921. property SIDL : TBits_1 read getSIDL write setSIDL;
  922. property w : TBits_32 read getw write setw;
  923. end;
  924. type
  925. TICAP3Registers = record
  926. IC3CONbits : TICAP3_IC3CON;
  927. IC3CON : longWord;
  928. IC3CONCLR : longWord;
  929. IC3CONSET : longWord;
  930. IC3CONINV : longWord;
  931. IC3BUF : longWord;
  932. end;
  933. TICAP4_IC4CON = record
  934. private
  935. function getC32 : TBits_1; inline;
  936. function getFEDGE : TBits_1; inline;
  937. function getICBNE : TBits_1; inline;
  938. function getICI : TBits_2; inline;
  939. function getICI0 : TBits_1; inline;
  940. function getICI1 : TBits_1; inline;
  941. function getICM : TBits_3; inline;
  942. function getICM0 : TBits_1; inline;
  943. function getICM1 : TBits_1; inline;
  944. function getICM2 : TBits_1; inline;
  945. function getICOV : TBits_1; inline;
  946. function getICSIDL : TBits_1; inline;
  947. function getICTMR : TBits_1; inline;
  948. function getON : TBits_1; inline;
  949. function getSIDL : TBits_1; inline;
  950. function getw : TBits_32; inline;
  951. procedure setC32(thebits : TBits_1); inline;
  952. procedure setFEDGE(thebits : TBits_1); inline;
  953. procedure setICBNE(thebits : TBits_1); inline;
  954. procedure setICI(thebits : TBits_2); inline;
  955. procedure setICI0(thebits : TBits_1); inline;
  956. procedure setICI1(thebits : TBits_1); inline;
  957. procedure setICM(thebits : TBits_3); inline;
  958. procedure setICM0(thebits : TBits_1); inline;
  959. procedure setICM1(thebits : TBits_1); inline;
  960. procedure setICM2(thebits : TBits_1); inline;
  961. procedure setICOV(thebits : TBits_1); inline;
  962. procedure setICSIDL(thebits : TBits_1); inline;
  963. procedure setICTMR(thebits : TBits_1); inline;
  964. procedure setON(thebits : TBits_1); inline;
  965. procedure setSIDL(thebits : TBits_1); inline;
  966. procedure setw(thebits : TBits_32); inline;
  967. public
  968. procedure clearC32; inline;
  969. procedure clearFEDGE; inline;
  970. procedure clearICBNE; inline;
  971. procedure clearICI0; inline;
  972. procedure clearICI1; inline;
  973. procedure clearICM0; inline;
  974. procedure clearICM1; inline;
  975. procedure clearICM2; inline;
  976. procedure clearICOV; inline;
  977. procedure clearICSIDL; inline;
  978. procedure clearICTMR; inline;
  979. procedure clearON; inline;
  980. procedure clearSIDL; inline;
  981. procedure setC32; inline;
  982. procedure setFEDGE; inline;
  983. procedure setICBNE; inline;
  984. procedure setICI0; inline;
  985. procedure setICI1; inline;
  986. procedure setICM0; inline;
  987. procedure setICM1; inline;
  988. procedure setICM2; inline;
  989. procedure setICOV; inline;
  990. procedure setICSIDL; inline;
  991. procedure setICTMR; inline;
  992. procedure setON; inline;
  993. procedure setSIDL; inline;
  994. property C32 : TBits_1 read getC32 write setC32;
  995. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  996. property ICBNE : TBits_1 read getICBNE write setICBNE;
  997. property ICI : TBits_2 read getICI write setICI;
  998. property ICI0 : TBits_1 read getICI0 write setICI0;
  999. property ICI1 : TBits_1 read getICI1 write setICI1;
  1000. property ICM : TBits_3 read getICM write setICM;
  1001. property ICM0 : TBits_1 read getICM0 write setICM0;
  1002. property ICM1 : TBits_1 read getICM1 write setICM1;
  1003. property ICM2 : TBits_1 read getICM2 write setICM2;
  1004. property ICOV : TBits_1 read getICOV write setICOV;
  1005. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  1006. property ICTMR : TBits_1 read getICTMR write setICTMR;
  1007. property ON : TBits_1 read getON write setON;
  1008. property SIDL : TBits_1 read getSIDL write setSIDL;
  1009. property w : TBits_32 read getw write setw;
  1010. end;
  1011. type
  1012. TICAP4Registers = record
  1013. IC4CONbits : TICAP4_IC4CON;
  1014. IC4CON : longWord;
  1015. IC4CONCLR : longWord;
  1016. IC4CONSET : longWord;
  1017. IC4CONINV : longWord;
  1018. IC4BUF : longWord;
  1019. end;
  1020. TICAP5_IC5CON = record
  1021. private
  1022. function getC32 : TBits_1; inline;
  1023. function getFEDGE : TBits_1; inline;
  1024. function getICBNE : TBits_1; inline;
  1025. function getICI : TBits_2; inline;
  1026. function getICI0 : TBits_1; inline;
  1027. function getICI1 : TBits_1; inline;
  1028. function getICM : TBits_3; inline;
  1029. function getICM0 : TBits_1; inline;
  1030. function getICM1 : TBits_1; inline;
  1031. function getICM2 : TBits_1; inline;
  1032. function getICOV : TBits_1; inline;
  1033. function getICSIDL : TBits_1; inline;
  1034. function getICTMR : TBits_1; inline;
  1035. function getON : TBits_1; inline;
  1036. function getSIDL : TBits_1; inline;
  1037. function getw : TBits_32; inline;
  1038. procedure setC32(thebits : TBits_1); inline;
  1039. procedure setFEDGE(thebits : TBits_1); inline;
  1040. procedure setICBNE(thebits : TBits_1); inline;
  1041. procedure setICI(thebits : TBits_2); inline;
  1042. procedure setICI0(thebits : TBits_1); inline;
  1043. procedure setICI1(thebits : TBits_1); inline;
  1044. procedure setICM(thebits : TBits_3); inline;
  1045. procedure setICM0(thebits : TBits_1); inline;
  1046. procedure setICM1(thebits : TBits_1); inline;
  1047. procedure setICM2(thebits : TBits_1); inline;
  1048. procedure setICOV(thebits : TBits_1); inline;
  1049. procedure setICSIDL(thebits : TBits_1); inline;
  1050. procedure setICTMR(thebits : TBits_1); inline;
  1051. procedure setON(thebits : TBits_1); inline;
  1052. procedure setSIDL(thebits : TBits_1); inline;
  1053. procedure setw(thebits : TBits_32); inline;
  1054. public
  1055. procedure clearC32; inline;
  1056. procedure clearFEDGE; inline;
  1057. procedure clearICBNE; inline;
  1058. procedure clearICI0; inline;
  1059. procedure clearICI1; inline;
  1060. procedure clearICM0; inline;
  1061. procedure clearICM1; inline;
  1062. procedure clearICM2; inline;
  1063. procedure clearICOV; inline;
  1064. procedure clearICSIDL; inline;
  1065. procedure clearICTMR; inline;
  1066. procedure clearON; inline;
  1067. procedure clearSIDL; inline;
  1068. procedure setC32; inline;
  1069. procedure setFEDGE; inline;
  1070. procedure setICBNE; inline;
  1071. procedure setICI0; inline;
  1072. procedure setICI1; inline;
  1073. procedure setICM0; inline;
  1074. procedure setICM1; inline;
  1075. procedure setICM2; inline;
  1076. procedure setICOV; inline;
  1077. procedure setICSIDL; inline;
  1078. procedure setICTMR; inline;
  1079. procedure setON; inline;
  1080. procedure setSIDL; inline;
  1081. property C32 : TBits_1 read getC32 write setC32;
  1082. property FEDGE : TBits_1 read getFEDGE write setFEDGE;
  1083. property ICBNE : TBits_1 read getICBNE write setICBNE;
  1084. property ICI : TBits_2 read getICI write setICI;
  1085. property ICI0 : TBits_1 read getICI0 write setICI0;
  1086. property ICI1 : TBits_1 read getICI1 write setICI1;
  1087. property ICM : TBits_3 read getICM write setICM;
  1088. property ICM0 : TBits_1 read getICM0 write setICM0;
  1089. property ICM1 : TBits_1 read getICM1 write setICM1;
  1090. property ICM2 : TBits_1 read getICM2 write setICM2;
  1091. property ICOV : TBits_1 read getICOV write setICOV;
  1092. property ICSIDL : TBits_1 read getICSIDL write setICSIDL;
  1093. property ICTMR : TBits_1 read getICTMR write setICTMR;
  1094. property ON : TBits_1 read getON write setON;
  1095. property SIDL : TBits_1 read getSIDL write setSIDL;
  1096. property w : TBits_32 read getw write setw;
  1097. end;
  1098. type
  1099. TICAP5Registers = record
  1100. IC5CONbits : TICAP5_IC5CON;
  1101. IC5CON : longWord;
  1102. IC5CONCLR : longWord;
  1103. IC5CONSET : longWord;
  1104. IC5CONINV : longWord;
  1105. IC5BUF : longWord;
  1106. end;
  1107. TOCMP1_OC1CON = record
  1108. private
  1109. function getOC32 : TBits_1; inline;
  1110. function getOCFLT : TBits_1; inline;
  1111. function getOCM : TBits_3; inline;
  1112. function getOCM0 : TBits_1; inline;
  1113. function getOCM1 : TBits_1; inline;
  1114. function getOCM2 : TBits_1; inline;
  1115. function getOCSIDL : TBits_1; inline;
  1116. function getOCTSEL : TBits_1; inline;
  1117. function getON : TBits_1; inline;
  1118. function getSIDL : TBits_1; inline;
  1119. function getw : TBits_32; inline;
  1120. procedure setOC32(thebits : TBits_1); inline;
  1121. procedure setOCFLT(thebits : TBits_1); inline;
  1122. procedure setOCM(thebits : TBits_3); inline;
  1123. procedure setOCM0(thebits : TBits_1); inline;
  1124. procedure setOCM1(thebits : TBits_1); inline;
  1125. procedure setOCM2(thebits : TBits_1); inline;
  1126. procedure setOCSIDL(thebits : TBits_1); inline;
  1127. procedure setOCTSEL(thebits : TBits_1); inline;
  1128. procedure setON(thebits : TBits_1); inline;
  1129. procedure setSIDL(thebits : TBits_1); inline;
  1130. procedure setw(thebits : TBits_32); inline;
  1131. public
  1132. procedure clearOC32; inline;
  1133. procedure clearOCFLT; inline;
  1134. procedure clearOCM0; inline;
  1135. procedure clearOCM1; inline;
  1136. procedure clearOCM2; inline;
  1137. procedure clearOCSIDL; inline;
  1138. procedure clearOCTSEL; inline;
  1139. procedure clearON; inline;
  1140. procedure clearSIDL; inline;
  1141. procedure setOC32; inline;
  1142. procedure setOCFLT; inline;
  1143. procedure setOCM0; inline;
  1144. procedure setOCM1; inline;
  1145. procedure setOCM2; inline;
  1146. procedure setOCSIDL; inline;
  1147. procedure setOCTSEL; inline;
  1148. procedure setON; inline;
  1149. procedure setSIDL; inline;
  1150. property OC32 : TBits_1 read getOC32 write setOC32;
  1151. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1152. property OCM : TBits_3 read getOCM write setOCM;
  1153. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1154. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1155. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1156. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1157. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1158. property ON : TBits_1 read getON write setON;
  1159. property SIDL : TBits_1 read getSIDL write setSIDL;
  1160. property w : TBits_32 read getw write setw;
  1161. end;
  1162. type
  1163. TOCMP1Registers = record
  1164. OC1CONbits : TOCMP1_OC1CON;
  1165. OC1CON : longWord;
  1166. OC1CONCLR : longWord;
  1167. OC1CONSET : longWord;
  1168. OC1CONINV : longWord;
  1169. OC1R : longWord;
  1170. OC1RCLR : longWord;
  1171. OC1RSET : longWord;
  1172. OC1RINV : longWord;
  1173. OC1RS : longWord;
  1174. OC1RSCLR : longWord;
  1175. OC1RSSET : longWord;
  1176. OC1RSINV : longWord;
  1177. end;
  1178. TOCMP2_OC2CON = record
  1179. private
  1180. function getOC32 : TBits_1; inline;
  1181. function getOCFLT : TBits_1; inline;
  1182. function getOCM : TBits_3; inline;
  1183. function getOCM0 : TBits_1; inline;
  1184. function getOCM1 : TBits_1; inline;
  1185. function getOCM2 : TBits_1; inline;
  1186. function getOCSIDL : TBits_1; inline;
  1187. function getOCTSEL : TBits_1; inline;
  1188. function getON : TBits_1; inline;
  1189. function getSIDL : TBits_1; inline;
  1190. function getw : TBits_32; inline;
  1191. procedure setOC32(thebits : TBits_1); inline;
  1192. procedure setOCFLT(thebits : TBits_1); inline;
  1193. procedure setOCM(thebits : TBits_3); inline;
  1194. procedure setOCM0(thebits : TBits_1); inline;
  1195. procedure setOCM1(thebits : TBits_1); inline;
  1196. procedure setOCM2(thebits : TBits_1); inline;
  1197. procedure setOCSIDL(thebits : TBits_1); inline;
  1198. procedure setOCTSEL(thebits : TBits_1); inline;
  1199. procedure setON(thebits : TBits_1); inline;
  1200. procedure setSIDL(thebits : TBits_1); inline;
  1201. procedure setw(thebits : TBits_32); inline;
  1202. public
  1203. procedure clearOC32; inline;
  1204. procedure clearOCFLT; inline;
  1205. procedure clearOCM0; inline;
  1206. procedure clearOCM1; inline;
  1207. procedure clearOCM2; inline;
  1208. procedure clearOCSIDL; inline;
  1209. procedure clearOCTSEL; inline;
  1210. procedure clearON; inline;
  1211. procedure clearSIDL; inline;
  1212. procedure setOC32; inline;
  1213. procedure setOCFLT; inline;
  1214. procedure setOCM0; inline;
  1215. procedure setOCM1; inline;
  1216. procedure setOCM2; inline;
  1217. procedure setOCSIDL; inline;
  1218. procedure setOCTSEL; inline;
  1219. procedure setON; inline;
  1220. procedure setSIDL; inline;
  1221. property OC32 : TBits_1 read getOC32 write setOC32;
  1222. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1223. property OCM : TBits_3 read getOCM write setOCM;
  1224. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1225. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1226. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1227. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1228. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1229. property ON : TBits_1 read getON write setON;
  1230. property SIDL : TBits_1 read getSIDL write setSIDL;
  1231. property w : TBits_32 read getw write setw;
  1232. end;
  1233. type
  1234. TOCMP2Registers = record
  1235. OC2CONbits : TOCMP2_OC2CON;
  1236. OC2CON : longWord;
  1237. OC2CONCLR : longWord;
  1238. OC2CONSET : longWord;
  1239. OC2CONINV : longWord;
  1240. OC2R : longWord;
  1241. OC2RCLR : longWord;
  1242. OC2RSET : longWord;
  1243. OC2RINV : longWord;
  1244. OC2RS : longWord;
  1245. OC2RSCLR : longWord;
  1246. OC2RSSET : longWord;
  1247. OC2RSINV : longWord;
  1248. end;
  1249. TOCMP3_OC3CON = record
  1250. private
  1251. function getOC32 : TBits_1; inline;
  1252. function getOCFLT : TBits_1; inline;
  1253. function getOCM : TBits_3; inline;
  1254. function getOCM0 : TBits_1; inline;
  1255. function getOCM1 : TBits_1; inline;
  1256. function getOCM2 : TBits_1; inline;
  1257. function getOCSIDL : TBits_1; inline;
  1258. function getOCTSEL : TBits_1; inline;
  1259. function getON : TBits_1; inline;
  1260. function getSIDL : TBits_1; inline;
  1261. function getw : TBits_32; inline;
  1262. procedure setOC32(thebits : TBits_1); inline;
  1263. procedure setOCFLT(thebits : TBits_1); inline;
  1264. procedure setOCM(thebits : TBits_3); inline;
  1265. procedure setOCM0(thebits : TBits_1); inline;
  1266. procedure setOCM1(thebits : TBits_1); inline;
  1267. procedure setOCM2(thebits : TBits_1); inline;
  1268. procedure setOCSIDL(thebits : TBits_1); inline;
  1269. procedure setOCTSEL(thebits : TBits_1); inline;
  1270. procedure setON(thebits : TBits_1); inline;
  1271. procedure setSIDL(thebits : TBits_1); inline;
  1272. procedure setw(thebits : TBits_32); inline;
  1273. public
  1274. procedure clearOC32; inline;
  1275. procedure clearOCFLT; inline;
  1276. procedure clearOCM0; inline;
  1277. procedure clearOCM1; inline;
  1278. procedure clearOCM2; inline;
  1279. procedure clearOCSIDL; inline;
  1280. procedure clearOCTSEL; inline;
  1281. procedure clearON; inline;
  1282. procedure clearSIDL; inline;
  1283. procedure setOC32; inline;
  1284. procedure setOCFLT; inline;
  1285. procedure setOCM0; inline;
  1286. procedure setOCM1; inline;
  1287. procedure setOCM2; inline;
  1288. procedure setOCSIDL; inline;
  1289. procedure setOCTSEL; inline;
  1290. procedure setON; inline;
  1291. procedure setSIDL; inline;
  1292. property OC32 : TBits_1 read getOC32 write setOC32;
  1293. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1294. property OCM : TBits_3 read getOCM write setOCM;
  1295. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1296. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1297. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1298. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1299. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1300. property ON : TBits_1 read getON write setON;
  1301. property SIDL : TBits_1 read getSIDL write setSIDL;
  1302. property w : TBits_32 read getw write setw;
  1303. end;
  1304. type
  1305. TOCMP3Registers = record
  1306. OC3CONbits : TOCMP3_OC3CON;
  1307. OC3CON : longWord;
  1308. OC3CONCLR : longWord;
  1309. OC3CONSET : longWord;
  1310. OC3CONINV : longWord;
  1311. OC3R : longWord;
  1312. OC3RCLR : longWord;
  1313. OC3RSET : longWord;
  1314. OC3RINV : longWord;
  1315. OC3RS : longWord;
  1316. OC3RSCLR : longWord;
  1317. OC3RSSET : longWord;
  1318. OC3RSINV : longWord;
  1319. end;
  1320. TOCMP4_OC4CON = record
  1321. private
  1322. function getOC32 : TBits_1; inline;
  1323. function getOCFLT : TBits_1; inline;
  1324. function getOCM : TBits_3; inline;
  1325. function getOCM0 : TBits_1; inline;
  1326. function getOCM1 : TBits_1; inline;
  1327. function getOCM2 : TBits_1; inline;
  1328. function getOCSIDL : TBits_1; inline;
  1329. function getOCTSEL : TBits_1; inline;
  1330. function getON : TBits_1; inline;
  1331. function getSIDL : TBits_1; inline;
  1332. function getw : TBits_32; inline;
  1333. procedure setOC32(thebits : TBits_1); inline;
  1334. procedure setOCFLT(thebits : TBits_1); inline;
  1335. procedure setOCM(thebits : TBits_3); inline;
  1336. procedure setOCM0(thebits : TBits_1); inline;
  1337. procedure setOCM1(thebits : TBits_1); inline;
  1338. procedure setOCM2(thebits : TBits_1); inline;
  1339. procedure setOCSIDL(thebits : TBits_1); inline;
  1340. procedure setOCTSEL(thebits : TBits_1); inline;
  1341. procedure setON(thebits : TBits_1); inline;
  1342. procedure setSIDL(thebits : TBits_1); inline;
  1343. procedure setw(thebits : TBits_32); inline;
  1344. public
  1345. procedure clearOC32; inline;
  1346. procedure clearOCFLT; inline;
  1347. procedure clearOCM0; inline;
  1348. procedure clearOCM1; inline;
  1349. procedure clearOCM2; inline;
  1350. procedure clearOCSIDL; inline;
  1351. procedure clearOCTSEL; inline;
  1352. procedure clearON; inline;
  1353. procedure clearSIDL; inline;
  1354. procedure setOC32; inline;
  1355. procedure setOCFLT; inline;
  1356. procedure setOCM0; inline;
  1357. procedure setOCM1; inline;
  1358. procedure setOCM2; inline;
  1359. procedure setOCSIDL; inline;
  1360. procedure setOCTSEL; inline;
  1361. procedure setON; inline;
  1362. procedure setSIDL; inline;
  1363. property OC32 : TBits_1 read getOC32 write setOC32;
  1364. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1365. property OCM : TBits_3 read getOCM write setOCM;
  1366. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1367. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1368. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1369. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1370. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1371. property ON : TBits_1 read getON write setON;
  1372. property SIDL : TBits_1 read getSIDL write setSIDL;
  1373. property w : TBits_32 read getw write setw;
  1374. end;
  1375. type
  1376. TOCMP4Registers = record
  1377. OC4CONbits : TOCMP4_OC4CON;
  1378. OC4CON : longWord;
  1379. OC4CONCLR : longWord;
  1380. OC4CONSET : longWord;
  1381. OC4CONINV : longWord;
  1382. OC4R : longWord;
  1383. OC4RCLR : longWord;
  1384. OC4RSET : longWord;
  1385. OC4RINV : longWord;
  1386. OC4RS : longWord;
  1387. OC4RSCLR : longWord;
  1388. OC4RSSET : longWord;
  1389. OC4RSINV : longWord;
  1390. end;
  1391. TOCMP5_OC5CON = record
  1392. private
  1393. function getOC32 : TBits_1; inline;
  1394. function getOCFLT : TBits_1; inline;
  1395. function getOCM : TBits_3; inline;
  1396. function getOCM0 : TBits_1; inline;
  1397. function getOCM1 : TBits_1; inline;
  1398. function getOCM2 : TBits_1; inline;
  1399. function getOCSIDL : TBits_1; inline;
  1400. function getOCTSEL : TBits_1; inline;
  1401. function getON : TBits_1; inline;
  1402. function getSIDL : TBits_1; inline;
  1403. function getw : TBits_32; inline;
  1404. procedure setOC32(thebits : TBits_1); inline;
  1405. procedure setOCFLT(thebits : TBits_1); inline;
  1406. procedure setOCM(thebits : TBits_3); inline;
  1407. procedure setOCM0(thebits : TBits_1); inline;
  1408. procedure setOCM1(thebits : TBits_1); inline;
  1409. procedure setOCM2(thebits : TBits_1); inline;
  1410. procedure setOCSIDL(thebits : TBits_1); inline;
  1411. procedure setOCTSEL(thebits : TBits_1); inline;
  1412. procedure setON(thebits : TBits_1); inline;
  1413. procedure setSIDL(thebits : TBits_1); inline;
  1414. procedure setw(thebits : TBits_32); inline;
  1415. public
  1416. procedure clearOC32; inline;
  1417. procedure clearOCFLT; inline;
  1418. procedure clearOCM0; inline;
  1419. procedure clearOCM1; inline;
  1420. procedure clearOCM2; inline;
  1421. procedure clearOCSIDL; inline;
  1422. procedure clearOCTSEL; inline;
  1423. procedure clearON; inline;
  1424. procedure clearSIDL; inline;
  1425. procedure setOC32; inline;
  1426. procedure setOCFLT; inline;
  1427. procedure setOCM0; inline;
  1428. procedure setOCM1; inline;
  1429. procedure setOCM2; inline;
  1430. procedure setOCSIDL; inline;
  1431. procedure setOCTSEL; inline;
  1432. procedure setON; inline;
  1433. procedure setSIDL; inline;
  1434. property OC32 : TBits_1 read getOC32 write setOC32;
  1435. property OCFLT : TBits_1 read getOCFLT write setOCFLT;
  1436. property OCM : TBits_3 read getOCM write setOCM;
  1437. property OCM0 : TBits_1 read getOCM0 write setOCM0;
  1438. property OCM1 : TBits_1 read getOCM1 write setOCM1;
  1439. property OCM2 : TBits_1 read getOCM2 write setOCM2;
  1440. property OCSIDL : TBits_1 read getOCSIDL write setOCSIDL;
  1441. property OCTSEL : TBits_1 read getOCTSEL write setOCTSEL;
  1442. property ON : TBits_1 read getON write setON;
  1443. property SIDL : TBits_1 read getSIDL write setSIDL;
  1444. property w : TBits_32 read getw write setw;
  1445. end;
  1446. type
  1447. TOCMP5Registers = record
  1448. OC5CONbits : TOCMP5_OC5CON;
  1449. OC5CON : longWord;
  1450. OC5CONCLR : longWord;
  1451. OC5CONSET : longWord;
  1452. OC5CONINV : longWord;
  1453. OC5R : longWord;
  1454. OC5RCLR : longWord;
  1455. OC5RSET : longWord;
  1456. OC5RINV : longWord;
  1457. OC5RS : longWord;
  1458. OC5RSCLR : longWord;
  1459. OC5RSSET : longWord;
  1460. OC5RSINV : longWord;
  1461. end;
  1462. TI2C1A_I2C1ACON = record
  1463. private
  1464. function getA10M : TBits_1; inline;
  1465. function getACKDT : TBits_1; inline;
  1466. function getACKEN : TBits_1; inline;
  1467. function getDISSLW : TBits_1; inline;
  1468. function getGCEN : TBits_1; inline;
  1469. function getI2CEN : TBits_1; inline;
  1470. function getI2CSIDL : TBits_1; inline;
  1471. function getIPMIEN : TBits_1; inline;
  1472. function getON : TBits_1; inline;
  1473. function getPEN : TBits_1; inline;
  1474. function getRCEN : TBits_1; inline;
  1475. function getRSEN : TBits_1; inline;
  1476. function getSCLREL : TBits_1; inline;
  1477. function getSEN : TBits_1; inline;
  1478. function getSIDL : TBits_1; inline;
  1479. function getSMEN : TBits_1; inline;
  1480. function getSTREN : TBits_1; inline;
  1481. function getSTRICT : TBits_1; inline;
  1482. function getw : TBits_32; inline;
  1483. procedure setA10M(thebits : TBits_1); inline;
  1484. procedure setACKDT(thebits : TBits_1); inline;
  1485. procedure setACKEN(thebits : TBits_1); inline;
  1486. procedure setDISSLW(thebits : TBits_1); inline;
  1487. procedure setGCEN(thebits : TBits_1); inline;
  1488. procedure setI2CEN(thebits : TBits_1); inline;
  1489. procedure setI2CSIDL(thebits : TBits_1); inline;
  1490. procedure setIPMIEN(thebits : TBits_1); inline;
  1491. procedure setON(thebits : TBits_1); inline;
  1492. procedure setPEN(thebits : TBits_1); inline;
  1493. procedure setRCEN(thebits : TBits_1); inline;
  1494. procedure setRSEN(thebits : TBits_1); inline;
  1495. procedure setSCLREL(thebits : TBits_1); inline;
  1496. procedure setSEN(thebits : TBits_1); inline;
  1497. procedure setSIDL(thebits : TBits_1); inline;
  1498. procedure setSMEN(thebits : TBits_1); inline;
  1499. procedure setSTREN(thebits : TBits_1); inline;
  1500. procedure setSTRICT(thebits : TBits_1); inline;
  1501. procedure setw(thebits : TBits_32); inline;
  1502. public
  1503. procedure clearA10M; inline;
  1504. procedure clearACKDT; inline;
  1505. procedure clearACKEN; inline;
  1506. procedure clearDISSLW; inline;
  1507. procedure clearGCEN; inline;
  1508. procedure clearI2CEN; inline;
  1509. procedure clearI2CSIDL; inline;
  1510. procedure clearIPMIEN; inline;
  1511. procedure clearON; inline;
  1512. procedure clearPEN; inline;
  1513. procedure clearRCEN; inline;
  1514. procedure clearRSEN; inline;
  1515. procedure clearSCLREL; inline;
  1516. procedure clearSEN; inline;
  1517. procedure clearSIDL; inline;
  1518. procedure clearSMEN; inline;
  1519. procedure clearSTREN; inline;
  1520. procedure clearSTRICT; inline;
  1521. procedure setA10M; inline;
  1522. procedure setACKDT; inline;
  1523. procedure setACKEN; inline;
  1524. procedure setDISSLW; inline;
  1525. procedure setGCEN; inline;
  1526. procedure setI2CEN; inline;
  1527. procedure setI2CSIDL; inline;
  1528. procedure setIPMIEN; inline;
  1529. procedure setON; inline;
  1530. procedure setPEN; inline;
  1531. procedure setRCEN; inline;
  1532. procedure setRSEN; inline;
  1533. procedure setSCLREL; inline;
  1534. procedure setSEN; inline;
  1535. procedure setSIDL; inline;
  1536. procedure setSMEN; inline;
  1537. procedure setSTREN; inline;
  1538. procedure setSTRICT; inline;
  1539. property A10M : TBits_1 read getA10M write setA10M;
  1540. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1541. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1542. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1543. property GCEN : TBits_1 read getGCEN write setGCEN;
  1544. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1545. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1546. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1547. property ON : TBits_1 read getON write setON;
  1548. property PEN : TBits_1 read getPEN write setPEN;
  1549. property RCEN : TBits_1 read getRCEN write setRCEN;
  1550. property RSEN : TBits_1 read getRSEN write setRSEN;
  1551. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1552. property SEN : TBits_1 read getSEN write setSEN;
  1553. property SIDL : TBits_1 read getSIDL write setSIDL;
  1554. property SMEN : TBits_1 read getSMEN write setSMEN;
  1555. property STREN : TBits_1 read getSTREN write setSTREN;
  1556. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1557. property w : TBits_32 read getw write setw;
  1558. end;
  1559. TI2C1A_I2C3CON = record
  1560. private
  1561. function getA10M : TBits_1; inline;
  1562. function getACKDT : TBits_1; inline;
  1563. function getACKEN : TBits_1; inline;
  1564. function getDISSLW : TBits_1; inline;
  1565. function getGCEN : TBits_1; inline;
  1566. function getI2CEN : TBits_1; inline;
  1567. function getI2CSIDL : TBits_1; inline;
  1568. function getIPMIEN : TBits_1; inline;
  1569. function getON : TBits_1; inline;
  1570. function getPEN : TBits_1; inline;
  1571. function getRCEN : TBits_1; inline;
  1572. function getRSEN : TBits_1; inline;
  1573. function getSCLREL : TBits_1; inline;
  1574. function getSEN : TBits_1; inline;
  1575. function getSIDL : TBits_1; inline;
  1576. function getSMEN : TBits_1; inline;
  1577. function getSTREN : TBits_1; inline;
  1578. function getSTRICT : TBits_1; inline;
  1579. function getw : TBits_32; inline;
  1580. procedure setA10M(thebits : TBits_1); inline;
  1581. procedure setACKDT(thebits : TBits_1); inline;
  1582. procedure setACKEN(thebits : TBits_1); inline;
  1583. procedure setDISSLW(thebits : TBits_1); inline;
  1584. procedure setGCEN(thebits : TBits_1); inline;
  1585. procedure setI2CEN(thebits : TBits_1); inline;
  1586. procedure setI2CSIDL(thebits : TBits_1); inline;
  1587. procedure setIPMIEN(thebits : TBits_1); inline;
  1588. procedure setON(thebits : TBits_1); inline;
  1589. procedure setPEN(thebits : TBits_1); inline;
  1590. procedure setRCEN(thebits : TBits_1); inline;
  1591. procedure setRSEN(thebits : TBits_1); inline;
  1592. procedure setSCLREL(thebits : TBits_1); inline;
  1593. procedure setSEN(thebits : TBits_1); inline;
  1594. procedure setSIDL(thebits : TBits_1); inline;
  1595. procedure setSMEN(thebits : TBits_1); inline;
  1596. procedure setSTREN(thebits : TBits_1); inline;
  1597. procedure setSTRICT(thebits : TBits_1); inline;
  1598. procedure setw(thebits : TBits_32); inline;
  1599. public
  1600. procedure clearA10M; inline;
  1601. procedure clearACKDT; inline;
  1602. procedure clearACKEN; inline;
  1603. procedure clearDISSLW; inline;
  1604. procedure clearGCEN; inline;
  1605. procedure clearI2CEN; inline;
  1606. procedure clearI2CSIDL; inline;
  1607. procedure clearIPMIEN; inline;
  1608. procedure clearON; inline;
  1609. procedure clearPEN; inline;
  1610. procedure clearRCEN; inline;
  1611. procedure clearRSEN; inline;
  1612. procedure clearSCLREL; inline;
  1613. procedure clearSEN; inline;
  1614. procedure clearSIDL; inline;
  1615. procedure clearSMEN; inline;
  1616. procedure clearSTREN; inline;
  1617. procedure clearSTRICT; inline;
  1618. procedure setA10M; inline;
  1619. procedure setACKDT; inline;
  1620. procedure setACKEN; inline;
  1621. procedure setDISSLW; inline;
  1622. procedure setGCEN; inline;
  1623. procedure setI2CEN; inline;
  1624. procedure setI2CSIDL; inline;
  1625. procedure setIPMIEN; inline;
  1626. procedure setON; inline;
  1627. procedure setPEN; inline;
  1628. procedure setRCEN; inline;
  1629. procedure setRSEN; inline;
  1630. procedure setSCLREL; inline;
  1631. procedure setSEN; inline;
  1632. procedure setSIDL; inline;
  1633. procedure setSMEN; inline;
  1634. procedure setSTREN; inline;
  1635. procedure setSTRICT; inline;
  1636. property A10M : TBits_1 read getA10M write setA10M;
  1637. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1638. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1639. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1640. property GCEN : TBits_1 read getGCEN write setGCEN;
  1641. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1642. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1643. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1644. property ON : TBits_1 read getON write setON;
  1645. property PEN : TBits_1 read getPEN write setPEN;
  1646. property RCEN : TBits_1 read getRCEN write setRCEN;
  1647. property RSEN : TBits_1 read getRSEN write setRSEN;
  1648. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1649. property SEN : TBits_1 read getSEN write setSEN;
  1650. property SIDL : TBits_1 read getSIDL write setSIDL;
  1651. property SMEN : TBits_1 read getSMEN write setSMEN;
  1652. property STREN : TBits_1 read getSTREN write setSTREN;
  1653. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1654. property w : TBits_32 read getw write setw;
  1655. end;
  1656. TI2C1A_I2C1ASTAT = record
  1657. private
  1658. function getACKSTAT : TBits_1; inline;
  1659. function getADD10 : TBits_1; inline;
  1660. function getBCL : TBits_1; inline;
  1661. function getD_A : TBits_1; inline;
  1662. function getGCSTAT : TBits_1; inline;
  1663. function getI2COV : TBits_1; inline;
  1664. function getI2CPOV : TBits_1; inline;
  1665. function getIWCOL : TBits_1; inline;
  1666. function getP : TBits_1; inline;
  1667. function getRBF : TBits_1; inline;
  1668. function getR_W : TBits_1; inline;
  1669. function getS : TBits_1; inline;
  1670. function getTBF : TBits_1; inline;
  1671. function getTRSTAT : TBits_1; inline;
  1672. function getw : TBits_32; inline;
  1673. procedure setACKSTAT(thebits : TBits_1); inline;
  1674. procedure setADD10(thebits : TBits_1); inline;
  1675. procedure setBCL(thebits : TBits_1); inline;
  1676. procedure setD_A(thebits : TBits_1); inline;
  1677. procedure setGCSTAT(thebits : TBits_1); inline;
  1678. procedure setI2COV(thebits : TBits_1); inline;
  1679. procedure setI2CPOV(thebits : TBits_1); inline;
  1680. procedure setIWCOL(thebits : TBits_1); inline;
  1681. procedure setP(thebits : TBits_1); inline;
  1682. procedure setRBF(thebits : TBits_1); inline;
  1683. procedure setR_W(thebits : TBits_1); inline;
  1684. procedure setS(thebits : TBits_1); inline;
  1685. procedure setTBF(thebits : TBits_1); inline;
  1686. procedure setTRSTAT(thebits : TBits_1); inline;
  1687. procedure setw(thebits : TBits_32); inline;
  1688. public
  1689. procedure clearACKSTAT; inline;
  1690. procedure clearADD10; inline;
  1691. procedure clearBCL; inline;
  1692. procedure clearD_A; inline;
  1693. procedure clearGCSTAT; inline;
  1694. procedure clearI2COV; inline;
  1695. procedure clearI2CPOV; inline;
  1696. procedure clearIWCOL; inline;
  1697. procedure clearP; inline;
  1698. procedure clearRBF; inline;
  1699. procedure clearR_W; inline;
  1700. procedure clearS; inline;
  1701. procedure clearTBF; inline;
  1702. procedure clearTRSTAT; inline;
  1703. procedure setACKSTAT; inline;
  1704. procedure setADD10; inline;
  1705. procedure setBCL; inline;
  1706. procedure setD_A; inline;
  1707. procedure setGCSTAT; inline;
  1708. procedure setI2COV; inline;
  1709. procedure setI2CPOV; inline;
  1710. procedure setIWCOL; inline;
  1711. procedure setP; inline;
  1712. procedure setRBF; inline;
  1713. procedure setR_W; inline;
  1714. procedure setS; inline;
  1715. procedure setTBF; inline;
  1716. procedure setTRSTAT; inline;
  1717. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  1718. property ADD10 : TBits_1 read getADD10 write setADD10;
  1719. property BCL : TBits_1 read getBCL write setBCL;
  1720. property D_A : TBits_1 read getD_A write setD_A;
  1721. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  1722. property I2COV : TBits_1 read getI2COV write setI2COV;
  1723. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  1724. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  1725. property P : TBits_1 read getP write setP;
  1726. property RBF : TBits_1 read getRBF write setRBF;
  1727. property R_W : TBits_1 read getR_W write setR_W;
  1728. property S : TBits_1 read getS write setS;
  1729. property TBF : TBits_1 read getTBF write setTBF;
  1730. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  1731. property w : TBits_32 read getw write setw;
  1732. end;
  1733. TI2C1A_I2C3STAT = record
  1734. private
  1735. function getACKSTAT : TBits_1; inline;
  1736. function getADD10 : TBits_1; inline;
  1737. function getBCL : TBits_1; inline;
  1738. function getD_A : TBits_1; inline;
  1739. function getGCSTAT : TBits_1; inline;
  1740. function getI2COV : TBits_1; inline;
  1741. function getI2CPOV : TBits_1; inline;
  1742. function getIWCOL : TBits_1; inline;
  1743. function getP : TBits_1; inline;
  1744. function getRBF : TBits_1; inline;
  1745. function getR_W : TBits_1; inline;
  1746. function getS : TBits_1; inline;
  1747. function getTBF : TBits_1; inline;
  1748. function getTRSTAT : TBits_1; inline;
  1749. function getw : TBits_32; inline;
  1750. procedure setACKSTAT(thebits : TBits_1); inline;
  1751. procedure setADD10(thebits : TBits_1); inline;
  1752. procedure setBCL(thebits : TBits_1); inline;
  1753. procedure setD_A(thebits : TBits_1); inline;
  1754. procedure setGCSTAT(thebits : TBits_1); inline;
  1755. procedure setI2COV(thebits : TBits_1); inline;
  1756. procedure setI2CPOV(thebits : TBits_1); inline;
  1757. procedure setIWCOL(thebits : TBits_1); inline;
  1758. procedure setP(thebits : TBits_1); inline;
  1759. procedure setRBF(thebits : TBits_1); inline;
  1760. procedure setR_W(thebits : TBits_1); inline;
  1761. procedure setS(thebits : TBits_1); inline;
  1762. procedure setTBF(thebits : TBits_1); inline;
  1763. procedure setTRSTAT(thebits : TBits_1); inline;
  1764. procedure setw(thebits : TBits_32); inline;
  1765. public
  1766. procedure clearACKSTAT; inline;
  1767. procedure clearADD10; inline;
  1768. procedure clearBCL; inline;
  1769. procedure clearD_A; inline;
  1770. procedure clearGCSTAT; inline;
  1771. procedure clearI2COV; inline;
  1772. procedure clearI2CPOV; inline;
  1773. procedure clearIWCOL; inline;
  1774. procedure clearP; inline;
  1775. procedure clearRBF; inline;
  1776. procedure clearR_W; inline;
  1777. procedure clearS; inline;
  1778. procedure clearTBF; inline;
  1779. procedure clearTRSTAT; inline;
  1780. procedure setACKSTAT; inline;
  1781. procedure setADD10; inline;
  1782. procedure setBCL; inline;
  1783. procedure setD_A; inline;
  1784. procedure setGCSTAT; inline;
  1785. procedure setI2COV; inline;
  1786. procedure setI2CPOV; inline;
  1787. procedure setIWCOL; inline;
  1788. procedure setP; inline;
  1789. procedure setRBF; inline;
  1790. procedure setR_W; inline;
  1791. procedure setS; inline;
  1792. procedure setTBF; inline;
  1793. procedure setTRSTAT; inline;
  1794. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  1795. property ADD10 : TBits_1 read getADD10 write setADD10;
  1796. property BCL : TBits_1 read getBCL write setBCL;
  1797. property D_A : TBits_1 read getD_A write setD_A;
  1798. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  1799. property I2COV : TBits_1 read getI2COV write setI2COV;
  1800. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  1801. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  1802. property P : TBits_1 read getP write setP;
  1803. property RBF : TBits_1 read getRBF write setRBF;
  1804. property R_W : TBits_1 read getR_W write setR_W;
  1805. property S : TBits_1 read getS write setS;
  1806. property TBF : TBits_1 read getTBF write setTBF;
  1807. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  1808. property w : TBits_32 read getw write setw;
  1809. end;
  1810. type
  1811. TI2C1ARegisters = record
  1812. I2C1ACONbits : TI2C1A_I2C1ACON;
  1813. I2C1ACON : longWord;
  1814. I2C3CONbits : TI2C1A_I2C3CON;
  1815. I2C3CON : longWord;
  1816. I2C1ACONCLR : longWord;
  1817. I2C3CONCLR : longWord;
  1818. I2C1ACONSET : longWord;
  1819. I2C3CONSET : longWord;
  1820. I2C1ACONINV : longWord;
  1821. I2C3CONINV : longWord;
  1822. I2C1ASTATbits : TI2C1A_I2C1ASTAT;
  1823. I2C1ASTAT : longWord;
  1824. I2C3STATbits : TI2C1A_I2C3STAT;
  1825. I2C3STAT : longWord;
  1826. I2C1ASTATCLR : longWord;
  1827. I2C3STATCLR : longWord;
  1828. I2C1ASTATSET : longWord;
  1829. I2C3STATSET : longWord;
  1830. I2C1ASTATINV : longWord;
  1831. I2C3STATINV : longWord;
  1832. I2C1AADD : longWord;
  1833. I2C3ADD : longWord;
  1834. I2C1AADDCLR : longWord;
  1835. I2C3ADDCLR : longWord;
  1836. I2C1AADDSET : longWord;
  1837. I2C3ADDSET : longWord;
  1838. I2C1AADDINV : longWord;
  1839. I2C3ADDINV : longWord;
  1840. I2C1AMSK : longWord;
  1841. I2C3MSK : longWord;
  1842. I2C1AMSKCLR : longWord;
  1843. I2C3MSKCLR : longWord;
  1844. I2C1AMSKSET : longWord;
  1845. I2C3MSKSET : longWord;
  1846. I2C1AMSKINV : longWord;
  1847. I2C3MSKINV : longWord;
  1848. I2C1ABRG : longWord;
  1849. I2C3BRG : longWord;
  1850. I2C1ABRGCLR : longWord;
  1851. I2C3BRGCLR : longWord;
  1852. I2C1ABRGSET : longWord;
  1853. I2C3BRGSET : longWord;
  1854. I2C1ABRGINV : longWord;
  1855. I2C3BRGINV : longWord;
  1856. I2C1ATRN : longWord;
  1857. I2C3TRN : longWord;
  1858. I2C1ATRNCLR : longWord;
  1859. I2C3TRNCLR : longWord;
  1860. I2C1ATRNSET : longWord;
  1861. I2C3TRNSET : longWord;
  1862. I2C1ATRNINV : longWord;
  1863. I2C3TRNINV : longWord;
  1864. I2C1ARCV : longWord;
  1865. I2C3RCV : longWord;
  1866. end;
  1867. TI2C2A_I2C2ACON = record
  1868. private
  1869. function getA10M : TBits_1; inline;
  1870. function getACKDT : TBits_1; inline;
  1871. function getACKEN : TBits_1; inline;
  1872. function getDISSLW : TBits_1; inline;
  1873. function getGCEN : TBits_1; inline;
  1874. function getI2CEN : TBits_1; inline;
  1875. function getI2CSIDL : TBits_1; inline;
  1876. function getIPMIEN : TBits_1; inline;
  1877. function getON : TBits_1; inline;
  1878. function getPEN : TBits_1; inline;
  1879. function getRCEN : TBits_1; inline;
  1880. function getRSEN : TBits_1; inline;
  1881. function getSCLREL : TBits_1; inline;
  1882. function getSEN : TBits_1; inline;
  1883. function getSIDL : TBits_1; inline;
  1884. function getSMEN : TBits_1; inline;
  1885. function getSTREN : TBits_1; inline;
  1886. function getSTRICT : TBits_1; inline;
  1887. function getw : TBits_32; inline;
  1888. procedure setA10M(thebits : TBits_1); inline;
  1889. procedure setACKDT(thebits : TBits_1); inline;
  1890. procedure setACKEN(thebits : TBits_1); inline;
  1891. procedure setDISSLW(thebits : TBits_1); inline;
  1892. procedure setGCEN(thebits : TBits_1); inline;
  1893. procedure setI2CEN(thebits : TBits_1); inline;
  1894. procedure setI2CSIDL(thebits : TBits_1); inline;
  1895. procedure setIPMIEN(thebits : TBits_1); inline;
  1896. procedure setON(thebits : TBits_1); inline;
  1897. procedure setPEN(thebits : TBits_1); inline;
  1898. procedure setRCEN(thebits : TBits_1); inline;
  1899. procedure setRSEN(thebits : TBits_1); inline;
  1900. procedure setSCLREL(thebits : TBits_1); inline;
  1901. procedure setSEN(thebits : TBits_1); inline;
  1902. procedure setSIDL(thebits : TBits_1); inline;
  1903. procedure setSMEN(thebits : TBits_1); inline;
  1904. procedure setSTREN(thebits : TBits_1); inline;
  1905. procedure setSTRICT(thebits : TBits_1); inline;
  1906. procedure setw(thebits : TBits_32); inline;
  1907. public
  1908. procedure clearA10M; inline;
  1909. procedure clearACKDT; inline;
  1910. procedure clearACKEN; inline;
  1911. procedure clearDISSLW; inline;
  1912. procedure clearGCEN; inline;
  1913. procedure clearI2CEN; inline;
  1914. procedure clearI2CSIDL; inline;
  1915. procedure clearIPMIEN; inline;
  1916. procedure clearON; inline;
  1917. procedure clearPEN; inline;
  1918. procedure clearRCEN; inline;
  1919. procedure clearRSEN; inline;
  1920. procedure clearSCLREL; inline;
  1921. procedure clearSEN; inline;
  1922. procedure clearSIDL; inline;
  1923. procedure clearSMEN; inline;
  1924. procedure clearSTREN; inline;
  1925. procedure clearSTRICT; inline;
  1926. procedure setA10M; inline;
  1927. procedure setACKDT; inline;
  1928. procedure setACKEN; inline;
  1929. procedure setDISSLW; inline;
  1930. procedure setGCEN; inline;
  1931. procedure setI2CEN; inline;
  1932. procedure setI2CSIDL; inline;
  1933. procedure setIPMIEN; inline;
  1934. procedure setON; inline;
  1935. procedure setPEN; inline;
  1936. procedure setRCEN; inline;
  1937. procedure setRSEN; inline;
  1938. procedure setSCLREL; inline;
  1939. procedure setSEN; inline;
  1940. procedure setSIDL; inline;
  1941. procedure setSMEN; inline;
  1942. procedure setSTREN; inline;
  1943. procedure setSTRICT; inline;
  1944. property A10M : TBits_1 read getA10M write setA10M;
  1945. property ACKDT : TBits_1 read getACKDT write setACKDT;
  1946. property ACKEN : TBits_1 read getACKEN write setACKEN;
  1947. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  1948. property GCEN : TBits_1 read getGCEN write setGCEN;
  1949. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  1950. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  1951. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  1952. property ON : TBits_1 read getON write setON;
  1953. property PEN : TBits_1 read getPEN write setPEN;
  1954. property RCEN : TBits_1 read getRCEN write setRCEN;
  1955. property RSEN : TBits_1 read getRSEN write setRSEN;
  1956. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  1957. property SEN : TBits_1 read getSEN write setSEN;
  1958. property SIDL : TBits_1 read getSIDL write setSIDL;
  1959. property SMEN : TBits_1 read getSMEN write setSMEN;
  1960. property STREN : TBits_1 read getSTREN write setSTREN;
  1961. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  1962. property w : TBits_32 read getw write setw;
  1963. end;
  1964. TI2C2A_I2C4CON = record
  1965. private
  1966. function getA10M : TBits_1; inline;
  1967. function getACKDT : TBits_1; inline;
  1968. function getACKEN : TBits_1; inline;
  1969. function getDISSLW : TBits_1; inline;
  1970. function getGCEN : TBits_1; inline;
  1971. function getI2CEN : TBits_1; inline;
  1972. function getI2CSIDL : TBits_1; inline;
  1973. function getIPMIEN : TBits_1; inline;
  1974. function getON : TBits_1; inline;
  1975. function getPEN : TBits_1; inline;
  1976. function getRCEN : TBits_1; inline;
  1977. function getRSEN : TBits_1; inline;
  1978. function getSCLREL : TBits_1; inline;
  1979. function getSEN : TBits_1; inline;
  1980. function getSIDL : TBits_1; inline;
  1981. function getSMEN : TBits_1; inline;
  1982. function getSTREN : TBits_1; inline;
  1983. function getSTRICT : TBits_1; inline;
  1984. function getw : TBits_32; inline;
  1985. procedure setA10M(thebits : TBits_1); inline;
  1986. procedure setACKDT(thebits : TBits_1); inline;
  1987. procedure setACKEN(thebits : TBits_1); inline;
  1988. procedure setDISSLW(thebits : TBits_1); inline;
  1989. procedure setGCEN(thebits : TBits_1); inline;
  1990. procedure setI2CEN(thebits : TBits_1); inline;
  1991. procedure setI2CSIDL(thebits : TBits_1); inline;
  1992. procedure setIPMIEN(thebits : TBits_1); inline;
  1993. procedure setON(thebits : TBits_1); inline;
  1994. procedure setPEN(thebits : TBits_1); inline;
  1995. procedure setRCEN(thebits : TBits_1); inline;
  1996. procedure setRSEN(thebits : TBits_1); inline;
  1997. procedure setSCLREL(thebits : TBits_1); inline;
  1998. procedure setSEN(thebits : TBits_1); inline;
  1999. procedure setSIDL(thebits : TBits_1); inline;
  2000. procedure setSMEN(thebits : TBits_1); inline;
  2001. procedure setSTREN(thebits : TBits_1); inline;
  2002. procedure setSTRICT(thebits : TBits_1); inline;
  2003. procedure setw(thebits : TBits_32); inline;
  2004. public
  2005. procedure clearA10M; inline;
  2006. procedure clearACKDT; inline;
  2007. procedure clearACKEN; inline;
  2008. procedure clearDISSLW; inline;
  2009. procedure clearGCEN; inline;
  2010. procedure clearI2CEN; inline;
  2011. procedure clearI2CSIDL; inline;
  2012. procedure clearIPMIEN; inline;
  2013. procedure clearON; inline;
  2014. procedure clearPEN; inline;
  2015. procedure clearRCEN; inline;
  2016. procedure clearRSEN; inline;
  2017. procedure clearSCLREL; inline;
  2018. procedure clearSEN; inline;
  2019. procedure clearSIDL; inline;
  2020. procedure clearSMEN; inline;
  2021. procedure clearSTREN; inline;
  2022. procedure clearSTRICT; inline;
  2023. procedure setA10M; inline;
  2024. procedure setACKDT; inline;
  2025. procedure setACKEN; inline;
  2026. procedure setDISSLW; inline;
  2027. procedure setGCEN; inline;
  2028. procedure setI2CEN; inline;
  2029. procedure setI2CSIDL; inline;
  2030. procedure setIPMIEN; inline;
  2031. procedure setON; inline;
  2032. procedure setPEN; inline;
  2033. procedure setRCEN; inline;
  2034. procedure setRSEN; inline;
  2035. procedure setSCLREL; inline;
  2036. procedure setSEN; inline;
  2037. procedure setSIDL; inline;
  2038. procedure setSMEN; inline;
  2039. procedure setSTREN; inline;
  2040. procedure setSTRICT; inline;
  2041. property A10M : TBits_1 read getA10M write setA10M;
  2042. property ACKDT : TBits_1 read getACKDT write setACKDT;
  2043. property ACKEN : TBits_1 read getACKEN write setACKEN;
  2044. property DISSLW : TBits_1 read getDISSLW write setDISSLW;
  2045. property GCEN : TBits_1 read getGCEN write setGCEN;
  2046. property I2CEN : TBits_1 read getI2CEN write setI2CEN;
  2047. property I2CSIDL : TBits_1 read getI2CSIDL write setI2CSIDL;
  2048. property IPMIEN : TBits_1 read getIPMIEN write setIPMIEN;
  2049. property ON : TBits_1 read getON write setON;
  2050. property PEN : TBits_1 read getPEN write setPEN;
  2051. property RCEN : TBits_1 read getRCEN write setRCEN;
  2052. property RSEN : TBits_1 read getRSEN write setRSEN;
  2053. property SCLREL : TBits_1 read getSCLREL write setSCLREL;
  2054. property SEN : TBits_1 read getSEN write setSEN;
  2055. property SIDL : TBits_1 read getSIDL write setSIDL;
  2056. property SMEN : TBits_1 read getSMEN write setSMEN;
  2057. property STREN : TBits_1 read getSTREN write setSTREN;
  2058. property STRICT : TBits_1 read getSTRICT write setSTRICT;
  2059. property w : TBits_32 read getw write setw;
  2060. end;
  2061. TI2C2A_I2C2ASTAT = record
  2062. private
  2063. function getACKSTAT : TBits_1; inline;
  2064. function getADD10 : TBits_1; inline;
  2065. function getBCL : TBits_1; inline;
  2066. function getD_A : TBits_1; inline;
  2067. function getGCSTAT : TBits_1; inline;
  2068. function getI2COV : TBits_1; inline;
  2069. function getI2CPOV : TBits_1; inline;
  2070. function getIWCOL : TBits_1; inline;
  2071. function getP : TBits_1; inline;
  2072. function getRBF : TBits_1; inline;
  2073. function getR_W : TBits_1; inline;
  2074. function getS : TBits_1; inline;
  2075. function getTBF : TBits_1; inline;
  2076. function getTRSTAT : TBits_1; inline;
  2077. function getw : TBits_32; inline;
  2078. procedure setACKSTAT(thebits : TBits_1); inline;
  2079. procedure setADD10(thebits : TBits_1); inline;
  2080. procedure setBCL(thebits : TBits_1); inline;
  2081. procedure setD_A(thebits : TBits_1); inline;
  2082. procedure setGCSTAT(thebits : TBits_1); inline;
  2083. procedure setI2COV(thebits : TBits_1); inline;
  2084. procedure setI2CPOV(thebits : TBits_1); inline;
  2085. procedure setIWCOL(thebits : TBits_1); inline;
  2086. procedure setP(thebits : TBits_1); inline;
  2087. procedure setRBF(thebits : TBits_1); inline;
  2088. procedure setR_W(thebits : TBits_1); inline;
  2089. procedure setS(thebits : TBits_1); inline;
  2090. procedure setTBF(thebits : TBits_1); inline;
  2091. procedure setTRSTAT(thebits : TBits_1); inline;
  2092. procedure setw(thebits : TBits_32); inline;
  2093. public
  2094. procedure clearACKSTAT; inline;
  2095. procedure clearADD10; inline;
  2096. procedure clearBCL; inline;
  2097. procedure clearD_A; inline;
  2098. procedure clearGCSTAT; inline;
  2099. procedure clearI2COV; inline;
  2100. procedure clearI2CPOV; inline;
  2101. procedure clearIWCOL; inline;
  2102. procedure clearP; inline;
  2103. procedure clearRBF; inline;
  2104. procedure clearR_W; inline;
  2105. procedure clearS; inline;
  2106. procedure clearTBF; inline;
  2107. procedure clearTRSTAT; inline;
  2108. procedure setACKSTAT; inline;
  2109. procedure setADD10; inline;
  2110. procedure setBCL; inline;
  2111. procedure setD_A; inline;
  2112. procedure setGCSTAT; inline;
  2113. procedure setI2COV; inline;
  2114. procedure setI2CPOV; inline;
  2115. procedure setIWCOL; inline;
  2116. procedure setP; inline;
  2117. procedure setRBF; inline;
  2118. procedure setR_W; inline;
  2119. procedure setS; inline;
  2120. procedure setTBF; inline;
  2121. procedure setTRSTAT; inline;
  2122. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2123. property ADD10 : TBits_1 read getADD10 write setADD10;
  2124. property BCL : TBits_1 read getBCL write setBCL;
  2125. property D_A : TBits_1 read getD_A write setD_A;
  2126. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2127. property I2COV : TBits_1 read getI2COV write setI2COV;
  2128. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2129. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2130. property P : TBits_1 read getP write setP;
  2131. property RBF : TBits_1 read getRBF write setRBF;
  2132. property R_W : TBits_1 read getR_W write setR_W;
  2133. property S : TBits_1 read getS write setS;
  2134. property TBF : TBits_1 read getTBF write setTBF;
  2135. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2136. property w : TBits_32 read getw write setw;
  2137. end;
  2138. TI2C2A_I2C4STAT = record
  2139. private
  2140. function getACKSTAT : TBits_1; inline;
  2141. function getADD10 : TBits_1; inline;
  2142. function getBCL : TBits_1; inline;
  2143. function getD_A : TBits_1; inline;
  2144. function getGCSTAT : TBits_1; inline;
  2145. function getI2COV : TBits_1; inline;
  2146. function getI2CPOV : TBits_1; inline;
  2147. function getIWCOL : TBits_1; inline;
  2148. function getP : TBits_1; inline;
  2149. function getRBF : TBits_1; inline;
  2150. function getR_W : TBits_1; inline;
  2151. function getS : TBits_1; inline;
  2152. function getTBF : TBits_1; inline;
  2153. function getTRSTAT : TBits_1; inline;
  2154. function getw : TBits_32; inline;
  2155. procedure setACKSTAT(thebits : TBits_1); inline;
  2156. procedure setADD10(thebits : TBits_1); inline;
  2157. procedure setBCL(thebits : TBits_1); inline;
  2158. procedure setD_A(thebits : TBits_1); inline;
  2159. procedure setGCSTAT(thebits : TBits_1); inline;
  2160. procedure setI2COV(thebits : TBits_1); inline;
  2161. procedure setI2CPOV(thebits : TBits_1); inline;
  2162. procedure setIWCOL(thebits : TBits_1); inline;
  2163. procedure setP(thebits : TBits_1); inline;
  2164. procedure setRBF(thebits : TBits_1); inline;
  2165. procedure setR_W(thebits : TBits_1); inline;
  2166. procedure setS(thebits : TBits_1); inline;
  2167. procedure setTBF(thebits : TBits_1); inline;
  2168. procedure setTRSTAT(thebits : TBits_1); inline;
  2169. procedure setw(thebits : TBits_32); inline;
  2170. public
  2171. procedure clearACKSTAT; inline;
  2172. procedure clearADD10; inline;
  2173. procedure clearBCL; inline;
  2174. procedure clearD_A; inline;
  2175. procedure clearGCSTAT; inline;
  2176. procedure clearI2COV; inline;
  2177. procedure clearI2CPOV; inline;
  2178. procedure clearIWCOL; inline;
  2179. procedure clearP; inline;
  2180. procedure clearRBF; inline;
  2181. procedure clearR_W; inline;
  2182. procedure clearS; inline;
  2183. procedure clearTBF; inline;
  2184. procedure clearTRSTAT; inline;
  2185. procedure setACKSTAT; inline;
  2186. procedure setADD10; inline;
  2187. procedure setBCL; inline;
  2188. procedure setD_A; inline;
  2189. procedure setGCSTAT; inline;
  2190. procedure setI2COV; inline;
  2191. procedure setI2CPOV; inline;
  2192. procedure setIWCOL; inline;
  2193. procedure setP; inline;
  2194. procedure setRBF; inline;
  2195. procedure setR_W; inline;
  2196. procedure setS; inline;
  2197. procedure setTBF; inline;
  2198. procedure setTRSTAT; inline;
  2199. property ACKSTAT : TBits_1 read getACKSTAT write setACKSTAT;
  2200. property ADD10 : TBits_1 read getADD10 write setADD10;
  2201. property BCL : TBits_1 read getBCL write setBCL;
  2202. property D_A : TBits_1 read getD_A write setD_A;
  2203. property GCSTAT : TBits_1 read getGCSTAT write setGCSTAT;
  2204. property I2COV : TBits_1 read getI2COV write setI2COV;
  2205. property I2CPOV : TBits_1 read getI2CPOV write setI2CPOV;
  2206. property IWCOL : TBits_1 read getIWCOL write setIWCOL;
  2207. property P : TBits_1 read getP write setP;
  2208. property RBF : TBits_1 read getRBF write setRBF;
  2209. property R_W : TBits_1 read getR_W write setR_W;
  2210. property S : TBits_1 read getS write setS;
  2211. property TBF : TBits_1 read getTBF write setTBF;
  2212. property TRSTAT : TBits_1 read getTRSTAT write setTRSTAT;
  2213. property w : TBits_32 read getw write setw;
  2214. end;
  2215. type
  2216. TI2C2ARegisters = record
  2217. I2C2ACONbits : TI2C2A_I2C2ACON;
  2218. I2C2ACON : longWord;
  2219. I2C4CONbits : TI2C2A_I2C4CON;
  2220. I2C4CON : longWord;
  2221. I2C2ACONCLR : longWord;
  2222. I2C4CONCLR : longWord;
  2223. I2C2ACONSET : longWord;
  2224. I2C4CONSET : longWord;
  2225. I2C2ACONINV : longWord;
  2226. I2C4CONINV : longWord;
  2227. I2C2ASTATbits : TI2C2A_I2C2ASTAT;
  2228. I2C2ASTAT : longWord;
  2229. I2C4STATbits : TI2C2A_I2C4STAT;
  2230. I2C4STAT : longWord;
  2231. I2C2ASTATCLR : longWord;
  2232. I2C4STATCLR : longWord;
  2233. I2C2ASTATSET : longWord;
  2234. I2C4STATSET : longWord;
  2235. I2C2ASTATINV : longWord;
  2236. I2C4STATINV : longWord;
  2237. I2C2AADD : longWord;
  2238. I2C4ADD : longWord;
  2239. I2C2AADDCLR : longWord;
  2240. I2C4ADDCLR : longWord;
  2241. I2C2AADDSET : longWord;
  2242. I2C4ADDSET : longWord;
  2243. I2C2AADDINV : longWord;
  2244. I2C4ADDINV : longWord;
  2245. I2C2AMSK : longWord;
  2246. I2C4MSK : longWord;
  2247. I2C2AMSKCLR : longWord;
  2248. I2C4MSKCLR : longWord;
  2249. I2C2AMSKSET : longWord;
  2250. I2C4MSKSET : longWord;
  2251. I2C2AMSKINV : longWord;
  2252. I2C4MSKINV : longWord;
  2253. I2C2ABRG : longWord;
  2254. I2C4BRG : longWord;
  2255. I2C2ABRGCLR : longWord;
  2256. I2C4BRGCLR : longWord;
  2257. I2C2ABRGSET : longWord;
  2258. I2C4BRGSET : longWord;
  2259. I2C2ABRGINV : longWord;
  2260. I2C4BRGINV : longWord;
  2261. I2C2ATRN : longWord;
  2262. I2C4TRN : longWord;
  2263. I2C2ATRNCLR : longWord;
  2264. I2C4TRNCLR : longWord;
  2265. I2C2ATRNSET : longWord;
  2266. I2C4TRNSET : longWord;
  2267. I2C2ATRNINV : longWord;
  2268. I2C4TRNINV : longWord;
  2269. I2C2ARCV : longWord;
  2270. I2C4RCV : longWord;
  2271. end;
  2272. 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. TSPI4_SPI3ACON = record
  3564. private
  3565. function getCKE : TBits_1; inline;
  3566. function getCKP : TBits_1; inline;
  3567. function getDISSDO : TBits_1; inline;
  3568. function getENHBUF : TBits_1; inline;
  3569. function getFRMCNT : TBits_3; inline;
  3570. function getFRMEN : TBits_1; inline;
  3571. function getFRMPOL : TBits_1; inline;
  3572. function getFRMSYNC : TBits_1; inline;
  3573. function getFRMSYPW : TBits_1; inline;
  3574. function getMODE16 : TBits_1; inline;
  3575. function getMODE32 : TBits_1; inline;
  3576. function getMSSEN : TBits_1; inline;
  3577. function getMSTEN : TBits_1; inline;
  3578. function getON : TBits_1; inline;
  3579. function getSIDL : TBits_1; inline;
  3580. function getSMP : TBits_1; inline;
  3581. function getSPIFE : TBits_1; inline;
  3582. function getSRXISEL : TBits_2; inline;
  3583. function getSSEN : TBits_1; inline;
  3584. function getSTXISEL : TBits_2; inline;
  3585. function getw : TBits_32; inline;
  3586. procedure setCKE(thebits : TBits_1); inline;
  3587. procedure setCKP(thebits : TBits_1); inline;
  3588. procedure setDISSDO(thebits : TBits_1); inline;
  3589. procedure setENHBUF(thebits : TBits_1); inline;
  3590. procedure setFRMCNT(thebits : TBits_3); inline;
  3591. procedure setFRMEN(thebits : TBits_1); inline;
  3592. procedure setFRMPOL(thebits : TBits_1); inline;
  3593. procedure setFRMSYNC(thebits : TBits_1); inline;
  3594. procedure setFRMSYPW(thebits : TBits_1); inline;
  3595. procedure setMODE16(thebits : TBits_1); inline;
  3596. procedure setMODE32(thebits : TBits_1); inline;
  3597. procedure setMSSEN(thebits : TBits_1); inline;
  3598. procedure setMSTEN(thebits : TBits_1); inline;
  3599. procedure setON(thebits : TBits_1); inline;
  3600. procedure setSIDL(thebits : TBits_1); inline;
  3601. procedure setSMP(thebits : TBits_1); inline;
  3602. procedure setSPIFE(thebits : TBits_1); inline;
  3603. procedure setSRXISEL(thebits : TBits_2); inline;
  3604. procedure setSSEN(thebits : TBits_1); inline;
  3605. procedure setSTXISEL(thebits : TBits_2); inline;
  3606. procedure setw(thebits : TBits_32); inline;
  3607. public
  3608. procedure clearCKE; inline;
  3609. procedure clearCKP; inline;
  3610. procedure clearDISSDO; inline;
  3611. procedure clearENHBUF; inline;
  3612. procedure clearFRMEN; inline;
  3613. procedure clearFRMPOL; inline;
  3614. procedure clearFRMSYNC; inline;
  3615. procedure clearFRMSYPW; inline;
  3616. procedure clearMODE16; inline;
  3617. procedure clearMODE32; inline;
  3618. procedure clearMSSEN; inline;
  3619. procedure clearMSTEN; inline;
  3620. procedure clearON; inline;
  3621. procedure clearSIDL; inline;
  3622. procedure clearSMP; inline;
  3623. procedure clearSPIFE; inline;
  3624. procedure clearSSEN; inline;
  3625. procedure setCKE; inline;
  3626. procedure setCKP; inline;
  3627. procedure setDISSDO; inline;
  3628. procedure setENHBUF; inline;
  3629. procedure setFRMEN; inline;
  3630. procedure setFRMPOL; inline;
  3631. procedure setFRMSYNC; inline;
  3632. procedure setFRMSYPW; inline;
  3633. procedure setMODE16; inline;
  3634. procedure setMODE32; inline;
  3635. procedure setMSSEN; inline;
  3636. procedure setMSTEN; inline;
  3637. procedure setON; inline;
  3638. procedure setSIDL; inline;
  3639. procedure setSMP; inline;
  3640. procedure setSPIFE; inline;
  3641. procedure setSSEN; inline;
  3642. property CKE : TBits_1 read getCKE write setCKE;
  3643. property CKP : TBits_1 read getCKP write setCKP;
  3644. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3645. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3646. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3647. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3648. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3649. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3650. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3651. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3652. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3653. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3654. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3655. property ON : TBits_1 read getON write setON;
  3656. property SIDL : TBits_1 read getSIDL write setSIDL;
  3657. property SMP : TBits_1 read getSMP write setSMP;
  3658. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3659. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3660. property SSEN : TBits_1 read getSSEN write setSSEN;
  3661. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3662. property w : TBits_32 read getw write setw;
  3663. end;
  3664. TSPI4_SPI4CON = record
  3665. private
  3666. function getCKE : TBits_1; inline;
  3667. function getCKP : TBits_1; inline;
  3668. function getDISSDO : TBits_1; inline;
  3669. function getENHBUF : TBits_1; inline;
  3670. function getFRMCNT : TBits_3; inline;
  3671. function getFRMEN : TBits_1; inline;
  3672. function getFRMPOL : TBits_1; inline;
  3673. function getFRMSYNC : TBits_1; inline;
  3674. function getFRMSYPW : TBits_1; inline;
  3675. function getMODE16 : TBits_1; inline;
  3676. function getMODE32 : TBits_1; inline;
  3677. function getMSSEN : TBits_1; inline;
  3678. function getMSTEN : TBits_1; inline;
  3679. function getON : TBits_1; inline;
  3680. function getSIDL : TBits_1; inline;
  3681. function getSMP : TBits_1; inline;
  3682. function getSPIFE : TBits_1; inline;
  3683. function getSRXISEL : TBits_2; inline;
  3684. function getSSEN : TBits_1; inline;
  3685. function getSTXISEL : TBits_2; inline;
  3686. function getw : TBits_32; inline;
  3687. procedure setCKE(thebits : TBits_1); inline;
  3688. procedure setCKP(thebits : TBits_1); inline;
  3689. procedure setDISSDO(thebits : TBits_1); inline;
  3690. procedure setENHBUF(thebits : TBits_1); inline;
  3691. procedure setFRMCNT(thebits : TBits_3); inline;
  3692. procedure setFRMEN(thebits : TBits_1); inline;
  3693. procedure setFRMPOL(thebits : TBits_1); inline;
  3694. procedure setFRMSYNC(thebits : TBits_1); inline;
  3695. procedure setFRMSYPW(thebits : TBits_1); inline;
  3696. procedure setMODE16(thebits : TBits_1); inline;
  3697. procedure setMODE32(thebits : TBits_1); inline;
  3698. procedure setMSSEN(thebits : TBits_1); inline;
  3699. procedure setMSTEN(thebits : TBits_1); inline;
  3700. procedure setON(thebits : TBits_1); inline;
  3701. procedure setSIDL(thebits : TBits_1); inline;
  3702. procedure setSMP(thebits : TBits_1); inline;
  3703. procedure setSPIFE(thebits : TBits_1); inline;
  3704. procedure setSRXISEL(thebits : TBits_2); inline;
  3705. procedure setSSEN(thebits : TBits_1); inline;
  3706. procedure setSTXISEL(thebits : TBits_2); inline;
  3707. procedure setw(thebits : TBits_32); inline;
  3708. public
  3709. procedure clearCKE; inline;
  3710. procedure clearCKP; inline;
  3711. procedure clearDISSDO; inline;
  3712. procedure clearENHBUF; inline;
  3713. procedure clearFRMEN; inline;
  3714. procedure clearFRMPOL; inline;
  3715. procedure clearFRMSYNC; inline;
  3716. procedure clearFRMSYPW; inline;
  3717. procedure clearMODE16; inline;
  3718. procedure clearMODE32; inline;
  3719. procedure clearMSSEN; inline;
  3720. procedure clearMSTEN; inline;
  3721. procedure clearON; inline;
  3722. procedure clearSIDL; inline;
  3723. procedure clearSMP; inline;
  3724. procedure clearSPIFE; inline;
  3725. procedure clearSSEN; inline;
  3726. procedure setCKE; inline;
  3727. procedure setCKP; inline;
  3728. procedure setDISSDO; inline;
  3729. procedure setENHBUF; inline;
  3730. procedure setFRMEN; inline;
  3731. procedure setFRMPOL; inline;
  3732. procedure setFRMSYNC; inline;
  3733. procedure setFRMSYPW; inline;
  3734. procedure setMODE16; inline;
  3735. procedure setMODE32; inline;
  3736. procedure setMSSEN; inline;
  3737. procedure setMSTEN; inline;
  3738. procedure setON; inline;
  3739. procedure setSIDL; inline;
  3740. procedure setSMP; inline;
  3741. procedure setSPIFE; inline;
  3742. procedure setSSEN; inline;
  3743. property CKE : TBits_1 read getCKE write setCKE;
  3744. property CKP : TBits_1 read getCKP write setCKP;
  3745. property DISSDO : TBits_1 read getDISSDO write setDISSDO;
  3746. property ENHBUF : TBits_1 read getENHBUF write setENHBUF;
  3747. property FRMCNT : TBits_3 read getFRMCNT write setFRMCNT;
  3748. property FRMEN : TBits_1 read getFRMEN write setFRMEN;
  3749. property FRMPOL : TBits_1 read getFRMPOL write setFRMPOL;
  3750. property FRMSYNC : TBits_1 read getFRMSYNC write setFRMSYNC;
  3751. property FRMSYPW : TBits_1 read getFRMSYPW write setFRMSYPW;
  3752. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  3753. property MODE32 : TBits_1 read getMODE32 write setMODE32;
  3754. property MSSEN : TBits_1 read getMSSEN write setMSSEN;
  3755. property MSTEN : TBits_1 read getMSTEN write setMSTEN;
  3756. property ON : TBits_1 read getON write setON;
  3757. property SIDL : TBits_1 read getSIDL write setSIDL;
  3758. property SMP : TBits_1 read getSMP write setSMP;
  3759. property SPIFE : TBits_1 read getSPIFE write setSPIFE;
  3760. property SRXISEL : TBits_2 read getSRXISEL write setSRXISEL;
  3761. property SSEN : TBits_1 read getSSEN write setSSEN;
  3762. property STXISEL : TBits_2 read getSTXISEL write setSTXISEL;
  3763. property w : TBits_32 read getw write setw;
  3764. end;
  3765. TSPI4_SPI3ASTAT = record
  3766. private
  3767. function getRXBUFELM : TBits_5; inline;
  3768. function getSPIBUSY : TBits_1; inline;
  3769. function getSPIRBE : TBits_1; inline;
  3770. function getSPIRBF : TBits_1; inline;
  3771. function getSPIROV : TBits_1; inline;
  3772. function getSPITBE : TBits_1; inline;
  3773. function getSPITBF : TBits_1; inline;
  3774. function getSPITUR : TBits_1; inline;
  3775. function getSRMT : TBits_1; inline;
  3776. function getTXBUFELM : TBits_5; inline;
  3777. function getw : TBits_32; inline;
  3778. procedure setRXBUFELM(thebits : TBits_5); inline;
  3779. procedure setSPIBUSY(thebits : TBits_1); inline;
  3780. procedure setSPIRBE(thebits : TBits_1); inline;
  3781. procedure setSPIRBF(thebits : TBits_1); inline;
  3782. procedure setSPIROV(thebits : TBits_1); inline;
  3783. procedure setSPITBE(thebits : TBits_1); inline;
  3784. procedure setSPITBF(thebits : TBits_1); inline;
  3785. procedure setSPITUR(thebits : TBits_1); inline;
  3786. procedure setSRMT(thebits : TBits_1); inline;
  3787. procedure setTXBUFELM(thebits : TBits_5); inline;
  3788. procedure setw(thebits : TBits_32); inline;
  3789. public
  3790. procedure clearSPIBUSY; inline;
  3791. procedure clearSPIRBE; inline;
  3792. procedure clearSPIRBF; inline;
  3793. procedure clearSPIROV; inline;
  3794. procedure clearSPITBE; inline;
  3795. procedure clearSPITBF; inline;
  3796. procedure clearSPITUR; inline;
  3797. procedure clearSRMT; inline;
  3798. procedure setSPIBUSY; inline;
  3799. procedure setSPIRBE; inline;
  3800. procedure setSPIRBF; inline;
  3801. procedure setSPIROV; inline;
  3802. procedure setSPITBE; inline;
  3803. procedure setSPITBF; inline;
  3804. procedure setSPITUR; inline;
  3805. procedure setSRMT; inline;
  3806. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3807. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3808. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3809. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3810. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3811. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3812. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3813. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3814. property SRMT : TBits_1 read getSRMT write setSRMT;
  3815. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3816. property w : TBits_32 read getw write setw;
  3817. end;
  3818. TSPI4_SPI4STAT = record
  3819. private
  3820. function getRXBUFELM : TBits_5; inline;
  3821. function getSPIBUSY : TBits_1; inline;
  3822. function getSPIRBE : TBits_1; inline;
  3823. function getSPIRBF : TBits_1; inline;
  3824. function getSPIROV : TBits_1; inline;
  3825. function getSPITBE : TBits_1; inline;
  3826. function getSPITBF : TBits_1; inline;
  3827. function getSPITUR : TBits_1; inline;
  3828. function getSRMT : TBits_1; inline;
  3829. function getTXBUFELM : TBits_5; inline;
  3830. function getw : TBits_32; inline;
  3831. procedure setRXBUFELM(thebits : TBits_5); inline;
  3832. procedure setSPIBUSY(thebits : TBits_1); inline;
  3833. procedure setSPIRBE(thebits : TBits_1); inline;
  3834. procedure setSPIRBF(thebits : TBits_1); inline;
  3835. procedure setSPIROV(thebits : TBits_1); inline;
  3836. procedure setSPITBE(thebits : TBits_1); inline;
  3837. procedure setSPITBF(thebits : TBits_1); inline;
  3838. procedure setSPITUR(thebits : TBits_1); inline;
  3839. procedure setSRMT(thebits : TBits_1); inline;
  3840. procedure setTXBUFELM(thebits : TBits_5); inline;
  3841. procedure setw(thebits : TBits_32); inline;
  3842. public
  3843. procedure clearSPIBUSY; inline;
  3844. procedure clearSPIRBE; inline;
  3845. procedure clearSPIRBF; inline;
  3846. procedure clearSPIROV; inline;
  3847. procedure clearSPITBE; inline;
  3848. procedure clearSPITBF; inline;
  3849. procedure clearSPITUR; inline;
  3850. procedure clearSRMT; inline;
  3851. procedure setSPIBUSY; inline;
  3852. procedure setSPIRBE; inline;
  3853. procedure setSPIRBF; inline;
  3854. procedure setSPIROV; inline;
  3855. procedure setSPITBE; inline;
  3856. procedure setSPITBF; inline;
  3857. procedure setSPITUR; inline;
  3858. procedure setSRMT; inline;
  3859. property RXBUFELM : TBits_5 read getRXBUFELM write setRXBUFELM;
  3860. property SPIBUSY : TBits_1 read getSPIBUSY write setSPIBUSY;
  3861. property SPIRBE : TBits_1 read getSPIRBE write setSPIRBE;
  3862. property SPIRBF : TBits_1 read getSPIRBF write setSPIRBF;
  3863. property SPIROV : TBits_1 read getSPIROV write setSPIROV;
  3864. property SPITBE : TBits_1 read getSPITBE write setSPITBE;
  3865. property SPITBF : TBits_1 read getSPITBF write setSPITBF;
  3866. property SPITUR : TBits_1 read getSPITUR write setSPITUR;
  3867. property SRMT : TBits_1 read getSRMT write setSRMT;
  3868. property TXBUFELM : TBits_5 read getTXBUFELM write setTXBUFELM;
  3869. property w : TBits_32 read getw write setw;
  3870. end;
  3871. type
  3872. TSPI4Registers = record
  3873. SPI3ACONbits : TSPI4_SPI3ACON;
  3874. SPI3ACON : longWord;
  3875. SPI4CONbits : TSPI4_SPI4CON;
  3876. SPI4CON : longWord;
  3877. SPI3ACONCLR : longWord;
  3878. SPI4CONCLR : longWord;
  3879. SPI3ACONSET : longWord;
  3880. SPI4CONSET : longWord;
  3881. SPI3ACONINV : longWord;
  3882. SPI4CONINV : longWord;
  3883. SPI3ASTATbits : TSPI4_SPI3ASTAT;
  3884. SPI3ASTAT : longWord;
  3885. SPI4STATbits : TSPI4_SPI4STAT;
  3886. SPI4STAT : longWord;
  3887. SPI3ASTATCLR : longWord;
  3888. SPI4STATCLR : longWord;
  3889. SPI3ASTATSET : longWord;
  3890. SPI4STATSET : longWord;
  3891. SPI3ASTATINV : longWord;
  3892. SPI4STATINV : longWord;
  3893. SPI3ABUF : longWord;
  3894. SPI4BUF : longWord;
  3895. SPI3ABRG : longWord;
  3896. SPI4BRG : longWord;
  3897. SPI3ABRGCLR : longWord;
  3898. SPI4BRGCLR : longWord;
  3899. SPI3ABRGSET : longWord;
  3900. SPI4BRGSET : longWord;
  3901. SPI3ABRGINV : longWord;
  3902. SPI4BRGINV : longWord;
  3903. end;
  3904. TUART1A_U1AMODE = record
  3905. private
  3906. function getABAUD : TBits_1; inline;
  3907. function getBRGH : TBits_1; inline;
  3908. function getIREN : TBits_1; inline;
  3909. function getLPBACK : TBits_1; inline;
  3910. function getON : TBits_1; inline;
  3911. function getPDSEL : TBits_2; inline;
  3912. function getPDSEL0 : TBits_1; inline;
  3913. function getPDSEL1 : TBits_1; inline;
  3914. function getRTSMD : TBits_1; inline;
  3915. function getRXINV : TBits_1; inline;
  3916. function getSIDL : TBits_1; inline;
  3917. function getSTSEL : TBits_1; inline;
  3918. function getUARTEN : TBits_1; inline;
  3919. function getUEN : TBits_2; inline;
  3920. function getUEN0 : TBits_1; inline;
  3921. function getUEN1 : TBits_1; inline;
  3922. function getUSIDL : TBits_1; inline;
  3923. function getWAKE : TBits_1; inline;
  3924. function getw : TBits_32; inline;
  3925. procedure setABAUD(thebits : TBits_1); inline;
  3926. procedure setBRGH(thebits : TBits_1); inline;
  3927. procedure setIREN(thebits : TBits_1); inline;
  3928. procedure setLPBACK(thebits : TBits_1); inline;
  3929. procedure setON(thebits : TBits_1); inline;
  3930. procedure setPDSEL(thebits : TBits_2); inline;
  3931. procedure setPDSEL0(thebits : TBits_1); inline;
  3932. procedure setPDSEL1(thebits : TBits_1); inline;
  3933. procedure setRTSMD(thebits : TBits_1); inline;
  3934. procedure setRXINV(thebits : TBits_1); inline;
  3935. procedure setSIDL(thebits : TBits_1); inline;
  3936. procedure setSTSEL(thebits : TBits_1); inline;
  3937. procedure setUARTEN(thebits : TBits_1); inline;
  3938. procedure setUEN(thebits : TBits_2); inline;
  3939. procedure setUEN0(thebits : TBits_1); inline;
  3940. procedure setUEN1(thebits : TBits_1); inline;
  3941. procedure setUSIDL(thebits : TBits_1); inline;
  3942. procedure setWAKE(thebits : TBits_1); inline;
  3943. procedure setw(thebits : TBits_32); inline;
  3944. public
  3945. procedure clearABAUD; inline;
  3946. procedure clearBRGH; inline;
  3947. procedure clearIREN; inline;
  3948. procedure clearLPBACK; inline;
  3949. procedure clearON; inline;
  3950. procedure clearPDSEL0; inline;
  3951. procedure clearPDSEL1; inline;
  3952. procedure clearRTSMD; inline;
  3953. procedure clearRXINV; inline;
  3954. procedure clearSIDL; inline;
  3955. procedure clearSTSEL; inline;
  3956. procedure clearUARTEN; inline;
  3957. procedure clearUEN0; inline;
  3958. procedure clearUEN1; inline;
  3959. procedure clearUSIDL; inline;
  3960. procedure clearWAKE; inline;
  3961. procedure setABAUD; inline;
  3962. procedure setBRGH; inline;
  3963. procedure setIREN; inline;
  3964. procedure setLPBACK; inline;
  3965. procedure setON; inline;
  3966. procedure setPDSEL0; inline;
  3967. procedure setPDSEL1; inline;
  3968. procedure setRTSMD; inline;
  3969. procedure setRXINV; inline;
  3970. procedure setSIDL; inline;
  3971. procedure setSTSEL; inline;
  3972. procedure setUARTEN; inline;
  3973. procedure setUEN0; inline;
  3974. procedure setUEN1; inline;
  3975. procedure setUSIDL; inline;
  3976. procedure setWAKE; inline;
  3977. property ABAUD : TBits_1 read getABAUD write setABAUD;
  3978. property BRGH : TBits_1 read getBRGH write setBRGH;
  3979. property IREN : TBits_1 read getIREN write setIREN;
  3980. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  3981. property ON : TBits_1 read getON write setON;
  3982. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  3983. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  3984. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  3985. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  3986. property RXINV : TBits_1 read getRXINV write setRXINV;
  3987. property SIDL : TBits_1 read getSIDL write setSIDL;
  3988. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  3989. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  3990. property UEN : TBits_2 read getUEN write setUEN;
  3991. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  3992. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  3993. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  3994. property WAKE : TBits_1 read getWAKE write setWAKE;
  3995. property w : TBits_32 read getw write setw;
  3996. end;
  3997. TUART1A_U1MODE = record
  3998. private
  3999. function getABAUD : TBits_1; inline;
  4000. function getBRGH : TBits_1; inline;
  4001. function getIREN : TBits_1; inline;
  4002. function getLPBACK : TBits_1; inline;
  4003. function getON : TBits_1; inline;
  4004. function getPDSEL : TBits_2; inline;
  4005. function getPDSEL0 : TBits_1; inline;
  4006. function getPDSEL1 : TBits_1; inline;
  4007. function getRTSMD : TBits_1; inline;
  4008. function getRXINV : TBits_1; inline;
  4009. function getSIDL : TBits_1; inline;
  4010. function getSTSEL : TBits_1; inline;
  4011. function getUARTEN : TBits_1; inline;
  4012. function getUEN : TBits_2; inline;
  4013. function getUEN0 : TBits_1; inline;
  4014. function getUEN1 : TBits_1; inline;
  4015. function getUSIDL : TBits_1; inline;
  4016. function getWAKE : TBits_1; inline;
  4017. function getw : TBits_32; inline;
  4018. procedure setABAUD(thebits : TBits_1); inline;
  4019. procedure setBRGH(thebits : TBits_1); inline;
  4020. procedure setIREN(thebits : TBits_1); inline;
  4021. procedure setLPBACK(thebits : TBits_1); inline;
  4022. procedure setON(thebits : TBits_1); inline;
  4023. procedure setPDSEL(thebits : TBits_2); inline;
  4024. procedure setPDSEL0(thebits : TBits_1); inline;
  4025. procedure setPDSEL1(thebits : TBits_1); inline;
  4026. procedure setRTSMD(thebits : TBits_1); inline;
  4027. procedure setRXINV(thebits : TBits_1); inline;
  4028. procedure setSIDL(thebits : TBits_1); inline;
  4029. procedure setSTSEL(thebits : TBits_1); inline;
  4030. procedure setUARTEN(thebits : TBits_1); inline;
  4031. procedure setUEN(thebits : TBits_2); inline;
  4032. procedure setUEN0(thebits : TBits_1); inline;
  4033. procedure setUEN1(thebits : TBits_1); inline;
  4034. procedure setUSIDL(thebits : TBits_1); inline;
  4035. procedure setWAKE(thebits : TBits_1); inline;
  4036. procedure setw(thebits : TBits_32); inline;
  4037. public
  4038. procedure clearABAUD; inline;
  4039. procedure clearBRGH; inline;
  4040. procedure clearIREN; inline;
  4041. procedure clearLPBACK; inline;
  4042. procedure clearON; inline;
  4043. procedure clearPDSEL0; inline;
  4044. procedure clearPDSEL1; inline;
  4045. procedure clearRTSMD; inline;
  4046. procedure clearRXINV; inline;
  4047. procedure clearSIDL; inline;
  4048. procedure clearSTSEL; inline;
  4049. procedure clearUARTEN; inline;
  4050. procedure clearUEN0; inline;
  4051. procedure clearUEN1; inline;
  4052. procedure clearUSIDL; inline;
  4053. procedure clearWAKE; inline;
  4054. procedure setABAUD; inline;
  4055. procedure setBRGH; inline;
  4056. procedure setIREN; inline;
  4057. procedure setLPBACK; inline;
  4058. procedure setON; inline;
  4059. procedure setPDSEL0; inline;
  4060. procedure setPDSEL1; inline;
  4061. procedure setRTSMD; inline;
  4062. procedure setRXINV; inline;
  4063. procedure setSIDL; inline;
  4064. procedure setSTSEL; inline;
  4065. procedure setUARTEN; inline;
  4066. procedure setUEN0; inline;
  4067. procedure setUEN1; inline;
  4068. procedure setUSIDL; inline;
  4069. procedure setWAKE; inline;
  4070. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4071. property BRGH : TBits_1 read getBRGH write setBRGH;
  4072. property IREN : TBits_1 read getIREN write setIREN;
  4073. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4074. property ON : TBits_1 read getON write setON;
  4075. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4076. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4077. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4078. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  4079. property RXINV : TBits_1 read getRXINV write setRXINV;
  4080. property SIDL : TBits_1 read getSIDL write setSIDL;
  4081. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4082. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4083. property UEN : TBits_2 read getUEN write setUEN;
  4084. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  4085. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  4086. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4087. property WAKE : TBits_1 read getWAKE write setWAKE;
  4088. property w : TBits_32 read getw write setw;
  4089. end;
  4090. TUART1A_U1ASTA = record
  4091. private
  4092. function getADDEN : TBits_1; inline;
  4093. function getADDR : TBits_8; inline;
  4094. function getADM_EN : TBits_1; inline;
  4095. function getFERR : TBits_1; inline;
  4096. function getOERR : TBits_1; inline;
  4097. function getPERR : TBits_1; inline;
  4098. function getRIDLE : TBits_1; inline;
  4099. function getTRMT : TBits_1; inline;
  4100. function getURXDA : TBits_1; inline;
  4101. function getURXEN : TBits_1; inline;
  4102. function getURXISEL : TBits_2; inline;
  4103. function getURXISEL0 : TBits_1; inline;
  4104. function getURXISEL1 : TBits_1; inline;
  4105. function getUTXBF : TBits_1; inline;
  4106. function getUTXBRK : TBits_1; inline;
  4107. function getUTXEN : TBits_1; inline;
  4108. function getUTXINV : TBits_1; inline;
  4109. function getUTXISEL : TBits_2; inline;
  4110. function getUTXISEL0 : TBits_1; inline;
  4111. function getUTXISEL1 : TBits_1; inline;
  4112. function getUTXSEL : TBits_2; inline;
  4113. function getw : TBits_32; inline;
  4114. procedure setADDEN(thebits : TBits_1); inline;
  4115. procedure setADDR(thebits : TBits_8); inline;
  4116. procedure setADM_EN(thebits : TBits_1); inline;
  4117. procedure setFERR(thebits : TBits_1); inline;
  4118. procedure setOERR(thebits : TBits_1); inline;
  4119. procedure setPERR(thebits : TBits_1); inline;
  4120. procedure setRIDLE(thebits : TBits_1); inline;
  4121. procedure setTRMT(thebits : TBits_1); inline;
  4122. procedure setURXDA(thebits : TBits_1); inline;
  4123. procedure setURXEN(thebits : TBits_1); inline;
  4124. procedure setURXISEL(thebits : TBits_2); inline;
  4125. procedure setURXISEL0(thebits : TBits_1); inline;
  4126. procedure setURXISEL1(thebits : TBits_1); inline;
  4127. procedure setUTXBF(thebits : TBits_1); inline;
  4128. procedure setUTXBRK(thebits : TBits_1); inline;
  4129. procedure setUTXEN(thebits : TBits_1); inline;
  4130. procedure setUTXINV(thebits : TBits_1); inline;
  4131. procedure setUTXISEL(thebits : TBits_2); inline;
  4132. procedure setUTXISEL0(thebits : TBits_1); inline;
  4133. procedure setUTXISEL1(thebits : TBits_1); inline;
  4134. procedure setUTXSEL(thebits : TBits_2); inline;
  4135. procedure setw(thebits : TBits_32); inline;
  4136. public
  4137. procedure clearADDEN; inline;
  4138. procedure clearADM_EN; inline;
  4139. procedure clearFERR; inline;
  4140. procedure clearOERR; inline;
  4141. procedure clearPERR; inline;
  4142. procedure clearRIDLE; inline;
  4143. procedure clearTRMT; inline;
  4144. procedure clearURXDA; inline;
  4145. procedure clearURXEN; inline;
  4146. procedure clearURXISEL0; inline;
  4147. procedure clearURXISEL1; inline;
  4148. procedure clearUTXBF; inline;
  4149. procedure clearUTXBRK; inline;
  4150. procedure clearUTXEN; inline;
  4151. procedure clearUTXINV; inline;
  4152. procedure clearUTXISEL0; inline;
  4153. procedure clearUTXISEL1; inline;
  4154. procedure setADDEN; inline;
  4155. procedure setADM_EN; inline;
  4156. procedure setFERR; inline;
  4157. procedure setOERR; inline;
  4158. procedure setPERR; inline;
  4159. procedure setRIDLE; inline;
  4160. procedure setTRMT; inline;
  4161. procedure setURXDA; inline;
  4162. procedure setURXEN; inline;
  4163. procedure setURXISEL0; inline;
  4164. procedure setURXISEL1; inline;
  4165. procedure setUTXBF; inline;
  4166. procedure setUTXBRK; inline;
  4167. procedure setUTXEN; inline;
  4168. procedure setUTXINV; inline;
  4169. procedure setUTXISEL0; inline;
  4170. procedure setUTXISEL1; inline;
  4171. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4172. property ADDR : TBits_8 read getADDR write setADDR;
  4173. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4174. property FERR : TBits_1 read getFERR write setFERR;
  4175. property OERR : TBits_1 read getOERR write setOERR;
  4176. property PERR : TBits_1 read getPERR write setPERR;
  4177. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4178. property TRMT : TBits_1 read getTRMT write setTRMT;
  4179. property URXDA : TBits_1 read getURXDA write setURXDA;
  4180. property URXEN : TBits_1 read getURXEN write setURXEN;
  4181. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4182. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4183. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4184. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4185. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4186. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4187. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4188. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4189. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4190. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4191. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4192. property w : TBits_32 read getw write setw;
  4193. end;
  4194. TUART1A_U1STA = record
  4195. private
  4196. function getADDEN : TBits_1; inline;
  4197. function getADDR : TBits_8; inline;
  4198. function getADM_EN : TBits_1; inline;
  4199. function getFERR : TBits_1; inline;
  4200. function getOERR : TBits_1; inline;
  4201. function getPERR : TBits_1; inline;
  4202. function getRIDLE : TBits_1; inline;
  4203. function getTRMT : TBits_1; inline;
  4204. function getURXDA : TBits_1; inline;
  4205. function getURXEN : TBits_1; inline;
  4206. function getURXISEL : TBits_2; inline;
  4207. function getURXISEL0 : TBits_1; inline;
  4208. function getURXISEL1 : TBits_1; inline;
  4209. function getUTXBF : TBits_1; inline;
  4210. function getUTXBRK : TBits_1; inline;
  4211. function getUTXEN : TBits_1; inline;
  4212. function getUTXINV : TBits_1; inline;
  4213. function getUTXISEL : TBits_2; inline;
  4214. function getUTXISEL0 : TBits_1; inline;
  4215. function getUTXISEL1 : TBits_1; inline;
  4216. function getUTXSEL : TBits_2; inline;
  4217. function getw : TBits_32; inline;
  4218. procedure setADDEN(thebits : TBits_1); inline;
  4219. procedure setADDR(thebits : TBits_8); inline;
  4220. procedure setADM_EN(thebits : TBits_1); inline;
  4221. procedure setFERR(thebits : TBits_1); inline;
  4222. procedure setOERR(thebits : TBits_1); inline;
  4223. procedure setPERR(thebits : TBits_1); inline;
  4224. procedure setRIDLE(thebits : TBits_1); inline;
  4225. procedure setTRMT(thebits : TBits_1); inline;
  4226. procedure setURXDA(thebits : TBits_1); inline;
  4227. procedure setURXEN(thebits : TBits_1); inline;
  4228. procedure setURXISEL(thebits : TBits_2); inline;
  4229. procedure setURXISEL0(thebits : TBits_1); inline;
  4230. procedure setURXISEL1(thebits : TBits_1); inline;
  4231. procedure setUTXBF(thebits : TBits_1); inline;
  4232. procedure setUTXBRK(thebits : TBits_1); inline;
  4233. procedure setUTXEN(thebits : TBits_1); inline;
  4234. procedure setUTXINV(thebits : TBits_1); inline;
  4235. procedure setUTXISEL(thebits : TBits_2); inline;
  4236. procedure setUTXISEL0(thebits : TBits_1); inline;
  4237. procedure setUTXISEL1(thebits : TBits_1); inline;
  4238. procedure setUTXSEL(thebits : TBits_2); inline;
  4239. procedure setw(thebits : TBits_32); inline;
  4240. public
  4241. procedure clearADDEN; inline;
  4242. procedure clearADM_EN; inline;
  4243. procedure clearFERR; inline;
  4244. procedure clearOERR; inline;
  4245. procedure clearPERR; inline;
  4246. procedure clearRIDLE; inline;
  4247. procedure clearTRMT; inline;
  4248. procedure clearURXDA; inline;
  4249. procedure clearURXEN; inline;
  4250. procedure clearURXISEL0; inline;
  4251. procedure clearURXISEL1; inline;
  4252. procedure clearUTXBF; inline;
  4253. procedure clearUTXBRK; inline;
  4254. procedure clearUTXEN; inline;
  4255. procedure clearUTXINV; inline;
  4256. procedure clearUTXISEL0; inline;
  4257. procedure clearUTXISEL1; inline;
  4258. procedure setADDEN; inline;
  4259. procedure setADM_EN; inline;
  4260. procedure setFERR; inline;
  4261. procedure setOERR; inline;
  4262. procedure setPERR; inline;
  4263. procedure setRIDLE; inline;
  4264. procedure setTRMT; inline;
  4265. procedure setURXDA; inline;
  4266. procedure setURXEN; inline;
  4267. procedure setURXISEL0; inline;
  4268. procedure setURXISEL1; inline;
  4269. procedure setUTXBF; inline;
  4270. procedure setUTXBRK; inline;
  4271. procedure setUTXEN; inline;
  4272. procedure setUTXINV; inline;
  4273. procedure setUTXISEL0; inline;
  4274. procedure setUTXISEL1; inline;
  4275. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4276. property ADDR : TBits_8 read getADDR write setADDR;
  4277. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4278. property FERR : TBits_1 read getFERR write setFERR;
  4279. property OERR : TBits_1 read getOERR write setOERR;
  4280. property PERR : TBits_1 read getPERR write setPERR;
  4281. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4282. property TRMT : TBits_1 read getTRMT write setTRMT;
  4283. property URXDA : TBits_1 read getURXDA write setURXDA;
  4284. property URXEN : TBits_1 read getURXEN write setURXEN;
  4285. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4286. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4287. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4288. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4289. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4290. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4291. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4292. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4293. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4294. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4295. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4296. property w : TBits_32 read getw write setw;
  4297. end;
  4298. type
  4299. TUART1ARegisters = record
  4300. U1AMODEbits : TUART1A_U1AMODE;
  4301. U1AMODE : longWord;
  4302. U1MODEbits : TUART1A_U1MODE;
  4303. U1MODE : longWord;
  4304. U1AMODECLR : longWord;
  4305. U1MODECLR : longWord;
  4306. U1AMODESET : longWord;
  4307. U1MODESET : longWord;
  4308. U1AMODEINV : longWord;
  4309. U1MODEINV : longWord;
  4310. U1ASTAbits : TUART1A_U1ASTA;
  4311. U1ASTA : longWord;
  4312. U1STAbits : TUART1A_U1STA;
  4313. U1STA : longWord;
  4314. U1ASTACLR : longWord;
  4315. U1STACLR : longWord;
  4316. U1ASTASET : longWord;
  4317. U1STASET : longWord;
  4318. U1ASTAINV : longWord;
  4319. U1STAINV : longWord;
  4320. U1ATXREG : longWord;
  4321. U1TXREG : longWord;
  4322. U1ARXREG : longWord;
  4323. U1RXREG : longWord;
  4324. U1ABRG : longWord;
  4325. U1BRG : longWord;
  4326. U1ABRGCLR : longWord;
  4327. U1BRGCLR : longWord;
  4328. U1ABRGSET : longWord;
  4329. U1BRGSET : longWord;
  4330. U1ABRGINV : longWord;
  4331. U1BRGINV : longWord;
  4332. end;
  4333. TUART1B_U1BMODE = record
  4334. private
  4335. function getABAUD : TBits_1; inline;
  4336. function getBRGH : TBits_1; inline;
  4337. function getIREN : TBits_1; inline;
  4338. function getLPBACK : TBits_1; inline;
  4339. function getON : TBits_1; inline;
  4340. function getPDSEL : TBits_2; inline;
  4341. function getPDSEL0 : TBits_1; inline;
  4342. function getPDSEL1 : TBits_1; inline;
  4343. function getRXINV : TBits_1; inline;
  4344. function getSIDL : TBits_1; inline;
  4345. function getSTSEL : TBits_1; inline;
  4346. function getUARTEN : TBits_1; inline;
  4347. function getUSIDL : TBits_1; inline;
  4348. function getWAKE : TBits_1; inline;
  4349. function getw : TBits_32; inline;
  4350. procedure setABAUD(thebits : TBits_1); inline;
  4351. procedure setBRGH(thebits : TBits_1); inline;
  4352. procedure setIREN(thebits : TBits_1); inline;
  4353. procedure setLPBACK(thebits : TBits_1); inline;
  4354. procedure setON(thebits : TBits_1); inline;
  4355. procedure setPDSEL(thebits : TBits_2); inline;
  4356. procedure setPDSEL0(thebits : TBits_1); inline;
  4357. procedure setPDSEL1(thebits : TBits_1); inline;
  4358. procedure setRXINV(thebits : TBits_1); inline;
  4359. procedure setSIDL(thebits : TBits_1); inline;
  4360. procedure setSTSEL(thebits : TBits_1); inline;
  4361. procedure setUARTEN(thebits : TBits_1); inline;
  4362. procedure setUSIDL(thebits : TBits_1); inline;
  4363. procedure setWAKE(thebits : TBits_1); inline;
  4364. procedure setw(thebits : TBits_32); inline;
  4365. public
  4366. procedure clearABAUD; inline;
  4367. procedure clearBRGH; inline;
  4368. procedure clearIREN; inline;
  4369. procedure clearLPBACK; inline;
  4370. procedure clearON; inline;
  4371. procedure clearPDSEL0; inline;
  4372. procedure clearPDSEL1; inline;
  4373. procedure clearRXINV; inline;
  4374. procedure clearSIDL; inline;
  4375. procedure clearSTSEL; inline;
  4376. procedure clearUARTEN; inline;
  4377. procedure clearUSIDL; inline;
  4378. procedure clearWAKE; inline;
  4379. procedure setABAUD; inline;
  4380. procedure setBRGH; inline;
  4381. procedure setIREN; inline;
  4382. procedure setLPBACK; inline;
  4383. procedure setON; inline;
  4384. procedure setPDSEL0; inline;
  4385. procedure setPDSEL1; inline;
  4386. procedure setRXINV; inline;
  4387. procedure setSIDL; inline;
  4388. procedure setSTSEL; inline;
  4389. procedure setUARTEN; inline;
  4390. procedure setUSIDL; inline;
  4391. procedure setWAKE; inline;
  4392. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4393. property BRGH : TBits_1 read getBRGH write setBRGH;
  4394. property IREN : TBits_1 read getIREN write setIREN;
  4395. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4396. property ON : TBits_1 read getON write setON;
  4397. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4398. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4399. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4400. property RXINV : TBits_1 read getRXINV write setRXINV;
  4401. property SIDL : TBits_1 read getSIDL write setSIDL;
  4402. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4403. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4404. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4405. property WAKE : TBits_1 read getWAKE write setWAKE;
  4406. property w : TBits_32 read getw write setw;
  4407. end;
  4408. TUART1B_U4MODE = record
  4409. private
  4410. function getABAUD : TBits_1; inline;
  4411. function getBRGH : TBits_1; inline;
  4412. function getIREN : TBits_1; inline;
  4413. function getLPBACK : TBits_1; inline;
  4414. function getON : TBits_1; inline;
  4415. function getPDSEL : TBits_2; inline;
  4416. function getPDSEL0 : TBits_1; inline;
  4417. function getPDSEL1 : TBits_1; inline;
  4418. function getRXINV : TBits_1; inline;
  4419. function getSIDL : TBits_1; inline;
  4420. function getSTSEL : TBits_1; inline;
  4421. function getUARTEN : TBits_1; inline;
  4422. function getUSIDL : TBits_1; inline;
  4423. function getWAKE : TBits_1; inline;
  4424. function getw : TBits_32; inline;
  4425. procedure setABAUD(thebits : TBits_1); inline;
  4426. procedure setBRGH(thebits : TBits_1); inline;
  4427. procedure setIREN(thebits : TBits_1); inline;
  4428. procedure setLPBACK(thebits : TBits_1); inline;
  4429. procedure setON(thebits : TBits_1); inline;
  4430. procedure setPDSEL(thebits : TBits_2); inline;
  4431. procedure setPDSEL0(thebits : TBits_1); inline;
  4432. procedure setPDSEL1(thebits : TBits_1); inline;
  4433. procedure setRXINV(thebits : TBits_1); inline;
  4434. procedure setSIDL(thebits : TBits_1); inline;
  4435. procedure setSTSEL(thebits : TBits_1); inline;
  4436. procedure setUARTEN(thebits : TBits_1); inline;
  4437. procedure setUSIDL(thebits : TBits_1); inline;
  4438. procedure setWAKE(thebits : TBits_1); inline;
  4439. procedure setw(thebits : TBits_32); inline;
  4440. public
  4441. procedure clearABAUD; inline;
  4442. procedure clearBRGH; inline;
  4443. procedure clearIREN; inline;
  4444. procedure clearLPBACK; inline;
  4445. procedure clearON; inline;
  4446. procedure clearPDSEL0; inline;
  4447. procedure clearPDSEL1; inline;
  4448. procedure clearRXINV; inline;
  4449. procedure clearSIDL; inline;
  4450. procedure clearSTSEL; inline;
  4451. procedure clearUARTEN; inline;
  4452. procedure clearUSIDL; inline;
  4453. procedure clearWAKE; inline;
  4454. procedure setABAUD; inline;
  4455. procedure setBRGH; inline;
  4456. procedure setIREN; inline;
  4457. procedure setLPBACK; inline;
  4458. procedure setON; inline;
  4459. procedure setPDSEL0; inline;
  4460. procedure setPDSEL1; inline;
  4461. procedure setRXINV; inline;
  4462. procedure setSIDL; inline;
  4463. procedure setSTSEL; inline;
  4464. procedure setUARTEN; inline;
  4465. procedure setUSIDL; inline;
  4466. procedure setWAKE; inline;
  4467. property ABAUD : TBits_1 read getABAUD write setABAUD;
  4468. property BRGH : TBits_1 read getBRGH write setBRGH;
  4469. property IREN : TBits_1 read getIREN write setIREN;
  4470. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  4471. property ON : TBits_1 read getON write setON;
  4472. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  4473. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  4474. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  4475. property RXINV : TBits_1 read getRXINV write setRXINV;
  4476. property SIDL : TBits_1 read getSIDL write setSIDL;
  4477. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  4478. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  4479. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  4480. property WAKE : TBits_1 read getWAKE write setWAKE;
  4481. property w : TBits_32 read getw write setw;
  4482. end;
  4483. TUART1B_U1BSTA = record
  4484. private
  4485. function getADDEN : TBits_1; inline;
  4486. function getADDR : TBits_8; inline;
  4487. function getADM_EN : TBits_1; inline;
  4488. function getFERR : TBits_1; inline;
  4489. function getOERR : TBits_1; inline;
  4490. function getPERR : TBits_1; inline;
  4491. function getRIDLE : TBits_1; inline;
  4492. function getTRMT : TBits_1; inline;
  4493. function getURXDA : TBits_1; inline;
  4494. function getURXEN : TBits_1; inline;
  4495. function getURXISEL : TBits_2; inline;
  4496. function getURXISEL0 : TBits_1; inline;
  4497. function getURXISEL1 : TBits_1; inline;
  4498. function getUTXBF : TBits_1; inline;
  4499. function getUTXBRK : TBits_1; inline;
  4500. function getUTXEN : TBits_1; inline;
  4501. function getUTXINV : TBits_1; inline;
  4502. function getUTXISEL : TBits_2; inline;
  4503. function getUTXISEL0 : TBits_1; inline;
  4504. function getUTXISEL1 : TBits_1; inline;
  4505. function getUTXSEL : TBits_2; inline;
  4506. function getw : TBits_32; inline;
  4507. procedure setADDEN(thebits : TBits_1); inline;
  4508. procedure setADDR(thebits : TBits_8); inline;
  4509. procedure setADM_EN(thebits : TBits_1); inline;
  4510. procedure setFERR(thebits : TBits_1); inline;
  4511. procedure setOERR(thebits : TBits_1); inline;
  4512. procedure setPERR(thebits : TBits_1); inline;
  4513. procedure setRIDLE(thebits : TBits_1); inline;
  4514. procedure setTRMT(thebits : TBits_1); inline;
  4515. procedure setURXDA(thebits : TBits_1); inline;
  4516. procedure setURXEN(thebits : TBits_1); inline;
  4517. procedure setURXISEL(thebits : TBits_2); inline;
  4518. procedure setURXISEL0(thebits : TBits_1); inline;
  4519. procedure setURXISEL1(thebits : TBits_1); inline;
  4520. procedure setUTXBF(thebits : TBits_1); inline;
  4521. procedure setUTXBRK(thebits : TBits_1); inline;
  4522. procedure setUTXEN(thebits : TBits_1); inline;
  4523. procedure setUTXINV(thebits : TBits_1); inline;
  4524. procedure setUTXISEL(thebits : TBits_2); inline;
  4525. procedure setUTXISEL0(thebits : TBits_1); inline;
  4526. procedure setUTXISEL1(thebits : TBits_1); inline;
  4527. procedure setUTXSEL(thebits : TBits_2); inline;
  4528. procedure setw(thebits : TBits_32); inline;
  4529. public
  4530. procedure clearADDEN; inline;
  4531. procedure clearADM_EN; inline;
  4532. procedure clearFERR; inline;
  4533. procedure clearOERR; inline;
  4534. procedure clearPERR; inline;
  4535. procedure clearRIDLE; inline;
  4536. procedure clearTRMT; inline;
  4537. procedure clearURXDA; inline;
  4538. procedure clearURXEN; inline;
  4539. procedure clearURXISEL0; inline;
  4540. procedure clearURXISEL1; inline;
  4541. procedure clearUTXBF; inline;
  4542. procedure clearUTXBRK; inline;
  4543. procedure clearUTXEN; inline;
  4544. procedure clearUTXINV; inline;
  4545. procedure clearUTXISEL0; inline;
  4546. procedure clearUTXISEL1; inline;
  4547. procedure setADDEN; inline;
  4548. procedure setADM_EN; inline;
  4549. procedure setFERR; inline;
  4550. procedure setOERR; inline;
  4551. procedure setPERR; inline;
  4552. procedure setRIDLE; inline;
  4553. procedure setTRMT; inline;
  4554. procedure setURXDA; inline;
  4555. procedure setURXEN; inline;
  4556. procedure setURXISEL0; inline;
  4557. procedure setURXISEL1; inline;
  4558. procedure setUTXBF; inline;
  4559. procedure setUTXBRK; inline;
  4560. procedure setUTXEN; inline;
  4561. procedure setUTXINV; inline;
  4562. procedure setUTXISEL0; inline;
  4563. procedure setUTXISEL1; inline;
  4564. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4565. property ADDR : TBits_8 read getADDR write setADDR;
  4566. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4567. property FERR : TBits_1 read getFERR write setFERR;
  4568. property OERR : TBits_1 read getOERR write setOERR;
  4569. property PERR : TBits_1 read getPERR write setPERR;
  4570. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4571. property TRMT : TBits_1 read getTRMT write setTRMT;
  4572. property URXDA : TBits_1 read getURXDA write setURXDA;
  4573. property URXEN : TBits_1 read getURXEN write setURXEN;
  4574. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4575. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4576. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4577. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4578. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4579. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4580. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4581. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4582. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4583. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4584. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4585. property w : TBits_32 read getw write setw;
  4586. end;
  4587. TUART1B_U4STA = record
  4588. private
  4589. function getADDEN : TBits_1; inline;
  4590. function getADDR : TBits_8; inline;
  4591. function getADM_EN : TBits_1; inline;
  4592. function getFERR : TBits_1; inline;
  4593. function getOERR : TBits_1; inline;
  4594. function getPERR : TBits_1; inline;
  4595. function getRIDLE : TBits_1; inline;
  4596. function getTRMT : TBits_1; inline;
  4597. function getURXDA : TBits_1; inline;
  4598. function getURXEN : TBits_1; inline;
  4599. function getURXISEL : TBits_2; inline;
  4600. function getURXISEL0 : TBits_1; inline;
  4601. function getURXISEL1 : TBits_1; inline;
  4602. function getUTXBF : TBits_1; inline;
  4603. function getUTXBRK : TBits_1; inline;
  4604. function getUTXEN : TBits_1; inline;
  4605. function getUTXINV : TBits_1; inline;
  4606. function getUTXISEL : TBits_2; inline;
  4607. function getUTXISEL0 : TBits_1; inline;
  4608. function getUTXISEL1 : TBits_1; inline;
  4609. function getUTXSEL : TBits_2; inline;
  4610. function getw : TBits_32; inline;
  4611. procedure setADDEN(thebits : TBits_1); inline;
  4612. procedure setADDR(thebits : TBits_8); inline;
  4613. procedure setADM_EN(thebits : TBits_1); inline;
  4614. procedure setFERR(thebits : TBits_1); inline;
  4615. procedure setOERR(thebits : TBits_1); inline;
  4616. procedure setPERR(thebits : TBits_1); inline;
  4617. procedure setRIDLE(thebits : TBits_1); inline;
  4618. procedure setTRMT(thebits : TBits_1); inline;
  4619. procedure setURXDA(thebits : TBits_1); inline;
  4620. procedure setURXEN(thebits : TBits_1); inline;
  4621. procedure setURXISEL(thebits : TBits_2); inline;
  4622. procedure setURXISEL0(thebits : TBits_1); inline;
  4623. procedure setURXISEL1(thebits : TBits_1); inline;
  4624. procedure setUTXBF(thebits : TBits_1); inline;
  4625. procedure setUTXBRK(thebits : TBits_1); inline;
  4626. procedure setUTXEN(thebits : TBits_1); inline;
  4627. procedure setUTXINV(thebits : TBits_1); inline;
  4628. procedure setUTXISEL(thebits : TBits_2); inline;
  4629. procedure setUTXISEL0(thebits : TBits_1); inline;
  4630. procedure setUTXISEL1(thebits : TBits_1); inline;
  4631. procedure setUTXSEL(thebits : TBits_2); inline;
  4632. procedure setw(thebits : TBits_32); inline;
  4633. public
  4634. procedure clearADDEN; inline;
  4635. procedure clearADM_EN; inline;
  4636. procedure clearFERR; inline;
  4637. procedure clearOERR; inline;
  4638. procedure clearPERR; inline;
  4639. procedure clearRIDLE; inline;
  4640. procedure clearTRMT; inline;
  4641. procedure clearURXDA; inline;
  4642. procedure clearURXEN; inline;
  4643. procedure clearURXISEL0; inline;
  4644. procedure clearURXISEL1; inline;
  4645. procedure clearUTXBF; inline;
  4646. procedure clearUTXBRK; inline;
  4647. procedure clearUTXEN; inline;
  4648. procedure clearUTXINV; inline;
  4649. procedure clearUTXISEL0; inline;
  4650. procedure clearUTXISEL1; inline;
  4651. procedure setADDEN; inline;
  4652. procedure setADM_EN; inline;
  4653. procedure setFERR; inline;
  4654. procedure setOERR; inline;
  4655. procedure setPERR; inline;
  4656. procedure setRIDLE; inline;
  4657. procedure setTRMT; inline;
  4658. procedure setURXDA; inline;
  4659. procedure setURXEN; inline;
  4660. procedure setURXISEL0; inline;
  4661. procedure setURXISEL1; inline;
  4662. procedure setUTXBF; inline;
  4663. procedure setUTXBRK; inline;
  4664. procedure setUTXEN; inline;
  4665. procedure setUTXINV; inline;
  4666. procedure setUTXISEL0; inline;
  4667. procedure setUTXISEL1; inline;
  4668. property ADDEN : TBits_1 read getADDEN write setADDEN;
  4669. property ADDR : TBits_8 read getADDR write setADDR;
  4670. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  4671. property FERR : TBits_1 read getFERR write setFERR;
  4672. property OERR : TBits_1 read getOERR write setOERR;
  4673. property PERR : TBits_1 read getPERR write setPERR;
  4674. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  4675. property TRMT : TBits_1 read getTRMT write setTRMT;
  4676. property URXDA : TBits_1 read getURXDA write setURXDA;
  4677. property URXEN : TBits_1 read getURXEN write setURXEN;
  4678. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  4679. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  4680. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  4681. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  4682. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  4683. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  4684. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  4685. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  4686. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  4687. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  4688. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  4689. property w : TBits_32 read getw write setw;
  4690. end;
  4691. type
  4692. TUART1BRegisters = record
  4693. U1BMODEbits : TUART1B_U1BMODE;
  4694. U1BMODE : longWord;
  4695. U4MODEbits : TUART1B_U4MODE;
  4696. U4MODE : longWord;
  4697. U1BMODECLR : longWord;
  4698. U4MODECLR : longWord;
  4699. U1BMODESET : longWord;
  4700. U4MODESET : longWord;
  4701. U1BMODEINV : longWord;
  4702. U4MODEINV : longWord;
  4703. U1BSTAbits : TUART1B_U1BSTA;
  4704. U1BSTA : longWord;
  4705. U4STAbits : TUART1B_U4STA;
  4706. U4STA : longWord;
  4707. U1BSTACLR : longWord;
  4708. U4STACLR : longWord;
  4709. U1BSTASET : longWord;
  4710. U4STASET : longWord;
  4711. U1BSTAINV : longWord;
  4712. U4STAINV : longWord;
  4713. U1BTXREG : longWord;
  4714. U4TXREG : longWord;
  4715. U1BRXREG : longWord;
  4716. U4RXREG : longWord;
  4717. U1BBRG : longWord;
  4718. U4BRG : longWord;
  4719. U1BBRGCLR : longWord;
  4720. U4BRGCLR : longWord;
  4721. U1BBRGSET : longWord;
  4722. U4BRGSET : longWord;
  4723. U1BBRGINV : longWord;
  4724. U4BRGINV : longWord;
  4725. end;
  4726. 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. TUART2_U2MODE = record
  5549. private
  5550. function getABAUD : TBits_1; inline;
  5551. function getBRGH : TBits_1; inline;
  5552. function getIREN : TBits_1; inline;
  5553. function getLPBACK : TBits_1; inline;
  5554. function getON : TBits_1; inline;
  5555. function getPDSEL : TBits_2; inline;
  5556. function getPDSEL0 : TBits_1; inline;
  5557. function getPDSEL1 : TBits_1; inline;
  5558. function getRTSMD : TBits_1; inline;
  5559. function getRXINV : TBits_1; inline;
  5560. function getSIDL : TBits_1; inline;
  5561. function getSTSEL : TBits_1; inline;
  5562. function getUARTEN : TBits_1; inline;
  5563. function getUEN : TBits_2; inline;
  5564. function getUEN0 : TBits_1; inline;
  5565. function getUEN1 : TBits_1; inline;
  5566. function getUSIDL : TBits_1; inline;
  5567. function getWAKE : TBits_1; inline;
  5568. function getw : TBits_32; inline;
  5569. procedure setABAUD(thebits : TBits_1); inline;
  5570. procedure setBRGH(thebits : TBits_1); inline;
  5571. procedure setIREN(thebits : TBits_1); inline;
  5572. procedure setLPBACK(thebits : TBits_1); inline;
  5573. procedure setON(thebits : TBits_1); inline;
  5574. procedure setPDSEL(thebits : TBits_2); inline;
  5575. procedure setPDSEL0(thebits : TBits_1); inline;
  5576. procedure setPDSEL1(thebits : TBits_1); inline;
  5577. procedure setRTSMD(thebits : TBits_1); inline;
  5578. procedure setRXINV(thebits : TBits_1); inline;
  5579. procedure setSIDL(thebits : TBits_1); inline;
  5580. procedure setSTSEL(thebits : TBits_1); inline;
  5581. procedure setUARTEN(thebits : TBits_1); inline;
  5582. procedure setUEN(thebits : TBits_2); inline;
  5583. procedure setUEN0(thebits : TBits_1); inline;
  5584. procedure setUEN1(thebits : TBits_1); inline;
  5585. procedure setUSIDL(thebits : TBits_1); inline;
  5586. procedure setWAKE(thebits : TBits_1); inline;
  5587. procedure setw(thebits : TBits_32); inline;
  5588. public
  5589. procedure clearABAUD; inline;
  5590. procedure clearBRGH; inline;
  5591. procedure clearIREN; inline;
  5592. procedure clearLPBACK; inline;
  5593. procedure clearON; inline;
  5594. procedure clearPDSEL0; inline;
  5595. procedure clearPDSEL1; inline;
  5596. procedure clearRTSMD; inline;
  5597. procedure clearRXINV; inline;
  5598. procedure clearSIDL; inline;
  5599. procedure clearSTSEL; inline;
  5600. procedure clearUARTEN; inline;
  5601. procedure clearUEN0; inline;
  5602. procedure clearUEN1; inline;
  5603. procedure clearUSIDL; inline;
  5604. procedure clearWAKE; inline;
  5605. procedure setABAUD; inline;
  5606. procedure setBRGH; inline;
  5607. procedure setIREN; inline;
  5608. procedure setLPBACK; inline;
  5609. procedure setON; inline;
  5610. procedure setPDSEL0; inline;
  5611. procedure setPDSEL1; inline;
  5612. procedure setRTSMD; inline;
  5613. procedure setRXINV; inline;
  5614. procedure setSIDL; inline;
  5615. procedure setSTSEL; inline;
  5616. procedure setUARTEN; inline;
  5617. procedure setUEN0; inline;
  5618. procedure setUEN1; inline;
  5619. procedure setUSIDL; inline;
  5620. procedure setWAKE; inline;
  5621. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5622. property BRGH : TBits_1 read getBRGH write setBRGH;
  5623. property IREN : TBits_1 read getIREN write setIREN;
  5624. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5625. property ON : TBits_1 read getON write setON;
  5626. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5627. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5628. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5629. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  5630. property RXINV : TBits_1 read getRXINV write setRXINV;
  5631. property SIDL : TBits_1 read getSIDL write setSIDL;
  5632. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5633. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5634. property UEN : TBits_2 read getUEN write setUEN;
  5635. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  5636. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  5637. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5638. property WAKE : TBits_1 read getWAKE write setWAKE;
  5639. property w : TBits_32 read getw write setw;
  5640. end;
  5641. TUART2_U3AMODE = record
  5642. private
  5643. function getABAUD : TBits_1; inline;
  5644. function getBRGH : TBits_1; inline;
  5645. function getIREN : TBits_1; inline;
  5646. function getLPBACK : TBits_1; inline;
  5647. function getON : TBits_1; inline;
  5648. function getPDSEL : TBits_2; inline;
  5649. function getPDSEL0 : TBits_1; inline;
  5650. function getPDSEL1 : TBits_1; inline;
  5651. function getRTSMD : TBits_1; inline;
  5652. function getRXINV : TBits_1; inline;
  5653. function getSIDL : TBits_1; inline;
  5654. function getSTSEL : TBits_1; inline;
  5655. function getUARTEN : TBits_1; inline;
  5656. function getUEN : TBits_2; inline;
  5657. function getUEN0 : TBits_1; inline;
  5658. function getUEN1 : TBits_1; inline;
  5659. function getUSIDL : TBits_1; inline;
  5660. function getWAKE : TBits_1; inline;
  5661. function getw : TBits_32; inline;
  5662. procedure setABAUD(thebits : TBits_1); inline;
  5663. procedure setBRGH(thebits : TBits_1); inline;
  5664. procedure setIREN(thebits : TBits_1); inline;
  5665. procedure setLPBACK(thebits : TBits_1); inline;
  5666. procedure setON(thebits : TBits_1); inline;
  5667. procedure setPDSEL(thebits : TBits_2); inline;
  5668. procedure setPDSEL0(thebits : TBits_1); inline;
  5669. procedure setPDSEL1(thebits : TBits_1); inline;
  5670. procedure setRTSMD(thebits : TBits_1); inline;
  5671. procedure setRXINV(thebits : TBits_1); inline;
  5672. procedure setSIDL(thebits : TBits_1); inline;
  5673. procedure setSTSEL(thebits : TBits_1); inline;
  5674. procedure setUARTEN(thebits : TBits_1); inline;
  5675. procedure setUEN(thebits : TBits_2); inline;
  5676. procedure setUEN0(thebits : TBits_1); inline;
  5677. procedure setUEN1(thebits : TBits_1); inline;
  5678. procedure setUSIDL(thebits : TBits_1); inline;
  5679. procedure setWAKE(thebits : TBits_1); inline;
  5680. procedure setw(thebits : TBits_32); inline;
  5681. public
  5682. procedure clearABAUD; inline;
  5683. procedure clearBRGH; inline;
  5684. procedure clearIREN; inline;
  5685. procedure clearLPBACK; inline;
  5686. procedure clearON; inline;
  5687. procedure clearPDSEL0; inline;
  5688. procedure clearPDSEL1; inline;
  5689. procedure clearRTSMD; inline;
  5690. procedure clearRXINV; inline;
  5691. procedure clearSIDL; inline;
  5692. procedure clearSTSEL; inline;
  5693. procedure clearUARTEN; inline;
  5694. procedure clearUEN0; inline;
  5695. procedure clearUEN1; inline;
  5696. procedure clearUSIDL; inline;
  5697. procedure clearWAKE; inline;
  5698. procedure setABAUD; inline;
  5699. procedure setBRGH; inline;
  5700. procedure setIREN; inline;
  5701. procedure setLPBACK; inline;
  5702. procedure setON; inline;
  5703. procedure setPDSEL0; inline;
  5704. procedure setPDSEL1; inline;
  5705. procedure setRTSMD; inline;
  5706. procedure setRXINV; inline;
  5707. procedure setSIDL; inline;
  5708. procedure setSTSEL; inline;
  5709. procedure setUARTEN; inline;
  5710. procedure setUEN0; inline;
  5711. procedure setUEN1; inline;
  5712. procedure setUSIDL; inline;
  5713. procedure setWAKE; inline;
  5714. property ABAUD : TBits_1 read getABAUD write setABAUD;
  5715. property BRGH : TBits_1 read getBRGH write setBRGH;
  5716. property IREN : TBits_1 read getIREN write setIREN;
  5717. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  5718. property ON : TBits_1 read getON write setON;
  5719. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  5720. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  5721. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  5722. property RTSMD : TBits_1 read getRTSMD write setRTSMD;
  5723. property RXINV : TBits_1 read getRXINV write setRXINV;
  5724. property SIDL : TBits_1 read getSIDL write setSIDL;
  5725. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  5726. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  5727. property UEN : TBits_2 read getUEN write setUEN;
  5728. property UEN0 : TBits_1 read getUEN0 write setUEN0;
  5729. property UEN1 : TBits_1 read getUEN1 write setUEN1;
  5730. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  5731. property WAKE : TBits_1 read getWAKE write setWAKE;
  5732. property w : TBits_32 read getw write setw;
  5733. end;
  5734. TUART2_U2STA = record
  5735. private
  5736. function getADDEN : TBits_1; inline;
  5737. function getADDR : TBits_8; inline;
  5738. function getADM_EN : TBits_1; inline;
  5739. function getFERR : TBits_1; inline;
  5740. function getOERR : TBits_1; inline;
  5741. function getPERR : TBits_1; inline;
  5742. function getRIDLE : TBits_1; inline;
  5743. function getTRMT : TBits_1; inline;
  5744. function getURXDA : TBits_1; inline;
  5745. function getURXEN : TBits_1; inline;
  5746. function getURXISEL : TBits_2; inline;
  5747. function getURXISEL0 : TBits_1; inline;
  5748. function getURXISEL1 : TBits_1; inline;
  5749. function getUTXBF : TBits_1; inline;
  5750. function getUTXBRK : TBits_1; inline;
  5751. function getUTXEN : TBits_1; inline;
  5752. function getUTXINV : TBits_1; inline;
  5753. function getUTXISEL : TBits_2; inline;
  5754. function getUTXISEL0 : TBits_1; inline;
  5755. function getUTXISEL1 : TBits_1; inline;
  5756. function getUTXSEL : TBits_2; inline;
  5757. function getw : TBits_32; inline;
  5758. procedure setADDEN(thebits : TBits_1); inline;
  5759. procedure setADDR(thebits : TBits_8); inline;
  5760. procedure setADM_EN(thebits : TBits_1); inline;
  5761. procedure setFERR(thebits : TBits_1); inline;
  5762. procedure setOERR(thebits : TBits_1); inline;
  5763. procedure setPERR(thebits : TBits_1); inline;
  5764. procedure setRIDLE(thebits : TBits_1); inline;
  5765. procedure setTRMT(thebits : TBits_1); inline;
  5766. procedure setURXDA(thebits : TBits_1); inline;
  5767. procedure setURXEN(thebits : TBits_1); inline;
  5768. procedure setURXISEL(thebits : TBits_2); inline;
  5769. procedure setURXISEL0(thebits : TBits_1); inline;
  5770. procedure setURXISEL1(thebits : TBits_1); inline;
  5771. procedure setUTXBF(thebits : TBits_1); inline;
  5772. procedure setUTXBRK(thebits : TBits_1); inline;
  5773. procedure setUTXEN(thebits : TBits_1); inline;
  5774. procedure setUTXINV(thebits : TBits_1); inline;
  5775. procedure setUTXISEL(thebits : TBits_2); inline;
  5776. procedure setUTXISEL0(thebits : TBits_1); inline;
  5777. procedure setUTXISEL1(thebits : TBits_1); inline;
  5778. procedure setUTXSEL(thebits : TBits_2); inline;
  5779. procedure setw(thebits : TBits_32); inline;
  5780. public
  5781. procedure clearADDEN; inline;
  5782. procedure clearADM_EN; inline;
  5783. procedure clearFERR; inline;
  5784. procedure clearOERR; inline;
  5785. procedure clearPERR; inline;
  5786. procedure clearRIDLE; inline;
  5787. procedure clearTRMT; inline;
  5788. procedure clearURXDA; inline;
  5789. procedure clearURXEN; inline;
  5790. procedure clearURXISEL0; inline;
  5791. procedure clearURXISEL1; inline;
  5792. procedure clearUTXBF; inline;
  5793. procedure clearUTXBRK; inline;
  5794. procedure clearUTXEN; inline;
  5795. procedure clearUTXINV; inline;
  5796. procedure clearUTXISEL0; inline;
  5797. procedure clearUTXISEL1; inline;
  5798. procedure setADDEN; inline;
  5799. procedure setADM_EN; inline;
  5800. procedure setFERR; inline;
  5801. procedure setOERR; inline;
  5802. procedure setPERR; inline;
  5803. procedure setRIDLE; inline;
  5804. procedure setTRMT; inline;
  5805. procedure setURXDA; inline;
  5806. procedure setURXEN; inline;
  5807. procedure setURXISEL0; inline;
  5808. procedure setURXISEL1; inline;
  5809. procedure setUTXBF; inline;
  5810. procedure setUTXBRK; inline;
  5811. procedure setUTXEN; inline;
  5812. procedure setUTXINV; inline;
  5813. procedure setUTXISEL0; inline;
  5814. procedure setUTXISEL1; inline;
  5815. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5816. property ADDR : TBits_8 read getADDR write setADDR;
  5817. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5818. property FERR : TBits_1 read getFERR write setFERR;
  5819. property OERR : TBits_1 read getOERR write setOERR;
  5820. property PERR : TBits_1 read getPERR write setPERR;
  5821. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5822. property TRMT : TBits_1 read getTRMT write setTRMT;
  5823. property URXDA : TBits_1 read getURXDA write setURXDA;
  5824. property URXEN : TBits_1 read getURXEN write setURXEN;
  5825. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5826. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5827. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5828. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5829. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5830. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5831. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5832. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5833. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5834. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5835. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5836. property w : TBits_32 read getw write setw;
  5837. end;
  5838. TUART2_U3ASTA = record
  5839. private
  5840. function getADDEN : TBits_1; inline;
  5841. function getADDR : TBits_8; inline;
  5842. function getADM_EN : TBits_1; inline;
  5843. function getFERR : TBits_1; inline;
  5844. function getOERR : TBits_1; inline;
  5845. function getPERR : TBits_1; inline;
  5846. function getRIDLE : TBits_1; inline;
  5847. function getTRMT : TBits_1; inline;
  5848. function getURXDA : TBits_1; inline;
  5849. function getURXEN : TBits_1; inline;
  5850. function getURXISEL : TBits_2; inline;
  5851. function getURXISEL0 : TBits_1; inline;
  5852. function getURXISEL1 : TBits_1; inline;
  5853. function getUTXBF : TBits_1; inline;
  5854. function getUTXBRK : TBits_1; inline;
  5855. function getUTXEN : TBits_1; inline;
  5856. function getUTXINV : TBits_1; inline;
  5857. function getUTXISEL : TBits_2; inline;
  5858. function getUTXISEL0 : TBits_1; inline;
  5859. function getUTXISEL1 : TBits_1; inline;
  5860. function getUTXSEL : TBits_2; inline;
  5861. function getw : TBits_32; inline;
  5862. procedure setADDEN(thebits : TBits_1); inline;
  5863. procedure setADDR(thebits : TBits_8); inline;
  5864. procedure setADM_EN(thebits : TBits_1); inline;
  5865. procedure setFERR(thebits : TBits_1); inline;
  5866. procedure setOERR(thebits : TBits_1); inline;
  5867. procedure setPERR(thebits : TBits_1); inline;
  5868. procedure setRIDLE(thebits : TBits_1); inline;
  5869. procedure setTRMT(thebits : TBits_1); inline;
  5870. procedure setURXDA(thebits : TBits_1); inline;
  5871. procedure setURXEN(thebits : TBits_1); inline;
  5872. procedure setURXISEL(thebits : TBits_2); inline;
  5873. procedure setURXISEL0(thebits : TBits_1); inline;
  5874. procedure setURXISEL1(thebits : TBits_1); inline;
  5875. procedure setUTXBF(thebits : TBits_1); inline;
  5876. procedure setUTXBRK(thebits : TBits_1); inline;
  5877. procedure setUTXEN(thebits : TBits_1); inline;
  5878. procedure setUTXINV(thebits : TBits_1); inline;
  5879. procedure setUTXISEL(thebits : TBits_2); inline;
  5880. procedure setUTXISEL0(thebits : TBits_1); inline;
  5881. procedure setUTXISEL1(thebits : TBits_1); inline;
  5882. procedure setUTXSEL(thebits : TBits_2); inline;
  5883. procedure setw(thebits : TBits_32); inline;
  5884. public
  5885. procedure clearADDEN; inline;
  5886. procedure clearADM_EN; inline;
  5887. procedure clearFERR; inline;
  5888. procedure clearOERR; inline;
  5889. procedure clearPERR; inline;
  5890. procedure clearRIDLE; inline;
  5891. procedure clearTRMT; inline;
  5892. procedure clearURXDA; inline;
  5893. procedure clearURXEN; inline;
  5894. procedure clearURXISEL0; inline;
  5895. procedure clearURXISEL1; inline;
  5896. procedure clearUTXBF; inline;
  5897. procedure clearUTXBRK; inline;
  5898. procedure clearUTXEN; inline;
  5899. procedure clearUTXINV; inline;
  5900. procedure clearUTXISEL0; inline;
  5901. procedure clearUTXISEL1; inline;
  5902. procedure setADDEN; inline;
  5903. procedure setADM_EN; inline;
  5904. procedure setFERR; inline;
  5905. procedure setOERR; inline;
  5906. procedure setPERR; inline;
  5907. procedure setRIDLE; inline;
  5908. procedure setTRMT; inline;
  5909. procedure setURXDA; inline;
  5910. procedure setURXEN; inline;
  5911. procedure setURXISEL0; inline;
  5912. procedure setURXISEL1; inline;
  5913. procedure setUTXBF; inline;
  5914. procedure setUTXBRK; inline;
  5915. procedure setUTXEN; inline;
  5916. procedure setUTXINV; inline;
  5917. procedure setUTXISEL0; inline;
  5918. procedure setUTXISEL1; inline;
  5919. property ADDEN : TBits_1 read getADDEN write setADDEN;
  5920. property ADDR : TBits_8 read getADDR write setADDR;
  5921. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  5922. property FERR : TBits_1 read getFERR write setFERR;
  5923. property OERR : TBits_1 read getOERR write setOERR;
  5924. property PERR : TBits_1 read getPERR write setPERR;
  5925. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  5926. property TRMT : TBits_1 read getTRMT write setTRMT;
  5927. property URXDA : TBits_1 read getURXDA write setURXDA;
  5928. property URXEN : TBits_1 read getURXEN write setURXEN;
  5929. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  5930. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  5931. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  5932. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  5933. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  5934. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  5935. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  5936. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  5937. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  5938. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  5939. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  5940. property w : TBits_32 read getw write setw;
  5941. end;
  5942. type
  5943. TUART2Registers = record
  5944. U2MODEbits : TUART2_U2MODE;
  5945. U2MODE : longWord;
  5946. U3AMODEbits : TUART2_U3AMODE;
  5947. U3AMODE : longWord;
  5948. U2MODECLR : longWord;
  5949. U3AMODECLR : longWord;
  5950. U2MODESET : longWord;
  5951. U3AMODESET : longWord;
  5952. U2MODEINV : longWord;
  5953. U3AMODEINV : longWord;
  5954. U2STAbits : TUART2_U2STA;
  5955. U2STA : longWord;
  5956. U3ASTAbits : TUART2_U3ASTA;
  5957. U3ASTA : longWord;
  5958. U2STACLR : longWord;
  5959. U3ASTACLR : longWord;
  5960. U2STASET : longWord;
  5961. U3ASTASET : longWord;
  5962. U2STAINV : longWord;
  5963. U3ASTAINV : longWord;
  5964. U2TXREG : longWord;
  5965. U3ATXREG : longWord;
  5966. U2RXREG : longWord;
  5967. U3ARXREG : longWord;
  5968. U2BRG : longWord;
  5969. U3ABRG : longWord;
  5970. U2BRGCLR : longWord;
  5971. U3ABRGCLR : longWord;
  5972. U2BRGSET : longWord;
  5973. U3ABRGSET : longWord;
  5974. U2BRGINV : longWord;
  5975. U3ABRGINV : longWord;
  5976. end;
  5977. TUART3B_U3BMODE = record
  5978. private
  5979. function getABAUD : TBits_1; inline;
  5980. function getBRGH : TBits_1; inline;
  5981. function getIREN : TBits_1; inline;
  5982. function getLPBACK : TBits_1; inline;
  5983. function getON : TBits_1; inline;
  5984. function getPDSEL : TBits_2; inline;
  5985. function getPDSEL0 : TBits_1; inline;
  5986. function getPDSEL1 : TBits_1; inline;
  5987. function getRXINV : TBits_1; inline;
  5988. function getSIDL : TBits_1; inline;
  5989. function getSTSEL : TBits_1; inline;
  5990. function getUARTEN : TBits_1; inline;
  5991. function getUSIDL : TBits_1; inline;
  5992. function getWAKE : TBits_1; inline;
  5993. function getw : TBits_32; inline;
  5994. procedure setABAUD(thebits : TBits_1); inline;
  5995. procedure setBRGH(thebits : TBits_1); inline;
  5996. procedure setIREN(thebits : TBits_1); inline;
  5997. procedure setLPBACK(thebits : TBits_1); inline;
  5998. procedure setON(thebits : TBits_1); inline;
  5999. procedure setPDSEL(thebits : TBits_2); inline;
  6000. procedure setPDSEL0(thebits : TBits_1); inline;
  6001. procedure setPDSEL1(thebits : TBits_1); inline;
  6002. procedure setRXINV(thebits : TBits_1); inline;
  6003. procedure setSIDL(thebits : TBits_1); inline;
  6004. procedure setSTSEL(thebits : TBits_1); inline;
  6005. procedure setUARTEN(thebits : TBits_1); inline;
  6006. procedure setUSIDL(thebits : TBits_1); inline;
  6007. procedure setWAKE(thebits : TBits_1); inline;
  6008. procedure setw(thebits : TBits_32); inline;
  6009. public
  6010. procedure clearABAUD; inline;
  6011. procedure clearBRGH; inline;
  6012. procedure clearIREN; inline;
  6013. procedure clearLPBACK; inline;
  6014. procedure clearON; inline;
  6015. procedure clearPDSEL0; inline;
  6016. procedure clearPDSEL1; inline;
  6017. procedure clearRXINV; inline;
  6018. procedure clearSIDL; inline;
  6019. procedure clearSTSEL; inline;
  6020. procedure clearUARTEN; inline;
  6021. procedure clearUSIDL; inline;
  6022. procedure clearWAKE; inline;
  6023. procedure setABAUD; inline;
  6024. procedure setBRGH; inline;
  6025. procedure setIREN; inline;
  6026. procedure setLPBACK; inline;
  6027. procedure setON; inline;
  6028. procedure setPDSEL0; inline;
  6029. procedure setPDSEL1; inline;
  6030. procedure setRXINV; inline;
  6031. procedure setSIDL; inline;
  6032. procedure setSTSEL; inline;
  6033. procedure setUARTEN; inline;
  6034. procedure setUSIDL; inline;
  6035. procedure setWAKE; inline;
  6036. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6037. property BRGH : TBits_1 read getBRGH write setBRGH;
  6038. property IREN : TBits_1 read getIREN write setIREN;
  6039. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6040. property ON : TBits_1 read getON write setON;
  6041. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6042. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6043. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6044. property RXINV : TBits_1 read getRXINV write setRXINV;
  6045. property SIDL : TBits_1 read getSIDL write setSIDL;
  6046. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6047. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6048. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6049. property WAKE : TBits_1 read getWAKE write setWAKE;
  6050. property w : TBits_32 read getw write setw;
  6051. end;
  6052. TUART3B_U5MODE = record
  6053. private
  6054. function getABAUD : TBits_1; inline;
  6055. function getBRGH : TBits_1; inline;
  6056. function getIREN : TBits_1; inline;
  6057. function getLPBACK : TBits_1; inline;
  6058. function getON : TBits_1; inline;
  6059. function getPDSEL : TBits_2; inline;
  6060. function getPDSEL0 : TBits_1; inline;
  6061. function getPDSEL1 : TBits_1; inline;
  6062. function getRXINV : TBits_1; inline;
  6063. function getSIDL : TBits_1; inline;
  6064. function getSTSEL : TBits_1; inline;
  6065. function getUARTEN : TBits_1; inline;
  6066. function getUSIDL : TBits_1; inline;
  6067. function getWAKE : TBits_1; inline;
  6068. function getw : TBits_32; inline;
  6069. procedure setABAUD(thebits : TBits_1); inline;
  6070. procedure setBRGH(thebits : TBits_1); inline;
  6071. procedure setIREN(thebits : TBits_1); inline;
  6072. procedure setLPBACK(thebits : TBits_1); inline;
  6073. procedure setON(thebits : TBits_1); inline;
  6074. procedure setPDSEL(thebits : TBits_2); inline;
  6075. procedure setPDSEL0(thebits : TBits_1); inline;
  6076. procedure setPDSEL1(thebits : TBits_1); inline;
  6077. procedure setRXINV(thebits : TBits_1); inline;
  6078. procedure setSIDL(thebits : TBits_1); inline;
  6079. procedure setSTSEL(thebits : TBits_1); inline;
  6080. procedure setUARTEN(thebits : TBits_1); inline;
  6081. procedure setUSIDL(thebits : TBits_1); inline;
  6082. procedure setWAKE(thebits : TBits_1); inline;
  6083. procedure setw(thebits : TBits_32); inline;
  6084. public
  6085. procedure clearABAUD; inline;
  6086. procedure clearBRGH; inline;
  6087. procedure clearIREN; inline;
  6088. procedure clearLPBACK; inline;
  6089. procedure clearON; inline;
  6090. procedure clearPDSEL0; inline;
  6091. procedure clearPDSEL1; inline;
  6092. procedure clearRXINV; inline;
  6093. procedure clearSIDL; inline;
  6094. procedure clearSTSEL; inline;
  6095. procedure clearUARTEN; inline;
  6096. procedure clearUSIDL; inline;
  6097. procedure clearWAKE; inline;
  6098. procedure setABAUD; inline;
  6099. procedure setBRGH; inline;
  6100. procedure setIREN; inline;
  6101. procedure setLPBACK; inline;
  6102. procedure setON; inline;
  6103. procedure setPDSEL0; inline;
  6104. procedure setPDSEL1; inline;
  6105. procedure setRXINV; inline;
  6106. procedure setSIDL; inline;
  6107. procedure setSTSEL; inline;
  6108. procedure setUARTEN; inline;
  6109. procedure setUSIDL; inline;
  6110. procedure setWAKE; inline;
  6111. property ABAUD : TBits_1 read getABAUD write setABAUD;
  6112. property BRGH : TBits_1 read getBRGH write setBRGH;
  6113. property IREN : TBits_1 read getIREN write setIREN;
  6114. property LPBACK : TBits_1 read getLPBACK write setLPBACK;
  6115. property ON : TBits_1 read getON write setON;
  6116. property PDSEL : TBits_2 read getPDSEL write setPDSEL;
  6117. property PDSEL0 : TBits_1 read getPDSEL0 write setPDSEL0;
  6118. property PDSEL1 : TBits_1 read getPDSEL1 write setPDSEL1;
  6119. property RXINV : TBits_1 read getRXINV write setRXINV;
  6120. property SIDL : TBits_1 read getSIDL write setSIDL;
  6121. property STSEL : TBits_1 read getSTSEL write setSTSEL;
  6122. property UARTEN : TBits_1 read getUARTEN write setUARTEN;
  6123. property USIDL : TBits_1 read getUSIDL write setUSIDL;
  6124. property WAKE : TBits_1 read getWAKE write setWAKE;
  6125. property w : TBits_32 read getw write setw;
  6126. end;
  6127. TUART3B_U3BSTA = record
  6128. private
  6129. function getADDEN : TBits_1; inline;
  6130. function getADDR : TBits_8; inline;
  6131. function getADM_EN : TBits_1; inline;
  6132. function getFERR : TBits_1; inline;
  6133. function getOERR : TBits_1; inline;
  6134. function getPERR : TBits_1; inline;
  6135. function getRIDLE : TBits_1; inline;
  6136. function getTRMT : TBits_1; inline;
  6137. function getURXDA : TBits_1; inline;
  6138. function getURXEN : TBits_1; inline;
  6139. function getURXISEL : TBits_2; inline;
  6140. function getURXISEL0 : TBits_1; inline;
  6141. function getURXISEL1 : TBits_1; inline;
  6142. function getUTXBF : TBits_1; inline;
  6143. function getUTXBRK : TBits_1; inline;
  6144. function getUTXEN : TBits_1; inline;
  6145. function getUTXINV : TBits_1; inline;
  6146. function getUTXISEL : TBits_2; inline;
  6147. function getUTXISEL0 : TBits_1; inline;
  6148. function getUTXISEL1 : TBits_1; inline;
  6149. function getUTXSEL : TBits_2; inline;
  6150. function getw : TBits_32; inline;
  6151. procedure setADDEN(thebits : TBits_1); inline;
  6152. procedure setADDR(thebits : TBits_8); inline;
  6153. procedure setADM_EN(thebits : TBits_1); inline;
  6154. procedure setFERR(thebits : TBits_1); inline;
  6155. procedure setOERR(thebits : TBits_1); inline;
  6156. procedure setPERR(thebits : TBits_1); inline;
  6157. procedure setRIDLE(thebits : TBits_1); inline;
  6158. procedure setTRMT(thebits : TBits_1); inline;
  6159. procedure setURXDA(thebits : TBits_1); inline;
  6160. procedure setURXEN(thebits : TBits_1); inline;
  6161. procedure setURXISEL(thebits : TBits_2); inline;
  6162. procedure setURXISEL0(thebits : TBits_1); inline;
  6163. procedure setURXISEL1(thebits : TBits_1); inline;
  6164. procedure setUTXBF(thebits : TBits_1); inline;
  6165. procedure setUTXBRK(thebits : TBits_1); inline;
  6166. procedure setUTXEN(thebits : TBits_1); inline;
  6167. procedure setUTXINV(thebits : TBits_1); inline;
  6168. procedure setUTXISEL(thebits : TBits_2); inline;
  6169. procedure setUTXISEL0(thebits : TBits_1); inline;
  6170. procedure setUTXISEL1(thebits : TBits_1); inline;
  6171. procedure setUTXSEL(thebits : TBits_2); inline;
  6172. procedure setw(thebits : TBits_32); inline;
  6173. public
  6174. procedure clearADDEN; inline;
  6175. procedure clearADM_EN; inline;
  6176. procedure clearFERR; inline;
  6177. procedure clearOERR; inline;
  6178. procedure clearPERR; inline;
  6179. procedure clearRIDLE; inline;
  6180. procedure clearTRMT; inline;
  6181. procedure clearURXDA; inline;
  6182. procedure clearURXEN; inline;
  6183. procedure clearURXISEL0; inline;
  6184. procedure clearURXISEL1; inline;
  6185. procedure clearUTXBF; inline;
  6186. procedure clearUTXBRK; inline;
  6187. procedure clearUTXEN; inline;
  6188. procedure clearUTXINV; inline;
  6189. procedure clearUTXISEL0; inline;
  6190. procedure clearUTXISEL1; inline;
  6191. procedure setADDEN; inline;
  6192. procedure setADM_EN; inline;
  6193. procedure setFERR; inline;
  6194. procedure setOERR; inline;
  6195. procedure setPERR; inline;
  6196. procedure setRIDLE; inline;
  6197. procedure setTRMT; inline;
  6198. procedure setURXDA; inline;
  6199. procedure setURXEN; inline;
  6200. procedure setURXISEL0; inline;
  6201. procedure setURXISEL1; inline;
  6202. procedure setUTXBF; inline;
  6203. procedure setUTXBRK; inline;
  6204. procedure setUTXEN; inline;
  6205. procedure setUTXINV; inline;
  6206. procedure setUTXISEL0; inline;
  6207. procedure setUTXISEL1; inline;
  6208. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6209. property ADDR : TBits_8 read getADDR write setADDR;
  6210. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6211. property FERR : TBits_1 read getFERR write setFERR;
  6212. property OERR : TBits_1 read getOERR write setOERR;
  6213. property PERR : TBits_1 read getPERR write setPERR;
  6214. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6215. property TRMT : TBits_1 read getTRMT write setTRMT;
  6216. property URXDA : TBits_1 read getURXDA write setURXDA;
  6217. property URXEN : TBits_1 read getURXEN write setURXEN;
  6218. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6219. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6220. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6221. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6222. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6223. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6224. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6225. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6226. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6227. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6228. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6229. property w : TBits_32 read getw write setw;
  6230. end;
  6231. TUART3B_U5STA = record
  6232. private
  6233. function getADDEN : TBits_1; inline;
  6234. function getADDR : TBits_8; inline;
  6235. function getADM_EN : TBits_1; inline;
  6236. function getFERR : TBits_1; inline;
  6237. function getOERR : TBits_1; inline;
  6238. function getPERR : TBits_1; inline;
  6239. function getRIDLE : TBits_1; inline;
  6240. function getTRMT : TBits_1; inline;
  6241. function getURXDA : TBits_1; inline;
  6242. function getURXEN : TBits_1; inline;
  6243. function getURXISEL : TBits_2; inline;
  6244. function getURXISEL0 : TBits_1; inline;
  6245. function getURXISEL1 : TBits_1; inline;
  6246. function getUTXBF : TBits_1; inline;
  6247. function getUTXBRK : TBits_1; inline;
  6248. function getUTXEN : TBits_1; inline;
  6249. function getUTXINV : TBits_1; inline;
  6250. function getUTXISEL : TBits_2; inline;
  6251. function getUTXISEL0 : TBits_1; inline;
  6252. function getUTXISEL1 : TBits_1; inline;
  6253. function getUTXSEL : TBits_2; inline;
  6254. function getw : TBits_32; inline;
  6255. procedure setADDEN(thebits : TBits_1); inline;
  6256. procedure setADDR(thebits : TBits_8); inline;
  6257. procedure setADM_EN(thebits : TBits_1); inline;
  6258. procedure setFERR(thebits : TBits_1); inline;
  6259. procedure setOERR(thebits : TBits_1); inline;
  6260. procedure setPERR(thebits : TBits_1); inline;
  6261. procedure setRIDLE(thebits : TBits_1); inline;
  6262. procedure setTRMT(thebits : TBits_1); inline;
  6263. procedure setURXDA(thebits : TBits_1); inline;
  6264. procedure setURXEN(thebits : TBits_1); inline;
  6265. procedure setURXISEL(thebits : TBits_2); inline;
  6266. procedure setURXISEL0(thebits : TBits_1); inline;
  6267. procedure setURXISEL1(thebits : TBits_1); inline;
  6268. procedure setUTXBF(thebits : TBits_1); inline;
  6269. procedure setUTXBRK(thebits : TBits_1); inline;
  6270. procedure setUTXEN(thebits : TBits_1); inline;
  6271. procedure setUTXINV(thebits : TBits_1); inline;
  6272. procedure setUTXISEL(thebits : TBits_2); inline;
  6273. procedure setUTXISEL0(thebits : TBits_1); inline;
  6274. procedure setUTXISEL1(thebits : TBits_1); inline;
  6275. procedure setUTXSEL(thebits : TBits_2); inline;
  6276. procedure setw(thebits : TBits_32); inline;
  6277. public
  6278. procedure clearADDEN; inline;
  6279. procedure clearADM_EN; inline;
  6280. procedure clearFERR; inline;
  6281. procedure clearOERR; inline;
  6282. procedure clearPERR; inline;
  6283. procedure clearRIDLE; inline;
  6284. procedure clearTRMT; inline;
  6285. procedure clearURXDA; inline;
  6286. procedure clearURXEN; inline;
  6287. procedure clearURXISEL0; inline;
  6288. procedure clearURXISEL1; inline;
  6289. procedure clearUTXBF; inline;
  6290. procedure clearUTXBRK; inline;
  6291. procedure clearUTXEN; inline;
  6292. procedure clearUTXINV; inline;
  6293. procedure clearUTXISEL0; inline;
  6294. procedure clearUTXISEL1; inline;
  6295. procedure setADDEN; inline;
  6296. procedure setADM_EN; inline;
  6297. procedure setFERR; inline;
  6298. procedure setOERR; inline;
  6299. procedure setPERR; inline;
  6300. procedure setRIDLE; inline;
  6301. procedure setTRMT; inline;
  6302. procedure setURXDA; inline;
  6303. procedure setURXEN; inline;
  6304. procedure setURXISEL0; inline;
  6305. procedure setURXISEL1; inline;
  6306. procedure setUTXBF; inline;
  6307. procedure setUTXBRK; inline;
  6308. procedure setUTXEN; inline;
  6309. procedure setUTXINV; inline;
  6310. procedure setUTXISEL0; inline;
  6311. procedure setUTXISEL1; inline;
  6312. property ADDEN : TBits_1 read getADDEN write setADDEN;
  6313. property ADDR : TBits_8 read getADDR write setADDR;
  6314. property ADM_EN : TBits_1 read getADM_EN write setADM_EN;
  6315. property FERR : TBits_1 read getFERR write setFERR;
  6316. property OERR : TBits_1 read getOERR write setOERR;
  6317. property PERR : TBits_1 read getPERR write setPERR;
  6318. property RIDLE : TBits_1 read getRIDLE write setRIDLE;
  6319. property TRMT : TBits_1 read getTRMT write setTRMT;
  6320. property URXDA : TBits_1 read getURXDA write setURXDA;
  6321. property URXEN : TBits_1 read getURXEN write setURXEN;
  6322. property URXISEL : TBits_2 read getURXISEL write setURXISEL;
  6323. property URXISEL0 : TBits_1 read getURXISEL0 write setURXISEL0;
  6324. property URXISEL1 : TBits_1 read getURXISEL1 write setURXISEL1;
  6325. property UTXBF : TBits_1 read getUTXBF write setUTXBF;
  6326. property UTXBRK : TBits_1 read getUTXBRK write setUTXBRK;
  6327. property UTXEN : TBits_1 read getUTXEN write setUTXEN;
  6328. property UTXINV : TBits_1 read getUTXINV write setUTXINV;
  6329. property UTXISEL : TBits_2 read getUTXISEL write setUTXISEL;
  6330. property UTXISEL0 : TBits_1 read getUTXISEL0 write setUTXISEL0;
  6331. property UTXISEL1 : TBits_1 read getUTXISEL1 write setUTXISEL1;
  6332. property UTXSEL : TBits_2 read getUTXSEL write setUTXSEL;
  6333. property w : TBits_32 read getw write setw;
  6334. end;
  6335. type
  6336. TUART3BRegisters = record
  6337. U3BMODEbits : TUART3B_U3BMODE;
  6338. U3BMODE : longWord;
  6339. U5MODEbits : TUART3B_U5MODE;
  6340. U5MODE : longWord;
  6341. U3BMODECLR : longWord;
  6342. U5MODECLR : longWord;
  6343. U3BMODESET : longWord;
  6344. U5MODESET : longWord;
  6345. U3BMODEINV : longWord;
  6346. U5MODEINV : longWord;
  6347. U3BSTAbits : TUART3B_U3BSTA;
  6348. U3BSTA : longWord;
  6349. U5STAbits : TUART3B_U5STA;
  6350. U5STA : longWord;
  6351. U3BSTACLR : longWord;
  6352. U5STACLR : longWord;
  6353. U3BSTASET : longWord;
  6354. U5STASET : longWord;
  6355. U3BSTAINV : longWord;
  6356. U5STAINV : longWord;
  6357. U3BTXREG : longWord;
  6358. U5TXREG : longWord;
  6359. U3BRXREG : longWord;
  6360. U5RXREG : longWord;
  6361. U3BBRG : longWord;
  6362. U5BRG : longWord;
  6363. U3BBRGCLR : longWord;
  6364. U5BRGCLR : longWord;
  6365. U3BBRGSET : longWord;
  6366. U5BRGSET : longWord;
  6367. U3BBRGINV : longWord;
  6368. U5BRGINV : longWord;
  6369. end;
  6370. TPMP_PMCON = record
  6371. private
  6372. function getADRMUX : TBits_2; inline;
  6373. function getADRMUX0 : TBits_1; inline;
  6374. function getADRMUX1 : TBits_1; inline;
  6375. function getALP : TBits_1; inline;
  6376. function getCS1P : TBits_1; inline;
  6377. function getCS2P : TBits_1; inline;
  6378. function getCSF : TBits_2; inline;
  6379. function getCSF0 : TBits_1; inline;
  6380. function getCSF1 : TBits_1; inline;
  6381. function getON : TBits_1; inline;
  6382. function getPMPEN : TBits_1; inline;
  6383. function getPMPTTL : TBits_1; inline;
  6384. function getPSIDL : TBits_1; inline;
  6385. function getPTRDEN : TBits_1; inline;
  6386. function getPTWREN : TBits_1; inline;
  6387. function getRDSP : TBits_1; inline;
  6388. function getSIDL : TBits_1; inline;
  6389. function getWRSP : TBits_1; inline;
  6390. function getw : TBits_32; inline;
  6391. procedure setADRMUX(thebits : TBits_2); inline;
  6392. procedure setADRMUX0(thebits : TBits_1); inline;
  6393. procedure setADRMUX1(thebits : TBits_1); inline;
  6394. procedure setALP(thebits : TBits_1); inline;
  6395. procedure setCS1P(thebits : TBits_1); inline;
  6396. procedure setCS2P(thebits : TBits_1); inline;
  6397. procedure setCSF(thebits : TBits_2); inline;
  6398. procedure setCSF0(thebits : TBits_1); inline;
  6399. procedure setCSF1(thebits : TBits_1); inline;
  6400. procedure setON(thebits : TBits_1); inline;
  6401. procedure setPMPEN(thebits : TBits_1); inline;
  6402. procedure setPMPTTL(thebits : TBits_1); inline;
  6403. procedure setPSIDL(thebits : TBits_1); inline;
  6404. procedure setPTRDEN(thebits : TBits_1); inline;
  6405. procedure setPTWREN(thebits : TBits_1); inline;
  6406. procedure setRDSP(thebits : TBits_1); inline;
  6407. procedure setSIDL(thebits : TBits_1); inline;
  6408. procedure setWRSP(thebits : TBits_1); inline;
  6409. procedure setw(thebits : TBits_32); inline;
  6410. public
  6411. procedure clearADRMUX0; inline;
  6412. procedure clearADRMUX1; inline;
  6413. procedure clearALP; inline;
  6414. procedure clearCS1P; inline;
  6415. procedure clearCS2P; inline;
  6416. procedure clearCSF0; inline;
  6417. procedure clearCSF1; inline;
  6418. procedure clearON; inline;
  6419. procedure clearPMPEN; inline;
  6420. procedure clearPMPTTL; inline;
  6421. procedure clearPSIDL; inline;
  6422. procedure clearPTRDEN; inline;
  6423. procedure clearPTWREN; inline;
  6424. procedure clearRDSP; inline;
  6425. procedure clearSIDL; inline;
  6426. procedure clearWRSP; inline;
  6427. procedure setADRMUX0; inline;
  6428. procedure setADRMUX1; inline;
  6429. procedure setALP; inline;
  6430. procedure setCS1P; inline;
  6431. procedure setCS2P; inline;
  6432. procedure setCSF0; inline;
  6433. procedure setCSF1; inline;
  6434. procedure setON; inline;
  6435. procedure setPMPEN; inline;
  6436. procedure setPMPTTL; inline;
  6437. procedure setPSIDL; inline;
  6438. procedure setPTRDEN; inline;
  6439. procedure setPTWREN; inline;
  6440. procedure setRDSP; inline;
  6441. procedure setSIDL; inline;
  6442. procedure setWRSP; inline;
  6443. property ADRMUX : TBits_2 read getADRMUX write setADRMUX;
  6444. property ADRMUX0 : TBits_1 read getADRMUX0 write setADRMUX0;
  6445. property ADRMUX1 : TBits_1 read getADRMUX1 write setADRMUX1;
  6446. property ALP : TBits_1 read getALP write setALP;
  6447. property CS1P : TBits_1 read getCS1P write setCS1P;
  6448. property CS2P : TBits_1 read getCS2P write setCS2P;
  6449. property CSF : TBits_2 read getCSF write setCSF;
  6450. property CSF0 : TBits_1 read getCSF0 write setCSF0;
  6451. property CSF1 : TBits_1 read getCSF1 write setCSF1;
  6452. property ON : TBits_1 read getON write setON;
  6453. property PMPEN : TBits_1 read getPMPEN write setPMPEN;
  6454. property PMPTTL : TBits_1 read getPMPTTL write setPMPTTL;
  6455. property PSIDL : TBits_1 read getPSIDL write setPSIDL;
  6456. property PTRDEN : TBits_1 read getPTRDEN write setPTRDEN;
  6457. property PTWREN : TBits_1 read getPTWREN write setPTWREN;
  6458. property RDSP : TBits_1 read getRDSP write setRDSP;
  6459. property SIDL : TBits_1 read getSIDL write setSIDL;
  6460. property WRSP : TBits_1 read getWRSP write setWRSP;
  6461. property w : TBits_32 read getw write setw;
  6462. end;
  6463. TPMP_PMMODE = record
  6464. private
  6465. function getBUSY : TBits_1; inline;
  6466. function getINCM : TBits_2; inline;
  6467. function getINCM0 : TBits_1; inline;
  6468. function getINCM1 : TBits_1; inline;
  6469. function getIRQM : TBits_2; inline;
  6470. function getIRQM0 : TBits_1; inline;
  6471. function getIRQM1 : TBits_1; inline;
  6472. function getMODE : TBits_2; inline;
  6473. function getMODE0 : TBits_1; inline;
  6474. function getMODE1 : TBits_1; inline;
  6475. function getMODE16 : TBits_1; inline;
  6476. function getWAITB : TBits_2; inline;
  6477. function getWAITB0 : TBits_1; inline;
  6478. function getWAITB1 : TBits_1; inline;
  6479. function getWAITE : TBits_2; inline;
  6480. function getWAITE0 : TBits_1; inline;
  6481. function getWAITE1 : TBits_1; inline;
  6482. function getWAITM : TBits_4; inline;
  6483. function getWAITM0 : TBits_1; inline;
  6484. function getWAITM1 : TBits_1; inline;
  6485. function getWAITM2 : TBits_1; inline;
  6486. function getWAITM3 : TBits_1; inline;
  6487. function getw : TBits_32; inline;
  6488. procedure setBUSY(thebits : TBits_1); inline;
  6489. procedure setINCM(thebits : TBits_2); inline;
  6490. procedure setINCM0(thebits : TBits_1); inline;
  6491. procedure setINCM1(thebits : TBits_1); inline;
  6492. procedure setIRQM(thebits : TBits_2); inline;
  6493. procedure setIRQM0(thebits : TBits_1); inline;
  6494. procedure setIRQM1(thebits : TBits_1); inline;
  6495. procedure setMODE(thebits : TBits_2); inline;
  6496. procedure setMODE0(thebits : TBits_1); inline;
  6497. procedure setMODE1(thebits : TBits_1); inline;
  6498. procedure setMODE16(thebits : TBits_1); inline;
  6499. procedure setWAITB(thebits : TBits_2); inline;
  6500. procedure setWAITB0(thebits : TBits_1); inline;
  6501. procedure setWAITB1(thebits : TBits_1); inline;
  6502. procedure setWAITE(thebits : TBits_2); inline;
  6503. procedure setWAITE0(thebits : TBits_1); inline;
  6504. procedure setWAITE1(thebits : TBits_1); inline;
  6505. procedure setWAITM(thebits : TBits_4); inline;
  6506. procedure setWAITM0(thebits : TBits_1); inline;
  6507. procedure setWAITM1(thebits : TBits_1); inline;
  6508. procedure setWAITM2(thebits : TBits_1); inline;
  6509. procedure setWAITM3(thebits : TBits_1); inline;
  6510. procedure setw(thebits : TBits_32); inline;
  6511. public
  6512. procedure clearBUSY; inline;
  6513. procedure clearINCM0; inline;
  6514. procedure clearINCM1; inline;
  6515. procedure clearIRQM0; inline;
  6516. procedure clearIRQM1; inline;
  6517. procedure clearMODE0; inline;
  6518. procedure clearMODE16; inline;
  6519. procedure clearMODE1; inline;
  6520. procedure clearWAITB0; inline;
  6521. procedure clearWAITB1; inline;
  6522. procedure clearWAITE0; inline;
  6523. procedure clearWAITE1; inline;
  6524. procedure clearWAITM0; inline;
  6525. procedure clearWAITM1; inline;
  6526. procedure clearWAITM2; inline;
  6527. procedure clearWAITM3; inline;
  6528. procedure setBUSY; inline;
  6529. procedure setINCM0; inline;
  6530. procedure setINCM1; inline;
  6531. procedure setIRQM0; inline;
  6532. procedure setIRQM1; inline;
  6533. procedure setMODE0; inline;
  6534. procedure setMODE16; inline;
  6535. procedure setMODE1; inline;
  6536. procedure setWAITB0; inline;
  6537. procedure setWAITB1; inline;
  6538. procedure setWAITE0; inline;
  6539. procedure setWAITE1; inline;
  6540. procedure setWAITM0; inline;
  6541. procedure setWAITM1; inline;
  6542. procedure setWAITM2; inline;
  6543. procedure setWAITM3; inline;
  6544. property BUSY : TBits_1 read getBUSY write setBUSY;
  6545. property INCM : TBits_2 read getINCM write setINCM;
  6546. property INCM0 : TBits_1 read getINCM0 write setINCM0;
  6547. property INCM1 : TBits_1 read getINCM1 write setINCM1;
  6548. property IRQM : TBits_2 read getIRQM write setIRQM;
  6549. property IRQM0 : TBits_1 read getIRQM0 write setIRQM0;
  6550. property IRQM1 : TBits_1 read getIRQM1 write setIRQM1;
  6551. property MODE : TBits_2 read getMODE write setMODE;
  6552. property MODE0 : TBits_1 read getMODE0 write setMODE0;
  6553. property MODE1 : TBits_1 read getMODE1 write setMODE1;
  6554. property MODE16 : TBits_1 read getMODE16 write setMODE16;
  6555. property WAITB : TBits_2 read getWAITB write setWAITB;
  6556. property WAITB0 : TBits_1 read getWAITB0 write setWAITB0;
  6557. property WAITB1 : TBits_1 read getWAITB1 write setWAITB1;
  6558. property WAITE : TBits_2 read getWAITE write setWAITE;
  6559. property WAITE0 : TBits_1 read getWAITE0 write setWAITE0;
  6560. property WAITE1 : TBits_1 read getWAITE1 write setWAITE1;
  6561. property WAITM : TBits_4 read getWAITM write setWAITM;
  6562. property WAITM0 : TBits_1 read getWAITM0 write setWAITM0;
  6563. property WAITM1 : TBits_1 read getWAITM1 write setWAITM1;
  6564. property WAITM2 : TBits_1 read getWAITM2 write setWAITM2;
  6565. property WAITM3 : TBits_1 read getWAITM3 write setWAITM3;
  6566. property w : TBits_32 read getw write setw;
  6567. end;
  6568. TPMP_PMADDR = record
  6569. private
  6570. function getADDR : TBits_14; inline;
  6571. function getCS : TBits_2; inline;
  6572. function getCS1 : TBits_1; inline;
  6573. function getCS2 : TBits_1; inline;
  6574. function getPADDR : TBits_14; inline;
  6575. function getw : TBits_32; inline;
  6576. procedure setADDR(thebits : TBits_14); inline;
  6577. procedure setCS(thebits : TBits_2); inline;
  6578. procedure setCS1(thebits : TBits_1); inline;
  6579. procedure setCS2(thebits : TBits_1); inline;
  6580. procedure setPADDR(thebits : TBits_14); inline;
  6581. procedure setw(thebits : TBits_32); inline;
  6582. public
  6583. procedure clearCS1; inline;
  6584. procedure clearCS2; inline;
  6585. procedure setCS1; inline;
  6586. procedure setCS2; inline;
  6587. property ADDR : TBits_14 read getADDR write setADDR;
  6588. property CS : TBits_2 read getCS write setCS;
  6589. property CS1 : TBits_1 read getCS1 write setCS1;
  6590. property CS2 : TBits_1 read getCS2 write setCS2;
  6591. property PADDR : TBits_14 read getPADDR write setPADDR;
  6592. property w : TBits_32 read getw write setw;
  6593. end;
  6594. TPMP_PMDOUT = record
  6595. private
  6596. function getDATAOUT : TBits_32; inline;
  6597. function getw : TBits_32; inline;
  6598. procedure setDATAOUT(thebits : TBits_32); inline;
  6599. procedure setw(thebits : TBits_32); inline;
  6600. public
  6601. property DATAOUT : TBits_32 read getDATAOUT write setDATAOUT;
  6602. property w : TBits_32 read getw write setw;
  6603. end;
  6604. TPMP_PMDIN = record
  6605. private
  6606. function getDATAIN : TBits_32; inline;
  6607. function getw : TBits_32; inline;
  6608. procedure setDATAIN(thebits : TBits_32); inline;
  6609. procedure setw(thebits : TBits_32); inline;
  6610. public
  6611. property DATAIN : TBits_32 read getDATAIN write setDATAIN;
  6612. property w : TBits_32 read getw write setw;
  6613. end;
  6614. TPMP_PMAEN = record
  6615. private
  6616. function getPTEN : TBits_16; inline;
  6617. function getPTEN0 : TBits_1; inline;
  6618. function getPTEN1 : TBits_1; inline;
  6619. function getPTEN10 : TBits_1; inline;
  6620. function getPTEN11 : TBits_1; inline;
  6621. function getPTEN12 : TBits_1; inline;
  6622. function getPTEN13 : TBits_1; inline;
  6623. function getPTEN14 : TBits_1; inline;
  6624. function getPTEN15 : TBits_1; inline;
  6625. function getPTEN2 : TBits_1; inline;
  6626. function getPTEN3 : TBits_1; inline;
  6627. function getPTEN4 : TBits_1; inline;
  6628. function getPTEN5 : TBits_1; inline;
  6629. function getPTEN6 : TBits_1; inline;
  6630. function getPTEN7 : TBits_1; inline;
  6631. function getPTEN8 : TBits_1; inline;
  6632. function getPTEN9 : TBits_1; inline;
  6633. function getw : TBits_32; inline;
  6634. procedure setPTEN(thebits : TBits_16); inline;
  6635. procedure setPTEN0(thebits : TBits_1); inline;
  6636. procedure setPTEN1(thebits : TBits_1); inline;
  6637. procedure setPTEN10(thebits : TBits_1); inline;
  6638. procedure setPTEN11(thebits : TBits_1); inline;
  6639. procedure setPTEN12(thebits : TBits_1); inline;
  6640. procedure setPTEN13(thebits : TBits_1); inline;
  6641. procedure setPTEN14(thebits : TBits_1); inline;
  6642. procedure setPTEN15(thebits : TBits_1); inline;
  6643. procedure setPTEN2(thebits : TBits_1); inline;
  6644. procedure setPTEN3(thebits : TBits_1); inline;
  6645. procedure setPTEN4(thebits : TBits_1); inline;
  6646. procedure setPTEN5(thebits : TBits_1); inline;
  6647. procedure setPTEN6(thebits : TBits_1); inline;
  6648. procedure setPTEN7(thebits : TBits_1); inline;
  6649. procedure setPTEN8(thebits : TBits_1); inline;
  6650. procedure setPTEN9(thebits : TBits_1); inline;
  6651. procedure setw(thebits : TBits_32); inline;
  6652. public
  6653. procedure clearPTEN0; inline;
  6654. procedure clearPTEN10; inline;
  6655. procedure clearPTEN11; inline;
  6656. procedure clearPTEN12; inline;
  6657. procedure clearPTEN13; inline;
  6658. procedure clearPTEN14; inline;
  6659. procedure clearPTEN15; inline;
  6660. procedure clearPTEN1; inline;
  6661. procedure clearPTEN2; inline;
  6662. procedure clearPTEN3; inline;
  6663. procedure clearPTEN4; inline;
  6664. procedure clearPTEN5; inline;
  6665. procedure clearPTEN6; inline;
  6666. procedure clearPTEN7; inline;
  6667. procedure clearPTEN8; inline;
  6668. procedure clearPTEN9; inline;
  6669. procedure setPTEN0; inline;
  6670. procedure setPTEN10; inline;
  6671. procedure setPTEN11; inline;
  6672. procedure setPTEN12; inline;
  6673. procedure setPTEN13; inline;
  6674. procedure setPTEN14; inline;
  6675. procedure setPTEN15; inline;
  6676. procedure setPTEN1; inline;
  6677. procedure setPTEN2; inline;
  6678. procedure setPTEN3; inline;
  6679. procedure setPTEN4; inline;
  6680. procedure setPTEN5; inline;
  6681. procedure setPTEN6; inline;
  6682. procedure setPTEN7; inline;
  6683. procedure setPTEN8; inline;
  6684. procedure setPTEN9; inline;
  6685. property PTEN : TBits_16 read getPTEN write setPTEN;
  6686. property PTEN0 : TBits_1 read getPTEN0 write setPTEN0;
  6687. property PTEN1 : TBits_1 read getPTEN1 write setPTEN1;
  6688. property PTEN10 : TBits_1 read getPTEN10 write setPTEN10;
  6689. property PTEN11 : TBits_1 read getPTEN11 write setPTEN11;
  6690. property PTEN12 : TBits_1 read getPTEN12 write setPTEN12;
  6691. property PTEN13 : TBits_1 read getPTEN13 write setPTEN13;
  6692. property PTEN14 : TBits_1 read getPTEN14 write setPTEN14;
  6693. property PTEN15 : TBits_1 read getPTEN15 write setPTEN15;
  6694. property PTEN2 : TBits_1 read getPTEN2 write setPTEN2;
  6695. property PTEN3 : TBits_1 read getPTEN3 write setPTEN3;
  6696. property PTEN4 : TBits_1 read getPTEN4 write setPTEN4;
  6697. property PTEN5 : TBits_1 read getPTEN5 write setPTEN5;
  6698. property PTEN6 : TBits_1 read getPTEN6 write setPTEN6;
  6699. property PTEN7 : TBits_1 read getPTEN7 write setPTEN7;
  6700. property PTEN8 : TBits_1 read getPTEN8 write setPTEN8;
  6701. property PTEN9 : TBits_1 read getPTEN9 write setPTEN9;
  6702. property w : TBits_32 read getw write setw;
  6703. end;
  6704. TPMP_PMSTAT = record
  6705. private
  6706. function getIB0F : TBits_1; inline;
  6707. function getIB1F : TBits_1; inline;
  6708. function getIB2F : TBits_1; inline;
  6709. function getIB3F : TBits_1; inline;
  6710. function getIBF : TBits_1; inline;
  6711. function getIBOV : TBits_1; inline;
  6712. function getOB0E : TBits_1; inline;
  6713. function getOB1E : TBits_1; inline;
  6714. function getOB2E : TBits_1; inline;
  6715. function getOB3E : TBits_1; inline;
  6716. function getOBE : TBits_1; inline;
  6717. function getOBUF : TBits_1; inline;
  6718. function getw : TBits_32; inline;
  6719. procedure setIB0F(thebits : TBits_1); inline;
  6720. procedure setIB1F(thebits : TBits_1); inline;
  6721. procedure setIB2F(thebits : TBits_1); inline;
  6722. procedure setIB3F(thebits : TBits_1); inline;
  6723. procedure setIBF(thebits : TBits_1); inline;
  6724. procedure setIBOV(thebits : TBits_1); inline;
  6725. procedure setOB0E(thebits : TBits_1); inline;
  6726. procedure setOB1E(thebits : TBits_1); inline;
  6727. procedure setOB2E(thebits : TBits_1); inline;
  6728. procedure setOB3E(thebits : TBits_1); inline;
  6729. procedure setOBE(thebits : TBits_1); inline;
  6730. procedure setOBUF(thebits : TBits_1); inline;
  6731. procedure setw(thebits : TBits_32); inline;
  6732. public
  6733. procedure clearIB0F; inline;
  6734. procedure clearIB1F; inline;
  6735. procedure clearIB2F; inline;
  6736. procedure clearIB3F; inline;
  6737. procedure clearIBF; inline;
  6738. procedure clearIBOV; inline;
  6739. procedure clearOB0E; inline;
  6740. procedure clearOB1E; inline;
  6741. procedure clearOB2E; inline;
  6742. procedure clearOB3E; inline;
  6743. procedure clearOBE; inline;
  6744. procedure clearOBUF; inline;
  6745. procedure setIB0F; inline;
  6746. procedure setIB1F; inline;
  6747. procedure setIB2F; inline;
  6748. procedure setIB3F; inline;
  6749. procedure setIBF; inline;
  6750. procedure setIBOV; inline;
  6751. procedure setOB0E; inline;
  6752. procedure setOB1E; inline;
  6753. procedure setOB2E; inline;
  6754. procedure setOB3E; inline;
  6755. procedure setOBE; inline;
  6756. procedure setOBUF; inline;
  6757. property IB0F : TBits_1 read getIB0F write setIB0F;
  6758. property IB1F : TBits_1 read getIB1F write setIB1F;
  6759. property IB2F : TBits_1 read getIB2F write setIB2F;
  6760. property IB3F : TBits_1 read getIB3F write setIB3F;
  6761. property IBF : TBits_1 read getIBF write setIBF;
  6762. property IBOV : TBits_1 read getIBOV write setIBOV;
  6763. property OB0E : TBits_1 read getOB0E write setOB0E;
  6764. property OB1E : TBits_1 read getOB1E write setOB1E;
  6765. property OB2E : TBits_1 read getOB2E write setOB2E;
  6766. property OB3E : TBits_1 read getOB3E write setOB3E;
  6767. property OBE : TBits_1 read getOBE write setOBE;
  6768. property OBUF : TBits_1 read getOBUF write setOBUF;
  6769. property w : TBits_32 read getw write setw;
  6770. end;
  6771. type
  6772. TPMPRegisters = record
  6773. PMCONbits : TPMP_PMCON;
  6774. PMCON : longWord;
  6775. PMCONCLR : longWord;
  6776. PMCONSET : longWord;
  6777. PMCONINV : longWord;
  6778. PMMODEbits : TPMP_PMMODE;
  6779. PMMODE : longWord;
  6780. PMMODECLR : longWord;
  6781. PMMODESET : longWord;
  6782. PMMODEINV : longWord;
  6783. PMADDRbits : TPMP_PMADDR;
  6784. PMADDR : longWord;
  6785. PMADDRCLR : longWord;
  6786. PMADDRSET : longWord;
  6787. PMADDRINV : longWord;
  6788. PMDOUTbits : TPMP_PMDOUT;
  6789. PMDOUT : longWord;
  6790. PMDOUTCLR : longWord;
  6791. PMDOUTSET : longWord;
  6792. PMDOUTINV : longWord;
  6793. PMDINbits : TPMP_PMDIN;
  6794. PMDIN : longWord;
  6795. PMDINCLR : longWord;
  6796. PMDINSET : longWord;
  6797. PMDININV : longWord;
  6798. PMAENbits : TPMP_PMAEN;
  6799. PMAEN : longWord;
  6800. PMAENCLR : longWord;
  6801. PMAENSET : longWord;
  6802. PMAENINV : longWord;
  6803. PMSTATbits : TPMP_PMSTAT;
  6804. PMSTAT : longWord;
  6805. PMSTATCLR : longWord;
  6806. PMSTATSET : longWord;
  6807. PMSTATINV : longWord;
  6808. end;
  6809. TADC10_AD1CON1 = record
  6810. private
  6811. function getADON : TBits_1; inline;
  6812. function getADSIDL : TBits_1; inline;
  6813. function getASAM : TBits_1; inline;
  6814. function getCLRASAM : TBits_1; inline;
  6815. function getDONE : TBits_1; inline;
  6816. function getFORM : TBits_3; inline;
  6817. function getFORM0 : TBits_1; inline;
  6818. function getFORM1 : TBits_1; inline;
  6819. function getFORM2 : TBits_1; inline;
  6820. function getON : TBits_1; inline;
  6821. function getSAMP : TBits_1; inline;
  6822. function getSIDL : TBits_1; inline;
  6823. function getSSRC : TBits_3; inline;
  6824. function getSSRC0 : TBits_1; inline;
  6825. function getSSRC1 : TBits_1; inline;
  6826. function getSSRC2 : TBits_1; inline;
  6827. function getw : TBits_32; inline;
  6828. procedure setADON(thebits : TBits_1); inline;
  6829. procedure setADSIDL(thebits : TBits_1); inline;
  6830. procedure setASAM(thebits : TBits_1); inline;
  6831. procedure setCLRASAM(thebits : TBits_1); inline;
  6832. procedure setDONE(thebits : TBits_1); inline;
  6833. procedure setFORM(thebits : TBits_3); inline;
  6834. procedure setFORM0(thebits : TBits_1); inline;
  6835. procedure setFORM1(thebits : TBits_1); inline;
  6836. procedure setFORM2(thebits : TBits_1); inline;
  6837. procedure setON(thebits : TBits_1); inline;
  6838. procedure setSAMP(thebits : TBits_1); inline;
  6839. procedure setSIDL(thebits : TBits_1); inline;
  6840. procedure setSSRC(thebits : TBits_3); inline;
  6841. procedure setSSRC0(thebits : TBits_1); inline;
  6842. procedure setSSRC1(thebits : TBits_1); inline;
  6843. procedure setSSRC2(thebits : TBits_1); inline;
  6844. procedure setw(thebits : TBits_32); inline;
  6845. public
  6846. procedure clearADON; inline;
  6847. procedure clearADSIDL; inline;
  6848. procedure clearASAM; inline;
  6849. procedure clearCLRASAM; inline;
  6850. procedure clearDONE; inline;
  6851. procedure clearFORM0; inline;
  6852. procedure clearFORM1; inline;
  6853. procedure clearFORM2; inline;
  6854. procedure clearON; inline;
  6855. procedure clearSAMP; inline;
  6856. procedure clearSIDL; inline;
  6857. procedure clearSSRC0; inline;
  6858. procedure clearSSRC1; inline;
  6859. procedure clearSSRC2; inline;
  6860. procedure setADON; inline;
  6861. procedure setADSIDL; inline;
  6862. procedure setASAM; inline;
  6863. procedure setCLRASAM; inline;
  6864. procedure setDONE; inline;
  6865. procedure setFORM0; inline;
  6866. procedure setFORM1; inline;
  6867. procedure setFORM2; inline;
  6868. procedure setON; inline;
  6869. procedure setSAMP; inline;
  6870. procedure setSIDL; inline;
  6871. procedure setSSRC0; inline;
  6872. procedure setSSRC1; inline;
  6873. procedure setSSRC2; inline;
  6874. property ADON : TBits_1 read getADON write setADON;
  6875. property ADSIDL : TBits_1 read getADSIDL write setADSIDL;
  6876. property ASAM : TBits_1 read getASAM write setASAM;
  6877. property CLRASAM : TBits_1 read getCLRASAM write setCLRASAM;
  6878. property DONE : TBits_1 read getDONE write setDONE;
  6879. property FORM : TBits_3 read getFORM write setFORM;
  6880. property FORM0 : TBits_1 read getFORM0 write setFORM0;
  6881. property FORM1 : TBits_1 read getFORM1 write setFORM1;
  6882. property FORM2 : TBits_1 read getFORM2 write setFORM2;
  6883. property ON : TBits_1 read getON write setON;
  6884. property SAMP : TBits_1 read getSAMP write setSAMP;
  6885. property SIDL : TBits_1 read getSIDL write setSIDL;
  6886. property SSRC : TBits_3 read getSSRC write setSSRC;
  6887. property SSRC0 : TBits_1 read getSSRC0 write setSSRC0;
  6888. property SSRC1 : TBits_1 read getSSRC1 write setSSRC1;
  6889. property SSRC2 : TBits_1 read getSSRC2 write setSSRC2;
  6890. property w : TBits_32 read getw write setw;
  6891. end;
  6892. TADC10_AD1CON2 = record
  6893. private
  6894. function getALTS : TBits_1; inline;
  6895. function getBUFM : TBits_1; inline;
  6896. function getBUFS : TBits_1; inline;
  6897. function getCSCNA : TBits_1; inline;
  6898. function getOFFCAL : TBits_1; inline;
  6899. function getSMPI : TBits_4; inline;
  6900. function getSMPI0 : TBits_1; inline;
  6901. function getSMPI1 : TBits_1; inline;
  6902. function getSMPI2 : TBits_1; inline;
  6903. function getSMPI3 : TBits_1; inline;
  6904. function getVCFG : TBits_3; inline;
  6905. function getVCFG0 : TBits_1; inline;
  6906. function getVCFG1 : TBits_1; inline;
  6907. function getVCFG2 : TBits_1; inline;
  6908. function getw : TBits_32; inline;
  6909. procedure setALTS(thebits : TBits_1); inline;
  6910. procedure setBUFM(thebits : TBits_1); inline;
  6911. procedure setBUFS(thebits : TBits_1); inline;
  6912. procedure setCSCNA(thebits : TBits_1); inline;
  6913. procedure setOFFCAL(thebits : TBits_1); inline;
  6914. procedure setSMPI(thebits : TBits_4); inline;
  6915. procedure setSMPI0(thebits : TBits_1); inline;
  6916. procedure setSMPI1(thebits : TBits_1); inline;
  6917. procedure setSMPI2(thebits : TBits_1); inline;
  6918. procedure setSMPI3(thebits : TBits_1); inline;
  6919. procedure setVCFG(thebits : TBits_3); inline;
  6920. procedure setVCFG0(thebits : TBits_1); inline;
  6921. procedure setVCFG1(thebits : TBits_1); inline;
  6922. procedure setVCFG2(thebits : TBits_1); inline;
  6923. procedure setw(thebits : TBits_32); inline;
  6924. public
  6925. procedure clearALTS; inline;
  6926. procedure clearBUFM; inline;
  6927. procedure clearBUFS; inline;
  6928. procedure clearCSCNA; inline;
  6929. procedure clearOFFCAL; inline;
  6930. procedure clearSMPI0; inline;
  6931. procedure clearSMPI1; inline;
  6932. procedure clearSMPI2; inline;
  6933. procedure clearSMPI3; inline;
  6934. procedure clearVCFG0; inline;
  6935. procedure clearVCFG1; inline;
  6936. procedure clearVCFG2; inline;
  6937. procedure setALTS; inline;
  6938. procedure setBUFM; inline;
  6939. procedure setBUFS; inline;
  6940. procedure setCSCNA; inline;
  6941. procedure setOFFCAL; inline;
  6942. procedure setSMPI0; inline;
  6943. procedure setSMPI1; inline;
  6944. procedure setSMPI2; inline;
  6945. procedure setSMPI3; inline;
  6946. procedure setVCFG0; inline;
  6947. procedure setVCFG1; inline;
  6948. procedure setVCFG2; inline;
  6949. property ALTS : TBits_1 read getALTS write setALTS;
  6950. property BUFM : TBits_1 read getBUFM write setBUFM;
  6951. property BUFS : TBits_1 read getBUFS write setBUFS;
  6952. property CSCNA : TBits_1 read getCSCNA write setCSCNA;
  6953. property OFFCAL : TBits_1 read getOFFCAL write setOFFCAL;
  6954. property SMPI : TBits_4 read getSMPI write setSMPI;
  6955. property SMPI0 : TBits_1 read getSMPI0 write setSMPI0;
  6956. property SMPI1 : TBits_1 read getSMPI1 write setSMPI1;
  6957. property SMPI2 : TBits_1 read getSMPI2 write setSMPI2;
  6958. property SMPI3 : TBits_1 read getSMPI3 write setSMPI3;
  6959. property VCFG : TBits_3 read getVCFG write setVCFG;
  6960. property VCFG0 : TBits_1 read getVCFG0 write setVCFG0;
  6961. property VCFG1 : TBits_1 read getVCFG1 write setVCFG1;
  6962. property VCFG2 : TBits_1 read getVCFG2 write setVCFG2;
  6963. property w : TBits_32 read getw write setw;
  6964. end;
  6965. TADC10_AD1CON3 = record
  6966. private
  6967. function getADCS : TBits_8; inline;
  6968. function getADCS0 : TBits_1; inline;
  6969. function getADCS1 : TBits_1; inline;
  6970. function getADCS2 : TBits_1; inline;
  6971. function getADCS3 : TBits_1; inline;
  6972. function getADCS4 : TBits_1; inline;
  6973. function getADCS5 : TBits_1; inline;
  6974. function getADCS6 : TBits_1; inline;
  6975. function getADCS7 : TBits_1; inline;
  6976. function getADRC : TBits_1; inline;
  6977. function getSAMC : TBits_5; inline;
  6978. function getSAMC0 : TBits_1; inline;
  6979. function getSAMC1 : TBits_1; inline;
  6980. function getSAMC2 : TBits_1; inline;
  6981. function getSAMC3 : TBits_1; inline;
  6982. function getSAMC4 : TBits_1; inline;
  6983. function getw : TBits_32; inline;
  6984. procedure setADCS(thebits : TBits_8); inline;
  6985. procedure setADCS0(thebits : TBits_1); inline;
  6986. procedure setADCS1(thebits : TBits_1); inline;
  6987. procedure setADCS2(thebits : TBits_1); inline;
  6988. procedure setADCS3(thebits : TBits_1); inline;
  6989. procedure setADCS4(thebits : TBits_1); inline;
  6990. procedure setADCS5(thebits : TBits_1); inline;
  6991. procedure setADCS6(thebits : TBits_1); inline;
  6992. procedure setADCS7(thebits : TBits_1); inline;
  6993. procedure setADRC(thebits : TBits_1); inline;
  6994. procedure setSAMC(thebits : TBits_5); inline;
  6995. procedure setSAMC0(thebits : TBits_1); inline;
  6996. procedure setSAMC1(thebits : TBits_1); inline;
  6997. procedure setSAMC2(thebits : TBits_1); inline;
  6998. procedure setSAMC3(thebits : TBits_1); inline;
  6999. procedure setSAMC4(thebits : TBits_1); inline;
  7000. procedure setw(thebits : TBits_32); inline;
  7001. public
  7002. procedure clearADCS0; inline;
  7003. procedure clearADCS1; inline;
  7004. procedure clearADCS2; inline;
  7005. procedure clearADCS3; inline;
  7006. procedure clearADCS4; inline;
  7007. procedure clearADCS5; inline;
  7008. procedure clearADCS6; inline;
  7009. procedure clearADCS7; inline;
  7010. procedure clearADRC; inline;
  7011. procedure clearSAMC0; inline;
  7012. procedure clearSAMC1; inline;
  7013. procedure clearSAMC2; inline;
  7014. procedure clearSAMC3; inline;
  7015. procedure clearSAMC4; inline;
  7016. procedure setADCS0; inline;
  7017. procedure setADCS1; inline;
  7018. procedure setADCS2; inline;
  7019. procedure setADCS3; inline;
  7020. procedure setADCS4; inline;
  7021. procedure setADCS5; inline;
  7022. procedure setADCS6; inline;
  7023. procedure setADCS7; inline;
  7024. procedure setADRC; inline;
  7025. procedure setSAMC0; inline;
  7026. procedure setSAMC1; inline;
  7027. procedure setSAMC2; inline;
  7028. procedure setSAMC3; inline;
  7029. procedure setSAMC4; inline;
  7030. property ADCS : TBits_8 read getADCS write setADCS;
  7031. property ADCS0 : TBits_1 read getADCS0 write setADCS0;
  7032. property ADCS1 : TBits_1 read getADCS1 write setADCS1;
  7033. property ADCS2 : TBits_1 read getADCS2 write setADCS2;
  7034. property ADCS3 : TBits_1 read getADCS3 write setADCS3;
  7035. property ADCS4 : TBits_1 read getADCS4 write setADCS4;
  7036. property ADCS5 : TBits_1 read getADCS5 write setADCS5;
  7037. property ADCS6 : TBits_1 read getADCS6 write setADCS6;
  7038. property ADCS7 : TBits_1 read getADCS7 write setADCS7;
  7039. property ADRC : TBits_1 read getADRC write setADRC;
  7040. property SAMC : TBits_5 read getSAMC write setSAMC;
  7041. property SAMC0 : TBits_1 read getSAMC0 write setSAMC0;
  7042. property SAMC1 : TBits_1 read getSAMC1 write setSAMC1;
  7043. property SAMC2 : TBits_1 read getSAMC2 write setSAMC2;
  7044. property SAMC3 : TBits_1 read getSAMC3 write setSAMC3;
  7045. property SAMC4 : TBits_1 read getSAMC4 write setSAMC4;
  7046. property w : TBits_32 read getw write setw;
  7047. end;
  7048. TADC10_AD1CHS = record
  7049. private
  7050. function getCH0NA : TBits_1; inline;
  7051. function getCH0NB : TBits_1; inline;
  7052. function getCH0SA : TBits_4; inline;
  7053. function getCH0SA0 : TBits_1; inline;
  7054. function getCH0SA1 : TBits_1; inline;
  7055. function getCH0SA2 : TBits_1; inline;
  7056. function getCH0SA3 : TBits_1; inline;
  7057. function getCH0SB : TBits_4; inline;
  7058. function getCH0SB0 : TBits_1; inline;
  7059. function getCH0SB1 : TBits_1; inline;
  7060. function getCH0SB2 : TBits_1; inline;
  7061. function getCH0SB3 : TBits_1; inline;
  7062. function getw : TBits_32; inline;
  7063. procedure setCH0NA(thebits : TBits_1); inline;
  7064. procedure setCH0NB(thebits : TBits_1); inline;
  7065. procedure setCH0SA(thebits : TBits_4); inline;
  7066. procedure setCH0SA0(thebits : TBits_1); inline;
  7067. procedure setCH0SA1(thebits : TBits_1); inline;
  7068. procedure setCH0SA2(thebits : TBits_1); inline;
  7069. procedure setCH0SA3(thebits : TBits_1); inline;
  7070. procedure setCH0SB(thebits : TBits_4); inline;
  7071. procedure setCH0SB0(thebits : TBits_1); inline;
  7072. procedure setCH0SB1(thebits : TBits_1); inline;
  7073. procedure setCH0SB2(thebits : TBits_1); inline;
  7074. procedure setCH0SB3(thebits : TBits_1); inline;
  7075. procedure setw(thebits : TBits_32); inline;
  7076. public
  7077. procedure clearCH0NA; inline;
  7078. procedure clearCH0NB; inline;
  7079. procedure clearCH0SA0; inline;
  7080. procedure clearCH0SA1; inline;
  7081. procedure clearCH0SA2; inline;
  7082. procedure clearCH0SA3; inline;
  7083. procedure clearCH0SB0; inline;
  7084. procedure clearCH0SB1; inline;
  7085. procedure clearCH0SB2; inline;
  7086. procedure clearCH0SB3; inline;
  7087. procedure setCH0NA; inline;
  7088. procedure setCH0NB; inline;
  7089. procedure setCH0SA0; inline;
  7090. procedure setCH0SA1; inline;
  7091. procedure setCH0SA2; inline;
  7092. procedure setCH0SA3; inline;
  7093. procedure setCH0SB0; inline;
  7094. procedure setCH0SB1; inline;
  7095. procedure setCH0SB2; inline;
  7096. procedure setCH0SB3; inline;
  7097. property CH0NA : TBits_1 read getCH0NA write setCH0NA;
  7098. property CH0NB : TBits_1 read getCH0NB write setCH0NB;
  7099. property CH0SA : TBits_4 read getCH0SA write setCH0SA;
  7100. property CH0SA0 : TBits_1 read getCH0SA0 write setCH0SA0;
  7101. property CH0SA1 : TBits_1 read getCH0SA1 write setCH0SA1;
  7102. property CH0SA2 : TBits_1 read getCH0SA2 write setCH0SA2;
  7103. property CH0SA3 : TBits_1 read getCH0SA3 write setCH0SA3;
  7104. property CH0SB : TBits_4 read getCH0SB write setCH0SB;
  7105. property CH0SB0 : TBits_1 read getCH0SB0 write setCH0SB0;
  7106. property CH0SB1 : TBits_1 read getCH0SB1 write setCH0SB1;
  7107. property CH0SB2 : TBits_1 read getCH0SB2 write setCH0SB2;
  7108. property CH0SB3 : TBits_1 read getCH0SB3 write setCH0SB3;
  7109. property w : TBits_32 read getw write setw;
  7110. end;
  7111. TADC10_AD1CSSL = record
  7112. private
  7113. function getCSSL : TBits_16; inline;
  7114. function getCSSL0 : TBits_1; inline;
  7115. function getCSSL1 : TBits_1; inline;
  7116. function getCSSL10 : TBits_1; inline;
  7117. function getCSSL11 : TBits_1; inline;
  7118. function getCSSL12 : TBits_1; inline;
  7119. function getCSSL13 : TBits_1; inline;
  7120. function getCSSL14 : TBits_1; inline;
  7121. function getCSSL15 : TBits_1; inline;
  7122. function getCSSL2 : TBits_1; inline;
  7123. function getCSSL3 : TBits_1; inline;
  7124. function getCSSL4 : TBits_1; inline;
  7125. function getCSSL5 : TBits_1; inline;
  7126. function getCSSL6 : TBits_1; inline;
  7127. function getCSSL7 : TBits_1; inline;
  7128. function getCSSL8 : TBits_1; inline;
  7129. function getCSSL9 : TBits_1; inline;
  7130. function getw : TBits_32; inline;
  7131. procedure setCSSL(thebits : TBits_16); inline;
  7132. procedure setCSSL0(thebits : TBits_1); inline;
  7133. procedure setCSSL1(thebits : TBits_1); inline;
  7134. procedure setCSSL10(thebits : TBits_1); inline;
  7135. procedure setCSSL11(thebits : TBits_1); inline;
  7136. procedure setCSSL12(thebits : TBits_1); inline;
  7137. procedure setCSSL13(thebits : TBits_1); inline;
  7138. procedure setCSSL14(thebits : TBits_1); inline;
  7139. procedure setCSSL15(thebits : TBits_1); inline;
  7140. procedure setCSSL2(thebits : TBits_1); inline;
  7141. procedure setCSSL3(thebits : TBits_1); inline;
  7142. procedure setCSSL4(thebits : TBits_1); inline;
  7143. procedure setCSSL5(thebits : TBits_1); inline;
  7144. procedure setCSSL6(thebits : TBits_1); inline;
  7145. procedure setCSSL7(thebits : TBits_1); inline;
  7146. procedure setCSSL8(thebits : TBits_1); inline;
  7147. procedure setCSSL9(thebits : TBits_1); inline;
  7148. procedure setw(thebits : TBits_32); inline;
  7149. public
  7150. procedure clearCSSL0; inline;
  7151. procedure clearCSSL10; inline;
  7152. procedure clearCSSL11; inline;
  7153. procedure clearCSSL12; inline;
  7154. procedure clearCSSL13; inline;
  7155. procedure clearCSSL14; inline;
  7156. procedure clearCSSL15; inline;
  7157. procedure clearCSSL1; inline;
  7158. procedure clearCSSL2; inline;
  7159. procedure clearCSSL3; inline;
  7160. procedure clearCSSL4; inline;
  7161. procedure clearCSSL5; inline;
  7162. procedure clearCSSL6; inline;
  7163. procedure clearCSSL7; inline;
  7164. procedure clearCSSL8; inline;
  7165. procedure clearCSSL9; inline;
  7166. procedure setCSSL0; inline;
  7167. procedure setCSSL10; inline;
  7168. procedure setCSSL11; inline;
  7169. procedure setCSSL12; inline;
  7170. procedure setCSSL13; inline;
  7171. procedure setCSSL14; inline;
  7172. procedure setCSSL15; inline;
  7173. procedure setCSSL1; inline;
  7174. procedure setCSSL2; inline;
  7175. procedure setCSSL3; inline;
  7176. procedure setCSSL4; inline;
  7177. procedure setCSSL5; inline;
  7178. procedure setCSSL6; inline;
  7179. procedure setCSSL7; inline;
  7180. procedure setCSSL8; inline;
  7181. procedure setCSSL9; inline;
  7182. property CSSL : TBits_16 read getCSSL write setCSSL;
  7183. property CSSL0 : TBits_1 read getCSSL0 write setCSSL0;
  7184. property CSSL1 : TBits_1 read getCSSL1 write setCSSL1;
  7185. property CSSL10 : TBits_1 read getCSSL10 write setCSSL10;
  7186. property CSSL11 : TBits_1 read getCSSL11 write setCSSL11;
  7187. property CSSL12 : TBits_1 read getCSSL12 write setCSSL12;
  7188. property CSSL13 : TBits_1 read getCSSL13 write setCSSL13;
  7189. property CSSL14 : TBits_1 read getCSSL14 write setCSSL14;
  7190. property CSSL15 : TBits_1 read getCSSL15 write setCSSL15;
  7191. property CSSL2 : TBits_1 read getCSSL2 write setCSSL2;
  7192. property CSSL3 : TBits_1 read getCSSL3 write setCSSL3;
  7193. property CSSL4 : TBits_1 read getCSSL4 write setCSSL4;
  7194. property CSSL5 : TBits_1 read getCSSL5 write setCSSL5;
  7195. property CSSL6 : TBits_1 read getCSSL6 write setCSSL6;
  7196. property CSSL7 : TBits_1 read getCSSL7 write setCSSL7;
  7197. property CSSL8 : TBits_1 read getCSSL8 write setCSSL8;
  7198. property CSSL9 : TBits_1 read getCSSL9 write setCSSL9;
  7199. property w : TBits_32 read getw write setw;
  7200. end;
  7201. TADC10_AD1PCFG = record
  7202. private
  7203. function getPCFG : TBits_16; inline;
  7204. function getPCFG0 : TBits_1; inline;
  7205. function getPCFG1 : TBits_1; inline;
  7206. function getPCFG10 : TBits_1; inline;
  7207. function getPCFG11 : TBits_1; inline;
  7208. function getPCFG12 : TBits_1; inline;
  7209. function getPCFG13 : TBits_1; inline;
  7210. function getPCFG14 : TBits_1; inline;
  7211. function getPCFG15 : TBits_1; inline;
  7212. function getPCFG2 : TBits_1; inline;
  7213. function getPCFG3 : TBits_1; inline;
  7214. function getPCFG4 : TBits_1; inline;
  7215. function getPCFG5 : TBits_1; inline;
  7216. function getPCFG6 : TBits_1; inline;
  7217. function getPCFG7 : TBits_1; inline;
  7218. function getPCFG8 : TBits_1; inline;
  7219. function getPCFG9 : TBits_1; inline;
  7220. function getw : TBits_32; inline;
  7221. procedure setPCFG(thebits : TBits_16); inline;
  7222. procedure setPCFG0(thebits : TBits_1); inline;
  7223. procedure setPCFG1(thebits : TBits_1); inline;
  7224. procedure setPCFG10(thebits : TBits_1); inline;
  7225. procedure setPCFG11(thebits : TBits_1); inline;
  7226. procedure setPCFG12(thebits : TBits_1); inline;
  7227. procedure setPCFG13(thebits : TBits_1); inline;
  7228. procedure setPCFG14(thebits : TBits_1); inline;
  7229. procedure setPCFG15(thebits : TBits_1); inline;
  7230. procedure setPCFG2(thebits : TBits_1); inline;
  7231. procedure setPCFG3(thebits : TBits_1); inline;
  7232. procedure setPCFG4(thebits : TBits_1); inline;
  7233. procedure setPCFG5(thebits : TBits_1); inline;
  7234. procedure setPCFG6(thebits : TBits_1); inline;
  7235. procedure setPCFG7(thebits : TBits_1); inline;
  7236. procedure setPCFG8(thebits : TBits_1); inline;
  7237. procedure setPCFG9(thebits : TBits_1); inline;
  7238. procedure setw(thebits : TBits_32); inline;
  7239. public
  7240. procedure clearPCFG0; inline;
  7241. procedure clearPCFG10; inline;
  7242. procedure clearPCFG11; inline;
  7243. procedure clearPCFG12; inline;
  7244. procedure clearPCFG13; inline;
  7245. procedure clearPCFG14; inline;
  7246. procedure clearPCFG15; inline;
  7247. procedure clearPCFG1; inline;
  7248. procedure clearPCFG2; inline;
  7249. procedure clearPCFG3; inline;
  7250. procedure clearPCFG4; inline;
  7251. procedure clearPCFG5; inline;
  7252. procedure clearPCFG6; inline;
  7253. procedure clearPCFG7; inline;
  7254. procedure clearPCFG8; inline;
  7255. procedure clearPCFG9; inline;
  7256. procedure setPCFG0; inline;
  7257. procedure setPCFG10; inline;
  7258. procedure setPCFG11; inline;
  7259. procedure setPCFG12; inline;
  7260. procedure setPCFG13; inline;
  7261. procedure setPCFG14; inline;
  7262. procedure setPCFG15; inline;
  7263. procedure setPCFG1; inline;
  7264. procedure setPCFG2; inline;
  7265. procedure setPCFG3; inline;
  7266. procedure setPCFG4; inline;
  7267. procedure setPCFG5; inline;
  7268. procedure setPCFG6; inline;
  7269. procedure setPCFG7; inline;
  7270. procedure setPCFG8; inline;
  7271. procedure setPCFG9; inline;
  7272. property PCFG : TBits_16 read getPCFG write setPCFG;
  7273. property PCFG0 : TBits_1 read getPCFG0 write setPCFG0;
  7274. property PCFG1 : TBits_1 read getPCFG1 write setPCFG1;
  7275. property PCFG10 : TBits_1 read getPCFG10 write setPCFG10;
  7276. property PCFG11 : TBits_1 read getPCFG11 write setPCFG11;
  7277. property PCFG12 : TBits_1 read getPCFG12 write setPCFG12;
  7278. property PCFG13 : TBits_1 read getPCFG13 write setPCFG13;
  7279. property PCFG14 : TBits_1 read getPCFG14 write setPCFG14;
  7280. property PCFG15 : TBits_1 read getPCFG15 write setPCFG15;
  7281. property PCFG2 : TBits_1 read getPCFG2 write setPCFG2;
  7282. property PCFG3 : TBits_1 read getPCFG3 write setPCFG3;
  7283. property PCFG4 : TBits_1 read getPCFG4 write setPCFG4;
  7284. property PCFG5 : TBits_1 read getPCFG5 write setPCFG5;
  7285. property PCFG6 : TBits_1 read getPCFG6 write setPCFG6;
  7286. property PCFG7 : TBits_1 read getPCFG7 write setPCFG7;
  7287. property PCFG8 : TBits_1 read getPCFG8 write setPCFG8;
  7288. property PCFG9 : TBits_1 read getPCFG9 write setPCFG9;
  7289. property w : TBits_32 read getw write setw;
  7290. end;
  7291. type
  7292. TADC10Registers = record
  7293. AD1CON1bits : TADC10_AD1CON1;
  7294. AD1CON1 : longWord;
  7295. AD1CON1CLR : longWord;
  7296. AD1CON1SET : longWord;
  7297. AD1CON1INV : longWord;
  7298. AD1CON2bits : TADC10_AD1CON2;
  7299. AD1CON2 : longWord;
  7300. AD1CON2CLR : longWord;
  7301. AD1CON2SET : longWord;
  7302. AD1CON2INV : longWord;
  7303. AD1CON3bits : TADC10_AD1CON3;
  7304. AD1CON3 : longWord;
  7305. AD1CON3CLR : longWord;
  7306. AD1CON3SET : longWord;
  7307. AD1CON3INV : longWord;
  7308. AD1CHSbits : TADC10_AD1CHS;
  7309. AD1CHS : longWord;
  7310. AD1CHSCLR : longWord;
  7311. AD1CHSSET : longWord;
  7312. AD1CHSINV : longWord;
  7313. AD1CSSLbits : TADC10_AD1CSSL;
  7314. AD1CSSL : longWord;
  7315. AD1CSSLCLR : longWord;
  7316. AD1CSSLSET : longWord;
  7317. AD1CSSLINV : longWord;
  7318. AD1PCFGbits : TADC10_AD1PCFG;
  7319. AD1PCFG : longWord;
  7320. AD1PCFGCLR : longWord;
  7321. AD1PCFGSET : longWord;
  7322. AD1PCFGINV : longWord;
  7323. ADC1BUF0 : longWord;
  7324. ADC1BUF1 : longWord;
  7325. ADC1BUF2 : longWord;
  7326. ADC1BUF3 : longWord;
  7327. ADC1BUF4 : longWord;
  7328. ADC1BUF5 : longWord;
  7329. ADC1BUF6 : longWord;
  7330. ADC1BUF7 : longWord;
  7331. ADC1BUF8 : longWord;
  7332. ADC1BUF9 : longWord;
  7333. ADC1BUFA : longWord;
  7334. ADC1BUFB : longWord;
  7335. ADC1BUFC : longWord;
  7336. ADC1BUFD : longWord;
  7337. ADC1BUFE : longWord;
  7338. ADC1BUFF : longWord;
  7339. end;
  7340. TCVR_CVRCON = record
  7341. private
  7342. function 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 getCAN2IF : TBits_1; inline;
  8245. function getCMP1IF : TBits_1; inline;
  8246. function getCMP2IF : TBits_1; inline;
  8247. function getCNIF : TBits_1; inline;
  8248. function getDMA0IF : TBits_1; inline;
  8249. function getDMA1IF : TBits_1; inline;
  8250. function getDMA2IF : TBits_1; inline;
  8251. function getDMA3IF : TBits_1; inline;
  8252. function getDMA4IF : TBits_1; inline;
  8253. function getDMA5IF : TBits_1; inline;
  8254. function getDMA6IF : TBits_1; inline;
  8255. function getDMA7IF : TBits_1; inline;
  8256. function getETHIF : TBits_1; inline;
  8257. function getFCEIF : TBits_1; inline;
  8258. function getFSCMIF : TBits_1; inline;
  8259. function getI2C2ABIF : TBits_1; inline;
  8260. function getI2C2AMIF : TBits_1; inline;
  8261. function getI2C2ASIF : TBits_1; inline;
  8262. function getI2C3ABIF : TBits_1; inline;
  8263. function getI2C3AMIF : TBits_1; inline;
  8264. function getI2C3ASIF : TBits_1; inline;
  8265. function getI2C4BIF : TBits_1; inline;
  8266. function getI2C4MIF : TBits_1; inline;
  8267. function getI2C4SIF : TBits_1; inline;
  8268. function getI2C5BIF : TBits_1; inline;
  8269. function getI2C5MIF : TBits_1; inline;
  8270. function getI2C5SIF : TBits_1; inline;
  8271. function getIC1EIF : TBits_1; inline;
  8272. function getIC2EIF : TBits_1; inline;
  8273. function getIC3EIF : TBits_1; inline;
  8274. function getPMPIF : TBits_1; inline;
  8275. function getRTCCIF : TBits_1; inline;
  8276. function getSPI2AEIF : TBits_1; inline;
  8277. function getSPI2ARXIF : TBits_1; inline;
  8278. function getSPI2ATXIF : TBits_1; inline;
  8279. function getSPI2EIF : TBits_1; inline;
  8280. function getSPI2RXIF : TBits_1; inline;
  8281. function getSPI2TXIF : TBits_1; inline;
  8282. function getSPI3AEIF : TBits_1; inline;
  8283. function getSPI3ARXIF : TBits_1; inline;
  8284. function getSPI3ATXIF : TBits_1; inline;
  8285. function getSPI4EIF : TBits_1; inline;
  8286. function getSPI4RXIF : TBits_1; inline;
  8287. function getSPI4TXIF : TBits_1; inline;
  8288. function getU2AEIF : TBits_1; inline;
  8289. function getU2ARXIF : TBits_1; inline;
  8290. function getU2ATXIF : TBits_1; inline;
  8291. function getU2EIF : TBits_1; inline;
  8292. function getU2RXIF : TBits_1; inline;
  8293. function getU2TXIF : TBits_1; inline;
  8294. function getU3AEIF : TBits_1; inline;
  8295. function getU3ARXIF : TBits_1; inline;
  8296. function getU3ATXIF : TBits_1; inline;
  8297. function getU3EIF : TBits_1; inline;
  8298. function getU3RXIF : TBits_1; inline;
  8299. function getU3TXIF : TBits_1; inline;
  8300. function getUSBIF : TBits_1; inline;
  8301. function getw : TBits_32; inline;
  8302. procedure setAD1IF(thebits : TBits_1); inline;
  8303. procedure setCAN1IF(thebits : TBits_1); inline;
  8304. procedure setCAN2IF(thebits : TBits_1); inline;
  8305. procedure setCMP1IF(thebits : TBits_1); inline;
  8306. procedure setCMP2IF(thebits : TBits_1); inline;
  8307. procedure setCNIF(thebits : TBits_1); inline;
  8308. procedure setDMA0IF(thebits : TBits_1); inline;
  8309. procedure setDMA1IF(thebits : TBits_1); inline;
  8310. procedure setDMA2IF(thebits : TBits_1); inline;
  8311. procedure setDMA3IF(thebits : TBits_1); inline;
  8312. procedure setDMA4IF(thebits : TBits_1); inline;
  8313. procedure setDMA5IF(thebits : TBits_1); inline;
  8314. procedure setDMA6IF(thebits : TBits_1); inline;
  8315. procedure setDMA7IF(thebits : TBits_1); inline;
  8316. procedure setETHIF(thebits : TBits_1); inline;
  8317. procedure setFCEIF(thebits : TBits_1); inline;
  8318. procedure setFSCMIF(thebits : TBits_1); inline;
  8319. procedure setI2C2ABIF(thebits : TBits_1); inline;
  8320. procedure setI2C2AMIF(thebits : TBits_1); inline;
  8321. procedure setI2C2ASIF(thebits : TBits_1); inline;
  8322. procedure setI2C3ABIF(thebits : TBits_1); inline;
  8323. procedure setI2C3AMIF(thebits : TBits_1); inline;
  8324. procedure setI2C3ASIF(thebits : TBits_1); inline;
  8325. procedure setI2C4BIF(thebits : TBits_1); inline;
  8326. procedure setI2C4MIF(thebits : TBits_1); inline;
  8327. procedure setI2C4SIF(thebits : TBits_1); inline;
  8328. procedure setI2C5BIF(thebits : TBits_1); inline;
  8329. procedure setI2C5MIF(thebits : TBits_1); inline;
  8330. procedure setI2C5SIF(thebits : TBits_1); inline;
  8331. procedure setIC1EIF(thebits : TBits_1); inline;
  8332. procedure setIC2EIF(thebits : TBits_1); inline;
  8333. procedure setIC3EIF(thebits : TBits_1); inline;
  8334. procedure setPMPIF(thebits : TBits_1); inline;
  8335. procedure setRTCCIF(thebits : TBits_1); inline;
  8336. procedure setSPI2AEIF(thebits : TBits_1); inline;
  8337. procedure setSPI2ARXIF(thebits : TBits_1); inline;
  8338. procedure setSPI2ATXIF(thebits : TBits_1); inline;
  8339. procedure setSPI2EIF(thebits : TBits_1); inline;
  8340. procedure setSPI2RXIF(thebits : TBits_1); inline;
  8341. procedure setSPI2TXIF(thebits : TBits_1); inline;
  8342. procedure setSPI3AEIF(thebits : TBits_1); inline;
  8343. procedure setSPI3ARXIF(thebits : TBits_1); inline;
  8344. procedure setSPI3ATXIF(thebits : TBits_1); inline;
  8345. procedure setSPI4EIF(thebits : TBits_1); inline;
  8346. procedure setSPI4RXIF(thebits : TBits_1); inline;
  8347. procedure setSPI4TXIF(thebits : TBits_1); inline;
  8348. procedure setU2AEIF(thebits : TBits_1); inline;
  8349. procedure setU2ARXIF(thebits : TBits_1); inline;
  8350. procedure setU2ATXIF(thebits : TBits_1); inline;
  8351. procedure setU2EIF(thebits : TBits_1); inline;
  8352. procedure setU2RXIF(thebits : TBits_1); inline;
  8353. procedure setU2TXIF(thebits : TBits_1); inline;
  8354. procedure setU3AEIF(thebits : TBits_1); inline;
  8355. procedure setU3ARXIF(thebits : TBits_1); inline;
  8356. procedure setU3ATXIF(thebits : TBits_1); inline;
  8357. procedure setU3EIF(thebits : TBits_1); inline;
  8358. procedure setU3RXIF(thebits : TBits_1); inline;
  8359. procedure setU3TXIF(thebits : TBits_1); inline;
  8360. procedure setUSBIF(thebits : TBits_1); inline;
  8361. procedure setw(thebits : TBits_32); inline;
  8362. public
  8363. procedure clearAD1IF; inline;
  8364. procedure clearCAN1IF; inline;
  8365. procedure clearCAN2IF; inline;
  8366. procedure clearCMP1IF; inline;
  8367. procedure clearCMP2IF; inline;
  8368. procedure clearCNIF; inline;
  8369. procedure clearDMA0IF; inline;
  8370. procedure clearDMA1IF; inline;
  8371. procedure clearDMA2IF; inline;
  8372. procedure clearDMA3IF; inline;
  8373. procedure clearDMA4IF; inline;
  8374. procedure clearDMA5IF; inline;
  8375. procedure clearDMA6IF; inline;
  8376. procedure clearDMA7IF; inline;
  8377. procedure clearETHIF; inline;
  8378. procedure clearFCEIF; inline;
  8379. procedure clearFSCMIF; inline;
  8380. procedure clearI2C2ABIF; inline;
  8381. procedure clearI2C2AMIF; inline;
  8382. procedure clearI2C2ASIF; inline;
  8383. procedure clearI2C3ABIF; inline;
  8384. procedure clearI2C3AMIF; inline;
  8385. procedure clearI2C3ASIF; inline;
  8386. procedure clearI2C4BIF; inline;
  8387. procedure clearI2C4MIF; inline;
  8388. procedure clearI2C4SIF; inline;
  8389. procedure clearI2C5BIF; inline;
  8390. procedure clearI2C5MIF; inline;
  8391. procedure clearI2C5SIF; inline;
  8392. procedure clearIC1EIF; inline;
  8393. procedure clearIC2EIF; inline;
  8394. procedure clearIC3EIF; inline;
  8395. procedure clearPMPIF; inline;
  8396. procedure clearRTCCIF; inline;
  8397. procedure clearSPI2AEIF; inline;
  8398. procedure clearSPI2ARXIF; inline;
  8399. procedure clearSPI2ATXIF; inline;
  8400. procedure clearSPI2EIF; inline;
  8401. procedure clearSPI2RXIF; inline;
  8402. procedure clearSPI2TXIF; inline;
  8403. procedure clearSPI3AEIF; inline;
  8404. procedure clearSPI3ARXIF; inline;
  8405. procedure clearSPI3ATXIF; inline;
  8406. procedure clearSPI4EIF; inline;
  8407. procedure clearSPI4RXIF; inline;
  8408. procedure clearSPI4TXIF; inline;
  8409. procedure clearU2AEIF; inline;
  8410. procedure clearU2ARXIF; inline;
  8411. procedure clearU2ATXIF; inline;
  8412. procedure clearU2EIF; inline;
  8413. procedure clearU2RXIF; inline;
  8414. procedure clearU2TXIF; inline;
  8415. procedure clearU3AEIF; inline;
  8416. procedure clearU3ARXIF; inline;
  8417. procedure clearU3ATXIF; inline;
  8418. procedure clearU3EIF; inline;
  8419. procedure clearU3RXIF; inline;
  8420. procedure clearU3TXIF; inline;
  8421. procedure clearUSBIF; inline;
  8422. procedure setAD1IF; inline;
  8423. procedure setCAN1IF; inline;
  8424. procedure setCAN2IF; inline;
  8425. procedure setCMP1IF; inline;
  8426. procedure setCMP2IF; inline;
  8427. procedure setCNIF; inline;
  8428. procedure setDMA0IF; inline;
  8429. procedure setDMA1IF; inline;
  8430. procedure setDMA2IF; inline;
  8431. procedure setDMA3IF; inline;
  8432. procedure setDMA4IF; inline;
  8433. procedure setDMA5IF; inline;
  8434. procedure setDMA6IF; inline;
  8435. procedure setDMA7IF; inline;
  8436. procedure setETHIF; inline;
  8437. procedure setFCEIF; inline;
  8438. procedure setFSCMIF; inline;
  8439. procedure setI2C2ABIF; inline;
  8440. procedure setI2C2AMIF; inline;
  8441. procedure setI2C2ASIF; inline;
  8442. procedure setI2C3ABIF; inline;
  8443. procedure setI2C3AMIF; inline;
  8444. procedure setI2C3ASIF; inline;
  8445. procedure setI2C4BIF; inline;
  8446. procedure setI2C4MIF; inline;
  8447. procedure setI2C4SIF; inline;
  8448. procedure setI2C5BIF; inline;
  8449. procedure setI2C5MIF; inline;
  8450. procedure setI2C5SIF; inline;
  8451. procedure setIC1EIF; inline;
  8452. procedure setIC2EIF; inline;
  8453. procedure setIC3EIF; inline;
  8454. procedure setPMPIF; inline;
  8455. procedure setRTCCIF; inline;
  8456. procedure setSPI2AEIF; inline;
  8457. procedure setSPI2ARXIF; inline;
  8458. procedure setSPI2ATXIF; inline;
  8459. procedure setSPI2EIF; inline;
  8460. procedure setSPI2RXIF; inline;
  8461. procedure setSPI2TXIF; inline;
  8462. procedure setSPI3AEIF; inline;
  8463. procedure setSPI3ARXIF; inline;
  8464. procedure setSPI3ATXIF; inline;
  8465. procedure setSPI4EIF; inline;
  8466. procedure setSPI4RXIF; inline;
  8467. procedure setSPI4TXIF; inline;
  8468. procedure setU2AEIF; inline;
  8469. procedure setU2ARXIF; inline;
  8470. procedure setU2ATXIF; inline;
  8471. procedure setU2EIF; inline;
  8472. procedure setU2RXIF; inline;
  8473. procedure setU2TXIF; inline;
  8474. procedure setU3AEIF; inline;
  8475. procedure setU3ARXIF; inline;
  8476. procedure setU3ATXIF; inline;
  8477. procedure setU3EIF; inline;
  8478. procedure setU3RXIF; inline;
  8479. procedure setU3TXIF; inline;
  8480. procedure setUSBIF; inline;
  8481. property AD1IF : TBits_1 read getAD1IF write setAD1IF;
  8482. property CAN1IF : TBits_1 read getCAN1IF write setCAN1IF;
  8483. property CAN2IF : TBits_1 read getCAN2IF write setCAN2IF;
  8484. property CMP1IF : TBits_1 read getCMP1IF write setCMP1IF;
  8485. property CMP2IF : TBits_1 read getCMP2IF write setCMP2IF;
  8486. property CNIF : TBits_1 read getCNIF write setCNIF;
  8487. property DMA0IF : TBits_1 read getDMA0IF write setDMA0IF;
  8488. property DMA1IF : TBits_1 read getDMA1IF write setDMA1IF;
  8489. property DMA2IF : TBits_1 read getDMA2IF write setDMA2IF;
  8490. property DMA3IF : TBits_1 read getDMA3IF write setDMA3IF;
  8491. property DMA4IF : TBits_1 read getDMA4IF write setDMA4IF;
  8492. property DMA5IF : TBits_1 read getDMA5IF write setDMA5IF;
  8493. property DMA6IF : TBits_1 read getDMA6IF write setDMA6IF;
  8494. property DMA7IF : TBits_1 read getDMA7IF write setDMA7IF;
  8495. property ETHIF : TBits_1 read getETHIF write setETHIF;
  8496. property FCEIF : TBits_1 read getFCEIF write setFCEIF;
  8497. property FSCMIF : TBits_1 read getFSCMIF write setFSCMIF;
  8498. property I2C2ABIF : TBits_1 read getI2C2ABIF write setI2C2ABIF;
  8499. property I2C2AMIF : TBits_1 read getI2C2AMIF write setI2C2AMIF;
  8500. property I2C2ASIF : TBits_1 read getI2C2ASIF write setI2C2ASIF;
  8501. property I2C3ABIF : TBits_1 read getI2C3ABIF write setI2C3ABIF;
  8502. property I2C3AMIF : TBits_1 read getI2C3AMIF write setI2C3AMIF;
  8503. property I2C3ASIF : TBits_1 read getI2C3ASIF write setI2C3ASIF;
  8504. property I2C4BIF : TBits_1 read getI2C4BIF write setI2C4BIF;
  8505. property I2C4MIF : TBits_1 read getI2C4MIF write setI2C4MIF;
  8506. property I2C4SIF : TBits_1 read getI2C4SIF write setI2C4SIF;
  8507. property I2C5BIF : TBits_1 read getI2C5BIF write setI2C5BIF;
  8508. property I2C5MIF : TBits_1 read getI2C5MIF write setI2C5MIF;
  8509. property I2C5SIF : TBits_1 read getI2C5SIF write setI2C5SIF;
  8510. property IC1EIF : TBits_1 read getIC1EIF write setIC1EIF;
  8511. property IC2EIF : TBits_1 read getIC2EIF write setIC2EIF;
  8512. property IC3EIF : TBits_1 read getIC3EIF write setIC3EIF;
  8513. property PMPIF : TBits_1 read getPMPIF write setPMPIF;
  8514. property RTCCIF : TBits_1 read getRTCCIF write setRTCCIF;
  8515. property SPI2AEIF : TBits_1 read getSPI2AEIF write setSPI2AEIF;
  8516. property SPI2ARXIF : TBits_1 read getSPI2ARXIF write setSPI2ARXIF;
  8517. property SPI2ATXIF : TBits_1 read getSPI2ATXIF write setSPI2ATXIF;
  8518. property SPI2EIF : TBits_1 read getSPI2EIF write setSPI2EIF;
  8519. property SPI2RXIF : TBits_1 read getSPI2RXIF write setSPI2RXIF;
  8520. property SPI2TXIF : TBits_1 read getSPI2TXIF write setSPI2TXIF;
  8521. property SPI3AEIF : TBits_1 read getSPI3AEIF write setSPI3AEIF;
  8522. property SPI3ARXIF : TBits_1 read getSPI3ARXIF write setSPI3ARXIF;
  8523. property SPI3ATXIF : TBits_1 read getSPI3ATXIF write setSPI3ATXIF;
  8524. property SPI4EIF : TBits_1 read getSPI4EIF write setSPI4EIF;
  8525. property SPI4RXIF : TBits_1 read getSPI4RXIF write setSPI4RXIF;
  8526. property SPI4TXIF : TBits_1 read getSPI4TXIF write setSPI4TXIF;
  8527. property U2AEIF : TBits_1 read getU2AEIF write setU2AEIF;
  8528. property U2ARXIF : TBits_1 read getU2ARXIF write setU2ARXIF;
  8529. property U2ATXIF : TBits_1 read getU2ATXIF write setU2ATXIF;
  8530. property U2EIF : TBits_1 read getU2EIF write setU2EIF;
  8531. property U2RXIF : TBits_1 read getU2RXIF write setU2RXIF;
  8532. property U2TXIF : TBits_1 read getU2TXIF write setU2TXIF;
  8533. property U3AEIF : TBits_1 read getU3AEIF write setU3AEIF;
  8534. property U3ARXIF : TBits_1 read getU3ARXIF write setU3ARXIF;
  8535. property U3ATXIF : TBits_1 read getU3ATXIF write setU3ATXIF;
  8536. property U3EIF : TBits_1 read getU3EIF write setU3EIF;
  8537. property U3RXIF : TBits_1 read getU3RXIF write setU3RXIF;
  8538. property U3TXIF : TBits_1 read getU3TXIF write setU3TXIF;
  8539. property USBIF : TBits_1 read getUSBIF write setUSBIF;
  8540. property w : TBits_32 read getw write setw;
  8541. end;
  8542. TINT_IFS2 = record
  8543. private
  8544. function getIC4EIF : TBits_1; inline;
  8545. function getIC5EIF : TBits_1; inline;
  8546. function getPMPEIF : TBits_1; inline;
  8547. function getU1BEIF : TBits_1; inline;
  8548. function getU1BRXIF : TBits_1; inline;
  8549. function getU1BTXIF : TBits_1; inline;
  8550. function getU2BEIF : TBits_1; inline;
  8551. function getU2BRXIF : TBits_1; inline;
  8552. function getU2BTXIF : TBits_1; inline;
  8553. function getU3BEIF : TBits_1; inline;
  8554. function getU3BRXIF : TBits_1; inline;
  8555. function getU3BTXIF : TBits_1; inline;
  8556. function getU4EIF : TBits_1; inline;
  8557. function getU4RXIF : TBits_1; inline;
  8558. function getU4TXIF : TBits_1; inline;
  8559. function getU5EIF : TBits_1; inline;
  8560. function getU5RXIF : TBits_1; inline;
  8561. function getU5TXIF : TBits_1; inline;
  8562. function getU6EIF : TBits_1; inline;
  8563. function getU6RXIF : TBits_1; inline;
  8564. function getU6TXIF : TBits_1; inline;
  8565. function getw : TBits_32; inline;
  8566. procedure setIC4EIF(thebits : TBits_1); inline;
  8567. procedure setIC5EIF(thebits : TBits_1); inline;
  8568. procedure setPMPEIF(thebits : TBits_1); inline;
  8569. procedure setU1BEIF(thebits : TBits_1); inline;
  8570. procedure setU1BRXIF(thebits : TBits_1); inline;
  8571. procedure setU1BTXIF(thebits : TBits_1); inline;
  8572. procedure setU2BEIF(thebits : TBits_1); inline;
  8573. procedure setU2BRXIF(thebits : TBits_1); inline;
  8574. procedure setU2BTXIF(thebits : TBits_1); inline;
  8575. procedure setU3BEIF(thebits : TBits_1); inline;
  8576. procedure setU3BRXIF(thebits : TBits_1); inline;
  8577. procedure setU3BTXIF(thebits : TBits_1); inline;
  8578. procedure setU4EIF(thebits : TBits_1); inline;
  8579. procedure setU4RXIF(thebits : TBits_1); inline;
  8580. procedure setU4TXIF(thebits : TBits_1); inline;
  8581. procedure setU5EIF(thebits : TBits_1); inline;
  8582. procedure setU5RXIF(thebits : TBits_1); inline;
  8583. procedure setU5TXIF(thebits : TBits_1); inline;
  8584. procedure setU6EIF(thebits : TBits_1); inline;
  8585. procedure setU6RXIF(thebits : TBits_1); inline;
  8586. procedure setU6TXIF(thebits : TBits_1); inline;
  8587. procedure setw(thebits : TBits_32); inline;
  8588. public
  8589. procedure clearIC4EIF; inline;
  8590. procedure clearIC5EIF; inline;
  8591. procedure clearPMPEIF; inline;
  8592. procedure clearU1BEIF; inline;
  8593. procedure clearU1BRXIF; inline;
  8594. procedure clearU1BTXIF; inline;
  8595. procedure clearU2BEIF; inline;
  8596. procedure clearU2BRXIF; inline;
  8597. procedure clearU2BTXIF; inline;
  8598. procedure clearU3BEIF; inline;
  8599. procedure clearU3BRXIF; inline;
  8600. procedure clearU3BTXIF; inline;
  8601. procedure clearU4EIF; inline;
  8602. procedure clearU4RXIF; inline;
  8603. procedure clearU4TXIF; inline;
  8604. procedure clearU5EIF; inline;
  8605. procedure clearU5RXIF; inline;
  8606. procedure clearU5TXIF; inline;
  8607. procedure clearU6EIF; inline;
  8608. procedure clearU6RXIF; inline;
  8609. procedure clearU6TXIF; inline;
  8610. procedure setIC4EIF; inline;
  8611. procedure setIC5EIF; inline;
  8612. procedure setPMPEIF; inline;
  8613. procedure setU1BEIF; inline;
  8614. procedure setU1BRXIF; inline;
  8615. procedure setU1BTXIF; inline;
  8616. procedure setU2BEIF; inline;
  8617. procedure setU2BRXIF; inline;
  8618. procedure setU2BTXIF; inline;
  8619. procedure setU3BEIF; inline;
  8620. procedure setU3BRXIF; inline;
  8621. procedure setU3BTXIF; inline;
  8622. procedure setU4EIF; inline;
  8623. procedure setU4RXIF; inline;
  8624. procedure setU4TXIF; inline;
  8625. procedure setU5EIF; inline;
  8626. procedure setU5RXIF; inline;
  8627. procedure setU5TXIF; inline;
  8628. procedure setU6EIF; inline;
  8629. procedure setU6RXIF; inline;
  8630. procedure setU6TXIF; inline;
  8631. property IC4EIF : TBits_1 read getIC4EIF write setIC4EIF;
  8632. property IC5EIF : TBits_1 read getIC5EIF write setIC5EIF;
  8633. property PMPEIF : TBits_1 read getPMPEIF write setPMPEIF;
  8634. property U1BEIF : TBits_1 read getU1BEIF write setU1BEIF;
  8635. property U1BRXIF : TBits_1 read getU1BRXIF write setU1BRXIF;
  8636. property U1BTXIF : TBits_1 read getU1BTXIF write setU1BTXIF;
  8637. property U2BEIF : TBits_1 read getU2BEIF write setU2BEIF;
  8638. property U2BRXIF : TBits_1 read getU2BRXIF write setU2BRXIF;
  8639. property U2BTXIF : TBits_1 read getU2BTXIF write setU2BTXIF;
  8640. property U3BEIF : TBits_1 read getU3BEIF write setU3BEIF;
  8641. property U3BRXIF : TBits_1 read getU3BRXIF write setU3BRXIF;
  8642. property U3BTXIF : TBits_1 read getU3BTXIF write setU3BTXIF;
  8643. property U4EIF : TBits_1 read getU4EIF write setU4EIF;
  8644. property U4RXIF : TBits_1 read getU4RXIF write setU4RXIF;
  8645. property U4TXIF : TBits_1 read getU4TXIF write setU4TXIF;
  8646. property U5EIF : TBits_1 read getU5EIF write setU5EIF;
  8647. property U5RXIF : TBits_1 read getU5RXIF write setU5RXIF;
  8648. property U5TXIF : TBits_1 read getU5TXIF write setU5TXIF;
  8649. property U6EIF : TBits_1 read getU6EIF write setU6EIF;
  8650. property U6RXIF : TBits_1 read getU6RXIF write setU6RXIF;
  8651. property U6TXIF : TBits_1 read getU6TXIF write setU6TXIF;
  8652. property w : TBits_32 read getw write setw;
  8653. end;
  8654. TINT_IEC0 = record
  8655. private
  8656. function getCS0IE : TBits_1; inline;
  8657. function getCS1IE : TBits_1; inline;
  8658. function getCTIE : TBits_1; inline;
  8659. function getI2C1ABIE : TBits_1; inline;
  8660. function getI2C1AMIE : TBits_1; inline;
  8661. function getI2C1ASIE : TBits_1; inline;
  8662. function getI2C1BIE : TBits_1; inline;
  8663. function getI2C1MIE : TBits_1; inline;
  8664. function getI2C1SIE : TBits_1; inline;
  8665. function getI2C3BIE : TBits_1; inline;
  8666. function getI2C3MIE : TBits_1; inline;
  8667. function getI2C3SIE : TBits_1; inline;
  8668. function getIC1IE : TBits_1; inline;
  8669. function getIC2IE : TBits_1; inline;
  8670. function getIC3IE : TBits_1; inline;
  8671. function getIC4IE : TBits_1; inline;
  8672. function getIC5IE : TBits_1; inline;
  8673. function getINT0IE : TBits_1; inline;
  8674. function getINT1IE : TBits_1; inline;
  8675. function getINT2IE : TBits_1; inline;
  8676. function getINT3IE : TBits_1; inline;
  8677. function getINT4IE : TBits_1; inline;
  8678. function getOC1IE : TBits_1; inline;
  8679. function getOC2IE : TBits_1; inline;
  8680. function getOC3IE : TBits_1; inline;
  8681. function getOC4IE : TBits_1; inline;
  8682. function getOC5IE : TBits_1; inline;
  8683. function getSPI1AEIE : TBits_1; inline;
  8684. function getSPI1ARXIE : TBits_1; inline;
  8685. function getSPI1ATXIE : TBits_1; inline;
  8686. function getSPI3EIE : TBits_1; inline;
  8687. function getSPI3RXIE : TBits_1; inline;
  8688. function getSPI3TXIE : TBits_1; inline;
  8689. function getT1IE : TBits_1; inline;
  8690. function getT2IE : TBits_1; inline;
  8691. function getT3IE : TBits_1; inline;
  8692. function getT4IE : TBits_1; inline;
  8693. function getT5IE : TBits_1; inline;
  8694. function getU1AEIE : TBits_1; inline;
  8695. function getU1ARXIE : TBits_1; inline;
  8696. function getU1ATXIE : TBits_1; inline;
  8697. function getU1EIE : TBits_1; inline;
  8698. function getU1RXIE : TBits_1; inline;
  8699. function getU1TXIE : TBits_1; inline;
  8700. function getw : TBits_32; inline;
  8701. procedure setCS0IE(thebits : TBits_1); inline;
  8702. procedure setCS1IE(thebits : TBits_1); inline;
  8703. procedure setCTIE(thebits : TBits_1); inline;
  8704. procedure setI2C1ABIE(thebits : TBits_1); inline;
  8705. procedure setI2C1AMIE(thebits : TBits_1); inline;
  8706. procedure setI2C1ASIE(thebits : TBits_1); inline;
  8707. procedure setI2C1BIE(thebits : TBits_1); inline;
  8708. procedure setI2C1MIE(thebits : TBits_1); inline;
  8709. procedure setI2C1SIE(thebits : TBits_1); inline;
  8710. procedure setI2C3BIE(thebits : TBits_1); inline;
  8711. procedure setI2C3MIE(thebits : TBits_1); inline;
  8712. procedure setI2C3SIE(thebits : TBits_1); inline;
  8713. procedure setIC1IE(thebits : TBits_1); inline;
  8714. procedure setIC2IE(thebits : TBits_1); inline;
  8715. procedure setIC3IE(thebits : TBits_1); inline;
  8716. procedure setIC4IE(thebits : TBits_1); inline;
  8717. procedure setIC5IE(thebits : TBits_1); inline;
  8718. procedure setINT0IE(thebits : TBits_1); inline;
  8719. procedure setINT1IE(thebits : TBits_1); inline;
  8720. procedure setINT2IE(thebits : TBits_1); inline;
  8721. procedure setINT3IE(thebits : TBits_1); inline;
  8722. procedure setINT4IE(thebits : TBits_1); inline;
  8723. procedure setOC1IE(thebits : TBits_1); inline;
  8724. procedure setOC2IE(thebits : TBits_1); inline;
  8725. procedure setOC3IE(thebits : TBits_1); inline;
  8726. procedure setOC4IE(thebits : TBits_1); inline;
  8727. procedure setOC5IE(thebits : TBits_1); inline;
  8728. procedure setSPI1AEIE(thebits : TBits_1); inline;
  8729. procedure setSPI1ARXIE(thebits : TBits_1); inline;
  8730. procedure setSPI1ATXIE(thebits : TBits_1); inline;
  8731. procedure setSPI3EIE(thebits : TBits_1); inline;
  8732. procedure setSPI3RXIE(thebits : TBits_1); inline;
  8733. procedure setSPI3TXIE(thebits : TBits_1); inline;
  8734. procedure setT1IE(thebits : TBits_1); inline;
  8735. procedure setT2IE(thebits : TBits_1); inline;
  8736. procedure setT3IE(thebits : TBits_1); inline;
  8737. procedure setT4IE(thebits : TBits_1); inline;
  8738. procedure setT5IE(thebits : TBits_1); inline;
  8739. procedure setU1AEIE(thebits : TBits_1); inline;
  8740. procedure setU1ARXIE(thebits : TBits_1); inline;
  8741. procedure setU1ATXIE(thebits : TBits_1); inline;
  8742. procedure setU1EIE(thebits : TBits_1); inline;
  8743. procedure setU1RXIE(thebits : TBits_1); inline;
  8744. procedure setU1TXIE(thebits : TBits_1); inline;
  8745. procedure setw(thebits : TBits_32); inline;
  8746. public
  8747. procedure clearCS0IE; inline;
  8748. procedure clearCS1IE; inline;
  8749. procedure clearCTIE; inline;
  8750. procedure clearI2C1ABIE; inline;
  8751. procedure clearI2C1AMIE; inline;
  8752. procedure clearI2C1ASIE; inline;
  8753. procedure clearI2C1BIE; inline;
  8754. procedure clearI2C1MIE; inline;
  8755. procedure clearI2C1SIE; inline;
  8756. procedure clearI2C3BIE; inline;
  8757. procedure clearI2C3MIE; inline;
  8758. procedure clearI2C3SIE; inline;
  8759. procedure clearIC1IE; inline;
  8760. procedure clearIC2IE; inline;
  8761. procedure clearIC3IE; inline;
  8762. procedure clearIC4IE; inline;
  8763. procedure clearIC5IE; inline;
  8764. procedure clearINT0IE; inline;
  8765. procedure clearINT1IE; inline;
  8766. procedure clearINT2IE; inline;
  8767. procedure clearINT3IE; inline;
  8768. procedure clearINT4IE; inline;
  8769. procedure clearOC1IE; inline;
  8770. procedure clearOC2IE; inline;
  8771. procedure clearOC3IE; inline;
  8772. procedure clearOC4IE; inline;
  8773. procedure clearOC5IE; inline;
  8774. procedure clearSPI1AEIE; inline;
  8775. procedure clearSPI1ARXIE; inline;
  8776. procedure clearSPI1ATXIE; inline;
  8777. procedure clearSPI3EIE; inline;
  8778. procedure clearSPI3RXIE; inline;
  8779. procedure clearSPI3TXIE; inline;
  8780. procedure clearT1IE; inline;
  8781. procedure clearT2IE; inline;
  8782. procedure clearT3IE; inline;
  8783. procedure clearT4IE; inline;
  8784. procedure clearT5IE; inline;
  8785. procedure clearU1AEIE; inline;
  8786. procedure clearU1ARXIE; inline;
  8787. procedure clearU1ATXIE; inline;
  8788. procedure clearU1EIE; inline;
  8789. procedure clearU1RXIE; inline;
  8790. procedure clearU1TXIE; inline;
  8791. procedure setCS0IE; inline;
  8792. procedure setCS1IE; inline;
  8793. procedure setCTIE; inline;
  8794. procedure setI2C1ABIE; inline;
  8795. procedure setI2C1AMIE; inline;
  8796. procedure setI2C1ASIE; inline;
  8797. procedure setI2C1BIE; inline;
  8798. procedure setI2C1MIE; inline;
  8799. procedure setI2C1SIE; inline;
  8800. procedure setI2C3BIE; inline;
  8801. procedure setI2C3MIE; inline;
  8802. procedure setI2C3SIE; inline;
  8803. procedure setIC1IE; inline;
  8804. procedure setIC2IE; inline;
  8805. procedure setIC3IE; inline;
  8806. procedure setIC4IE; inline;
  8807. procedure setIC5IE; inline;
  8808. procedure setINT0IE; inline;
  8809. procedure setINT1IE; inline;
  8810. procedure setINT2IE; inline;
  8811. procedure setINT3IE; inline;
  8812. procedure setINT4IE; inline;
  8813. procedure setOC1IE; inline;
  8814. procedure setOC2IE; inline;
  8815. procedure setOC3IE; inline;
  8816. procedure setOC4IE; inline;
  8817. procedure setOC5IE; inline;
  8818. procedure setSPI1AEIE; inline;
  8819. procedure setSPI1ARXIE; inline;
  8820. procedure setSPI1ATXIE; inline;
  8821. procedure setSPI3EIE; inline;
  8822. procedure setSPI3RXIE; inline;
  8823. procedure setSPI3TXIE; inline;
  8824. procedure setT1IE; inline;
  8825. procedure setT2IE; inline;
  8826. procedure setT3IE; inline;
  8827. procedure setT4IE; inline;
  8828. procedure setT5IE; inline;
  8829. procedure setU1AEIE; inline;
  8830. procedure setU1ARXIE; inline;
  8831. procedure setU1ATXIE; inline;
  8832. procedure setU1EIE; inline;
  8833. procedure setU1RXIE; inline;
  8834. procedure setU1TXIE; inline;
  8835. property CS0IE : TBits_1 read getCS0IE write setCS0IE;
  8836. property CS1IE : TBits_1 read getCS1IE write setCS1IE;
  8837. property CTIE : TBits_1 read getCTIE write setCTIE;
  8838. property I2C1ABIE : TBits_1 read getI2C1ABIE write setI2C1ABIE;
  8839. property I2C1AMIE : TBits_1 read getI2C1AMIE write setI2C1AMIE;
  8840. property I2C1ASIE : TBits_1 read getI2C1ASIE write setI2C1ASIE;
  8841. property I2C1BIE : TBits_1 read getI2C1BIE write setI2C1BIE;
  8842. property I2C1MIE : TBits_1 read getI2C1MIE write setI2C1MIE;
  8843. property I2C1SIE : TBits_1 read getI2C1SIE write setI2C1SIE;
  8844. property I2C3BIE : TBits_1 read getI2C3BIE write setI2C3BIE;
  8845. property I2C3MIE : TBits_1 read getI2C3MIE write setI2C3MIE;
  8846. property I2C3SIE : TBits_1 read getI2C3SIE write setI2C3SIE;
  8847. property IC1IE : TBits_1 read getIC1IE write setIC1IE;
  8848. property IC2IE : TBits_1 read getIC2IE write setIC2IE;
  8849. property IC3IE : TBits_1 read getIC3IE write setIC3IE;
  8850. property IC4IE : TBits_1 read getIC4IE write setIC4IE;
  8851. property IC5IE : TBits_1 read getIC5IE write setIC5IE;
  8852. property INT0IE : TBits_1 read getINT0IE write setINT0IE;
  8853. property INT1IE : TBits_1 read getINT1IE write setINT1IE;
  8854. property INT2IE : TBits_1 read getINT2IE write setINT2IE;
  8855. property INT3IE : TBits_1 read getINT3IE write setINT3IE;
  8856. property INT4IE : TBits_1 read getINT4IE write setINT4IE;
  8857. property OC1IE : TBits_1 read getOC1IE write setOC1IE;
  8858. property OC2IE : TBits_1 read getOC2IE write setOC2IE;
  8859. property OC3IE : TBits_1 read getOC3IE write setOC3IE;
  8860. property OC4IE : TBits_1 read getOC4IE write setOC4IE;
  8861. property OC5IE : TBits_1 read getOC5IE write setOC5IE;
  8862. property SPI1AEIE : TBits_1 read getSPI1AEIE write setSPI1AEIE;
  8863. property SPI1ARXIE : TBits_1 read getSPI1ARXIE write setSPI1ARXIE;
  8864. property SPI1ATXIE : TBits_1 read getSPI1ATXIE write setSPI1ATXIE;
  8865. property SPI3EIE : TBits_1 read getSPI3EIE write setSPI3EIE;
  8866. property SPI3RXIE : TBits_1 read getSPI3RXIE write setSPI3RXIE;
  8867. property SPI3TXIE : TBits_1 read getSPI3TXIE write setSPI3TXIE;
  8868. property T1IE : TBits_1 read getT1IE write setT1IE;
  8869. property T2IE : TBits_1 read getT2IE write setT2IE;
  8870. property T3IE : TBits_1 read getT3IE write setT3IE;
  8871. property T4IE : TBits_1 read getT4IE write setT4IE;
  8872. property T5IE : TBits_1 read getT5IE write setT5IE;
  8873. property U1AEIE : TBits_1 read getU1AEIE write setU1AEIE;
  8874. property U1ARXIE : TBits_1 read getU1ARXIE write setU1ARXIE;
  8875. property U1ATXIE : TBits_1 read getU1ATXIE write setU1ATXIE;
  8876. property U1EIE : TBits_1 read getU1EIE write setU1EIE;
  8877. property U1RXIE : TBits_1 read getU1RXIE write setU1RXIE;
  8878. property U1TXIE : TBits_1 read getU1TXIE write setU1TXIE;
  8879. property w : TBits_32 read getw write setw;
  8880. end;
  8881. TINT_IEC1 = record
  8882. private
  8883. function getAD1IE : TBits_1; inline;
  8884. function getCAN1IE : TBits_1; inline;
  8885. function getCAN2IE : TBits_1; inline;
  8886. function getCMP1IE : TBits_1; inline;
  8887. function getCMP2IE : TBits_1; inline;
  8888. function getCNIE : TBits_1; inline;
  8889. function getDMA0IE : TBits_1; inline;
  8890. function getDMA1IE : TBits_1; inline;
  8891. function getDMA2IE : TBits_1; inline;
  8892. function getDMA3IE : TBits_1; inline;
  8893. function getDMA4IE : TBits_1; inline;
  8894. function getDMA5IE : TBits_1; inline;
  8895. function getDMA6IE : TBits_1; inline;
  8896. function getDMA7IE : TBits_1; inline;
  8897. function getETHIE : TBits_1; inline;
  8898. function getFCEIE : TBits_1; inline;
  8899. function getFSCMIE : TBits_1; inline;
  8900. function getI2C2ABIE : TBits_1; inline;
  8901. function getI2C2AMIE : TBits_1; inline;
  8902. function getI2C2ASIE : TBits_1; inline;
  8903. function getI2C3ABIE : TBits_1; inline;
  8904. function getI2C3AMIE : TBits_1; inline;
  8905. function getI2C3ASIE : TBits_1; inline;
  8906. function getI2C4BIE : TBits_1; inline;
  8907. function getI2C4MIE : TBits_1; inline;
  8908. function getI2C4SIE : TBits_1; inline;
  8909. function getI2C5BIE : TBits_1; inline;
  8910. function getI2C5MIE : TBits_1; inline;
  8911. function getI2C5SIE : TBits_1; inline;
  8912. function getIC1EIE : TBits_1; inline;
  8913. function getIC2EIE : TBits_1; inline;
  8914. function getIC3EIE : TBits_1; inline;
  8915. function getPMPIE : TBits_1; inline;
  8916. function getRTCCIE : TBits_1; inline;
  8917. function getSPI2AEIE : TBits_1; inline;
  8918. function getSPI2ARXIE : TBits_1; inline;
  8919. function getSPI2ATXIE : TBits_1; inline;
  8920. function getSPI2EIE : TBits_1; inline;
  8921. function getSPI2RXIE : TBits_1; inline;
  8922. function getSPI2TXIE : TBits_1; inline;
  8923. function getSPI3AEIE : TBits_1; inline;
  8924. function getSPI3ARXIE : TBits_1; inline;
  8925. function getSPI3ATXIE : TBits_1; inline;
  8926. function getSPI4EIE : TBits_1; inline;
  8927. function getSPI4RXIE : TBits_1; inline;
  8928. function getSPI4TXIE : TBits_1; inline;
  8929. function getU2AEIE : TBits_1; inline;
  8930. function getU2ARXIE : TBits_1; inline;
  8931. function getU2ATXIE : TBits_1; inline;
  8932. function getU2EIE : TBits_1; inline;
  8933. function getU2RXIE : TBits_1; inline;
  8934. function getU2TXIE : TBits_1; inline;
  8935. function getU3AEIE : TBits_1; inline;
  8936. function getU3ARXIE : TBits_1; inline;
  8937. function getU3ATXIE : TBits_1; inline;
  8938. function getU3EIE : TBits_1; inline;
  8939. function getU3RXIE : TBits_1; inline;
  8940. function getU3TXIE : TBits_1; inline;
  8941. function getUSBIE : TBits_1; inline;
  8942. function getw : TBits_32; inline;
  8943. procedure setAD1IE(thebits : TBits_1); inline;
  8944. procedure setCAN1IE(thebits : TBits_1); inline;
  8945. procedure setCAN2IE(thebits : TBits_1); inline;
  8946. procedure setCMP1IE(thebits : TBits_1); inline;
  8947. procedure setCMP2IE(thebits : TBits_1); inline;
  8948. procedure setCNIE(thebits : TBits_1); inline;
  8949. procedure setDMA0IE(thebits : TBits_1); inline;
  8950. procedure setDMA1IE(thebits : TBits_1); inline;
  8951. procedure setDMA2IE(thebits : TBits_1); inline;
  8952. procedure setDMA3IE(thebits : TBits_1); inline;
  8953. procedure setDMA4IE(thebits : TBits_1); inline;
  8954. procedure setDMA5IE(thebits : TBits_1); inline;
  8955. procedure setDMA6IE(thebits : TBits_1); inline;
  8956. procedure setDMA7IE(thebits : TBits_1); inline;
  8957. procedure setETHIE(thebits : TBits_1); inline;
  8958. procedure setFCEIE(thebits : TBits_1); inline;
  8959. procedure setFSCMIE(thebits : TBits_1); inline;
  8960. procedure setI2C2ABIE(thebits : TBits_1); inline;
  8961. procedure setI2C2AMIE(thebits : TBits_1); inline;
  8962. procedure setI2C2ASIE(thebits : TBits_1); inline;
  8963. procedure setI2C3ABIE(thebits : TBits_1); inline;
  8964. procedure setI2C3AMIE(thebits : TBits_1); inline;
  8965. procedure setI2C3ASIE(thebits : TBits_1); inline;
  8966. procedure setI2C4BIE(thebits : TBits_1); inline;
  8967. procedure setI2C4MIE(thebits : TBits_1); inline;
  8968. procedure setI2C4SIE(thebits : TBits_1); inline;
  8969. procedure setI2C5BIE(thebits : TBits_1); inline;
  8970. procedure setI2C5MIE(thebits : TBits_1); inline;
  8971. procedure setI2C5SIE(thebits : TBits_1); inline;
  8972. procedure setIC1EIE(thebits : TBits_1); inline;
  8973. procedure setIC2EIE(thebits : TBits_1); inline;
  8974. procedure setIC3EIE(thebits : TBits_1); inline;
  8975. procedure setPMPIE(thebits : TBits_1); inline;
  8976. procedure setRTCCIE(thebits : TBits_1); inline;
  8977. procedure setSPI2AEIE(thebits : TBits_1); inline;
  8978. procedure setSPI2ARXIE(thebits : TBits_1); inline;
  8979. procedure setSPI2ATXIE(thebits : TBits_1); inline;
  8980. procedure setSPI2EIE(thebits : TBits_1); inline;
  8981. procedure setSPI2RXIE(thebits : TBits_1); inline;
  8982. procedure setSPI2TXIE(thebits : TBits_1); inline;
  8983. procedure setSPI3AEIE(thebits : TBits_1); inline;
  8984. procedure setSPI3ARXIE(thebits : TBits_1); inline;
  8985. procedure setSPI3ATXIE(thebits : TBits_1); inline;
  8986. procedure setSPI4EIE(thebits : TBits_1); inline;
  8987. procedure setSPI4RXIE(thebits : TBits_1); inline;
  8988. procedure setSPI4TXIE(thebits : TBits_1); inline;
  8989. procedure setU2AEIE(thebits : TBits_1); inline;
  8990. procedure setU2ARXIE(thebits : TBits_1); inline;
  8991. procedure setU2ATXIE(thebits : TBits_1); inline;
  8992. procedure setU2EIE(thebits : TBits_1); inline;
  8993. procedure setU2RXIE(thebits : TBits_1); inline;
  8994. procedure setU2TXIE(thebits : TBits_1); inline;
  8995. procedure setU3AEIE(thebits : TBits_1); inline;
  8996. procedure setU3ARXIE(thebits : TBits_1); inline;
  8997. procedure setU3ATXIE(thebits : TBits_1); inline;
  8998. procedure setU3EIE(thebits : TBits_1); inline;
  8999. procedure setU3RXIE(thebits : TBits_1); inline;
  9000. procedure setU3TXIE(thebits : TBits_1); inline;
  9001. procedure setUSBIE(thebits : TBits_1); inline;
  9002. procedure setw(thebits : TBits_32); inline;
  9003. public
  9004. procedure clearAD1IE; inline;
  9005. procedure clearCAN1IE; inline;
  9006. procedure clearCAN2IE; inline;
  9007. procedure clearCMP1IE; inline;
  9008. procedure clearCMP2IE; inline;
  9009. procedure clearCNIE; inline;
  9010. procedure clearDMA0IE; inline;
  9011. procedure clearDMA1IE; inline;
  9012. procedure clearDMA2IE; inline;
  9013. procedure clearDMA3IE; inline;
  9014. procedure clearDMA4IE; inline;
  9015. procedure clearDMA5IE; inline;
  9016. procedure clearDMA6IE; inline;
  9017. procedure clearDMA7IE; inline;
  9018. procedure clearETHIE; inline;
  9019. procedure clearFCEIE; inline;
  9020. procedure clearFSCMIE; inline;
  9021. procedure clearI2C2ABIE; inline;
  9022. procedure clearI2C2AMIE; inline;
  9023. procedure clearI2C2ASIE; inline;
  9024. procedure clearI2C3ABIE; inline;
  9025. procedure clearI2C3AMIE; inline;
  9026. procedure clearI2C3ASIE; inline;
  9027. procedure clearI2C4BIE; inline;
  9028. procedure clearI2C4MIE; inline;
  9029. procedure clearI2C4SIE; inline;
  9030. procedure clearI2C5BIE; inline;
  9031. procedure clearI2C5MIE; inline;
  9032. procedure clearI2C5SIE; inline;
  9033. procedure clearIC1EIE; inline;
  9034. procedure clearIC2EIE; inline;
  9035. procedure clearIC3EIE; inline;
  9036. procedure clearPMPIE; inline;
  9037. procedure clearRTCCIE; inline;
  9038. procedure clearSPI2AEIE; inline;
  9039. procedure clearSPI2ARXIE; inline;
  9040. procedure clearSPI2ATXIE; inline;
  9041. procedure clearSPI2EIE; inline;
  9042. procedure clearSPI2RXIE; inline;
  9043. procedure clearSPI2TXIE; inline;
  9044. procedure clearSPI3AEIE; inline;
  9045. procedure clearSPI3ARXIE; inline;
  9046. procedure clearSPI3ATXIE; inline;
  9047. procedure clearSPI4EIE; inline;
  9048. procedure clearSPI4RXIE; inline;
  9049. procedure clearSPI4TXIE; inline;
  9050. procedure clearU2AEIE; inline;
  9051. procedure clearU2ARXIE; inline;
  9052. procedure clearU2ATXIE; inline;
  9053. procedure clearU2EIE; inline;
  9054. procedure clearU2RXIE; inline;
  9055. procedure clearU2TXIE; inline;
  9056. procedure clearU3AEIE; inline;
  9057. procedure clearU3ARXIE; inline;
  9058. procedure clearU3ATXIE; inline;
  9059. procedure clearU3EIE; inline;
  9060. procedure clearU3RXIE; inline;
  9061. procedure clearU3TXIE; inline;
  9062. procedure clearUSBIE; inline;
  9063. procedure setAD1IE; inline;
  9064. procedure setCAN1IE; inline;
  9065. procedure setCAN2IE; inline;
  9066. procedure setCMP1IE; inline;
  9067. procedure setCMP2IE; inline;
  9068. procedure setCNIE; inline;
  9069. procedure setDMA0IE; inline;
  9070. procedure setDMA1IE; inline;
  9071. procedure setDMA2IE; inline;
  9072. procedure setDMA3IE; inline;
  9073. procedure setDMA4IE; inline;
  9074. procedure setDMA5IE; inline;
  9075. procedure setDMA6IE; inline;
  9076. procedure setDMA7IE; inline;
  9077. procedure setETHIE; inline;
  9078. procedure setFCEIE; inline;
  9079. procedure setFSCMIE; inline;
  9080. procedure setI2C2ABIE; inline;
  9081. procedure setI2C2AMIE; inline;
  9082. procedure setI2C2ASIE; inline;
  9083. procedure setI2C3ABIE; inline;
  9084. procedure setI2C3AMIE; inline;
  9085. procedure setI2C3ASIE; inline;
  9086. procedure setI2C4BIE; inline;
  9087. procedure setI2C4MIE; inline;
  9088. procedure setI2C4SIE; inline;
  9089. procedure setI2C5BIE; inline;
  9090. procedure setI2C5MIE; inline;
  9091. procedure setI2C5SIE; inline;
  9092. procedure setIC1EIE; inline;
  9093. procedure setIC2EIE; inline;
  9094. procedure setIC3EIE; inline;
  9095. procedure setPMPIE; inline;
  9096. procedure setRTCCIE; inline;
  9097. procedure setSPI2AEIE; inline;
  9098. procedure setSPI2ARXIE; inline;
  9099. procedure setSPI2ATXIE; inline;
  9100. procedure setSPI2EIE; inline;
  9101. procedure setSPI2RXIE; inline;
  9102. procedure setSPI2TXIE; inline;
  9103. procedure setSPI3AEIE; inline;
  9104. procedure setSPI3ARXIE; inline;
  9105. procedure setSPI3ATXIE; inline;
  9106. procedure setSPI4EIE; inline;
  9107. procedure setSPI4RXIE; inline;
  9108. procedure setSPI4TXIE; inline;
  9109. procedure setU2AEIE; inline;
  9110. procedure setU2ARXIE; inline;
  9111. procedure setU2ATXIE; inline;
  9112. procedure setU2EIE; inline;
  9113. procedure setU2RXIE; inline;
  9114. procedure setU2TXIE; inline;
  9115. procedure setU3AEIE; inline;
  9116. procedure setU3ARXIE; inline;
  9117. procedure setU3ATXIE; inline;
  9118. procedure setU3EIE; inline;
  9119. procedure setU3RXIE; inline;
  9120. procedure setU3TXIE; inline;
  9121. procedure setUSBIE; inline;
  9122. property AD1IE : TBits_1 read getAD1IE write setAD1IE;
  9123. property CAN1IE : TBits_1 read getCAN1IE write setCAN1IE;
  9124. property CAN2IE : TBits_1 read getCAN2IE write setCAN2IE;
  9125. property CMP1IE : TBits_1 read getCMP1IE write setCMP1IE;
  9126. property CMP2IE : TBits_1 read getCMP2IE write setCMP2IE;
  9127. property CNIE : TBits_1 read getCNIE write setCNIE;
  9128. property DMA0IE : TBits_1 read getDMA0IE write setDMA0IE;
  9129. property DMA1IE : TBits_1 read getDMA1IE write setDMA1IE;
  9130. property DMA2IE : TBits_1 read getDMA2IE write setDMA2IE;
  9131. property DMA3IE : TBits_1 read getDMA3IE write setDMA3IE;
  9132. property DMA4IE : TBits_1 read getDMA4IE write setDMA4IE;
  9133. property DMA5IE : TBits_1 read getDMA5IE write setDMA5IE;
  9134. property DMA6IE : TBits_1 read getDMA6IE write setDMA6IE;
  9135. property DMA7IE : TBits_1 read getDMA7IE write setDMA7IE;
  9136. property ETHIE : TBits_1 read getETHIE write setETHIE;
  9137. property FCEIE : TBits_1 read getFCEIE write setFCEIE;
  9138. property FSCMIE : TBits_1 read getFSCMIE write setFSCMIE;
  9139. property I2C2ABIE : TBits_1 read getI2C2ABIE write setI2C2ABIE;
  9140. property I2C2AMIE : TBits_1 read getI2C2AMIE write setI2C2AMIE;
  9141. property I2C2ASIE : TBits_1 read getI2C2ASIE write setI2C2ASIE;
  9142. property I2C3ABIE : TBits_1 read getI2C3ABIE write setI2C3ABIE;
  9143. property I2C3AMIE : TBits_1 read getI2C3AMIE write setI2C3AMIE;
  9144. property I2C3ASIE : TBits_1 read getI2C3ASIE write setI2C3ASIE;
  9145. property I2C4BIE : TBits_1 read getI2C4BIE write setI2C4BIE;
  9146. property I2C4MIE : TBits_1 read getI2C4MIE write setI2C4MIE;
  9147. property I2C4SIE : TBits_1 read getI2C4SIE write setI2C4SIE;
  9148. property I2C5BIE : TBits_1 read getI2C5BIE write setI2C5BIE;
  9149. property I2C5MIE : TBits_1 read getI2C5MIE write setI2C5MIE;
  9150. property I2C5SIE : TBits_1 read getI2C5SIE write setI2C5SIE;
  9151. property IC1EIE : TBits_1 read getIC1EIE write setIC1EIE;
  9152. property IC2EIE : TBits_1 read getIC2EIE write setIC2EIE;
  9153. property IC3EIE : TBits_1 read getIC3EIE write setIC3EIE;
  9154. property PMPIE : TBits_1 read getPMPIE write setPMPIE;
  9155. property RTCCIE : TBits_1 read getRTCCIE write setRTCCIE;
  9156. property SPI2AEIE : TBits_1 read getSPI2AEIE write setSPI2AEIE;
  9157. property SPI2ARXIE : TBits_1 read getSPI2ARXIE write setSPI2ARXIE;
  9158. property SPI2ATXIE : TBits_1 read getSPI2ATXIE write setSPI2ATXIE;
  9159. property SPI2EIE : TBits_1 read getSPI2EIE write setSPI2EIE;
  9160. property SPI2RXIE : TBits_1 read getSPI2RXIE write setSPI2RXIE;
  9161. property SPI2TXIE : TBits_1 read getSPI2TXIE write setSPI2TXIE;
  9162. property SPI3AEIE : TBits_1 read getSPI3AEIE write setSPI3AEIE;
  9163. property SPI3ARXIE : TBits_1 read getSPI3ARXIE write setSPI3ARXIE;
  9164. property SPI3ATXIE : TBits_1 read getSPI3ATXIE write setSPI3ATXIE;
  9165. property SPI4EIE : TBits_1 read getSPI4EIE write setSPI4EIE;
  9166. property SPI4RXIE : TBits_1 read getSPI4RXIE write setSPI4RXIE;
  9167. property SPI4TXIE : TBits_1 read getSPI4TXIE write setSPI4TXIE;
  9168. property U2AEIE : TBits_1 read getU2AEIE write setU2AEIE;
  9169. property U2ARXIE : TBits_1 read getU2ARXIE write setU2ARXIE;
  9170. property U2ATXIE : TBits_1 read getU2ATXIE write setU2ATXIE;
  9171. property U2EIE : TBits_1 read getU2EIE write setU2EIE;
  9172. property U2RXIE : TBits_1 read getU2RXIE write setU2RXIE;
  9173. property U2TXIE : TBits_1 read getU2TXIE write setU2TXIE;
  9174. property U3AEIE : TBits_1 read getU3AEIE write setU3AEIE;
  9175. property U3ARXIE : TBits_1 read getU3ARXIE write setU3ARXIE;
  9176. property U3ATXIE : TBits_1 read getU3ATXIE write setU3ATXIE;
  9177. property U3EIE : TBits_1 read getU3EIE write setU3EIE;
  9178. property U3RXIE : TBits_1 read getU3RXIE write setU3RXIE;
  9179. property U3TXIE : TBits_1 read getU3TXIE write setU3TXIE;
  9180. property USBIE : TBits_1 read getUSBIE write setUSBIE;
  9181. property w : TBits_32 read getw write setw;
  9182. end;
  9183. TINT_IEC2 = record
  9184. private
  9185. function getIC4EIE : TBits_1; inline;
  9186. function getIC5EIE : TBits_1; inline;
  9187. function getPMPEIE : TBits_1; inline;
  9188. function getU1BEIE : TBits_1; inline;
  9189. function getU1BRXIE : TBits_1; inline;
  9190. function getU1BTXIE : TBits_1; inline;
  9191. function getU2BEIE : TBits_1; inline;
  9192. function getU2BRXIE : TBits_1; inline;
  9193. function getU2BTXIE : TBits_1; inline;
  9194. function getU3BEIE : TBits_1; inline;
  9195. function getU3BRXIE : TBits_1; inline;
  9196. function getU3BTXIE : TBits_1; inline;
  9197. function getU4EIE : TBits_1; inline;
  9198. function getU4RXIE : TBits_1; inline;
  9199. function getU4TXIE : TBits_1; inline;
  9200. function getU5EIE : TBits_1; inline;
  9201. function getU5RXIE : TBits_1; inline;
  9202. function getU5TXIE : TBits_1; inline;
  9203. function getU6EIE : TBits_1; inline;
  9204. function getU6RXIE : TBits_1; inline;
  9205. function getU6TXIE : TBits_1; inline;
  9206. function getw : TBits_32; inline;
  9207. procedure setIC4EIE(thebits : TBits_1); inline;
  9208. procedure setIC5EIE(thebits : TBits_1); inline;
  9209. procedure setPMPEIE(thebits : TBits_1); inline;
  9210. procedure setU1BEIE(thebits : TBits_1); inline;
  9211. procedure setU1BRXIE(thebits : TBits_1); inline;
  9212. procedure setU1BTXIE(thebits : TBits_1); inline;
  9213. procedure setU2BEIE(thebits : TBits_1); inline;
  9214. procedure setU2BRXIE(thebits : TBits_1); inline;
  9215. procedure setU2BTXIE(thebits : TBits_1); inline;
  9216. procedure setU3BEIE(thebits : TBits_1); inline;
  9217. procedure setU3BRXIE(thebits : TBits_1); inline;
  9218. procedure setU3BTXIE(thebits : TBits_1); inline;
  9219. procedure setU4EIE(thebits : TBits_1); inline;
  9220. procedure setU4RXIE(thebits : TBits_1); inline;
  9221. procedure setU4TXIE(thebits : TBits_1); inline;
  9222. procedure setU5EIE(thebits : TBits_1); inline;
  9223. procedure setU5RXIE(thebits : TBits_1); inline;
  9224. procedure setU5TXIE(thebits : TBits_1); inline;
  9225. procedure setU6EIE(thebits : TBits_1); inline;
  9226. procedure setU6RXIE(thebits : TBits_1); inline;
  9227. procedure setU6TXIE(thebits : TBits_1); inline;
  9228. procedure setw(thebits : TBits_32); inline;
  9229. public
  9230. procedure clearIC4EIE; inline;
  9231. procedure clearIC5EIE; inline;
  9232. procedure clearPMPEIE; inline;
  9233. procedure clearU1BEIE; inline;
  9234. procedure clearU1BRXIE; inline;
  9235. procedure clearU1BTXIE; inline;
  9236. procedure clearU2BEIE; inline;
  9237. procedure clearU2BRXIE; inline;
  9238. procedure clearU2BTXIE; inline;
  9239. procedure clearU3BEIE; inline;
  9240. procedure clearU3BRXIE; inline;
  9241. procedure clearU3BTXIE; inline;
  9242. procedure clearU4EIE; inline;
  9243. procedure clearU4RXIE; inline;
  9244. procedure clearU4TXIE; inline;
  9245. procedure clearU5EIE; inline;
  9246. procedure clearU5RXIE; inline;
  9247. procedure clearU5TXIE; inline;
  9248. procedure clearU6EIE; inline;
  9249. procedure clearU6RXIE; inline;
  9250. procedure clearU6TXIE; inline;
  9251. procedure setIC4EIE; inline;
  9252. procedure setIC5EIE; inline;
  9253. procedure setPMPEIE; inline;
  9254. procedure setU1BEIE; inline;
  9255. procedure setU1BRXIE; inline;
  9256. procedure setU1BTXIE; inline;
  9257. procedure setU2BEIE; inline;
  9258. procedure setU2BRXIE; inline;
  9259. procedure setU2BTXIE; inline;
  9260. procedure setU3BEIE; inline;
  9261. procedure setU3BRXIE; inline;
  9262. procedure setU3BTXIE; inline;
  9263. procedure setU4EIE; inline;
  9264. procedure setU4RXIE; inline;
  9265. procedure setU4TXIE; inline;
  9266. procedure setU5EIE; inline;
  9267. procedure setU5RXIE; inline;
  9268. procedure setU5TXIE; inline;
  9269. procedure setU6EIE; inline;
  9270. procedure setU6RXIE; inline;
  9271. procedure setU6TXIE; inline;
  9272. property IC4EIE : TBits_1 read getIC4EIE write setIC4EIE;
  9273. property IC5EIE : TBits_1 read getIC5EIE write setIC5EIE;
  9274. property PMPEIE : TBits_1 read getPMPEIE write setPMPEIE;
  9275. property U1BEIE : TBits_1 read getU1BEIE write setU1BEIE;
  9276. property U1BRXIE : TBits_1 read getU1BRXIE write setU1BRXIE;
  9277. property U1BTXIE : TBits_1 read getU1BTXIE write setU1BTXIE;
  9278. property U2BEIE : TBits_1 read getU2BEIE write setU2BEIE;
  9279. property U2BRXIE : TBits_1 read getU2BRXIE write setU2BRXIE;
  9280. property U2BTXIE : TBits_1 read getU2BTXIE write setU2BTXIE;
  9281. property U3BEIE : TBits_1 read getU3BEIE write setU3BEIE;
  9282. property U3BRXIE : TBits_1 read getU3BRXIE write setU3BRXIE;
  9283. property U3BTXIE : TBits_1 read getU3BTXIE write setU3BTXIE;
  9284. property U4EIE : TBits_1 read getU4EIE write setU4EIE;
  9285. property U4RXIE : TBits_1 read getU4RXIE write setU4RXIE;
  9286. property U4TXIE : TBits_1 read getU4TXIE write setU4TXIE;
  9287. property U5EIE : TBits_1 read getU5EIE write setU5EIE;
  9288. property U5RXIE : TBits_1 read getU5RXIE write setU5RXIE;
  9289. property U5TXIE : TBits_1 read getU5TXIE write setU5TXIE;
  9290. property U6EIE : TBits_1 read getU6EIE write setU6EIE;
  9291. property U6RXIE : TBits_1 read getU6RXIE write setU6RXIE;
  9292. property U6TXIE : TBits_1 read getU6TXIE write setU6TXIE;
  9293. property w : TBits_32 read getw write setw;
  9294. end;
  9295. TINT_IPC0 = record
  9296. private
  9297. function getCS0IP : TBits_3; inline;
  9298. function getCS0IS : TBits_2; inline;
  9299. function getCS1IP : TBits_3; inline;
  9300. function getCS1IS : TBits_2; inline;
  9301. function getCTIP : TBits_3; inline;
  9302. function getCTIS : TBits_2; inline;
  9303. function getINT0IP : TBits_3; inline;
  9304. function getINT0IS : TBits_2; inline;
  9305. function getw : TBits_32; inline;
  9306. procedure setCS0IP(thebits : TBits_3); inline;
  9307. procedure setCS0IS(thebits : TBits_2); inline;
  9308. procedure setCS1IP(thebits : TBits_3); inline;
  9309. procedure setCS1IS(thebits : TBits_2); inline;
  9310. procedure setCTIP(thebits : TBits_3); inline;
  9311. procedure setCTIS(thebits : TBits_2); inline;
  9312. procedure setINT0IP(thebits : TBits_3); inline;
  9313. procedure setINT0IS(thebits : TBits_2); inline;
  9314. procedure setw(thebits : TBits_32); inline;
  9315. public
  9316. property CS0IP : TBits_3 read getCS0IP write setCS0IP;
  9317. property CS0IS : TBits_2 read getCS0IS write setCS0IS;
  9318. property CS1IP : TBits_3 read getCS1IP write setCS1IP;
  9319. property CS1IS : TBits_2 read getCS1IS write setCS1IS;
  9320. property CTIP : TBits_3 read getCTIP write setCTIP;
  9321. property CTIS : TBits_2 read getCTIS write setCTIS;
  9322. property INT0IP : TBits_3 read getINT0IP write setINT0IP;
  9323. property INT0IS : TBits_2 read getINT0IS write setINT0IS;
  9324. property w : TBits_32 read getw write setw;
  9325. end;
  9326. TINT_IPC1 = record
  9327. private
  9328. function getIC1IP : TBits_3; inline;
  9329. function getIC1IS : TBits_2; inline;
  9330. function getINT1IP : TBits_3; inline;
  9331. function getINT1IS : TBits_2; inline;
  9332. function getOC1IP : TBits_3; inline;
  9333. function getOC1IS : TBits_2; inline;
  9334. function getT1IP : TBits_3; inline;
  9335. function getT1IS : TBits_2; inline;
  9336. function getw : TBits_32; inline;
  9337. procedure setIC1IP(thebits : TBits_3); inline;
  9338. procedure setIC1IS(thebits : TBits_2); inline;
  9339. procedure setINT1IP(thebits : TBits_3); inline;
  9340. procedure setINT1IS(thebits : TBits_2); inline;
  9341. procedure setOC1IP(thebits : TBits_3); inline;
  9342. procedure setOC1IS(thebits : TBits_2); inline;
  9343. procedure setT1IP(thebits : TBits_3); inline;
  9344. procedure setT1IS(thebits : TBits_2); inline;
  9345. procedure setw(thebits : TBits_32); inline;
  9346. public
  9347. property IC1IP : TBits_3 read getIC1IP write setIC1IP;
  9348. property IC1IS : TBits_2 read getIC1IS write setIC1IS;
  9349. property INT1IP : TBits_3 read getINT1IP write setINT1IP;
  9350. property INT1IS : TBits_2 read getINT1IS write setINT1IS;
  9351. property OC1IP : TBits_3 read getOC1IP write setOC1IP;
  9352. property OC1IS : TBits_2 read getOC1IS write setOC1IS;
  9353. property T1IP : TBits_3 read getT1IP write setT1IP;
  9354. property T1IS : TBits_2 read getT1IS write setT1IS;
  9355. property w : TBits_32 read getw write setw;
  9356. end;
  9357. TINT_IPC2 = record
  9358. private
  9359. function getIC2IP : TBits_3; inline;
  9360. function getIC2IS : TBits_2; inline;
  9361. function getINT2IP : TBits_3; inline;
  9362. function getINT2IS : TBits_2; inline;
  9363. function getOC2IP : TBits_3; inline;
  9364. function getOC2IS : TBits_2; inline;
  9365. function getT2IP : TBits_3; inline;
  9366. function getT2IS : TBits_2; inline;
  9367. function getw : TBits_32; inline;
  9368. procedure setIC2IP(thebits : TBits_3); inline;
  9369. procedure setIC2IS(thebits : TBits_2); inline;
  9370. procedure setINT2IP(thebits : TBits_3); inline;
  9371. procedure setINT2IS(thebits : TBits_2); inline;
  9372. procedure setOC2IP(thebits : TBits_3); inline;
  9373. procedure setOC2IS(thebits : TBits_2); inline;
  9374. procedure setT2IP(thebits : TBits_3); inline;
  9375. procedure setT2IS(thebits : TBits_2); inline;
  9376. procedure setw(thebits : TBits_32); inline;
  9377. public
  9378. property IC2IP : TBits_3 read getIC2IP write setIC2IP;
  9379. property IC2IS : TBits_2 read getIC2IS write setIC2IS;
  9380. property INT2IP : TBits_3 read getINT2IP write setINT2IP;
  9381. property INT2IS : TBits_2 read getINT2IS write setINT2IS;
  9382. property OC2IP : TBits_3 read getOC2IP write setOC2IP;
  9383. property OC2IS : TBits_2 read getOC2IS write setOC2IS;
  9384. property T2IP : TBits_3 read getT2IP write setT2IP;
  9385. property T2IS : TBits_2 read getT2IS write setT2IS;
  9386. property w : TBits_32 read getw write setw;
  9387. end;
  9388. TINT_IPC3 = record
  9389. private
  9390. function getIC3IP : TBits_3; inline;
  9391. function getIC3IS : TBits_2; inline;
  9392. function getINT3IP : TBits_3; inline;
  9393. function getINT3IS : TBits_2; inline;
  9394. function getOC3IP : TBits_3; inline;
  9395. function getOC3IS : TBits_2; inline;
  9396. function getT3IP : TBits_3; inline;
  9397. function getT3IS : TBits_2; inline;
  9398. function getw : TBits_32; inline;
  9399. procedure setIC3IP(thebits : TBits_3); inline;
  9400. procedure setIC3IS(thebits : TBits_2); inline;
  9401. procedure setINT3IP(thebits : TBits_3); inline;
  9402. procedure setINT3IS(thebits : TBits_2); inline;
  9403. procedure setOC3IP(thebits : TBits_3); inline;
  9404. procedure setOC3IS(thebits : TBits_2); inline;
  9405. procedure setT3IP(thebits : TBits_3); inline;
  9406. procedure setT3IS(thebits : TBits_2); inline;
  9407. procedure setw(thebits : TBits_32); inline;
  9408. public
  9409. property IC3IP : TBits_3 read getIC3IP write setIC3IP;
  9410. property IC3IS : TBits_2 read getIC3IS write setIC3IS;
  9411. property INT3IP : TBits_3 read getINT3IP write setINT3IP;
  9412. property INT3IS : TBits_2 read getINT3IS write setINT3IS;
  9413. property OC3IP : TBits_3 read getOC3IP write setOC3IP;
  9414. property OC3IS : TBits_2 read getOC3IS write setOC3IS;
  9415. property T3IP : TBits_3 read getT3IP write setT3IP;
  9416. property T3IS : TBits_2 read getT3IS write setT3IS;
  9417. property w : TBits_32 read getw write setw;
  9418. end;
  9419. TINT_IPC4 = record
  9420. private
  9421. function getIC4IP : TBits_3; inline;
  9422. function getIC4IS : TBits_2; inline;
  9423. function getINT4IP : TBits_3; inline;
  9424. function getINT4IS : TBits_2; inline;
  9425. function getOC4IP : TBits_3; inline;
  9426. function getOC4IS : TBits_2; inline;
  9427. function getT4IP : TBits_3; inline;
  9428. function getT4IS : TBits_2; inline;
  9429. function getw : TBits_32; inline;
  9430. procedure setIC4IP(thebits : TBits_3); inline;
  9431. procedure setIC4IS(thebits : TBits_2); inline;
  9432. procedure setINT4IP(thebits : TBits_3); inline;
  9433. procedure setINT4IS(thebits : TBits_2); inline;
  9434. procedure setOC4IP(thebits : TBits_3); inline;
  9435. procedure setOC4IS(thebits : TBits_2); inline;
  9436. procedure setT4IP(thebits : TBits_3); inline;
  9437. procedure setT4IS(thebits : TBits_2); inline;
  9438. procedure setw(thebits : TBits_32); inline;
  9439. public
  9440. property IC4IP : TBits_3 read getIC4IP write setIC4IP;
  9441. property IC4IS : TBits_2 read getIC4IS write setIC4IS;
  9442. property INT4IP : TBits_3 read getINT4IP write setINT4IP;
  9443. property INT4IS : TBits_2 read getINT4IS write setINT4IS;
  9444. property OC4IP : TBits_3 read getOC4IP write setOC4IP;
  9445. property OC4IS : TBits_2 read getOC4IS write setOC4IS;
  9446. property T4IP : TBits_3 read getT4IP write setT4IP;
  9447. property T4IS : TBits_2 read getT4IS write setT4IS;
  9448. property w : TBits_32 read getw write setw;
  9449. end;
  9450. TINT_IPC5 = record
  9451. private
  9452. function getIC5IP : TBits_3; inline;
  9453. function getIC5IS : TBits_2; inline;
  9454. function getOC5IP : TBits_3; inline;
  9455. function getOC5IS : TBits_2; inline;
  9456. function getT5IP : TBits_3; inline;
  9457. function getT5IS : TBits_2; inline;
  9458. function getw : TBits_32; inline;
  9459. procedure setIC5IP(thebits : TBits_3); inline;
  9460. procedure setIC5IS(thebits : TBits_2); inline;
  9461. procedure setOC5IP(thebits : TBits_3); inline;
  9462. procedure setOC5IS(thebits : TBits_2); inline;
  9463. procedure setT5IP(thebits : TBits_3); inline;
  9464. procedure setT5IS(thebits : TBits_2); inline;
  9465. procedure setw(thebits : TBits_32); inline;
  9466. public
  9467. property IC5IP : TBits_3 read getIC5IP write setIC5IP;
  9468. property IC5IS : TBits_2 read getIC5IS write setIC5IS;
  9469. property OC5IP : TBits_3 read getOC5IP write setOC5IP;
  9470. property OC5IS : TBits_2 read getOC5IS write setOC5IS;
  9471. property T5IP : TBits_3 read getT5IP write setT5IP;
  9472. property T5IS : TBits_2 read getT5IS write setT5IS;
  9473. property w : TBits_32 read getw write setw;
  9474. end;
  9475. TINT_IPC6 = record
  9476. private
  9477. function getAD1IP : TBits_3; inline;
  9478. function getAD1IS : TBits_2; inline;
  9479. function getCNIP : TBits_3; inline;
  9480. function getCNIS : TBits_2; inline;
  9481. function getI2C1AIP : TBits_3; inline;
  9482. function getI2C1AIS : TBits_2; inline;
  9483. function getI2C1IP : TBits_3; inline;
  9484. function getI2C1IS : TBits_2; inline;
  9485. function getI2C3IP : TBits_3; inline;
  9486. function getI2C3IS : TBits_2; inline;
  9487. function getSPI1AIP : TBits_3; inline;
  9488. function getSPI1AIS : TBits_2; inline;
  9489. function getSPI3IP : TBits_3; inline;
  9490. function getSPI3IS : TBits_2; inline;
  9491. function getU1AIP : TBits_3; inline;
  9492. function getU1AIS : TBits_2; inline;
  9493. function getU1IP : TBits_3; inline;
  9494. function getU1IS : TBits_2; inline;
  9495. function getw : TBits_32; inline;
  9496. procedure setAD1IP(thebits : TBits_3); inline;
  9497. procedure setAD1IS(thebits : TBits_2); inline;
  9498. procedure setCNIP(thebits : TBits_3); inline;
  9499. procedure setCNIS(thebits : TBits_2); inline;
  9500. procedure setI2C1AIP(thebits : TBits_3); inline;
  9501. procedure setI2C1AIS(thebits : TBits_2); inline;
  9502. procedure setI2C1IP(thebits : TBits_3); inline;
  9503. procedure setI2C1IS(thebits : TBits_2); inline;
  9504. procedure setI2C3IP(thebits : TBits_3); inline;
  9505. procedure setI2C3IS(thebits : TBits_2); inline;
  9506. procedure setSPI1AIP(thebits : TBits_3); inline;
  9507. procedure setSPI1AIS(thebits : TBits_2); inline;
  9508. procedure setSPI3IP(thebits : TBits_3); inline;
  9509. procedure setSPI3IS(thebits : TBits_2); inline;
  9510. procedure setU1AIP(thebits : TBits_3); inline;
  9511. procedure setU1AIS(thebits : TBits_2); inline;
  9512. procedure setU1IP(thebits : TBits_3); inline;
  9513. procedure setU1IS(thebits : TBits_2); inline;
  9514. procedure setw(thebits : TBits_32); inline;
  9515. public
  9516. property AD1IP : TBits_3 read getAD1IP write setAD1IP;
  9517. property AD1IS : TBits_2 read getAD1IS write setAD1IS;
  9518. property CNIP : TBits_3 read getCNIP write setCNIP;
  9519. property CNIS : TBits_2 read getCNIS write setCNIS;
  9520. property I2C1AIP : TBits_3 read getI2C1AIP write setI2C1AIP;
  9521. property I2C1AIS : TBits_2 read getI2C1AIS write setI2C1AIS;
  9522. property I2C1IP : TBits_3 read getI2C1IP write setI2C1IP;
  9523. property I2C1IS : TBits_2 read getI2C1IS write setI2C1IS;
  9524. property I2C3IP : TBits_3 read getI2C3IP write setI2C3IP;
  9525. property I2C3IS : TBits_2 read getI2C3IS write setI2C3IS;
  9526. property SPI1AIP : TBits_3 read getSPI1AIP write setSPI1AIP;
  9527. property SPI1AIS : TBits_2 read getSPI1AIS write setSPI1AIS;
  9528. property SPI3IP : TBits_3 read getSPI3IP write setSPI3IP;
  9529. property SPI3IS : TBits_2 read getSPI3IS write setSPI3IS;
  9530. property U1AIP : TBits_3 read getU1AIP write setU1AIP;
  9531. property U1AIS : TBits_2 read getU1AIS write setU1AIS;
  9532. property U1IP : TBits_3 read getU1IP write setU1IP;
  9533. property U1IS : TBits_2 read getU1IS write setU1IS;
  9534. property w : TBits_32 read getw write setw;
  9535. end;
  9536. TINT_IPC7 = record
  9537. private
  9538. function getCMP1IP : TBits_3; inline;
  9539. function getCMP1IS : TBits_2; inline;
  9540. function getCMP2IP : TBits_3; inline;
  9541. function getCMP2IS : TBits_2; inline;
  9542. function getI2C2AIP : TBits_3; inline;
  9543. function getI2C2AIS : TBits_2; inline;
  9544. function getI2C4IP : TBits_3; inline;
  9545. function getI2C4IS : TBits_2; inline;
  9546. function getPMPIP : TBits_3; inline;
  9547. function getPMPIS : TBits_2; inline;
  9548. function getSPI2AIP : TBits_3; inline;
  9549. function getSPI2AIS : TBits_2; inline;
  9550. function getSPI2IP : TBits_3; inline;
  9551. function getSPI2IS : TBits_2; inline;
  9552. function getU2AIP : TBits_3; inline;
  9553. function getU2AIS : TBits_2; inline;
  9554. function getU3IP : TBits_3; inline;
  9555. function getU3IS : TBits_2; inline;
  9556. function getw : TBits_32; inline;
  9557. procedure setCMP1IP(thebits : TBits_3); inline;
  9558. procedure setCMP1IS(thebits : TBits_2); inline;
  9559. procedure setCMP2IP(thebits : TBits_3); inline;
  9560. procedure setCMP2IS(thebits : TBits_2); inline;
  9561. procedure setI2C2AIP(thebits : TBits_3); inline;
  9562. procedure setI2C2AIS(thebits : TBits_2); inline;
  9563. procedure setI2C4IP(thebits : TBits_3); inline;
  9564. procedure setI2C4IS(thebits : TBits_2); inline;
  9565. procedure setPMPIP(thebits : TBits_3); inline;
  9566. procedure setPMPIS(thebits : TBits_2); inline;
  9567. procedure setSPI2AIP(thebits : TBits_3); inline;
  9568. procedure setSPI2AIS(thebits : TBits_2); inline;
  9569. procedure setSPI2IP(thebits : TBits_3); inline;
  9570. procedure setSPI2IS(thebits : TBits_2); inline;
  9571. procedure setU2AIP(thebits : TBits_3); inline;
  9572. procedure setU2AIS(thebits : TBits_2); inline;
  9573. procedure setU3IP(thebits : TBits_3); inline;
  9574. procedure setU3IS(thebits : TBits_2); inline;
  9575. procedure setw(thebits : TBits_32); inline;
  9576. public
  9577. property CMP1IP : TBits_3 read getCMP1IP write setCMP1IP;
  9578. property CMP1IS : TBits_2 read getCMP1IS write setCMP1IS;
  9579. property CMP2IP : TBits_3 read getCMP2IP write setCMP2IP;
  9580. property CMP2IS : TBits_2 read getCMP2IS write setCMP2IS;
  9581. property I2C2AIP : TBits_3 read getI2C2AIP write setI2C2AIP;
  9582. property I2C2AIS : TBits_2 read getI2C2AIS write setI2C2AIS;
  9583. property I2C4IP : TBits_3 read getI2C4IP write setI2C4IP;
  9584. property I2C4IS : TBits_2 read getI2C4IS write setI2C4IS;
  9585. property PMPIP : TBits_3 read getPMPIP write setPMPIP;
  9586. property PMPIS : TBits_2 read getPMPIS write setPMPIS;
  9587. property SPI2AIP : TBits_3 read getSPI2AIP write setSPI2AIP;
  9588. property SPI2AIS : TBits_2 read getSPI2AIS write setSPI2AIS;
  9589. property SPI2IP : TBits_3 read getSPI2IP write setSPI2IP;
  9590. property SPI2IS : TBits_2 read getSPI2IS write setSPI2IS;
  9591. property U2AIP : TBits_3 read getU2AIP write setU2AIP;
  9592. property U2AIS : TBits_2 read getU2AIS write setU2AIS;
  9593. property U3IP : TBits_3 read getU3IP write setU3IP;
  9594. property U3IS : TBits_2 read getU3IS write setU3IS;
  9595. property w : TBits_32 read getw write setw;
  9596. end;
  9597. TINT_IPC8 = record
  9598. private
  9599. function getFSCMIP : TBits_3; inline;
  9600. function getFSCMIS : TBits_2; inline;
  9601. function getI2C3AIP : TBits_3; inline;
  9602. function getI2C3AIS : TBits_2; inline;
  9603. function getI2C5IP : TBits_3; inline;
  9604. function getI2C5IS : TBits_2; inline;
  9605. function getRTCCIP : TBits_3; inline;
  9606. function getRTCCIS : TBits_2; inline;
  9607. function getSPI3AIP : TBits_3; inline;
  9608. function getSPI3AIS : TBits_2; inline;
  9609. function getSPI4IP : TBits_3; inline;
  9610. function getSPI4IS : TBits_2; inline;
  9611. function getU2IP : TBits_3; inline;
  9612. function getU2IS : TBits_2; inline;
  9613. function getU3AIP : TBits_3; inline;
  9614. function getU3AIS : TBits_2; inline;
  9615. function getw : TBits_32; inline;
  9616. procedure setFSCMIP(thebits : TBits_3); inline;
  9617. procedure setFSCMIS(thebits : TBits_2); inline;
  9618. procedure setI2C3AIP(thebits : TBits_3); inline;
  9619. procedure setI2C3AIS(thebits : TBits_2); inline;
  9620. procedure setI2C5IP(thebits : TBits_3); inline;
  9621. procedure setI2C5IS(thebits : TBits_2); inline;
  9622. procedure setRTCCIP(thebits : TBits_3); inline;
  9623. procedure setRTCCIS(thebits : TBits_2); inline;
  9624. procedure setSPI3AIP(thebits : TBits_3); inline;
  9625. procedure setSPI3AIS(thebits : TBits_2); inline;
  9626. procedure setSPI4IP(thebits : TBits_3); inline;
  9627. procedure setSPI4IS(thebits : TBits_2); inline;
  9628. procedure setU2IP(thebits : TBits_3); inline;
  9629. procedure setU2IS(thebits : TBits_2); inline;
  9630. procedure setU3AIP(thebits : TBits_3); inline;
  9631. procedure setU3AIS(thebits : TBits_2); inline;
  9632. procedure setw(thebits : TBits_32); inline;
  9633. public
  9634. property FSCMIP : TBits_3 read getFSCMIP write setFSCMIP;
  9635. property FSCMIS : TBits_2 read getFSCMIS write setFSCMIS;
  9636. property I2C3AIP : TBits_3 read getI2C3AIP write setI2C3AIP;
  9637. property I2C3AIS : TBits_2 read getI2C3AIS write setI2C3AIS;
  9638. property I2C5IP : TBits_3 read getI2C5IP write setI2C5IP;
  9639. property I2C5IS : TBits_2 read getI2C5IS write setI2C5IS;
  9640. property RTCCIP : TBits_3 read getRTCCIP write setRTCCIP;
  9641. property RTCCIS : TBits_2 read getRTCCIS write setRTCCIS;
  9642. property SPI3AIP : TBits_3 read getSPI3AIP write setSPI3AIP;
  9643. property SPI3AIS : TBits_2 read getSPI3AIS write setSPI3AIS;
  9644. property SPI4IP : TBits_3 read getSPI4IP write setSPI4IP;
  9645. property SPI4IS : TBits_2 read getSPI4IS write setSPI4IS;
  9646. property U2IP : TBits_3 read getU2IP write setU2IP;
  9647. property U2IS : TBits_2 read getU2IS write setU2IS;
  9648. property U3AIP : TBits_3 read getU3AIP write setU3AIP;
  9649. property U3AIS : TBits_2 read getU3AIS write setU3AIS;
  9650. property w : TBits_32 read getw write setw;
  9651. end;
  9652. TINT_IPC9 = record
  9653. private
  9654. function getDMA0IP : TBits_3; inline;
  9655. function getDMA0IS : TBits_2; inline;
  9656. function getDMA1IP : TBits_3; inline;
  9657. function getDMA1IS : TBits_2; inline;
  9658. function getDMA2IP : TBits_3; inline;
  9659. function getDMA2IS : TBits_2; inline;
  9660. function getDMA3IP : TBits_3; inline;
  9661. function getDMA3IS : TBits_2; inline;
  9662. function getw : TBits_32; inline;
  9663. procedure setDMA0IP(thebits : TBits_3); inline;
  9664. procedure setDMA0IS(thebits : TBits_2); inline;
  9665. procedure setDMA1IP(thebits : TBits_3); inline;
  9666. procedure setDMA1IS(thebits : TBits_2); inline;
  9667. procedure setDMA2IP(thebits : TBits_3); inline;
  9668. procedure setDMA2IS(thebits : TBits_2); inline;
  9669. procedure setDMA3IP(thebits : TBits_3); inline;
  9670. procedure setDMA3IS(thebits : TBits_2); inline;
  9671. procedure setw(thebits : TBits_32); inline;
  9672. public
  9673. property DMA0IP : TBits_3 read getDMA0IP write setDMA0IP;
  9674. property DMA0IS : TBits_2 read getDMA0IS write setDMA0IS;
  9675. property DMA1IP : TBits_3 read getDMA1IP write setDMA1IP;
  9676. property DMA1IS : TBits_2 read getDMA1IS write setDMA1IS;
  9677. property DMA2IP : TBits_3 read getDMA2IP write setDMA2IP;
  9678. property DMA2IS : TBits_2 read getDMA2IS write setDMA2IS;
  9679. property DMA3IP : TBits_3 read getDMA3IP write setDMA3IP;
  9680. property DMA3IS : TBits_2 read getDMA3IS write setDMA3IS;
  9681. property w : TBits_32 read getw write setw;
  9682. end;
  9683. TINT_IPC10 = record
  9684. private
  9685. function getDMA4IP : TBits_3; inline;
  9686. function getDMA4IS : TBits_2; inline;
  9687. function getDMA5IP : TBits_3; inline;
  9688. function getDMA5IS : TBits_2; inline;
  9689. function getDMA6IP : TBits_3; inline;
  9690. function getDMA6IS : TBits_2; inline;
  9691. function getDMA7IP : TBits_3; inline;
  9692. function getDMA7IS : TBits_2; inline;
  9693. function getw : TBits_32; inline;
  9694. procedure setDMA4IP(thebits : TBits_3); inline;
  9695. procedure setDMA4IS(thebits : TBits_2); inline;
  9696. procedure setDMA5IP(thebits : TBits_3); inline;
  9697. procedure setDMA5IS(thebits : TBits_2); inline;
  9698. procedure setDMA6IP(thebits : TBits_3); inline;
  9699. procedure setDMA6IS(thebits : TBits_2); inline;
  9700. procedure setDMA7IP(thebits : TBits_3); inline;
  9701. procedure setDMA7IS(thebits : TBits_2); inline;
  9702. procedure setw(thebits : TBits_32); inline;
  9703. public
  9704. property DMA4IP : TBits_3 read getDMA4IP write setDMA4IP;
  9705. property DMA4IS : TBits_2 read getDMA4IS write setDMA4IS;
  9706. property DMA5IP : TBits_3 read getDMA5IP write setDMA5IP;
  9707. property DMA5IS : TBits_2 read getDMA5IS write setDMA5IS;
  9708. property DMA6IP : TBits_3 read getDMA6IP write setDMA6IP;
  9709. property DMA6IS : TBits_2 read getDMA6IS write setDMA6IS;
  9710. property DMA7IP : TBits_3 read getDMA7IP write setDMA7IP;
  9711. property DMA7IS : TBits_2 read getDMA7IS write setDMA7IS;
  9712. property w : TBits_32 read getw write setw;
  9713. end;
  9714. TINT_IPC11 = record
  9715. private
  9716. function getCAN1IP : TBits_3; inline;
  9717. function getCAN1IS : TBits_2; inline;
  9718. function getCAN2IP : TBits_3; inline;
  9719. function getCAN2IS : TBits_2; inline;
  9720. function getFCEIP : TBits_3; inline;
  9721. function getFCEIS : TBits_2; inline;
  9722. function getUSBIP : TBits_3; inline;
  9723. function getUSBIS : TBits_2; inline;
  9724. function getw : TBits_32; inline;
  9725. procedure setCAN1IP(thebits : TBits_3); inline;
  9726. procedure setCAN1IS(thebits : TBits_2); inline;
  9727. procedure setCAN2IP(thebits : TBits_3); inline;
  9728. procedure setCAN2IS(thebits : TBits_2); inline;
  9729. procedure setFCEIP(thebits : TBits_3); inline;
  9730. procedure setFCEIS(thebits : TBits_2); inline;
  9731. procedure setUSBIP(thebits : TBits_3); inline;
  9732. procedure setUSBIS(thebits : TBits_2); inline;
  9733. procedure setw(thebits : TBits_32); inline;
  9734. public
  9735. property CAN1IP : TBits_3 read getCAN1IP write setCAN1IP;
  9736. property CAN1IS : TBits_2 read getCAN1IS write setCAN1IS;
  9737. property CAN2IP : TBits_3 read getCAN2IP write setCAN2IP;
  9738. property CAN2IS : TBits_2 read getCAN2IS write setCAN2IS;
  9739. property FCEIP : TBits_3 read getFCEIP write setFCEIP;
  9740. property FCEIS : TBits_2 read getFCEIS write setFCEIS;
  9741. property USBIP : TBits_3 read getUSBIP write setUSBIP;
  9742. property USBIS : TBits_2 read getUSBIS write setUSBIS;
  9743. property w : TBits_32 read getw write setw;
  9744. end;
  9745. TINT_IPC12 = record
  9746. private
  9747. function getETHIP : TBits_3; inline;
  9748. function getETHIS : TBits_2; inline;
  9749. function getU1BIP : TBits_3; inline;
  9750. function getU1BIS : TBits_2; inline;
  9751. function getU2BIP : TBits_3; inline;
  9752. function getU2BIS : TBits_2; inline;
  9753. function getU3BIP : TBits_3; inline;
  9754. function getU3BIS : TBits_2; inline;
  9755. function getU4IP : TBits_3; inline;
  9756. function getU4IS : TBits_2; inline;
  9757. function getU5IP : TBits_3; inline;
  9758. function getU5IS : TBits_2; inline;
  9759. function getU6IP : TBits_3; inline;
  9760. function getU6IS : TBits_2; inline;
  9761. function getw : TBits_32; inline;
  9762. procedure setETHIP(thebits : TBits_3); inline;
  9763. procedure setETHIS(thebits : TBits_2); inline;
  9764. procedure setU1BIP(thebits : TBits_3); inline;
  9765. procedure setU1BIS(thebits : TBits_2); inline;
  9766. procedure setU2BIP(thebits : TBits_3); inline;
  9767. procedure setU2BIS(thebits : TBits_2); inline;
  9768. procedure setU3BIP(thebits : TBits_3); inline;
  9769. procedure setU3BIS(thebits : TBits_2); inline;
  9770. procedure setU4IP(thebits : TBits_3); inline;
  9771. procedure setU4IS(thebits : TBits_2); inline;
  9772. procedure setU5IP(thebits : TBits_3); inline;
  9773. procedure setU5IS(thebits : TBits_2); inline;
  9774. procedure setU6IP(thebits : TBits_3); inline;
  9775. procedure setU6IS(thebits : TBits_2); inline;
  9776. procedure setw(thebits : TBits_32); inline;
  9777. public
  9778. property ETHIP : TBits_3 read getETHIP write setETHIP;
  9779. property ETHIS : TBits_2 read getETHIS write setETHIS;
  9780. property U1BIP : TBits_3 read getU1BIP write setU1BIP;
  9781. property U1BIS : TBits_2 read getU1BIS write setU1BIS;
  9782. property U2BIP : TBits_3 read getU2BIP write setU2BIP;
  9783. property U2BIS : TBits_2 read getU2BIS write setU2BIS;
  9784. property U3BIP : TBits_3 read getU3BIP write setU3BIP;
  9785. property U3BIS : TBits_2 read getU3BIS write setU3BIS;
  9786. property U4IP : TBits_3 read getU4IP write setU4IP;
  9787. property U4IS : TBits_2 read getU4IS write setU4IS;
  9788. property U5IP : TBits_3 read getU5IP write setU5IP;
  9789. property U5IS : TBits_2 read getU5IS write setU5IS;
  9790. property U6IP : TBits_3 read getU6IP write setU6IP;
  9791. property U6IS : TBits_2 read getU6IS write setU6IS;
  9792. property w : TBits_32 read getw write setw;
  9793. end;
  9794. type
  9795. TINTRegisters = record
  9796. INTCONbits : TINT_INTCON;
  9797. INTCON : longWord;
  9798. INTCONCLR : longWord;
  9799. INTCONSET : longWord;
  9800. INTCONINV : longWord;
  9801. INTSTAT : longWord;
  9802. IPTMR : longWord;
  9803. IPTMRCLR : longWord;
  9804. IPTMRSET : longWord;
  9805. IPTMRINV : longWord;
  9806. IFS0bits : TINT_IFS0;
  9807. IFS0 : longWord;
  9808. IFS0CLR : longWord;
  9809. IFS0SET : longWord;
  9810. IFS0INV : longWord;
  9811. IFS1bits : TINT_IFS1;
  9812. IFS1 : longWord;
  9813. IFS1CLR : longWord;
  9814. IFS1SET : longWord;
  9815. IFS1INV : longWord;
  9816. IFS2bits : TINT_IFS2;
  9817. IFS2 : longWord;
  9818. IFS2CLR : longWord;
  9819. IFS2SET : longWord;
  9820. IFS2INV : longWord;
  9821. IEC0bits : TINT_IEC0;
  9822. IEC0 : longWord;
  9823. IEC0CLR : longWord;
  9824. IEC0SET : longWord;
  9825. IEC0INV : longWord;
  9826. IEC1bits : TINT_IEC1;
  9827. IEC1 : longWord;
  9828. IEC1CLR : longWord;
  9829. IEC1SET : longWord;
  9830. IEC1INV : longWord;
  9831. IEC2bits : TINT_IEC2;
  9832. IEC2 : longWord;
  9833. IEC2CLR : longWord;
  9834. IEC2SET : longWord;
  9835. IEC2INV : longWord;
  9836. IPC0bits : TINT_IPC0;
  9837. IPC0 : longWord;
  9838. IPC0CLR : longWord;
  9839. IPC0SET : longWord;
  9840. IPC0INV : longWord;
  9841. IPC1bits : TINT_IPC1;
  9842. IPC1 : longWord;
  9843. IPC1CLR : longWord;
  9844. IPC1SET : longWord;
  9845. IPC1INV : longWord;
  9846. IPC2bits : TINT_IPC2;
  9847. IPC2 : longWord;
  9848. IPC2CLR : longWord;
  9849. IPC2SET : longWord;
  9850. IPC2INV : longWord;
  9851. IPC3bits : TINT_IPC3;
  9852. IPC3 : longWord;
  9853. IPC3CLR : longWord;
  9854. IPC3SET : longWord;
  9855. IPC3INV : longWord;
  9856. IPC4bits : TINT_IPC4;
  9857. IPC4 : longWord;
  9858. IPC4CLR : longWord;
  9859. IPC4SET : longWord;
  9860. IPC4INV : longWord;
  9861. IPC5bits : TINT_IPC5;
  9862. IPC5 : longWord;
  9863. IPC5CLR : longWord;
  9864. IPC5SET : longWord;
  9865. IPC5INV : longWord;
  9866. IPC6bits : TINT_IPC6;
  9867. IPC6 : longWord;
  9868. IPC6CLR : longWord;
  9869. IPC6SET : longWord;
  9870. IPC6INV : longWord;
  9871. IPC7bits : TINT_IPC7;
  9872. IPC7 : longWord;
  9873. IPC7CLR : longWord;
  9874. IPC7SET : longWord;
  9875. IPC7INV : longWord;
  9876. IPC8bits : TINT_IPC8;
  9877. IPC8 : longWord;
  9878. IPC8CLR : longWord;
  9879. IPC8SET : longWord;
  9880. IPC8INV : longWord;
  9881. IPC9bits : TINT_IPC9;
  9882. IPC9 : longWord;
  9883. IPC9CLR : longWord;
  9884. IPC9SET : longWord;
  9885. IPC9INV : longWord;
  9886. IPC10bits : TINT_IPC10;
  9887. IPC10 : longWord;
  9888. IPC10CLR : longWord;
  9889. IPC10SET : longWord;
  9890. IPC10INV : longWord;
  9891. IPC11bits : TINT_IPC11;
  9892. IPC11 : longWord;
  9893. IPC11CLR : longWord;
  9894. IPC11SET : longWord;
  9895. IPC11INV : longWord;
  9896. IPC12bits : TINT_IPC12;
  9897. IPC12 : longWord;
  9898. IPC12CLR : longWord;
  9899. IPC12SET : longWord;
  9900. IPC12INV : longWord;
  9901. end;
  9902. TBMX_BMXCON = record
  9903. private
  9904. function getBMXARB : TBits_3; inline;
  9905. function getBMXCHEDMA : TBits_1; inline;
  9906. function getBMXERRDMA : TBits_1; inline;
  9907. function getBMXERRDS : TBits_1; inline;
  9908. function getBMXERRICD : TBits_1; inline;
  9909. function getBMXERRIS : TBits_1; inline;
  9910. function getBMXERRIXI : TBits_1; inline;
  9911. function getBMXWSDRM : TBits_1; inline;
  9912. function getw : TBits_32; inline;
  9913. procedure setBMXARB(thebits : TBits_3); inline;
  9914. procedure setBMXCHEDMA(thebits : TBits_1); inline;
  9915. procedure setBMXERRDMA(thebits : TBits_1); inline;
  9916. procedure setBMXERRDS(thebits : TBits_1); inline;
  9917. procedure setBMXERRICD(thebits : TBits_1); inline;
  9918. procedure setBMXERRIS(thebits : TBits_1); inline;
  9919. procedure setBMXERRIXI(thebits : TBits_1); inline;
  9920. procedure setBMXWSDRM(thebits : TBits_1); inline;
  9921. procedure setw(thebits : TBits_32); inline;
  9922. public
  9923. procedure clearBMXCHEDMA; inline;
  9924. procedure clearBMXERRDMA; inline;
  9925. procedure clearBMXERRDS; inline;
  9926. procedure clearBMXERRICD; inline;
  9927. procedure clearBMXERRIS; inline;
  9928. procedure clearBMXERRIXI; inline;
  9929. procedure clearBMXWSDRM; inline;
  9930. procedure setBMXCHEDMA; inline;
  9931. procedure setBMXERRDMA; inline;
  9932. procedure setBMXERRDS; inline;
  9933. procedure setBMXERRICD; inline;
  9934. procedure setBMXERRIS; inline;
  9935. procedure setBMXERRIXI; inline;
  9936. procedure setBMXWSDRM; inline;
  9937. property BMXARB : TBits_3 read getBMXARB write setBMXARB;
  9938. property BMXCHEDMA : TBits_1 read getBMXCHEDMA write setBMXCHEDMA;
  9939. property BMXERRDMA : TBits_1 read getBMXERRDMA write setBMXERRDMA;
  9940. property BMXERRDS : TBits_1 read getBMXERRDS write setBMXERRDS;
  9941. property BMXERRICD : TBits_1 read getBMXERRICD write setBMXERRICD;
  9942. property BMXERRIS : TBits_1 read getBMXERRIS write setBMXERRIS;
  9943. property BMXERRIXI : TBits_1 read getBMXERRIXI write setBMXERRIXI;
  9944. property BMXWSDRM : TBits_1 read getBMXWSDRM write setBMXWSDRM;
  9945. property w : TBits_32 read getw write setw;
  9946. end;
  9947. type
  9948. TBMXRegisters = record
  9949. BMXCONbits : TBMX_BMXCON;
  9950. BMXCON : longWord;
  9951. BMXCONCLR : longWord;
  9952. BMXCONSET : longWord;
  9953. BMXCONINV : longWord;
  9954. BMXDKPBA : longWord;
  9955. BMXDKPBACLR : longWord;
  9956. BMXDKPBASET : longWord;
  9957. BMXDKPBAINV : longWord;
  9958. BMXDUDBA : longWord;
  9959. BMXDUDBACLR : longWord;
  9960. BMXDUDBASET : longWord;
  9961. BMXDUDBAINV : longWord;
  9962. BMXDUPBA : longWord;
  9963. BMXDUPBACLR : longWord;
  9964. BMXDUPBASET : longWord;
  9965. BMXDUPBAINV : longWord;
  9966. BMXDRMSZ : longWord;
  9967. BMXPUPBA : longWord;
  9968. BMXPUPBACLR : longWord;
  9969. BMXPUPBASET : longWord;
  9970. BMXPUPBAINV : longWord;
  9971. BMXPFMSZ : longWord;
  9972. BMXBOOTSZ : longWord;
  9973. end;
  9974. TDMAC_DMACON = record
  9975. private
  9976. function getDMABUSY : TBits_1; inline;
  9977. function getON : TBits_1; inline;
  9978. function getSUSPEND : TBits_1; inline;
  9979. function getw : TBits_32; inline;
  9980. procedure setDMABUSY(thebits : TBits_1); inline;
  9981. procedure setON(thebits : TBits_1); inline;
  9982. procedure setSUSPEND(thebits : TBits_1); inline;
  9983. procedure setw(thebits : TBits_32); inline;
  9984. public
  9985. procedure clearDMABUSY; inline;
  9986. procedure clearON; inline;
  9987. procedure clearSUSPEND; inline;
  9988. procedure setDMABUSY; inline;
  9989. procedure setON; inline;
  9990. procedure setSUSPEND; inline;
  9991. property DMABUSY : TBits_1 read getDMABUSY write setDMABUSY;
  9992. property ON : TBits_1 read getON write setON;
  9993. property SUSPEND : TBits_1 read getSUSPEND write setSUSPEND;
  9994. property w : TBits_32 read getw write setw;
  9995. end;
  9996. TDMAC_DMASTAT = record
  9997. private
  9998. function getDMACH : TBits_3; inline;
  9999. function getRDWR : TBits_1; inline;
  10000. function getw : TBits_32; inline;
  10001. procedure setDMACH(thebits : TBits_3); inline;
  10002. procedure setRDWR(thebits : TBits_1); inline;
  10003. procedure setw(thebits : TBits_32); inline;
  10004. public
  10005. procedure clearRDWR; inline;
  10006. procedure setRDWR; inline;
  10007. property DMACH : TBits_3 read getDMACH write setDMACH;
  10008. property RDWR : TBits_1 read getRDWR write setRDWR;
  10009. property w : TBits_32 read getw write setw;
  10010. end;
  10011. TDMAC_DCRCCON = record
  10012. private
  10013. function getBITO : TBits_1; inline;
  10014. function getBYTO : TBits_2; inline;
  10015. function getCRCAPP : TBits_1; inline;
  10016. function getCRCCH : TBits_3; inline;
  10017. function getCRCEN : TBits_1; inline;
  10018. function getCRCTYP : TBits_1; inline;
  10019. function getPLEN : TBits_5; inline;
  10020. function getWBO : TBits_1; inline;
  10021. function getw : TBits_32; inline;
  10022. procedure setBITO(thebits : TBits_1); inline;
  10023. procedure setBYTO(thebits : TBits_2); inline;
  10024. procedure setCRCAPP(thebits : TBits_1); inline;
  10025. procedure setCRCCH(thebits : TBits_3); inline;
  10026. procedure setCRCEN(thebits : TBits_1); inline;
  10027. procedure setCRCTYP(thebits : TBits_1); inline;
  10028. procedure setPLEN(thebits : TBits_5); inline;
  10029. procedure setWBO(thebits : TBits_1); inline;
  10030. procedure setw(thebits : TBits_32); inline;
  10031. public
  10032. procedure clearBITO; inline;
  10033. procedure clearCRCAPP; inline;
  10034. procedure clearCRCEN; inline;
  10035. procedure clearCRCTYP; inline;
  10036. procedure clearWBO; inline;
  10037. procedure setBITO; inline;
  10038. procedure setCRCAPP; inline;
  10039. procedure setCRCEN; inline;
  10040. procedure setCRCTYP; inline;
  10041. procedure setWBO; inline;
  10042. property BITO : TBits_1 read getBITO write setBITO;
  10043. property BYTO : TBits_2 read getBYTO write setBYTO;
  10044. property CRCAPP : TBits_1 read getCRCAPP write setCRCAPP;
  10045. property CRCCH : TBits_3 read getCRCCH write setCRCCH;
  10046. property CRCEN : TBits_1 read getCRCEN write setCRCEN;
  10047. property CRCTYP : TBits_1 read getCRCTYP write setCRCTYP;
  10048. property PLEN : TBits_5 read getPLEN write setPLEN;
  10049. property WBO : TBits_1 read getWBO write setWBO;
  10050. property w : TBits_32 read getw write setw;
  10051. end;
  10052. type
  10053. TDMACRegisters = record
  10054. DMACONbits : TDMAC_DMACON;
  10055. DMACON : longWord;
  10056. DMACONCLR : longWord;
  10057. DMACONSET : longWord;
  10058. DMACONINV : longWord;
  10059. DMASTATbits : TDMAC_DMASTAT;
  10060. DMASTAT : longWord;
  10061. DMASTATCLR : longWord;
  10062. DMASTATSET : longWord;
  10063. DMASTATINV : longWord;
  10064. DMAADDR : longWord;
  10065. DMAADDRCLR : longWord;
  10066. DMAADDRSET : longWord;
  10067. DMAADDRINV : longWord;
  10068. DCRCCONbits : TDMAC_DCRCCON;
  10069. DCRCCON : longWord;
  10070. DCRCCONCLR : longWord;
  10071. DCRCCONSET : longWord;
  10072. DCRCCONINV : longWord;
  10073. DCRCDATA : longWord;
  10074. DCRCDATACLR : longWord;
  10075. DCRCDATASET : longWord;
  10076. DCRCDATAINV : longWord;
  10077. DCRCXOR : longWord;
  10078. DCRCXORCLR : longWord;
  10079. DCRCXORSET : longWord;
  10080. DCRCXORINV : longWord;
  10081. end;
  10082. TDMAC0_DCH0CON = record
  10083. private
  10084. function getCHAED : TBits_1; inline;
  10085. function getCHAEN : TBits_1; inline;
  10086. function getCHBUSY : TBits_1; inline;
  10087. function getCHCHN : TBits_1; inline;
  10088. function getCHCHNS : TBits_1; inline;
  10089. function getCHEDET : TBits_1; inline;
  10090. function getCHEN : TBits_1; inline;
  10091. function getCHPRI : TBits_2; inline;
  10092. function getw : TBits_32; inline;
  10093. procedure setCHAED(thebits : TBits_1); inline;
  10094. procedure setCHAEN(thebits : TBits_1); inline;
  10095. procedure setCHBUSY(thebits : TBits_1); inline;
  10096. procedure setCHCHN(thebits : TBits_1); inline;
  10097. procedure setCHCHNS(thebits : TBits_1); inline;
  10098. procedure setCHEDET(thebits : TBits_1); inline;
  10099. procedure setCHEN(thebits : TBits_1); inline;
  10100. procedure setCHPRI(thebits : TBits_2); inline;
  10101. procedure setw(thebits : TBits_32); inline;
  10102. public
  10103. procedure clearCHAED; inline;
  10104. procedure clearCHAEN; inline;
  10105. procedure clearCHBUSY; inline;
  10106. procedure clearCHCHN; inline;
  10107. procedure clearCHCHNS; inline;
  10108. procedure clearCHEDET; inline;
  10109. procedure clearCHEN; inline;
  10110. procedure setCHAED; inline;
  10111. procedure setCHAEN; inline;
  10112. procedure setCHBUSY; inline;
  10113. procedure setCHCHN; inline;
  10114. procedure setCHCHNS; inline;
  10115. procedure setCHEDET; inline;
  10116. procedure setCHEN; inline;
  10117. property CHAED : TBits_1 read getCHAED write setCHAED;
  10118. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10119. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10120. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10121. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10122. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10123. property CHEN : TBits_1 read getCHEN write setCHEN;
  10124. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10125. property w : TBits_32 read getw write setw;
  10126. end;
  10127. TDMAC0_DCH0ECON = record
  10128. private
  10129. function getAIRQEN : TBits_1; inline;
  10130. function getCABORT : TBits_1; inline;
  10131. function getCFORCE : TBits_1; inline;
  10132. function getCHAIRQ : TBits_8; inline;
  10133. function getCHSIRQ : TBits_8; inline;
  10134. function getPATEN : TBits_1; inline;
  10135. function getSIRQEN : TBits_1; inline;
  10136. function getw : TBits_32; inline;
  10137. procedure setAIRQEN(thebits : TBits_1); inline;
  10138. procedure setCABORT(thebits : TBits_1); inline;
  10139. procedure setCFORCE(thebits : TBits_1); inline;
  10140. procedure setCHAIRQ(thebits : TBits_8); inline;
  10141. procedure setCHSIRQ(thebits : TBits_8); inline;
  10142. procedure setPATEN(thebits : TBits_1); inline;
  10143. procedure setSIRQEN(thebits : TBits_1); inline;
  10144. procedure setw(thebits : TBits_32); inline;
  10145. public
  10146. procedure clearAIRQEN; inline;
  10147. procedure clearCABORT; inline;
  10148. procedure clearCFORCE; inline;
  10149. procedure clearPATEN; inline;
  10150. procedure clearSIRQEN; inline;
  10151. procedure setAIRQEN; inline;
  10152. procedure setCABORT; inline;
  10153. procedure setCFORCE; inline;
  10154. procedure setPATEN; inline;
  10155. procedure setSIRQEN; inline;
  10156. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10157. property CABORT : TBits_1 read getCABORT write setCABORT;
  10158. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10159. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10160. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10161. property PATEN : TBits_1 read getPATEN write setPATEN;
  10162. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10163. property w : TBits_32 read getw write setw;
  10164. end;
  10165. TDMAC0_DCH0INT = record
  10166. private
  10167. function getCHBCIE : TBits_1; inline;
  10168. function getCHBCIF : TBits_1; inline;
  10169. function getCHCCIE : TBits_1; inline;
  10170. function getCHCCIF : TBits_1; inline;
  10171. function getCHDDIE : TBits_1; inline;
  10172. function getCHDDIF : TBits_1; inline;
  10173. function getCHDHIE : TBits_1; inline;
  10174. function getCHDHIF : TBits_1; inline;
  10175. function getCHERIE : TBits_1; inline;
  10176. function getCHERIF : TBits_1; inline;
  10177. function getCHSDIE : TBits_1; inline;
  10178. function getCHSDIF : TBits_1; inline;
  10179. function getCHSHIE : TBits_1; inline;
  10180. function getCHSHIF : TBits_1; inline;
  10181. function getCHTAIE : TBits_1; inline;
  10182. function getCHTAIF : TBits_1; inline;
  10183. function getw : TBits_32; inline;
  10184. procedure setCHBCIE(thebits : TBits_1); inline;
  10185. procedure setCHBCIF(thebits : TBits_1); inline;
  10186. procedure setCHCCIE(thebits : TBits_1); inline;
  10187. procedure setCHCCIF(thebits : TBits_1); inline;
  10188. procedure setCHDDIE(thebits : TBits_1); inline;
  10189. procedure setCHDDIF(thebits : TBits_1); inline;
  10190. procedure setCHDHIE(thebits : TBits_1); inline;
  10191. procedure setCHDHIF(thebits : TBits_1); inline;
  10192. procedure setCHERIE(thebits : TBits_1); inline;
  10193. procedure setCHERIF(thebits : TBits_1); inline;
  10194. procedure setCHSDIE(thebits : TBits_1); inline;
  10195. procedure setCHSDIF(thebits : TBits_1); inline;
  10196. procedure setCHSHIE(thebits : TBits_1); inline;
  10197. procedure setCHSHIF(thebits : TBits_1); inline;
  10198. procedure setCHTAIE(thebits : TBits_1); inline;
  10199. procedure setCHTAIF(thebits : TBits_1); inline;
  10200. procedure setw(thebits : TBits_32); inline;
  10201. public
  10202. procedure clearCHBCIE; inline;
  10203. procedure clearCHBCIF; inline;
  10204. procedure clearCHCCIE; inline;
  10205. procedure clearCHCCIF; inline;
  10206. procedure clearCHDDIE; inline;
  10207. procedure clearCHDDIF; inline;
  10208. procedure clearCHDHIE; inline;
  10209. procedure clearCHDHIF; inline;
  10210. procedure clearCHERIE; inline;
  10211. procedure clearCHERIF; inline;
  10212. procedure clearCHSDIE; inline;
  10213. procedure clearCHSDIF; inline;
  10214. procedure clearCHSHIE; inline;
  10215. procedure clearCHSHIF; inline;
  10216. procedure clearCHTAIE; inline;
  10217. procedure clearCHTAIF; inline;
  10218. procedure setCHBCIE; inline;
  10219. procedure setCHBCIF; inline;
  10220. procedure setCHCCIE; inline;
  10221. procedure setCHCCIF; inline;
  10222. procedure setCHDDIE; inline;
  10223. procedure setCHDDIF; inline;
  10224. procedure setCHDHIE; inline;
  10225. procedure setCHDHIF; inline;
  10226. procedure setCHERIE; inline;
  10227. procedure setCHERIF; inline;
  10228. procedure setCHSDIE; inline;
  10229. procedure setCHSDIF; inline;
  10230. procedure setCHSHIE; inline;
  10231. procedure setCHSHIF; inline;
  10232. procedure setCHTAIE; inline;
  10233. procedure setCHTAIF; inline;
  10234. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10235. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10236. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10237. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10238. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10239. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10240. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10241. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10242. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10243. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10244. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10245. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10246. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10247. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10248. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10249. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10250. property w : TBits_32 read getw write setw;
  10251. end;
  10252. type
  10253. TDMAC0Registers = record
  10254. DCH0CONbits : TDMAC0_DCH0CON;
  10255. DCH0CON : longWord;
  10256. DCH0CONCLR : longWord;
  10257. DCH0CONSET : longWord;
  10258. DCH0CONINV : longWord;
  10259. DCH0ECONbits : TDMAC0_DCH0ECON;
  10260. DCH0ECON : longWord;
  10261. DCH0ECONCLR : longWord;
  10262. DCH0ECONSET : longWord;
  10263. DCH0ECONINV : longWord;
  10264. DCH0INTbits : TDMAC0_DCH0INT;
  10265. DCH0INT : longWord;
  10266. DCH0INTCLR : longWord;
  10267. DCH0INTSET : longWord;
  10268. DCH0INTINV : longWord;
  10269. DCH0SSA : longWord;
  10270. DCH0SSACLR : longWord;
  10271. DCH0SSASET : longWord;
  10272. DCH0SSAINV : longWord;
  10273. DCH0DSA : longWord;
  10274. DCH0DSACLR : longWord;
  10275. DCH0DSASET : longWord;
  10276. DCH0DSAINV : longWord;
  10277. DCH0SSIZ : longWord;
  10278. DCH0SSIZCLR : longWord;
  10279. DCH0SSIZSET : longWord;
  10280. DCH0SSIZINV : longWord;
  10281. DCH0DSIZ : longWord;
  10282. DCH0DSIZCLR : longWord;
  10283. DCH0DSIZSET : longWord;
  10284. DCH0DSIZINV : longWord;
  10285. DCH0SPTR : longWord;
  10286. DCH0SPTRCLR : longWord;
  10287. DCH0SPTRSET : longWord;
  10288. DCH0SPTRINV : longWord;
  10289. DCH0DPTR : longWord;
  10290. DCH0DPTRCLR : longWord;
  10291. DCH0DPTRSET : longWord;
  10292. DCH0DPTRINV : longWord;
  10293. DCH0CSIZ : longWord;
  10294. DCH0CSIZCLR : longWord;
  10295. DCH0CSIZSET : longWord;
  10296. DCH0CSIZINV : longWord;
  10297. DCH0CPTR : longWord;
  10298. DCH0CPTRCLR : longWord;
  10299. DCH0CPTRSET : longWord;
  10300. DCH0CPTRINV : longWord;
  10301. DCH0DAT : longWord;
  10302. DCH0DATCLR : longWord;
  10303. DCH0DATSET : longWord;
  10304. DCH0DATINV : longWord;
  10305. end;
  10306. TDMAC1_DCH1CON = record
  10307. private
  10308. function getCHAED : TBits_1; inline;
  10309. function getCHAEN : TBits_1; inline;
  10310. function getCHBUSY : TBits_1; inline;
  10311. function getCHCHN : TBits_1; inline;
  10312. function getCHCHNS : TBits_1; inline;
  10313. function getCHEDET : TBits_1; inline;
  10314. function getCHEN : TBits_1; inline;
  10315. function getCHPRI : TBits_2; inline;
  10316. function getw : TBits_32; inline;
  10317. procedure setCHAED(thebits : TBits_1); inline;
  10318. procedure setCHAEN(thebits : TBits_1); inline;
  10319. procedure setCHBUSY(thebits : TBits_1); inline;
  10320. procedure setCHCHN(thebits : TBits_1); inline;
  10321. procedure setCHCHNS(thebits : TBits_1); inline;
  10322. procedure setCHEDET(thebits : TBits_1); inline;
  10323. procedure setCHEN(thebits : TBits_1); inline;
  10324. procedure setCHPRI(thebits : TBits_2); inline;
  10325. procedure setw(thebits : TBits_32); inline;
  10326. public
  10327. procedure clearCHAED; inline;
  10328. procedure clearCHAEN; inline;
  10329. procedure clearCHBUSY; inline;
  10330. procedure clearCHCHN; inline;
  10331. procedure clearCHCHNS; inline;
  10332. procedure clearCHEDET; inline;
  10333. procedure clearCHEN; inline;
  10334. procedure setCHAED; inline;
  10335. procedure setCHAEN; inline;
  10336. procedure setCHBUSY; inline;
  10337. procedure setCHCHN; inline;
  10338. procedure setCHCHNS; inline;
  10339. procedure setCHEDET; inline;
  10340. procedure setCHEN; inline;
  10341. property CHAED : TBits_1 read getCHAED write setCHAED;
  10342. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10343. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10344. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10345. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10346. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10347. property CHEN : TBits_1 read getCHEN write setCHEN;
  10348. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10349. property w : TBits_32 read getw write setw;
  10350. end;
  10351. TDMAC1_DCH1ECON = record
  10352. private
  10353. function getAIRQEN : TBits_1; inline;
  10354. function getCABORT : TBits_1; inline;
  10355. function getCFORCE : TBits_1; inline;
  10356. function getCHAIRQ : TBits_8; inline;
  10357. function getCHSIRQ : TBits_8; inline;
  10358. function getPATEN : TBits_1; inline;
  10359. function getSIRQEN : TBits_1; inline;
  10360. function getw : TBits_32; inline;
  10361. procedure setAIRQEN(thebits : TBits_1); inline;
  10362. procedure setCABORT(thebits : TBits_1); inline;
  10363. procedure setCFORCE(thebits : TBits_1); inline;
  10364. procedure setCHAIRQ(thebits : TBits_8); inline;
  10365. procedure setCHSIRQ(thebits : TBits_8); inline;
  10366. procedure setPATEN(thebits : TBits_1); inline;
  10367. procedure setSIRQEN(thebits : TBits_1); inline;
  10368. procedure setw(thebits : TBits_32); inline;
  10369. public
  10370. procedure clearAIRQEN; inline;
  10371. procedure clearCABORT; inline;
  10372. procedure clearCFORCE; inline;
  10373. procedure clearPATEN; inline;
  10374. procedure clearSIRQEN; inline;
  10375. procedure setAIRQEN; inline;
  10376. procedure setCABORT; inline;
  10377. procedure setCFORCE; inline;
  10378. procedure setPATEN; inline;
  10379. procedure setSIRQEN; inline;
  10380. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10381. property CABORT : TBits_1 read getCABORT write setCABORT;
  10382. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10383. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10384. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10385. property PATEN : TBits_1 read getPATEN write setPATEN;
  10386. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10387. property w : TBits_32 read getw write setw;
  10388. end;
  10389. TDMAC1_DCH1INT = record
  10390. private
  10391. function getCHBCIE : TBits_1; inline;
  10392. function getCHBCIF : TBits_1; inline;
  10393. function getCHCCIE : TBits_1; inline;
  10394. function getCHCCIF : TBits_1; inline;
  10395. function getCHDDIE : TBits_1; inline;
  10396. function getCHDDIF : TBits_1; inline;
  10397. function getCHDHIE : TBits_1; inline;
  10398. function getCHDHIF : TBits_1; inline;
  10399. function getCHERIE : TBits_1; inline;
  10400. function getCHERIF : TBits_1; inline;
  10401. function getCHSDIE : TBits_1; inline;
  10402. function getCHSDIF : TBits_1; inline;
  10403. function getCHSHIE : TBits_1; inline;
  10404. function getCHSHIF : TBits_1; inline;
  10405. function getCHTAIE : TBits_1; inline;
  10406. function getCHTAIF : TBits_1; inline;
  10407. function getw : TBits_32; inline;
  10408. procedure setCHBCIE(thebits : TBits_1); inline;
  10409. procedure setCHBCIF(thebits : TBits_1); inline;
  10410. procedure setCHCCIE(thebits : TBits_1); inline;
  10411. procedure setCHCCIF(thebits : TBits_1); inline;
  10412. procedure setCHDDIE(thebits : TBits_1); inline;
  10413. procedure setCHDDIF(thebits : TBits_1); inline;
  10414. procedure setCHDHIE(thebits : TBits_1); inline;
  10415. procedure setCHDHIF(thebits : TBits_1); inline;
  10416. procedure setCHERIE(thebits : TBits_1); inline;
  10417. procedure setCHERIF(thebits : TBits_1); inline;
  10418. procedure setCHSDIE(thebits : TBits_1); inline;
  10419. procedure setCHSDIF(thebits : TBits_1); inline;
  10420. procedure setCHSHIE(thebits : TBits_1); inline;
  10421. procedure setCHSHIF(thebits : TBits_1); inline;
  10422. procedure setCHTAIE(thebits : TBits_1); inline;
  10423. procedure setCHTAIF(thebits : TBits_1); inline;
  10424. procedure setw(thebits : TBits_32); inline;
  10425. public
  10426. procedure clearCHBCIE; inline;
  10427. procedure clearCHBCIF; inline;
  10428. procedure clearCHCCIE; inline;
  10429. procedure clearCHCCIF; inline;
  10430. procedure clearCHDDIE; inline;
  10431. procedure clearCHDDIF; inline;
  10432. procedure clearCHDHIE; inline;
  10433. procedure clearCHDHIF; inline;
  10434. procedure clearCHERIE; inline;
  10435. procedure clearCHERIF; inline;
  10436. procedure clearCHSDIE; inline;
  10437. procedure clearCHSDIF; inline;
  10438. procedure clearCHSHIE; inline;
  10439. procedure clearCHSHIF; inline;
  10440. procedure clearCHTAIE; inline;
  10441. procedure clearCHTAIF; inline;
  10442. procedure setCHBCIE; inline;
  10443. procedure setCHBCIF; inline;
  10444. procedure setCHCCIE; inline;
  10445. procedure setCHCCIF; inline;
  10446. procedure setCHDDIE; inline;
  10447. procedure setCHDDIF; inline;
  10448. procedure setCHDHIE; inline;
  10449. procedure setCHDHIF; inline;
  10450. procedure setCHERIE; inline;
  10451. procedure setCHERIF; inline;
  10452. procedure setCHSDIE; inline;
  10453. procedure setCHSDIF; inline;
  10454. procedure setCHSHIE; inline;
  10455. procedure setCHSHIF; inline;
  10456. procedure setCHTAIE; inline;
  10457. procedure setCHTAIF; inline;
  10458. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10459. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10460. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10461. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10462. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10463. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10464. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10465. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10466. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10467. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10468. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10469. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10470. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10471. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10472. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10473. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10474. property w : TBits_32 read getw write setw;
  10475. end;
  10476. type
  10477. TDMAC1Registers = record
  10478. DCH1CONbits : TDMAC1_DCH1CON;
  10479. DCH1CON : longWord;
  10480. DCH1CONCLR : longWord;
  10481. DCH1CONSET : longWord;
  10482. DCH1CONINV : longWord;
  10483. DCH1ECONbits : TDMAC1_DCH1ECON;
  10484. DCH1ECON : longWord;
  10485. DCH1ECONCLR : longWord;
  10486. DCH1ECONSET : longWord;
  10487. DCH1ECONINV : longWord;
  10488. DCH1INTbits : TDMAC1_DCH1INT;
  10489. DCH1INT : longWord;
  10490. DCH1INTCLR : longWord;
  10491. DCH1INTSET : longWord;
  10492. DCH1INTINV : longWord;
  10493. DCH1SSA : longWord;
  10494. DCH1SSACLR : longWord;
  10495. DCH1SSASET : longWord;
  10496. DCH1SSAINV : longWord;
  10497. DCH1DSA : longWord;
  10498. DCH1DSACLR : longWord;
  10499. DCH1DSASET : longWord;
  10500. DCH1DSAINV : longWord;
  10501. DCH1SSIZ : longWord;
  10502. DCH1SSIZCLR : longWord;
  10503. DCH1SSIZSET : longWord;
  10504. DCH1SSIZINV : longWord;
  10505. DCH1DSIZ : longWord;
  10506. DCH1DSIZCLR : longWord;
  10507. DCH1DSIZSET : longWord;
  10508. DCH1DSIZINV : longWord;
  10509. DCH1SPTR : longWord;
  10510. DCH1SPTRCLR : longWord;
  10511. DCH1SPTRSET : longWord;
  10512. DCH1SPTRINV : longWord;
  10513. DCH1DPTR : longWord;
  10514. DCH1DPTRCLR : longWord;
  10515. DCH1DPTRSET : longWord;
  10516. DCH1DPTRINV : longWord;
  10517. DCH1CSIZ : longWord;
  10518. DCH1CSIZCLR : longWord;
  10519. DCH1CSIZSET : longWord;
  10520. DCH1CSIZINV : longWord;
  10521. DCH1CPTR : longWord;
  10522. DCH1CPTRCLR : longWord;
  10523. DCH1CPTRSET : longWord;
  10524. DCH1CPTRINV : longWord;
  10525. DCH1DAT : longWord;
  10526. DCH1DATCLR : longWord;
  10527. DCH1DATSET : longWord;
  10528. DCH1DATINV : longWord;
  10529. end;
  10530. TDMAC2_DCH2CON = record
  10531. private
  10532. function getCHAED : TBits_1; inline;
  10533. function getCHAEN : TBits_1; inline;
  10534. function getCHBUSY : TBits_1; inline;
  10535. function getCHCHN : TBits_1; inline;
  10536. function getCHCHNS : TBits_1; inline;
  10537. function getCHEDET : TBits_1; inline;
  10538. function getCHEN : TBits_1; inline;
  10539. function getCHPRI : TBits_2; inline;
  10540. function getw : TBits_32; inline;
  10541. procedure setCHAED(thebits : TBits_1); inline;
  10542. procedure setCHAEN(thebits : TBits_1); inline;
  10543. procedure setCHBUSY(thebits : TBits_1); inline;
  10544. procedure setCHCHN(thebits : TBits_1); inline;
  10545. procedure setCHCHNS(thebits : TBits_1); inline;
  10546. procedure setCHEDET(thebits : TBits_1); inline;
  10547. procedure setCHEN(thebits : TBits_1); inline;
  10548. procedure setCHPRI(thebits : TBits_2); inline;
  10549. procedure setw(thebits : TBits_32); inline;
  10550. public
  10551. procedure clearCHAED; inline;
  10552. procedure clearCHAEN; inline;
  10553. procedure clearCHBUSY; inline;
  10554. procedure clearCHCHN; inline;
  10555. procedure clearCHCHNS; inline;
  10556. procedure clearCHEDET; inline;
  10557. procedure clearCHEN; inline;
  10558. procedure setCHAED; inline;
  10559. procedure setCHAEN; inline;
  10560. procedure setCHBUSY; inline;
  10561. procedure setCHCHN; inline;
  10562. procedure setCHCHNS; inline;
  10563. procedure setCHEDET; inline;
  10564. procedure setCHEN; inline;
  10565. property CHAED : TBits_1 read getCHAED write setCHAED;
  10566. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10567. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10568. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10569. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10570. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10571. property CHEN : TBits_1 read getCHEN write setCHEN;
  10572. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10573. property w : TBits_32 read getw write setw;
  10574. end;
  10575. TDMAC2_DCH2ECON = record
  10576. private
  10577. function getAIRQEN : TBits_1; inline;
  10578. function getCABORT : TBits_1; inline;
  10579. function getCFORCE : TBits_1; inline;
  10580. function getCHAIRQ : TBits_8; inline;
  10581. function getCHSIRQ : TBits_8; inline;
  10582. function getPATEN : TBits_1; inline;
  10583. function getSIRQEN : TBits_1; inline;
  10584. function getw : TBits_32; inline;
  10585. procedure setAIRQEN(thebits : TBits_1); inline;
  10586. procedure setCABORT(thebits : TBits_1); inline;
  10587. procedure setCFORCE(thebits : TBits_1); inline;
  10588. procedure setCHAIRQ(thebits : TBits_8); inline;
  10589. procedure setCHSIRQ(thebits : TBits_8); inline;
  10590. procedure setPATEN(thebits : TBits_1); inline;
  10591. procedure setSIRQEN(thebits : TBits_1); inline;
  10592. procedure setw(thebits : TBits_32); inline;
  10593. public
  10594. procedure clearAIRQEN; inline;
  10595. procedure clearCABORT; inline;
  10596. procedure clearCFORCE; inline;
  10597. procedure clearPATEN; inline;
  10598. procedure clearSIRQEN; inline;
  10599. procedure setAIRQEN; inline;
  10600. procedure setCABORT; inline;
  10601. procedure setCFORCE; inline;
  10602. procedure setPATEN; inline;
  10603. procedure setSIRQEN; inline;
  10604. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10605. property CABORT : TBits_1 read getCABORT write setCABORT;
  10606. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10607. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10608. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10609. property PATEN : TBits_1 read getPATEN write setPATEN;
  10610. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10611. property w : TBits_32 read getw write setw;
  10612. end;
  10613. TDMAC2_DCH2INT = record
  10614. private
  10615. function getCHBCIE : TBits_1; inline;
  10616. function getCHBCIF : TBits_1; inline;
  10617. function getCHCCIE : TBits_1; inline;
  10618. function getCHCCIF : TBits_1; inline;
  10619. function getCHDDIE : TBits_1; inline;
  10620. function getCHDDIF : TBits_1; inline;
  10621. function getCHDHIE : TBits_1; inline;
  10622. function getCHDHIF : TBits_1; inline;
  10623. function getCHERIE : TBits_1; inline;
  10624. function getCHERIF : TBits_1; inline;
  10625. function getCHSDIE : TBits_1; inline;
  10626. function getCHSDIF : TBits_1; inline;
  10627. function getCHSHIE : TBits_1; inline;
  10628. function getCHSHIF : TBits_1; inline;
  10629. function getCHTAIE : TBits_1; inline;
  10630. function getCHTAIF : TBits_1; inline;
  10631. function getw : TBits_32; inline;
  10632. procedure setCHBCIE(thebits : TBits_1); inline;
  10633. procedure setCHBCIF(thebits : TBits_1); inline;
  10634. procedure setCHCCIE(thebits : TBits_1); inline;
  10635. procedure setCHCCIF(thebits : TBits_1); inline;
  10636. procedure setCHDDIE(thebits : TBits_1); inline;
  10637. procedure setCHDDIF(thebits : TBits_1); inline;
  10638. procedure setCHDHIE(thebits : TBits_1); inline;
  10639. procedure setCHDHIF(thebits : TBits_1); inline;
  10640. procedure setCHERIE(thebits : TBits_1); inline;
  10641. procedure setCHERIF(thebits : TBits_1); inline;
  10642. procedure setCHSDIE(thebits : TBits_1); inline;
  10643. procedure setCHSDIF(thebits : TBits_1); inline;
  10644. procedure setCHSHIE(thebits : TBits_1); inline;
  10645. procedure setCHSHIF(thebits : TBits_1); inline;
  10646. procedure setCHTAIE(thebits : TBits_1); inline;
  10647. procedure setCHTAIF(thebits : TBits_1); inline;
  10648. procedure setw(thebits : TBits_32); inline;
  10649. public
  10650. procedure clearCHBCIE; inline;
  10651. procedure clearCHBCIF; inline;
  10652. procedure clearCHCCIE; inline;
  10653. procedure clearCHCCIF; inline;
  10654. procedure clearCHDDIE; inline;
  10655. procedure clearCHDDIF; inline;
  10656. procedure clearCHDHIE; inline;
  10657. procedure clearCHDHIF; inline;
  10658. procedure clearCHERIE; inline;
  10659. procedure clearCHERIF; inline;
  10660. procedure clearCHSDIE; inline;
  10661. procedure clearCHSDIF; inline;
  10662. procedure clearCHSHIE; inline;
  10663. procedure clearCHSHIF; inline;
  10664. procedure clearCHTAIE; inline;
  10665. procedure clearCHTAIF; inline;
  10666. procedure setCHBCIE; inline;
  10667. procedure setCHBCIF; inline;
  10668. procedure setCHCCIE; inline;
  10669. procedure setCHCCIF; inline;
  10670. procedure setCHDDIE; inline;
  10671. procedure setCHDDIF; inline;
  10672. procedure setCHDHIE; inline;
  10673. procedure setCHDHIF; inline;
  10674. procedure setCHERIE; inline;
  10675. procedure setCHERIF; inline;
  10676. procedure setCHSDIE; inline;
  10677. procedure setCHSDIF; inline;
  10678. procedure setCHSHIE; inline;
  10679. procedure setCHSHIF; inline;
  10680. procedure setCHTAIE; inline;
  10681. procedure setCHTAIF; inline;
  10682. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10683. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10684. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10685. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10686. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10687. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10688. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10689. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10690. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10691. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10692. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10693. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10694. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10695. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10696. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10697. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10698. property w : TBits_32 read getw write setw;
  10699. end;
  10700. type
  10701. TDMAC2Registers = record
  10702. DCH2CONbits : TDMAC2_DCH2CON;
  10703. DCH2CON : longWord;
  10704. DCH2CONCLR : longWord;
  10705. DCH2CONSET : longWord;
  10706. DCH2CONINV : longWord;
  10707. DCH2ECONbits : TDMAC2_DCH2ECON;
  10708. DCH2ECON : longWord;
  10709. DCH2ECONCLR : longWord;
  10710. DCH2ECONSET : longWord;
  10711. DCH2ECONINV : longWord;
  10712. DCH2INTbits : TDMAC2_DCH2INT;
  10713. DCH2INT : longWord;
  10714. DCH2INTCLR : longWord;
  10715. DCH2INTSET : longWord;
  10716. DCH2INTINV : longWord;
  10717. DCH2SSA : longWord;
  10718. DCH2SSACLR : longWord;
  10719. DCH2SSASET : longWord;
  10720. DCH2SSAINV : longWord;
  10721. DCH2DSA : longWord;
  10722. DCH2DSACLR : longWord;
  10723. DCH2DSASET : longWord;
  10724. DCH2DSAINV : longWord;
  10725. DCH2SSIZ : longWord;
  10726. DCH2SSIZCLR : longWord;
  10727. DCH2SSIZSET : longWord;
  10728. DCH2SSIZINV : longWord;
  10729. DCH2DSIZ : longWord;
  10730. DCH2DSIZCLR : longWord;
  10731. DCH2DSIZSET : longWord;
  10732. DCH2DSIZINV : longWord;
  10733. DCH2SPTR : longWord;
  10734. DCH2SPTRCLR : longWord;
  10735. DCH2SPTRSET : longWord;
  10736. DCH2SPTRINV : longWord;
  10737. DCH2DPTR : longWord;
  10738. DCH2DPTRCLR : longWord;
  10739. DCH2DPTRSET : longWord;
  10740. DCH2DPTRINV : longWord;
  10741. DCH2CSIZ : longWord;
  10742. DCH2CSIZCLR : longWord;
  10743. DCH2CSIZSET : longWord;
  10744. DCH2CSIZINV : longWord;
  10745. DCH2CPTR : longWord;
  10746. DCH2CPTRCLR : longWord;
  10747. DCH2CPTRSET : longWord;
  10748. DCH2CPTRINV : longWord;
  10749. DCH2DAT : longWord;
  10750. DCH2DATCLR : longWord;
  10751. DCH2DATSET : longWord;
  10752. DCH2DATINV : longWord;
  10753. end;
  10754. TDMAC3_DCH3CON = record
  10755. private
  10756. function getCHAED : TBits_1; inline;
  10757. function getCHAEN : TBits_1; inline;
  10758. function getCHBUSY : TBits_1; inline;
  10759. function getCHCHN : TBits_1; inline;
  10760. function getCHCHNS : TBits_1; inline;
  10761. function getCHEDET : TBits_1; inline;
  10762. function getCHEN : TBits_1; inline;
  10763. function getCHPRI : TBits_2; inline;
  10764. function getw : TBits_32; inline;
  10765. procedure setCHAED(thebits : TBits_1); inline;
  10766. procedure setCHAEN(thebits : TBits_1); inline;
  10767. procedure setCHBUSY(thebits : TBits_1); inline;
  10768. procedure setCHCHN(thebits : TBits_1); inline;
  10769. procedure setCHCHNS(thebits : TBits_1); inline;
  10770. procedure setCHEDET(thebits : TBits_1); inline;
  10771. procedure setCHEN(thebits : TBits_1); inline;
  10772. procedure setCHPRI(thebits : TBits_2); inline;
  10773. procedure setw(thebits : TBits_32); inline;
  10774. public
  10775. procedure clearCHAED; inline;
  10776. procedure clearCHAEN; inline;
  10777. procedure clearCHBUSY; inline;
  10778. procedure clearCHCHN; inline;
  10779. procedure clearCHCHNS; inline;
  10780. procedure clearCHEDET; inline;
  10781. procedure clearCHEN; inline;
  10782. procedure setCHAED; inline;
  10783. procedure setCHAEN; inline;
  10784. procedure setCHBUSY; inline;
  10785. procedure setCHCHN; inline;
  10786. procedure setCHCHNS; inline;
  10787. procedure setCHEDET; inline;
  10788. procedure setCHEN; inline;
  10789. property CHAED : TBits_1 read getCHAED write setCHAED;
  10790. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  10791. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  10792. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  10793. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  10794. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  10795. property CHEN : TBits_1 read getCHEN write setCHEN;
  10796. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  10797. property w : TBits_32 read getw write setw;
  10798. end;
  10799. TDMAC3_DCH3ECON = record
  10800. private
  10801. function getAIRQEN : TBits_1; inline;
  10802. function getCABORT : TBits_1; inline;
  10803. function getCFORCE : TBits_1; inline;
  10804. function getCHAIRQ : TBits_8; inline;
  10805. function getCHSIRQ : TBits_8; inline;
  10806. function getPATEN : TBits_1; inline;
  10807. function getSIRQEN : TBits_1; inline;
  10808. function getw : TBits_32; inline;
  10809. procedure setAIRQEN(thebits : TBits_1); inline;
  10810. procedure setCABORT(thebits : TBits_1); inline;
  10811. procedure setCFORCE(thebits : TBits_1); inline;
  10812. procedure setCHAIRQ(thebits : TBits_8); inline;
  10813. procedure setCHSIRQ(thebits : TBits_8); inline;
  10814. procedure setPATEN(thebits : TBits_1); inline;
  10815. procedure setSIRQEN(thebits : TBits_1); inline;
  10816. procedure setw(thebits : TBits_32); inline;
  10817. public
  10818. procedure clearAIRQEN; inline;
  10819. procedure clearCABORT; inline;
  10820. procedure clearCFORCE; inline;
  10821. procedure clearPATEN; inline;
  10822. procedure clearSIRQEN; inline;
  10823. procedure setAIRQEN; inline;
  10824. procedure setCABORT; inline;
  10825. procedure setCFORCE; inline;
  10826. procedure setPATEN; inline;
  10827. procedure setSIRQEN; inline;
  10828. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  10829. property CABORT : TBits_1 read getCABORT write setCABORT;
  10830. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  10831. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  10832. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  10833. property PATEN : TBits_1 read getPATEN write setPATEN;
  10834. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  10835. property w : TBits_32 read getw write setw;
  10836. end;
  10837. TDMAC3_DCH3INT = record
  10838. private
  10839. function getCHBCIE : TBits_1; inline;
  10840. function getCHBCIF : TBits_1; inline;
  10841. function getCHCCIE : TBits_1; inline;
  10842. function getCHCCIF : TBits_1; inline;
  10843. function getCHDDIE : TBits_1; inline;
  10844. function getCHDDIF : TBits_1; inline;
  10845. function getCHDHIE : TBits_1; inline;
  10846. function getCHDHIF : TBits_1; inline;
  10847. function getCHERIE : TBits_1; inline;
  10848. function getCHERIF : TBits_1; inline;
  10849. function getCHSDIE : TBits_1; inline;
  10850. function getCHSDIF : TBits_1; inline;
  10851. function getCHSHIE : TBits_1; inline;
  10852. function getCHSHIF : TBits_1; inline;
  10853. function getCHTAIE : TBits_1; inline;
  10854. function getCHTAIF : TBits_1; inline;
  10855. function getw : TBits_32; inline;
  10856. procedure setCHBCIE(thebits : TBits_1); inline;
  10857. procedure setCHBCIF(thebits : TBits_1); inline;
  10858. procedure setCHCCIE(thebits : TBits_1); inline;
  10859. procedure setCHCCIF(thebits : TBits_1); inline;
  10860. procedure setCHDDIE(thebits : TBits_1); inline;
  10861. procedure setCHDDIF(thebits : TBits_1); inline;
  10862. procedure setCHDHIE(thebits : TBits_1); inline;
  10863. procedure setCHDHIF(thebits : TBits_1); inline;
  10864. procedure setCHERIE(thebits : TBits_1); inline;
  10865. procedure setCHERIF(thebits : TBits_1); inline;
  10866. procedure setCHSDIE(thebits : TBits_1); inline;
  10867. procedure setCHSDIF(thebits : TBits_1); inline;
  10868. procedure setCHSHIE(thebits : TBits_1); inline;
  10869. procedure setCHSHIF(thebits : TBits_1); inline;
  10870. procedure setCHTAIE(thebits : TBits_1); inline;
  10871. procedure setCHTAIF(thebits : TBits_1); inline;
  10872. procedure setw(thebits : TBits_32); inline;
  10873. public
  10874. procedure clearCHBCIE; inline;
  10875. procedure clearCHBCIF; inline;
  10876. procedure clearCHCCIE; inline;
  10877. procedure clearCHCCIF; inline;
  10878. procedure clearCHDDIE; inline;
  10879. procedure clearCHDDIF; inline;
  10880. procedure clearCHDHIE; inline;
  10881. procedure clearCHDHIF; inline;
  10882. procedure clearCHERIE; inline;
  10883. procedure clearCHERIF; inline;
  10884. procedure clearCHSDIE; inline;
  10885. procedure clearCHSDIF; inline;
  10886. procedure clearCHSHIE; inline;
  10887. procedure clearCHSHIF; inline;
  10888. procedure clearCHTAIE; inline;
  10889. procedure clearCHTAIF; inline;
  10890. procedure setCHBCIE; inline;
  10891. procedure setCHBCIF; inline;
  10892. procedure setCHCCIE; inline;
  10893. procedure setCHCCIF; inline;
  10894. procedure setCHDDIE; inline;
  10895. procedure setCHDDIF; inline;
  10896. procedure setCHDHIE; inline;
  10897. procedure setCHDHIF; inline;
  10898. procedure setCHERIE; inline;
  10899. procedure setCHERIF; inline;
  10900. procedure setCHSDIE; inline;
  10901. procedure setCHSDIF; inline;
  10902. procedure setCHSHIE; inline;
  10903. procedure setCHSHIF; inline;
  10904. procedure setCHTAIE; inline;
  10905. procedure setCHTAIF; inline;
  10906. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  10907. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  10908. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  10909. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  10910. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  10911. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  10912. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  10913. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  10914. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  10915. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  10916. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  10917. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  10918. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  10919. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  10920. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  10921. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  10922. property w : TBits_32 read getw write setw;
  10923. end;
  10924. type
  10925. TDMAC3Registers = record
  10926. DCH3CONbits : TDMAC3_DCH3CON;
  10927. DCH3CON : longWord;
  10928. DCH3CONCLR : longWord;
  10929. DCH3CONSET : longWord;
  10930. DCH3CONINV : longWord;
  10931. DCH3ECONbits : TDMAC3_DCH3ECON;
  10932. DCH3ECON : longWord;
  10933. DCH3ECONCLR : longWord;
  10934. DCH3ECONSET : longWord;
  10935. DCH3ECONINV : longWord;
  10936. DCH3INTbits : TDMAC3_DCH3INT;
  10937. DCH3INT : longWord;
  10938. DCH3INTCLR : longWord;
  10939. DCH3INTSET : longWord;
  10940. DCH3INTINV : longWord;
  10941. DCH3SSA : longWord;
  10942. DCH3SSACLR : longWord;
  10943. DCH3SSASET : longWord;
  10944. DCH3SSAINV : longWord;
  10945. DCH3DSA : longWord;
  10946. DCH3DSACLR : longWord;
  10947. DCH3DSASET : longWord;
  10948. DCH3DSAINV : longWord;
  10949. DCH3SSIZ : longWord;
  10950. DCH3SSIZCLR : longWord;
  10951. DCH3SSIZSET : longWord;
  10952. DCH3SSIZINV : longWord;
  10953. DCH3DSIZ : longWord;
  10954. DCH3DSIZCLR : longWord;
  10955. DCH3DSIZSET : longWord;
  10956. DCH3DSIZINV : longWord;
  10957. DCH3SPTR : longWord;
  10958. DCH3SPTRCLR : longWord;
  10959. DCH3SPTRSET : longWord;
  10960. DCH3SPTRINV : longWord;
  10961. DCH3DPTR : longWord;
  10962. DCH3DPTRCLR : longWord;
  10963. DCH3DPTRSET : longWord;
  10964. DCH3DPTRINV : longWord;
  10965. DCH3CSIZ : longWord;
  10966. DCH3CSIZCLR : longWord;
  10967. DCH3CSIZSET : longWord;
  10968. DCH3CSIZINV : longWord;
  10969. DCH3CPTR : longWord;
  10970. DCH3CPTRCLR : longWord;
  10971. DCH3CPTRSET : longWord;
  10972. DCH3CPTRINV : longWord;
  10973. DCH3DAT : longWord;
  10974. DCH3DATCLR : longWord;
  10975. DCH3DATSET : longWord;
  10976. DCH3DATINV : longWord;
  10977. end;
  10978. TDMAC4_DCH4CON = record
  10979. private
  10980. function getCHAED : TBits_1; inline;
  10981. function getCHAEN : TBits_1; inline;
  10982. function getCHBUSY : TBits_1; inline;
  10983. function getCHCHN : TBits_1; inline;
  10984. function getCHCHNS : TBits_1; inline;
  10985. function getCHEDET : TBits_1; inline;
  10986. function getCHEN : TBits_1; inline;
  10987. function getCHPRI : TBits_2; inline;
  10988. function getw : TBits_32; inline;
  10989. procedure setCHAED(thebits : TBits_1); inline;
  10990. procedure setCHAEN(thebits : TBits_1); inline;
  10991. procedure setCHBUSY(thebits : TBits_1); inline;
  10992. procedure setCHCHN(thebits : TBits_1); inline;
  10993. procedure setCHCHNS(thebits : TBits_1); inline;
  10994. procedure setCHEDET(thebits : TBits_1); inline;
  10995. procedure setCHEN(thebits : TBits_1); inline;
  10996. procedure setCHPRI(thebits : TBits_2); inline;
  10997. procedure setw(thebits : TBits_32); inline;
  10998. public
  10999. procedure clearCHAED; inline;
  11000. procedure clearCHAEN; inline;
  11001. procedure clearCHBUSY; inline;
  11002. procedure clearCHCHN; inline;
  11003. procedure clearCHCHNS; inline;
  11004. procedure clearCHEDET; inline;
  11005. procedure clearCHEN; inline;
  11006. procedure setCHAED; inline;
  11007. procedure setCHAEN; inline;
  11008. procedure setCHBUSY; inline;
  11009. procedure setCHCHN; inline;
  11010. procedure setCHCHNS; inline;
  11011. procedure setCHEDET; inline;
  11012. procedure setCHEN; inline;
  11013. property CHAED : TBits_1 read getCHAED write setCHAED;
  11014. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11015. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11016. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11017. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11018. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11019. property CHEN : TBits_1 read getCHEN write setCHEN;
  11020. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11021. property w : TBits_32 read getw write setw;
  11022. end;
  11023. TDMAC4_DCH4ECON = record
  11024. private
  11025. function getAIRQEN : TBits_1; inline;
  11026. function getCABORT : TBits_1; inline;
  11027. function getCFORCE : TBits_1; inline;
  11028. function getCHAIRQ : TBits_8; inline;
  11029. function getCHSIRQ : TBits_8; inline;
  11030. function getPATEN : TBits_1; inline;
  11031. function getSIRQEN : TBits_1; inline;
  11032. function getw : TBits_32; inline;
  11033. procedure setAIRQEN(thebits : TBits_1); inline;
  11034. procedure setCABORT(thebits : TBits_1); inline;
  11035. procedure setCFORCE(thebits : TBits_1); inline;
  11036. procedure setCHAIRQ(thebits : TBits_8); inline;
  11037. procedure setCHSIRQ(thebits : TBits_8); inline;
  11038. procedure setPATEN(thebits : TBits_1); inline;
  11039. procedure setSIRQEN(thebits : TBits_1); inline;
  11040. procedure setw(thebits : TBits_32); inline;
  11041. public
  11042. procedure clearAIRQEN; inline;
  11043. procedure clearCABORT; inline;
  11044. procedure clearCFORCE; inline;
  11045. procedure clearPATEN; inline;
  11046. procedure clearSIRQEN; inline;
  11047. procedure setAIRQEN; inline;
  11048. procedure setCABORT; inline;
  11049. procedure setCFORCE; inline;
  11050. procedure setPATEN; inline;
  11051. procedure setSIRQEN; inline;
  11052. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11053. property CABORT : TBits_1 read getCABORT write setCABORT;
  11054. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11055. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11056. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11057. property PATEN : TBits_1 read getPATEN write setPATEN;
  11058. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11059. property w : TBits_32 read getw write setw;
  11060. end;
  11061. TDMAC4_DCH4INT = record
  11062. private
  11063. function getCHBCIE : TBits_1; inline;
  11064. function getCHBCIF : TBits_1; inline;
  11065. function getCHCCIE : TBits_1; inline;
  11066. function getCHCCIF : TBits_1; inline;
  11067. function getCHDDIE : TBits_1; inline;
  11068. function getCHDDIF : TBits_1; inline;
  11069. function getCHDHIE : TBits_1; inline;
  11070. function getCHDHIF : TBits_1; inline;
  11071. function getCHERIE : TBits_1; inline;
  11072. function getCHERIF : TBits_1; inline;
  11073. function getCHSDIE : TBits_1; inline;
  11074. function getCHSDIF : TBits_1; inline;
  11075. function getCHSHIE : TBits_1; inline;
  11076. function getCHSHIF : TBits_1; inline;
  11077. function getCHTAIE : TBits_1; inline;
  11078. function getCHTAIF : TBits_1; inline;
  11079. function getw : TBits_32; inline;
  11080. procedure setCHBCIE(thebits : TBits_1); inline;
  11081. procedure setCHBCIF(thebits : TBits_1); inline;
  11082. procedure setCHCCIE(thebits : TBits_1); inline;
  11083. procedure setCHCCIF(thebits : TBits_1); inline;
  11084. procedure setCHDDIE(thebits : TBits_1); inline;
  11085. procedure setCHDDIF(thebits : TBits_1); inline;
  11086. procedure setCHDHIE(thebits : TBits_1); inline;
  11087. procedure setCHDHIF(thebits : TBits_1); inline;
  11088. procedure setCHERIE(thebits : TBits_1); inline;
  11089. procedure setCHERIF(thebits : TBits_1); inline;
  11090. procedure setCHSDIE(thebits : TBits_1); inline;
  11091. procedure setCHSDIF(thebits : TBits_1); inline;
  11092. procedure setCHSHIE(thebits : TBits_1); inline;
  11093. procedure setCHSHIF(thebits : TBits_1); inline;
  11094. procedure setCHTAIE(thebits : TBits_1); inline;
  11095. procedure setCHTAIF(thebits : TBits_1); inline;
  11096. procedure setw(thebits : TBits_32); inline;
  11097. public
  11098. procedure clearCHBCIE; inline;
  11099. procedure clearCHBCIF; inline;
  11100. procedure clearCHCCIE; inline;
  11101. procedure clearCHCCIF; inline;
  11102. procedure clearCHDDIE; inline;
  11103. procedure clearCHDDIF; inline;
  11104. procedure clearCHDHIE; inline;
  11105. procedure clearCHDHIF; inline;
  11106. procedure clearCHERIE; inline;
  11107. procedure clearCHERIF; inline;
  11108. procedure clearCHSDIE; inline;
  11109. procedure clearCHSDIF; inline;
  11110. procedure clearCHSHIE; inline;
  11111. procedure clearCHSHIF; inline;
  11112. procedure clearCHTAIE; inline;
  11113. procedure clearCHTAIF; inline;
  11114. procedure setCHBCIE; inline;
  11115. procedure setCHBCIF; inline;
  11116. procedure setCHCCIE; inline;
  11117. procedure setCHCCIF; inline;
  11118. procedure setCHDDIE; inline;
  11119. procedure setCHDDIF; inline;
  11120. procedure setCHDHIE; inline;
  11121. procedure setCHDHIF; inline;
  11122. procedure setCHERIE; inline;
  11123. procedure setCHERIF; inline;
  11124. procedure setCHSDIE; inline;
  11125. procedure setCHSDIF; inline;
  11126. procedure setCHSHIE; inline;
  11127. procedure setCHSHIF; inline;
  11128. procedure setCHTAIE; inline;
  11129. procedure setCHTAIF; inline;
  11130. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11131. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11132. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11133. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11134. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11135. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11136. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11137. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11138. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11139. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11140. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11141. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11142. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11143. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11144. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11145. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11146. property w : TBits_32 read getw write setw;
  11147. end;
  11148. type
  11149. TDMAC4Registers = record
  11150. DCH4CONbits : TDMAC4_DCH4CON;
  11151. DCH4CON : longWord;
  11152. DCH4CONCLR : longWord;
  11153. DCH4CONSET : longWord;
  11154. DCH4CONINV : longWord;
  11155. DCH4ECONbits : TDMAC4_DCH4ECON;
  11156. DCH4ECON : longWord;
  11157. DCH4ECONCLR : longWord;
  11158. DCH4ECONSET : longWord;
  11159. DCH4ECONINV : longWord;
  11160. DCH4INTbits : TDMAC4_DCH4INT;
  11161. DCH4INT : longWord;
  11162. DCH4INTCLR : longWord;
  11163. DCH4INTSET : longWord;
  11164. DCH4INTINV : longWord;
  11165. DCH4SSA : longWord;
  11166. DCH4SSACLR : longWord;
  11167. DCH4SSASET : longWord;
  11168. DCH4SSAINV : longWord;
  11169. DCH4DSA : longWord;
  11170. DCH4DSACLR : longWord;
  11171. DCH4DSASET : longWord;
  11172. DCH4DSAINV : longWord;
  11173. DCH4SSIZ : longWord;
  11174. DCH4SSIZCLR : longWord;
  11175. DCH4SSIZSET : longWord;
  11176. DCH4SSIZINV : longWord;
  11177. DCH4DSIZ : longWord;
  11178. DCH4DSIZCLR : longWord;
  11179. DCH4DSIZSET : longWord;
  11180. DCH4DSIZINV : longWord;
  11181. DCH4SPTR : longWord;
  11182. DCH4SPTRCLR : longWord;
  11183. DCH4SPTRSET : longWord;
  11184. DCH4SPTRINV : longWord;
  11185. DCH4DPTR : longWord;
  11186. DCH4DPTRCLR : longWord;
  11187. DCH4DPTRSET : longWord;
  11188. DCH4DPTRINV : longWord;
  11189. DCH4CSIZ : longWord;
  11190. DCH4CSIZCLR : longWord;
  11191. DCH4CSIZSET : longWord;
  11192. DCH4CSIZINV : longWord;
  11193. DCH4CPTR : longWord;
  11194. DCH4CPTRCLR : longWord;
  11195. DCH4CPTRSET : longWord;
  11196. DCH4CPTRINV : longWord;
  11197. DCH4DAT : longWord;
  11198. DCH4DATCLR : longWord;
  11199. DCH4DATSET : longWord;
  11200. DCH4DATINV : longWord;
  11201. end;
  11202. TDMAC5_DCH5CON = record
  11203. private
  11204. function getCHAED : TBits_1; inline;
  11205. function getCHAEN : TBits_1; inline;
  11206. function getCHBUSY : TBits_1; inline;
  11207. function getCHCHN : TBits_1; inline;
  11208. function getCHCHNS : TBits_1; inline;
  11209. function getCHEDET : TBits_1; inline;
  11210. function getCHEN : TBits_1; inline;
  11211. function getCHPRI : TBits_2; inline;
  11212. function getw : TBits_32; inline;
  11213. procedure setCHAED(thebits : TBits_1); inline;
  11214. procedure setCHAEN(thebits : TBits_1); inline;
  11215. procedure setCHBUSY(thebits : TBits_1); inline;
  11216. procedure setCHCHN(thebits : TBits_1); inline;
  11217. procedure setCHCHNS(thebits : TBits_1); inline;
  11218. procedure setCHEDET(thebits : TBits_1); inline;
  11219. procedure setCHEN(thebits : TBits_1); inline;
  11220. procedure setCHPRI(thebits : TBits_2); inline;
  11221. procedure setw(thebits : TBits_32); inline;
  11222. public
  11223. procedure clearCHAED; inline;
  11224. procedure clearCHAEN; inline;
  11225. procedure clearCHBUSY; inline;
  11226. procedure clearCHCHN; inline;
  11227. procedure clearCHCHNS; inline;
  11228. procedure clearCHEDET; inline;
  11229. procedure clearCHEN; inline;
  11230. procedure setCHAED; inline;
  11231. procedure setCHAEN; inline;
  11232. procedure setCHBUSY; inline;
  11233. procedure setCHCHN; inline;
  11234. procedure setCHCHNS; inline;
  11235. procedure setCHEDET; inline;
  11236. procedure setCHEN; inline;
  11237. property CHAED : TBits_1 read getCHAED write setCHAED;
  11238. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11239. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11240. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11241. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11242. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11243. property CHEN : TBits_1 read getCHEN write setCHEN;
  11244. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11245. property w : TBits_32 read getw write setw;
  11246. end;
  11247. TDMAC5_DCH5ECON = record
  11248. private
  11249. function getAIRQEN : TBits_1; inline;
  11250. function getCABORT : TBits_1; inline;
  11251. function getCFORCE : TBits_1; inline;
  11252. function getCHAIRQ : TBits_8; inline;
  11253. function getCHSIRQ : TBits_8; inline;
  11254. function getPATEN : TBits_1; inline;
  11255. function getSIRQEN : TBits_1; inline;
  11256. function getw : TBits_32; inline;
  11257. procedure setAIRQEN(thebits : TBits_1); inline;
  11258. procedure setCABORT(thebits : TBits_1); inline;
  11259. procedure setCFORCE(thebits : TBits_1); inline;
  11260. procedure setCHAIRQ(thebits : TBits_8); inline;
  11261. procedure setCHSIRQ(thebits : TBits_8); inline;
  11262. procedure setPATEN(thebits : TBits_1); inline;
  11263. procedure setSIRQEN(thebits : TBits_1); inline;
  11264. procedure setw(thebits : TBits_32); inline;
  11265. public
  11266. procedure clearAIRQEN; inline;
  11267. procedure clearCABORT; inline;
  11268. procedure clearCFORCE; inline;
  11269. procedure clearPATEN; inline;
  11270. procedure clearSIRQEN; inline;
  11271. procedure setAIRQEN; inline;
  11272. procedure setCABORT; inline;
  11273. procedure setCFORCE; inline;
  11274. procedure setPATEN; inline;
  11275. procedure setSIRQEN; inline;
  11276. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11277. property CABORT : TBits_1 read getCABORT write setCABORT;
  11278. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11279. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11280. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11281. property PATEN : TBits_1 read getPATEN write setPATEN;
  11282. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11283. property w : TBits_32 read getw write setw;
  11284. end;
  11285. TDMAC5_DCH5INT = record
  11286. private
  11287. function getCHBCIE : TBits_1; inline;
  11288. function getCHBCIF : TBits_1; inline;
  11289. function getCHCCIE : TBits_1; inline;
  11290. function getCHCCIF : TBits_1; inline;
  11291. function getCHDDIE : TBits_1; inline;
  11292. function getCHDDIF : TBits_1; inline;
  11293. function getCHDHIE : TBits_1; inline;
  11294. function getCHDHIF : TBits_1; inline;
  11295. function getCHERIE : TBits_1; inline;
  11296. function getCHERIF : TBits_1; inline;
  11297. function getCHSDIE : TBits_1; inline;
  11298. function getCHSDIF : TBits_1; inline;
  11299. function getCHSHIE : TBits_1; inline;
  11300. function getCHSHIF : TBits_1; inline;
  11301. function getCHTAIE : TBits_1; inline;
  11302. function getCHTAIF : TBits_1; inline;
  11303. function getw : TBits_32; inline;
  11304. procedure setCHBCIE(thebits : TBits_1); inline;
  11305. procedure setCHBCIF(thebits : TBits_1); inline;
  11306. procedure setCHCCIE(thebits : TBits_1); inline;
  11307. procedure setCHCCIF(thebits : TBits_1); inline;
  11308. procedure setCHDDIE(thebits : TBits_1); inline;
  11309. procedure setCHDDIF(thebits : TBits_1); inline;
  11310. procedure setCHDHIE(thebits : TBits_1); inline;
  11311. procedure setCHDHIF(thebits : TBits_1); inline;
  11312. procedure setCHERIE(thebits : TBits_1); inline;
  11313. procedure setCHERIF(thebits : TBits_1); inline;
  11314. procedure setCHSDIE(thebits : TBits_1); inline;
  11315. procedure setCHSDIF(thebits : TBits_1); inline;
  11316. procedure setCHSHIE(thebits : TBits_1); inline;
  11317. procedure setCHSHIF(thebits : TBits_1); inline;
  11318. procedure setCHTAIE(thebits : TBits_1); inline;
  11319. procedure setCHTAIF(thebits : TBits_1); inline;
  11320. procedure setw(thebits : TBits_32); inline;
  11321. public
  11322. procedure clearCHBCIE; inline;
  11323. procedure clearCHBCIF; inline;
  11324. procedure clearCHCCIE; inline;
  11325. procedure clearCHCCIF; inline;
  11326. procedure clearCHDDIE; inline;
  11327. procedure clearCHDDIF; inline;
  11328. procedure clearCHDHIE; inline;
  11329. procedure clearCHDHIF; inline;
  11330. procedure clearCHERIE; inline;
  11331. procedure clearCHERIF; inline;
  11332. procedure clearCHSDIE; inline;
  11333. procedure clearCHSDIF; inline;
  11334. procedure clearCHSHIE; inline;
  11335. procedure clearCHSHIF; inline;
  11336. procedure clearCHTAIE; inline;
  11337. procedure clearCHTAIF; inline;
  11338. procedure setCHBCIE; inline;
  11339. procedure setCHBCIF; inline;
  11340. procedure setCHCCIE; inline;
  11341. procedure setCHCCIF; inline;
  11342. procedure setCHDDIE; inline;
  11343. procedure setCHDDIF; inline;
  11344. procedure setCHDHIE; inline;
  11345. procedure setCHDHIF; inline;
  11346. procedure setCHERIE; inline;
  11347. procedure setCHERIF; inline;
  11348. procedure setCHSDIE; inline;
  11349. procedure setCHSDIF; inline;
  11350. procedure setCHSHIE; inline;
  11351. procedure setCHSHIF; inline;
  11352. procedure setCHTAIE; inline;
  11353. procedure setCHTAIF; inline;
  11354. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11355. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11356. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11357. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11358. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11359. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11360. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11361. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11362. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11363. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11364. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11365. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11366. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11367. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11368. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11369. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11370. property w : TBits_32 read getw write setw;
  11371. end;
  11372. type
  11373. TDMAC5Registers = record
  11374. DCH5CONbits : TDMAC5_DCH5CON;
  11375. DCH5CON : longWord;
  11376. DCH5CONCLR : longWord;
  11377. DCH5CONSET : longWord;
  11378. DCH5CONINV : longWord;
  11379. DCH5ECONbits : TDMAC5_DCH5ECON;
  11380. DCH5ECON : longWord;
  11381. DCH5ECONCLR : longWord;
  11382. DCH5ECONSET : longWord;
  11383. DCH5ECONINV : longWord;
  11384. DCH5INTbits : TDMAC5_DCH5INT;
  11385. DCH5INT : longWord;
  11386. DCH5INTCLR : longWord;
  11387. DCH5INTSET : longWord;
  11388. DCH5INTINV : longWord;
  11389. DCH5SSA : longWord;
  11390. DCH5SSACLR : longWord;
  11391. DCH5SSASET : longWord;
  11392. DCH5SSAINV : longWord;
  11393. DCH5DSA : longWord;
  11394. DCH5DSACLR : longWord;
  11395. DCH5DSASET : longWord;
  11396. DCH5DSAINV : longWord;
  11397. DCH5SSIZ : longWord;
  11398. DCH5SSIZCLR : longWord;
  11399. DCH5SSIZSET : longWord;
  11400. DCH5SSIZINV : longWord;
  11401. DCH5DSIZ : longWord;
  11402. DCH5DSIZCLR : longWord;
  11403. DCH5DSIZSET : longWord;
  11404. DCH5DSIZINV : longWord;
  11405. DCH5SPTR : longWord;
  11406. DCH5SPTRCLR : longWord;
  11407. DCH5SPTRSET : longWord;
  11408. DCH5SPTRINV : longWord;
  11409. DCH5DPTR : longWord;
  11410. DCH5DPTRCLR : longWord;
  11411. DCH5DPTRSET : longWord;
  11412. DCH5DPTRINV : longWord;
  11413. DCH5CSIZ : longWord;
  11414. DCH5CSIZCLR : longWord;
  11415. DCH5CSIZSET : longWord;
  11416. DCH5CSIZINV : longWord;
  11417. DCH5CPTR : longWord;
  11418. DCH5CPTRCLR : longWord;
  11419. DCH5CPTRSET : longWord;
  11420. DCH5CPTRINV : longWord;
  11421. DCH5DAT : longWord;
  11422. DCH5DATCLR : longWord;
  11423. DCH5DATSET : longWord;
  11424. DCH5DATINV : longWord;
  11425. end;
  11426. TDMAC6_DCH6CON = record
  11427. private
  11428. function getCHAED : TBits_1; inline;
  11429. function getCHAEN : TBits_1; inline;
  11430. function getCHBUSY : TBits_1; inline;
  11431. function getCHCHN : TBits_1; inline;
  11432. function getCHCHNS : TBits_1; inline;
  11433. function getCHEDET : TBits_1; inline;
  11434. function getCHEN : TBits_1; inline;
  11435. function getCHPRI : TBits_2; inline;
  11436. function getw : TBits_32; inline;
  11437. procedure setCHAED(thebits : TBits_1); inline;
  11438. procedure setCHAEN(thebits : TBits_1); inline;
  11439. procedure setCHBUSY(thebits : TBits_1); inline;
  11440. procedure setCHCHN(thebits : TBits_1); inline;
  11441. procedure setCHCHNS(thebits : TBits_1); inline;
  11442. procedure setCHEDET(thebits : TBits_1); inline;
  11443. procedure setCHEN(thebits : TBits_1); inline;
  11444. procedure setCHPRI(thebits : TBits_2); inline;
  11445. procedure setw(thebits : TBits_32); inline;
  11446. public
  11447. procedure clearCHAED; inline;
  11448. procedure clearCHAEN; inline;
  11449. procedure clearCHBUSY; inline;
  11450. procedure clearCHCHN; inline;
  11451. procedure clearCHCHNS; inline;
  11452. procedure clearCHEDET; inline;
  11453. procedure clearCHEN; inline;
  11454. procedure setCHAED; inline;
  11455. procedure setCHAEN; inline;
  11456. procedure setCHBUSY; inline;
  11457. procedure setCHCHN; inline;
  11458. procedure setCHCHNS; inline;
  11459. procedure setCHEDET; inline;
  11460. procedure setCHEN; inline;
  11461. property CHAED : TBits_1 read getCHAED write setCHAED;
  11462. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11463. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11464. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11465. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11466. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11467. property CHEN : TBits_1 read getCHEN write setCHEN;
  11468. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11469. property w : TBits_32 read getw write setw;
  11470. end;
  11471. TDMAC6_DCH6ECON = record
  11472. private
  11473. function getAIRQEN : TBits_1; inline;
  11474. function getCABORT : TBits_1; inline;
  11475. function getCFORCE : TBits_1; inline;
  11476. function getCHAIRQ : TBits_8; inline;
  11477. function getCHSIRQ : TBits_8; inline;
  11478. function getPATEN : TBits_1; inline;
  11479. function getSIRQEN : TBits_1; inline;
  11480. function getw : TBits_32; inline;
  11481. procedure setAIRQEN(thebits : TBits_1); inline;
  11482. procedure setCABORT(thebits : TBits_1); inline;
  11483. procedure setCFORCE(thebits : TBits_1); inline;
  11484. procedure setCHAIRQ(thebits : TBits_8); inline;
  11485. procedure setCHSIRQ(thebits : TBits_8); inline;
  11486. procedure setPATEN(thebits : TBits_1); inline;
  11487. procedure setSIRQEN(thebits : TBits_1); inline;
  11488. procedure setw(thebits : TBits_32); inline;
  11489. public
  11490. procedure clearAIRQEN; inline;
  11491. procedure clearCABORT; inline;
  11492. procedure clearCFORCE; inline;
  11493. procedure clearPATEN; inline;
  11494. procedure clearSIRQEN; inline;
  11495. procedure setAIRQEN; inline;
  11496. procedure setCABORT; inline;
  11497. procedure setCFORCE; inline;
  11498. procedure setPATEN; inline;
  11499. procedure setSIRQEN; inline;
  11500. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11501. property CABORT : TBits_1 read getCABORT write setCABORT;
  11502. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11503. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11504. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11505. property PATEN : TBits_1 read getPATEN write setPATEN;
  11506. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11507. property w : TBits_32 read getw write setw;
  11508. end;
  11509. TDMAC6_DCH6INT = record
  11510. private
  11511. function getCHBCIE : TBits_1; inline;
  11512. function getCHBCIF : TBits_1; inline;
  11513. function getCHCCIE : TBits_1; inline;
  11514. function getCHCCIF : TBits_1; inline;
  11515. function getCHDDIE : TBits_1; inline;
  11516. function getCHDDIF : TBits_1; inline;
  11517. function getCHDHIE : TBits_1; inline;
  11518. function getCHDHIF : TBits_1; inline;
  11519. function getCHERIE : TBits_1; inline;
  11520. function getCHERIF : TBits_1; inline;
  11521. function getCHSDIE : TBits_1; inline;
  11522. function getCHSDIF : TBits_1; inline;
  11523. function getCHSHIE : TBits_1; inline;
  11524. function getCHSHIF : TBits_1; inline;
  11525. function getCHTAIE : TBits_1; inline;
  11526. function getCHTAIF : TBits_1; inline;
  11527. function getw : TBits_32; inline;
  11528. procedure setCHBCIE(thebits : TBits_1); inline;
  11529. procedure setCHBCIF(thebits : TBits_1); inline;
  11530. procedure setCHCCIE(thebits : TBits_1); inline;
  11531. procedure setCHCCIF(thebits : TBits_1); inline;
  11532. procedure setCHDDIE(thebits : TBits_1); inline;
  11533. procedure setCHDDIF(thebits : TBits_1); inline;
  11534. procedure setCHDHIE(thebits : TBits_1); inline;
  11535. procedure setCHDHIF(thebits : TBits_1); inline;
  11536. procedure setCHERIE(thebits : TBits_1); inline;
  11537. procedure setCHERIF(thebits : TBits_1); inline;
  11538. procedure setCHSDIE(thebits : TBits_1); inline;
  11539. procedure setCHSDIF(thebits : TBits_1); inline;
  11540. procedure setCHSHIE(thebits : TBits_1); inline;
  11541. procedure setCHSHIF(thebits : TBits_1); inline;
  11542. procedure setCHTAIE(thebits : TBits_1); inline;
  11543. procedure setCHTAIF(thebits : TBits_1); inline;
  11544. procedure setw(thebits : TBits_32); inline;
  11545. public
  11546. procedure clearCHBCIE; inline;
  11547. procedure clearCHBCIF; inline;
  11548. procedure clearCHCCIE; inline;
  11549. procedure clearCHCCIF; inline;
  11550. procedure clearCHDDIE; inline;
  11551. procedure clearCHDDIF; inline;
  11552. procedure clearCHDHIE; inline;
  11553. procedure clearCHDHIF; inline;
  11554. procedure clearCHERIE; inline;
  11555. procedure clearCHERIF; inline;
  11556. procedure clearCHSDIE; inline;
  11557. procedure clearCHSDIF; inline;
  11558. procedure clearCHSHIE; inline;
  11559. procedure clearCHSHIF; inline;
  11560. procedure clearCHTAIE; inline;
  11561. procedure clearCHTAIF; inline;
  11562. procedure setCHBCIE; inline;
  11563. procedure setCHBCIF; inline;
  11564. procedure setCHCCIE; inline;
  11565. procedure setCHCCIF; inline;
  11566. procedure setCHDDIE; inline;
  11567. procedure setCHDDIF; inline;
  11568. procedure setCHDHIE; inline;
  11569. procedure setCHDHIF; inline;
  11570. procedure setCHERIE; inline;
  11571. procedure setCHERIF; inline;
  11572. procedure setCHSDIE; inline;
  11573. procedure setCHSDIF; inline;
  11574. procedure setCHSHIE; inline;
  11575. procedure setCHSHIF; inline;
  11576. procedure setCHTAIE; inline;
  11577. procedure setCHTAIF; inline;
  11578. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11579. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11580. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11581. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11582. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11583. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11584. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11585. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11586. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11587. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11588. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11589. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11590. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11591. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11592. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11593. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11594. property w : TBits_32 read getw write setw;
  11595. end;
  11596. type
  11597. TDMAC6Registers = record
  11598. DCH6CONbits : TDMAC6_DCH6CON;
  11599. DCH6CON : longWord;
  11600. DCH6CONCLR : longWord;
  11601. DCH6CONSET : longWord;
  11602. DCH6CONINV : longWord;
  11603. DCH6ECONbits : TDMAC6_DCH6ECON;
  11604. DCH6ECON : longWord;
  11605. DCH6ECONCLR : longWord;
  11606. DCH6ECONSET : longWord;
  11607. DCH6ECONINV : longWord;
  11608. DCH6INTbits : TDMAC6_DCH6INT;
  11609. DCH6INT : longWord;
  11610. DCH6INTCLR : longWord;
  11611. DCH6INTSET : longWord;
  11612. DCH6INTINV : longWord;
  11613. DCH6SSA : longWord;
  11614. DCH6SSACLR : longWord;
  11615. DCH6SSASET : longWord;
  11616. DCH6SSAINV : longWord;
  11617. DCH6DSA : longWord;
  11618. DCH6DSACLR : longWord;
  11619. DCH6DSASET : longWord;
  11620. DCH6DSAINV : longWord;
  11621. DCH6SSIZ : longWord;
  11622. DCH6SSIZCLR : longWord;
  11623. DCH6SSIZSET : longWord;
  11624. DCH6SSIZINV : longWord;
  11625. DCH6DSIZ : longWord;
  11626. DCH6DSIZCLR : longWord;
  11627. DCH6DSIZSET : longWord;
  11628. DCH6DSIZINV : longWord;
  11629. DCH6SPTR : longWord;
  11630. DCH6SPTRCLR : longWord;
  11631. DCH6SPTRSET : longWord;
  11632. DCH6SPTRINV : longWord;
  11633. DCH6DPTR : longWord;
  11634. DCH6DPTRCLR : longWord;
  11635. DCH6DPTRSET : longWord;
  11636. DCH6DPTRINV : longWord;
  11637. DCH6CSIZ : longWord;
  11638. DCH6CSIZCLR : longWord;
  11639. DCH6CSIZSET : longWord;
  11640. DCH6CSIZINV : longWord;
  11641. DCH6CPTR : longWord;
  11642. DCH6CPTRCLR : longWord;
  11643. DCH6CPTRSET : longWord;
  11644. DCH6CPTRINV : longWord;
  11645. DCH6DAT : longWord;
  11646. DCH6DATCLR : longWord;
  11647. DCH6DATSET : longWord;
  11648. DCH6DATINV : longWord;
  11649. end;
  11650. TDMAC7_DCH7CON = record
  11651. private
  11652. function getCHAED : TBits_1; inline;
  11653. function getCHAEN : TBits_1; inline;
  11654. function getCHBUSY : TBits_1; inline;
  11655. function getCHCHN : TBits_1; inline;
  11656. function getCHCHNS : TBits_1; inline;
  11657. function getCHEDET : TBits_1; inline;
  11658. function getCHEN : TBits_1; inline;
  11659. function getCHPRI : TBits_2; inline;
  11660. function getw : TBits_32; inline;
  11661. procedure setCHAED(thebits : TBits_1); inline;
  11662. procedure setCHAEN(thebits : TBits_1); inline;
  11663. procedure setCHBUSY(thebits : TBits_1); inline;
  11664. procedure setCHCHN(thebits : TBits_1); inline;
  11665. procedure setCHCHNS(thebits : TBits_1); inline;
  11666. procedure setCHEDET(thebits : TBits_1); inline;
  11667. procedure setCHEN(thebits : TBits_1); inline;
  11668. procedure setCHPRI(thebits : TBits_2); inline;
  11669. procedure setw(thebits : TBits_32); inline;
  11670. public
  11671. procedure clearCHAED; inline;
  11672. procedure clearCHAEN; inline;
  11673. procedure clearCHBUSY; inline;
  11674. procedure clearCHCHN; inline;
  11675. procedure clearCHCHNS; inline;
  11676. procedure clearCHEDET; inline;
  11677. procedure clearCHEN; inline;
  11678. procedure setCHAED; inline;
  11679. procedure setCHAEN; inline;
  11680. procedure setCHBUSY; inline;
  11681. procedure setCHCHN; inline;
  11682. procedure setCHCHNS; inline;
  11683. procedure setCHEDET; inline;
  11684. procedure setCHEN; inline;
  11685. property CHAED : TBits_1 read getCHAED write setCHAED;
  11686. property CHAEN : TBits_1 read getCHAEN write setCHAEN;
  11687. property CHBUSY : TBits_1 read getCHBUSY write setCHBUSY;
  11688. property CHCHN : TBits_1 read getCHCHN write setCHCHN;
  11689. property CHCHNS : TBits_1 read getCHCHNS write setCHCHNS;
  11690. property CHEDET : TBits_1 read getCHEDET write setCHEDET;
  11691. property CHEN : TBits_1 read getCHEN write setCHEN;
  11692. property CHPRI : TBits_2 read getCHPRI write setCHPRI;
  11693. property w : TBits_32 read getw write setw;
  11694. end;
  11695. TDMAC7_DCH7ECON = record
  11696. private
  11697. function getAIRQEN : TBits_1; inline;
  11698. function getCABORT : TBits_1; inline;
  11699. function getCFORCE : TBits_1; inline;
  11700. function getCHAIRQ : TBits_8; inline;
  11701. function getCHSIRQ : TBits_8; inline;
  11702. function getPATEN : TBits_1; inline;
  11703. function getSIRQEN : TBits_1; inline;
  11704. function getw : TBits_32; inline;
  11705. procedure setAIRQEN(thebits : TBits_1); inline;
  11706. procedure setCABORT(thebits : TBits_1); inline;
  11707. procedure setCFORCE(thebits : TBits_1); inline;
  11708. procedure setCHAIRQ(thebits : TBits_8); inline;
  11709. procedure setCHSIRQ(thebits : TBits_8); inline;
  11710. procedure setPATEN(thebits : TBits_1); inline;
  11711. procedure setSIRQEN(thebits : TBits_1); inline;
  11712. procedure setw(thebits : TBits_32); inline;
  11713. public
  11714. procedure clearAIRQEN; inline;
  11715. procedure clearCABORT; inline;
  11716. procedure clearCFORCE; inline;
  11717. procedure clearPATEN; inline;
  11718. procedure clearSIRQEN; inline;
  11719. procedure setAIRQEN; inline;
  11720. procedure setCABORT; inline;
  11721. procedure setCFORCE; inline;
  11722. procedure setPATEN; inline;
  11723. procedure setSIRQEN; inline;
  11724. property AIRQEN : TBits_1 read getAIRQEN write setAIRQEN;
  11725. property CABORT : TBits_1 read getCABORT write setCABORT;
  11726. property CFORCE : TBits_1 read getCFORCE write setCFORCE;
  11727. property CHAIRQ : TBits_8 read getCHAIRQ write setCHAIRQ;
  11728. property CHSIRQ : TBits_8 read getCHSIRQ write setCHSIRQ;
  11729. property PATEN : TBits_1 read getPATEN write setPATEN;
  11730. property SIRQEN : TBits_1 read getSIRQEN write setSIRQEN;
  11731. property w : TBits_32 read getw write setw;
  11732. end;
  11733. TDMAC7_DCH7INT = record
  11734. private
  11735. function getCHBCIE : TBits_1; inline;
  11736. function getCHBCIF : TBits_1; inline;
  11737. function getCHCCIE : TBits_1; inline;
  11738. function getCHCCIF : TBits_1; inline;
  11739. function getCHDDIE : TBits_1; inline;
  11740. function getCHDDIF : TBits_1; inline;
  11741. function getCHDHIE : TBits_1; inline;
  11742. function getCHDHIF : TBits_1; inline;
  11743. function getCHERIE : TBits_1; inline;
  11744. function getCHERIF : TBits_1; inline;
  11745. function getCHSDIE : TBits_1; inline;
  11746. function getCHSDIF : TBits_1; inline;
  11747. function getCHSHIE : TBits_1; inline;
  11748. function getCHSHIF : TBits_1; inline;
  11749. function getCHTAIE : TBits_1; inline;
  11750. function getCHTAIF : TBits_1; inline;
  11751. function getw : TBits_32; inline;
  11752. procedure setCHBCIE(thebits : TBits_1); inline;
  11753. procedure setCHBCIF(thebits : TBits_1); inline;
  11754. procedure setCHCCIE(thebits : TBits_1); inline;
  11755. procedure setCHCCIF(thebits : TBits_1); inline;
  11756. procedure setCHDDIE(thebits : TBits_1); inline;
  11757. procedure setCHDDIF(thebits : TBits_1); inline;
  11758. procedure setCHDHIE(thebits : TBits_1); inline;
  11759. procedure setCHDHIF(thebits : TBits_1); inline;
  11760. procedure setCHERIE(thebits : TBits_1); inline;
  11761. procedure setCHERIF(thebits : TBits_1); inline;
  11762. procedure setCHSDIE(thebits : TBits_1); inline;
  11763. procedure setCHSDIF(thebits : TBits_1); inline;
  11764. procedure setCHSHIE(thebits : TBits_1); inline;
  11765. procedure setCHSHIF(thebits : TBits_1); inline;
  11766. procedure setCHTAIE(thebits : TBits_1); inline;
  11767. procedure setCHTAIF(thebits : TBits_1); inline;
  11768. procedure setw(thebits : TBits_32); inline;
  11769. public
  11770. procedure clearCHBCIE; inline;
  11771. procedure clearCHBCIF; inline;
  11772. procedure clearCHCCIE; inline;
  11773. procedure clearCHCCIF; inline;
  11774. procedure clearCHDDIE; inline;
  11775. procedure clearCHDDIF; inline;
  11776. procedure clearCHDHIE; inline;
  11777. procedure clearCHDHIF; inline;
  11778. procedure clearCHERIE; inline;
  11779. procedure clearCHERIF; inline;
  11780. procedure clearCHSDIE; inline;
  11781. procedure clearCHSDIF; inline;
  11782. procedure clearCHSHIE; inline;
  11783. procedure clearCHSHIF; inline;
  11784. procedure clearCHTAIE; inline;
  11785. procedure clearCHTAIF; inline;
  11786. procedure setCHBCIE; inline;
  11787. procedure setCHBCIF; inline;
  11788. procedure setCHCCIE; inline;
  11789. procedure setCHCCIF; inline;
  11790. procedure setCHDDIE; inline;
  11791. procedure setCHDDIF; inline;
  11792. procedure setCHDHIE; inline;
  11793. procedure setCHDHIF; inline;
  11794. procedure setCHERIE; inline;
  11795. procedure setCHERIF; inline;
  11796. procedure setCHSDIE; inline;
  11797. procedure setCHSDIF; inline;
  11798. procedure setCHSHIE; inline;
  11799. procedure setCHSHIF; inline;
  11800. procedure setCHTAIE; inline;
  11801. procedure setCHTAIF; inline;
  11802. property CHBCIE : TBits_1 read getCHBCIE write setCHBCIE;
  11803. property CHBCIF : TBits_1 read getCHBCIF write setCHBCIF;
  11804. property CHCCIE : TBits_1 read getCHCCIE write setCHCCIE;
  11805. property CHCCIF : TBits_1 read getCHCCIF write setCHCCIF;
  11806. property CHDDIE : TBits_1 read getCHDDIE write setCHDDIE;
  11807. property CHDDIF : TBits_1 read getCHDDIF write setCHDDIF;
  11808. property CHDHIE : TBits_1 read getCHDHIE write setCHDHIE;
  11809. property CHDHIF : TBits_1 read getCHDHIF write setCHDHIF;
  11810. property CHERIE : TBits_1 read getCHERIE write setCHERIE;
  11811. property CHERIF : TBits_1 read getCHERIF write setCHERIF;
  11812. property CHSDIE : TBits_1 read getCHSDIE write setCHSDIE;
  11813. property CHSDIF : TBits_1 read getCHSDIF write setCHSDIF;
  11814. property CHSHIE : TBits_1 read getCHSHIE write setCHSHIE;
  11815. property CHSHIF : TBits_1 read getCHSHIF write setCHSHIF;
  11816. property CHTAIE : TBits_1 read getCHTAIE write setCHTAIE;
  11817. property CHTAIF : TBits_1 read getCHTAIF write setCHTAIF;
  11818. property w : TBits_32 read getw write setw;
  11819. end;
  11820. type
  11821. TDMAC7Registers = record
  11822. DCH7CONbits : TDMAC7_DCH7CON;
  11823. DCH7CON : longWord;
  11824. DCH7CONCLR : longWord;
  11825. DCH7CONSET : longWord;
  11826. DCH7CONINV : longWord;
  11827. DCH7ECONbits : TDMAC7_DCH7ECON;
  11828. DCH7ECON : longWord;
  11829. DCH7ECONCLR : longWord;
  11830. DCH7ECONSET : longWord;
  11831. DCH7ECONINV : longWord;
  11832. DCH7INTbits : TDMAC7_DCH7INT;
  11833. DCH7INT : longWord;
  11834. DCH7INTCLR : longWord;
  11835. DCH7INTSET : longWord;
  11836. DCH7INTINV : longWord;
  11837. DCH7SSA : longWord;
  11838. DCH7SSACLR : longWord;
  11839. DCH7SSASET : longWord;
  11840. DCH7SSAINV : longWord;
  11841. DCH7DSA : longWord;
  11842. DCH7DSACLR : longWord;
  11843. DCH7DSASET : longWord;
  11844. DCH7DSAINV : longWord;
  11845. DCH7SSIZ : longWord;
  11846. DCH7SSIZCLR : longWord;
  11847. DCH7SSIZSET : longWord;
  11848. DCH7SSIZINV : longWord;
  11849. DCH7DSIZ : longWord;
  11850. DCH7DSIZCLR : longWord;
  11851. DCH7DSIZSET : longWord;
  11852. DCH7DSIZINV : longWord;
  11853. DCH7SPTR : longWord;
  11854. DCH7SPTRCLR : longWord;
  11855. DCH7SPTRSET : longWord;
  11856. DCH7SPTRINV : longWord;
  11857. DCH7DPTR : longWord;
  11858. DCH7DPTRCLR : longWord;
  11859. DCH7DPTRSET : longWord;
  11860. DCH7DPTRINV : longWord;
  11861. DCH7CSIZ : longWord;
  11862. DCH7CSIZCLR : longWord;
  11863. DCH7CSIZSET : longWord;
  11864. DCH7CSIZINV : longWord;
  11865. DCH7CPTR : longWord;
  11866. DCH7CPTRCLR : longWord;
  11867. DCH7CPTRSET : longWord;
  11868. DCH7CPTRINV : longWord;
  11869. DCH7DAT : longWord;
  11870. DCH7DATCLR : longWord;
  11871. DCH7DATSET : longWord;
  11872. DCH7DATINV : longWord;
  11873. end;
  11874. TPCACHE_CHECON = record
  11875. private
  11876. function getCHECOH : TBits_1; inline;
  11877. function getDCSZ : TBits_2; inline;
  11878. function getPFMWS : TBits_3; inline;
  11879. function getPREFEN : TBits_2; inline;
  11880. function getw : TBits_32; inline;
  11881. procedure setCHECOH(thebits : TBits_1); inline;
  11882. procedure setDCSZ(thebits : TBits_2); inline;
  11883. procedure setPFMWS(thebits : TBits_3); inline;
  11884. procedure setPREFEN(thebits : TBits_2); inline;
  11885. procedure setw(thebits : TBits_32); inline;
  11886. public
  11887. procedure clearCHECOH; inline;
  11888. procedure setCHECOH; inline;
  11889. property CHECOH : TBits_1 read getCHECOH write setCHECOH;
  11890. property DCSZ : TBits_2 read getDCSZ write setDCSZ;
  11891. property PFMWS : TBits_3 read getPFMWS write setPFMWS;
  11892. property PREFEN : TBits_2 read getPREFEN write setPREFEN;
  11893. property w : TBits_32 read getw write setw;
  11894. end;
  11895. TPCACHE_CHETAG = record
  11896. private
  11897. function getLLOCK : TBits_1; inline;
  11898. function getLTAG : TBits_20; inline;
  11899. function getLTAGBOOT : TBits_1; inline;
  11900. function getLTYPE : TBits_1; inline;
  11901. function getLVALID : TBits_1; inline;
  11902. function getw : TBits_32; inline;
  11903. procedure setLLOCK(thebits : TBits_1); inline;
  11904. procedure setLTAG(thebits : TBits_20); inline;
  11905. procedure setLTAGBOOT(thebits : TBits_1); inline;
  11906. procedure setLTYPE(thebits : TBits_1); inline;
  11907. procedure setLVALID(thebits : TBits_1); inline;
  11908. procedure setw(thebits : TBits_32); inline;
  11909. public
  11910. procedure clearLLOCK; inline;
  11911. procedure clearLTAGBOOT; inline;
  11912. procedure clearLTYPE; inline;
  11913. procedure clearLVALID; inline;
  11914. procedure setLLOCK; inline;
  11915. procedure setLTAGBOOT; inline;
  11916. procedure setLTYPE; inline;
  11917. procedure setLVALID; inline;
  11918. property LLOCK : TBits_1 read getLLOCK write setLLOCK;
  11919. property LTAG : TBits_20 read getLTAG write setLTAG;
  11920. property LTAGBOOT : TBits_1 read getLTAGBOOT write setLTAGBOOT;
  11921. property LTYPE : TBits_1 read getLTYPE write setLTYPE;
  11922. property LVALID : TBits_1 read getLVALID write setLVALID;
  11923. property w : TBits_32 read getw write setw;
  11924. end;
  11925. type
  11926. TPCACHERegisters = record
  11927. CHECONbits : TPCACHE_CHECON;
  11928. CHECON : longWord;
  11929. CHECONCLR : longWord;
  11930. CHECONSET : longWord;
  11931. CHECONINV : longWord;
  11932. CHEACC : longWord;
  11933. CHEACCCLR : longWord;
  11934. CHEACCSET : longWord;
  11935. CHEACCINV : longWord;
  11936. CHETAGbits : TPCACHE_CHETAG;
  11937. CHETAG : longWord;
  11938. CHETAGCLR : longWord;
  11939. CHETAGSET : longWord;
  11940. CHETAGINV : longWord;
  11941. CHEMSK : longWord;
  11942. CHEMSKCLR : longWord;
  11943. CHEMSKSET : longWord;
  11944. CHEMSKINV : longWord;
  11945. CHEW0 : longWord;
  11946. CHEW1 : longWord;
  11947. CHEW2 : longWord;
  11948. CHEW3 : longWord;
  11949. CHELRU : longWord;
  11950. CHEHIT : longWord;
  11951. CHEMIS : longWord;
  11952. CHEPFABT : longWord;
  11953. end;
  11954. TUSB_U1IR = record
  11955. private
  11956. function getATTACHIF : TBits_1; inline;
  11957. function getDETACHIF : TBits_1; inline;
  11958. function getIDLEIF : TBits_1; inline;
  11959. function getRESUMEIF : TBits_1; inline;
  11960. function getSOFIF : TBits_1; inline;
  11961. function getSTALLIF : TBits_1; inline;
  11962. function getTRNIF : TBits_1; inline;
  11963. function getUERRIF : TBits_1; inline;
  11964. function getURSTIF : TBits_1; inline;
  11965. function getURSTIF_DETACHIF : TBits_1; inline;
  11966. procedure setATTACHIF(thebits : TBits_1); inline;
  11967. procedure setDETACHIF(thebits : TBits_1); inline;
  11968. procedure setIDLEIF(thebits : TBits_1); inline;
  11969. procedure setRESUMEIF(thebits : TBits_1); inline;
  11970. procedure setSOFIF(thebits : TBits_1); inline;
  11971. procedure setSTALLIF(thebits : TBits_1); inline;
  11972. procedure setTRNIF(thebits : TBits_1); inline;
  11973. procedure setUERRIF(thebits : TBits_1); inline;
  11974. procedure setURSTIF(thebits : TBits_1); inline;
  11975. procedure setURSTIF_DETACHIF(thebits : TBits_1); inline;
  11976. public
  11977. procedure clearATTACHIF; inline;
  11978. procedure clearDETACHIF; inline;
  11979. procedure clearIDLEIF; inline;
  11980. procedure clearRESUMEIF; inline;
  11981. procedure clearSOFIF; inline;
  11982. procedure clearSTALLIF; inline;
  11983. procedure clearTRNIF; inline;
  11984. procedure clearUERRIF; inline;
  11985. procedure clearURSTIF; inline;
  11986. procedure clearURSTIF_DETACHIF; inline;
  11987. procedure setATTACHIF; inline;
  11988. procedure setDETACHIF; inline;
  11989. procedure setIDLEIF; inline;
  11990. procedure setRESUMEIF; inline;
  11991. procedure setSOFIF; inline;
  11992. procedure setSTALLIF; inline;
  11993. procedure setTRNIF; inline;
  11994. procedure setUERRIF; inline;
  11995. procedure setURSTIF; inline;
  11996. procedure setURSTIF_DETACHIF; inline;
  11997. property ATTACHIF : TBits_1 read getATTACHIF write setATTACHIF;
  11998. property DETACHIF : TBits_1 read getDETACHIF write setDETACHIF;
  11999. property IDLEIF : TBits_1 read getIDLEIF write setIDLEIF;
  12000. property RESUMEIF : TBits_1 read getRESUMEIF write setRESUMEIF;
  12001. property SOFIF : TBits_1 read getSOFIF write setSOFIF;
  12002. property STALLIF : TBits_1 read getSTALLIF write setSTALLIF;
  12003. property TRNIF : TBits_1 read getTRNIF write setTRNIF;
  12004. property UERRIF : TBits_1 read getUERRIF write setUERRIF;
  12005. property URSTIF : TBits_1 read getURSTIF write setURSTIF;
  12006. property URSTIF_DETACHIF : TBits_1 read getURSTIF_DETACHIF write setURSTIF_DETACHIF;
  12007. end;
  12008. TUSB_U1IE = record
  12009. private
  12010. function getATTACHIE : TBits_1; inline;
  12011. function getDETACHIE : TBits_1; inline;
  12012. function getIDLEIE : TBits_1; inline;
  12013. function getRESUMEIE : TBits_1; inline;
  12014. function getSOFIE : TBits_1; inline;
  12015. function getSTALLIE : TBits_1; inline;
  12016. function getTRNIE : TBits_1; inline;
  12017. function getUERRIE : TBits_1; inline;
  12018. function getURSTIE : TBits_1; inline;
  12019. function getURSTIE_DETACHIE : TBits_1; inline;
  12020. procedure setATTACHIE(thebits : TBits_1); inline;
  12021. procedure setDETACHIE(thebits : TBits_1); inline;
  12022. procedure setIDLEIE(thebits : TBits_1); inline;
  12023. procedure setRESUMEIE(thebits : TBits_1); inline;
  12024. procedure setSOFIE(thebits : TBits_1); inline;
  12025. procedure setSTALLIE(thebits : TBits_1); inline;
  12026. procedure setTRNIE(thebits : TBits_1); inline;
  12027. procedure setUERRIE(thebits : TBits_1); inline;
  12028. procedure setURSTIE(thebits : TBits_1); inline;
  12029. procedure setURSTIE_DETACHIE(thebits : TBits_1); inline;
  12030. public
  12031. procedure clearATTACHIE; inline;
  12032. procedure clearDETACHIE; inline;
  12033. procedure clearIDLEIE; inline;
  12034. procedure clearRESUMEIE; inline;
  12035. procedure clearSOFIE; inline;
  12036. procedure clearSTALLIE; inline;
  12037. procedure clearTRNIE; inline;
  12038. procedure clearUERRIE; inline;
  12039. procedure clearURSTIE; inline;
  12040. procedure clearURSTIE_DETACHIE; inline;
  12041. procedure setATTACHIE; inline;
  12042. procedure setDETACHIE; inline;
  12043. procedure setIDLEIE; inline;
  12044. procedure setRESUMEIE; inline;
  12045. procedure setSOFIE; inline;
  12046. procedure setSTALLIE; inline;
  12047. procedure setTRNIE; inline;
  12048. procedure setUERRIE; inline;
  12049. procedure setURSTIE; inline;
  12050. procedure setURSTIE_DETACHIE; inline;
  12051. property ATTACHIE : TBits_1 read getATTACHIE write setATTACHIE;
  12052. property DETACHIE : TBits_1 read getDETACHIE write setDETACHIE;
  12053. property IDLEIE : TBits_1 read getIDLEIE write setIDLEIE;
  12054. property RESUMEIE : TBits_1 read getRESUMEIE write setRESUMEIE;
  12055. property SOFIE : TBits_1 read getSOFIE write setSOFIE;
  12056. property STALLIE : TBits_1 read getSTALLIE write setSTALLIE;
  12057. property TRNIE : TBits_1 read getTRNIE write setTRNIE;
  12058. property UERRIE : TBits_1 read getUERRIE write setUERRIE;
  12059. property URSTIE : TBits_1 read getURSTIE write setURSTIE;
  12060. property URSTIE_DETACHIE : TBits_1 read getURSTIE_DETACHIE write setURSTIE_DETACHIE;
  12061. end;
  12062. TUSB_U1EIR = record
  12063. private
  12064. function getBMXEF : TBits_1; inline;
  12065. function getBTOEF : TBits_1; inline;
  12066. function getBTSEF : TBits_1; inline;
  12067. function getCRC16EF : TBits_1; inline;
  12068. function getCRC5EF : TBits_1; inline;
  12069. function getCRC5EF_EOFEF : TBits_1; inline;
  12070. function getDFN8EF : TBits_1; inline;
  12071. function getDMAEF : TBits_1; inline;
  12072. function getEOFEF : TBits_1; inline;
  12073. function getPIDEF : TBits_1; inline;
  12074. procedure setBMXEF(thebits : TBits_1); inline;
  12075. procedure setBTOEF(thebits : TBits_1); inline;
  12076. procedure setBTSEF(thebits : TBits_1); inline;
  12077. procedure setCRC16EF(thebits : TBits_1); inline;
  12078. procedure setCRC5EF(thebits : TBits_1); inline;
  12079. procedure setCRC5EF_EOFEF(thebits : TBits_1); inline;
  12080. procedure setDFN8EF(thebits : TBits_1); inline;
  12081. procedure setDMAEF(thebits : TBits_1); inline;
  12082. procedure setEOFEF(thebits : TBits_1); inline;
  12083. procedure setPIDEF(thebits : TBits_1); inline;
  12084. public
  12085. procedure clearBMXEF; inline;
  12086. procedure clearBTOEF; inline;
  12087. procedure clearBTSEF; inline;
  12088. procedure clearCRC16EF; inline;
  12089. procedure clearCRC5EF; inline;
  12090. procedure clearCRC5EF_EOFEF; inline;
  12091. procedure clearDFN8EF; inline;
  12092. procedure clearDMAEF; inline;
  12093. procedure clearEOFEF; inline;
  12094. procedure clearPIDEF; inline;
  12095. procedure setBMXEF; inline;
  12096. procedure setBTOEF; inline;
  12097. procedure setBTSEF; inline;
  12098. procedure setCRC16EF; inline;
  12099. procedure setCRC5EF; inline;
  12100. procedure setCRC5EF_EOFEF; inline;
  12101. procedure setDFN8EF; inline;
  12102. procedure setDMAEF; inline;
  12103. procedure setEOFEF; inline;
  12104. procedure setPIDEF; inline;
  12105. property BMXEF : TBits_1 read getBMXEF write setBMXEF;
  12106. property BTOEF : TBits_1 read getBTOEF write setBTOEF;
  12107. property BTSEF : TBits_1 read getBTSEF write setBTSEF;
  12108. property CRC16EF : TBits_1 read getCRC16EF write setCRC16EF;
  12109. property CRC5EF : TBits_1 read getCRC5EF write setCRC5EF;
  12110. property CRC5EF_EOFEF : TBits_1 read getCRC5EF_EOFEF write setCRC5EF_EOFEF;
  12111. property DFN8EF : TBits_1 read getDFN8EF write setDFN8EF;
  12112. property DMAEF : TBits_1 read getDMAEF write setDMAEF;
  12113. property EOFEF : TBits_1 read getEOFEF write setEOFEF;
  12114. property PIDEF : TBits_1 read getPIDEF write setPIDEF;
  12115. end;
  12116. TUSB_U1EIE = record
  12117. private
  12118. function getBMXEE : TBits_1; inline;
  12119. function getBTOEE : TBits_1; inline;
  12120. function getBTSEE : TBits_1; inline;
  12121. function getCRC16EE : TBits_1; inline;
  12122. function getCRC5EE : TBits_1; inline;
  12123. function getCRC5EE_EOFEE : TBits_1; inline;
  12124. function getDFN8EE : TBits_1; inline;
  12125. function getDMAEE : TBits_1; inline;
  12126. function getEOFEE : TBits_1; inline;
  12127. function getPIDEE : TBits_1; inline;
  12128. procedure setBMXEE(thebits : TBits_1); inline;
  12129. procedure setBTOEE(thebits : TBits_1); inline;
  12130. procedure setBTSEE(thebits : TBits_1); inline;
  12131. procedure setCRC16EE(thebits : TBits_1); inline;
  12132. procedure setCRC5EE(thebits : TBits_1); inline;
  12133. procedure setCRC5EE_EOFEE(thebits : TBits_1); inline;
  12134. procedure setDFN8EE(thebits : TBits_1); inline;
  12135. procedure setDMAEE(thebits : TBits_1); inline;
  12136. procedure setEOFEE(thebits : TBits_1); inline;
  12137. procedure setPIDEE(thebits : TBits_1); inline;
  12138. public
  12139. procedure clearBMXEE; inline;
  12140. procedure clearBTOEE; inline;
  12141. procedure clearBTSEE; inline;
  12142. procedure clearCRC16EE; inline;
  12143. procedure clearCRC5EE; inline;
  12144. procedure clearCRC5EE_EOFEE; inline;
  12145. procedure clearDFN8EE; inline;
  12146. procedure clearDMAEE; inline;
  12147. procedure clearEOFEE; inline;
  12148. procedure clearPIDEE; inline;
  12149. procedure setBMXEE; inline;
  12150. procedure setBTOEE; inline;
  12151. procedure setBTSEE; inline;
  12152. procedure setCRC16EE; inline;
  12153. procedure setCRC5EE; inline;
  12154. procedure setCRC5EE_EOFEE; inline;
  12155. procedure setDFN8EE; inline;
  12156. procedure setDMAEE; inline;
  12157. procedure setEOFEE; inline;
  12158. procedure setPIDEE; inline;
  12159. property BMXEE : TBits_1 read getBMXEE write setBMXEE;
  12160. property BTOEE : TBits_1 read getBTOEE write setBTOEE;
  12161. property BTSEE : TBits_1 read getBTSEE write setBTSEE;
  12162. property CRC16EE : TBits_1 read getCRC16EE write setCRC16EE;
  12163. property CRC5EE : TBits_1 read getCRC5EE write setCRC5EE;
  12164. property CRC5EE_EOFEE : TBits_1 read getCRC5EE_EOFEE write setCRC5EE_EOFEE;
  12165. property DFN8EE : TBits_1 read getDFN8EE write setDFN8EE;
  12166. property DMAEE : TBits_1 read getDMAEE write setDMAEE;
  12167. property EOFEE : TBits_1 read getEOFEE write setEOFEE;
  12168. property PIDEE : TBits_1 read getPIDEE write setPIDEE;
  12169. end;
  12170. TUSB_U1STAT = record
  12171. private
  12172. function getDIR : TBits_1; inline;
  12173. function getENDPT : TBits_4; inline;
  12174. function getENDPT0 : TBits_1; inline;
  12175. function getENDPT1 : TBits_1; inline;
  12176. function getENDPT2 : TBits_1; inline;
  12177. function getENDPT3 : TBits_1; inline;
  12178. function getPPBI : TBits_1; inline;
  12179. procedure setDIR(thebits : TBits_1); inline;
  12180. procedure setENDPT(thebits : TBits_4); inline;
  12181. procedure setENDPT0(thebits : TBits_1); inline;
  12182. procedure setENDPT1(thebits : TBits_1); inline;
  12183. procedure setENDPT2(thebits : TBits_1); inline;
  12184. procedure setENDPT3(thebits : TBits_1); inline;
  12185. procedure setPPBI(thebits : TBits_1); inline;
  12186. public
  12187. procedure clearDIR; inline;
  12188. procedure clearENDPT0; inline;
  12189. procedure clearENDPT1; inline;
  12190. procedure clearENDPT2; inline;
  12191. procedure clearENDPT3; inline;
  12192. procedure clearPPBI; inline;
  12193. procedure setDIR; inline;
  12194. procedure setENDPT0; inline;
  12195. procedure setENDPT1; inline;
  12196. procedure setENDPT2; inline;
  12197. procedure setENDPT3; inline;
  12198. procedure setPPBI; inline;
  12199. property DIR : TBits_1 read getDIR write setDIR;
  12200. property ENDPT : TBits_4 read getENDPT write setENDPT;
  12201. property ENDPT0 : TBits_1 read getENDPT0 write setENDPT0;
  12202. property ENDPT1 : TBits_1 read getENDPT1 write setENDPT1;
  12203. property ENDPT2 : TBits_1 read getENDPT2 write setENDPT2;
  12204. property ENDPT3 : TBits_1 read getENDPT3 write setENDPT3;
  12205. property PPBI : TBits_1 read getPPBI write setPPBI;
  12206. end;
  12207. TUSB_U1CON = record
  12208. private
  12209. function getHOSTEN : TBits_1; inline;
  12210. function getJSTATE : TBits_1; inline;
  12211. function getPKTDIS : TBits_1; inline;
  12212. function getPKTDIS_TOKBUSY : TBits_1; inline;
  12213. function getPPBRST : TBits_1; inline;
  12214. function getRESUME : TBits_1; inline;
  12215. function getSE0 : TBits_1; inline;
  12216. function getSOFEN : TBits_1; inline;
  12217. function getTOKBUSY : TBits_1; inline;
  12218. function getUSBEN : TBits_1; inline;
  12219. function getUSBEN_SOFEN : TBits_1; inline;
  12220. function getUSBRST : TBits_1; inline;
  12221. procedure setHOSTEN(thebits : TBits_1); inline;
  12222. procedure setJSTATE(thebits : TBits_1); inline;
  12223. procedure setPKTDIS(thebits : TBits_1); inline;
  12224. procedure setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  12225. procedure setPPBRST(thebits : TBits_1); inline;
  12226. procedure setRESUME(thebits : TBits_1); inline;
  12227. procedure setSE0(thebits : TBits_1); inline;
  12228. procedure setSOFEN(thebits : TBits_1); inline;
  12229. procedure setTOKBUSY(thebits : TBits_1); inline;
  12230. procedure setUSBEN(thebits : TBits_1); inline;
  12231. procedure setUSBEN_SOFEN(thebits : TBits_1); inline;
  12232. procedure setUSBRST(thebits : TBits_1); inline;
  12233. public
  12234. procedure clearHOSTEN; inline;
  12235. procedure clearJSTATE; inline;
  12236. procedure clearPKTDIS; inline;
  12237. procedure clearPKTDIS_TOKBUSY; inline;
  12238. procedure clearPPBRST; inline;
  12239. procedure clearRESUME; inline;
  12240. procedure clearSE0; inline;
  12241. procedure clearSOFEN; inline;
  12242. procedure clearTOKBUSY; inline;
  12243. procedure clearUSBEN; inline;
  12244. procedure clearUSBEN_SOFEN; inline;
  12245. procedure clearUSBRST; inline;
  12246. procedure setHOSTEN; inline;
  12247. procedure setJSTATE; inline;
  12248. procedure setPKTDIS; inline;
  12249. procedure setPKTDIS_TOKBUSY; inline;
  12250. procedure setPPBRST; inline;
  12251. procedure setRESUME; inline;
  12252. procedure setSE0; inline;
  12253. procedure setSOFEN; inline;
  12254. procedure setTOKBUSY; inline;
  12255. procedure setUSBEN; inline;
  12256. procedure setUSBEN_SOFEN; inline;
  12257. procedure setUSBRST; inline;
  12258. property HOSTEN : TBits_1 read getHOSTEN write setHOSTEN;
  12259. property JSTATE : TBits_1 read getJSTATE write setJSTATE;
  12260. property PKTDIS : TBits_1 read getPKTDIS write setPKTDIS;
  12261. property PKTDIS_TOKBUSY : TBits_1 read getPKTDIS_TOKBUSY write setPKTDIS_TOKBUSY;
  12262. property PPBRST : TBits_1 read getPPBRST write setPPBRST;
  12263. property RESUME : TBits_1 read getRESUME write setRESUME;
  12264. property SE0 : TBits_1 read getSE0 write setSE0;
  12265. property SOFEN : TBits_1 read getSOFEN write setSOFEN;
  12266. property TOKBUSY : TBits_1 read getTOKBUSY write setTOKBUSY;
  12267. property USBEN : TBits_1 read getUSBEN write setUSBEN;
  12268. property USBEN_SOFEN : TBits_1 read getUSBEN_SOFEN write setUSBEN_SOFEN;
  12269. property USBRST : TBits_1 read getUSBRST write setUSBRST;
  12270. end;
  12271. TUSB_U1ADDR = record
  12272. private
  12273. function getDEVADDR : TBits_7; inline;
  12274. function getDEVADDR0 : TBits_1; inline;
  12275. function getDEVADDR1 : TBits_1; inline;
  12276. function getDEVADDR2 : TBits_1; inline;
  12277. function getDEVADDR3 : TBits_1; inline;
  12278. function getDEVADDR4 : TBits_1; inline;
  12279. function getDEVADDR5 : TBits_1; inline;
  12280. function getDEVADDR6 : TBits_1; inline;
  12281. function getLSPDEN : TBits_1; inline;
  12282. procedure setDEVADDR(thebits : TBits_7); inline;
  12283. procedure setDEVADDR0(thebits : TBits_1); inline;
  12284. procedure setDEVADDR1(thebits : TBits_1); inline;
  12285. procedure setDEVADDR2(thebits : TBits_1); inline;
  12286. procedure setDEVADDR3(thebits : TBits_1); inline;
  12287. procedure setDEVADDR4(thebits : TBits_1); inline;
  12288. procedure setDEVADDR5(thebits : TBits_1); inline;
  12289. procedure setDEVADDR6(thebits : TBits_1); inline;
  12290. procedure setLSPDEN(thebits : TBits_1); inline;
  12291. public
  12292. procedure clearDEVADDR0; inline;
  12293. procedure clearDEVADDR1; inline;
  12294. procedure clearDEVADDR2; inline;
  12295. procedure clearDEVADDR3; inline;
  12296. procedure clearDEVADDR4; inline;
  12297. procedure clearDEVADDR5; inline;
  12298. procedure clearDEVADDR6; inline;
  12299. procedure clearLSPDEN; inline;
  12300. procedure setDEVADDR0; inline;
  12301. procedure setDEVADDR1; inline;
  12302. procedure setDEVADDR2; inline;
  12303. procedure setDEVADDR3; inline;
  12304. procedure setDEVADDR4; inline;
  12305. procedure setDEVADDR5; inline;
  12306. procedure setDEVADDR6; inline;
  12307. procedure setLSPDEN; inline;
  12308. property DEVADDR : TBits_7 read getDEVADDR write setDEVADDR;
  12309. property DEVADDR0 : TBits_1 read getDEVADDR0 write setDEVADDR0;
  12310. property DEVADDR1 : TBits_1 read getDEVADDR1 write setDEVADDR1;
  12311. property DEVADDR2 : TBits_1 read getDEVADDR2 write setDEVADDR2;
  12312. property DEVADDR3 : TBits_1 read getDEVADDR3 write setDEVADDR3;
  12313. property DEVADDR4 : TBits_1 read getDEVADDR4 write setDEVADDR4;
  12314. property DEVADDR5 : TBits_1 read getDEVADDR5 write setDEVADDR5;
  12315. property DEVADDR6 : TBits_1 read getDEVADDR6 write setDEVADDR6;
  12316. property LSPDEN : TBits_1 read getLSPDEN write setLSPDEN;
  12317. end;
  12318. TUSB_U1FRML = record
  12319. private
  12320. function getFRM0 : TBits_1; inline;
  12321. function getFRM1 : TBits_1; inline;
  12322. function getFRM2 : TBits_1; inline;
  12323. function getFRM3 : TBits_1; inline;
  12324. function getFRM4 : TBits_1; inline;
  12325. function getFRM5 : TBits_1; inline;
  12326. function getFRM6 : TBits_1; inline;
  12327. function getFRM7 : TBits_1; inline;
  12328. function getFRML : TBits_8; inline;
  12329. procedure setFRM0(thebits : TBits_1); inline;
  12330. procedure setFRM1(thebits : TBits_1); inline;
  12331. procedure setFRM2(thebits : TBits_1); inline;
  12332. procedure setFRM3(thebits : TBits_1); inline;
  12333. procedure setFRM4(thebits : TBits_1); inline;
  12334. procedure setFRM5(thebits : TBits_1); inline;
  12335. procedure setFRM6(thebits : TBits_1); inline;
  12336. procedure setFRM7(thebits : TBits_1); inline;
  12337. procedure setFRML(thebits : TBits_8); inline;
  12338. public
  12339. procedure clearFRM0; inline;
  12340. procedure clearFRM1; inline;
  12341. procedure clearFRM2; inline;
  12342. procedure clearFRM3; inline;
  12343. procedure clearFRM4; inline;
  12344. procedure clearFRM5; inline;
  12345. procedure clearFRM6; inline;
  12346. procedure clearFRM7; inline;
  12347. procedure setFRM0; inline;
  12348. procedure setFRM1; inline;
  12349. procedure setFRM2; inline;
  12350. procedure setFRM3; inline;
  12351. procedure setFRM4; inline;
  12352. procedure setFRM5; inline;
  12353. procedure setFRM6; inline;
  12354. procedure setFRM7; inline;
  12355. property FRM0 : TBits_1 read getFRM0 write setFRM0;
  12356. property FRM1 : TBits_1 read getFRM1 write setFRM1;
  12357. property FRM2 : TBits_1 read getFRM2 write setFRM2;
  12358. property FRM3 : TBits_1 read getFRM3 write setFRM3;
  12359. property FRM4 : TBits_1 read getFRM4 write setFRM4;
  12360. property FRM5 : TBits_1 read getFRM5 write setFRM5;
  12361. property FRM6 : TBits_1 read getFRM6 write setFRM6;
  12362. property FRM7 : TBits_1 read getFRM7 write setFRM7;
  12363. property FRML : TBits_8 read getFRML write setFRML;
  12364. end;
  12365. TUSB_U1FRMH = record
  12366. private
  12367. function getFRM10 : TBits_1; inline;
  12368. function getFRM8 : TBits_1; inline;
  12369. function getFRM9 : TBits_1; inline;
  12370. function getFRMH : TBits_3; inline;
  12371. procedure setFRM10(thebits : TBits_1); inline;
  12372. procedure setFRM8(thebits : TBits_1); inline;
  12373. procedure setFRM9(thebits : TBits_1); inline;
  12374. procedure setFRMH(thebits : TBits_3); inline;
  12375. public
  12376. procedure clearFRM10; inline;
  12377. procedure clearFRM8; inline;
  12378. procedure clearFRM9; inline;
  12379. procedure setFRM10; inline;
  12380. procedure setFRM8; inline;
  12381. procedure setFRM9; inline;
  12382. property FRM10 : TBits_1 read getFRM10 write setFRM10;
  12383. property FRM8 : TBits_1 read getFRM8 write setFRM8;
  12384. property FRM9 : TBits_1 read getFRM9 write setFRM9;
  12385. property FRMH : TBits_3 read getFRMH write setFRMH;
  12386. end;
  12387. TUSB_U1TOK = record
  12388. private
  12389. function getEP : TBits_4; inline;
  12390. function getEP0 : TBits_1; inline;
  12391. function getEP1 : TBits_1; inline;
  12392. function getEP2 : TBits_1; inline;
  12393. function getEP3 : TBits_1; inline;
  12394. function getPID : TBits_4; inline;
  12395. function getPID0 : TBits_1; inline;
  12396. function getPID1 : TBits_1; inline;
  12397. function getPID2 : TBits_1; inline;
  12398. function getPID3 : TBits_1; inline;
  12399. procedure setEP(thebits : TBits_4); inline;
  12400. procedure setEP0(thebits : TBits_1); inline;
  12401. procedure setEP1(thebits : TBits_1); inline;
  12402. procedure setEP2(thebits : TBits_1); inline;
  12403. procedure setEP3(thebits : TBits_1); inline;
  12404. procedure setPID(thebits : TBits_4); inline;
  12405. procedure setPID0(thebits : TBits_1); inline;
  12406. procedure setPID1(thebits : TBits_1); inline;
  12407. procedure setPID2(thebits : TBits_1); inline;
  12408. procedure setPID3(thebits : TBits_1); inline;
  12409. public
  12410. procedure clearEP0; inline;
  12411. procedure clearEP1; inline;
  12412. procedure clearEP2; inline;
  12413. procedure clearEP3; inline;
  12414. procedure clearPID0; inline;
  12415. procedure clearPID1; inline;
  12416. procedure clearPID2; inline;
  12417. procedure clearPID3; inline;
  12418. procedure setEP0; inline;
  12419. procedure setEP1; inline;
  12420. procedure setEP2; inline;
  12421. procedure setEP3; inline;
  12422. procedure setPID0; inline;
  12423. procedure setPID1; inline;
  12424. procedure setPID2; inline;
  12425. procedure setPID3; inline;
  12426. property EP : TBits_4 read getEP write setEP;
  12427. property EP0 : TBits_1 read getEP0 write setEP0;
  12428. property EP1 : TBits_1 read getEP1 write setEP1;
  12429. property EP2 : TBits_1 read getEP2 write setEP2;
  12430. property EP3 : TBits_1 read getEP3 write setEP3;
  12431. property PID : TBits_4 read getPID write setPID;
  12432. property PID0 : TBits_1 read getPID0 write setPID0;
  12433. property PID1 : TBits_1 read getPID1 write setPID1;
  12434. property PID2 : TBits_1 read getPID2 write setPID2;
  12435. property PID3 : TBits_1 read getPID3 write setPID3;
  12436. end;
  12437. type
  12438. TUSBRegisters = record
  12439. U1OTGIR : longWord;
  12440. U1OTGIRCLR : longWord;
  12441. U1OTGIE : longWord;
  12442. U1OTGIECLR : longWord;
  12443. U1OTGIESET : longWord;
  12444. U1OTGIEINV : longWord;
  12445. U1OTGSTAT : longWord;
  12446. U1OTGCON : longWord;
  12447. U1OTGCONCLR : longWord;
  12448. U1OTGCONSET : longWord;
  12449. U1OTGCONINV : longWord;
  12450. U1PWRC : longWord;
  12451. U1PWRCCLR : longWord;
  12452. U1PWRCSET : longWord;
  12453. U1PWRCINV : longWord;
  12454. U1IRbits : TUSB_U1IR;
  12455. U1IR : longWord;
  12456. U1IRCLR : longWord;
  12457. U1IEbits : TUSB_U1IE;
  12458. U1IE : longWord;
  12459. U1IECLR : longWord;
  12460. U1IESET : longWord;
  12461. U1IEINV : longWord;
  12462. U1EIRbits : TUSB_U1EIR;
  12463. U1EIR : longWord;
  12464. U1EIRCLR : longWord;
  12465. U1EIEbits : TUSB_U1EIE;
  12466. U1EIE : longWord;
  12467. U1EIECLR : longWord;
  12468. U1EIESET : longWord;
  12469. U1EIEINV : longWord;
  12470. U1STATbits : TUSB_U1STAT;
  12471. U1STAT : longWord;
  12472. U1CONbits : TUSB_U1CON;
  12473. U1CON : longWord;
  12474. U1CONCLR : longWord;
  12475. U1CONSET : longWord;
  12476. U1CONINV : longWord;
  12477. U1ADDRbits : TUSB_U1ADDR;
  12478. U1ADDR : longWord;
  12479. U1ADDRCLR : longWord;
  12480. U1ADDRSET : longWord;
  12481. U1ADDRINV : longWord;
  12482. U1BDTP1 : longWord;
  12483. U1BDTP1CLR : longWord;
  12484. U1BDTP1SET : longWord;
  12485. U1BDTP1INV : longWord;
  12486. U1FRMLbits : TUSB_U1FRML;
  12487. U1FRML : longWord;
  12488. U1FRMHbits : TUSB_U1FRMH;
  12489. U1FRMH : longWord;
  12490. U1TOKbits : TUSB_U1TOK;
  12491. U1TOK : longWord;
  12492. U1TOKCLR : longWord;
  12493. U1TOKSET : longWord;
  12494. U1TOKINV : longWord;
  12495. U1SOF : longWord;
  12496. U1SOFCLR : longWord;
  12497. U1SOFSET : longWord;
  12498. U1SOFINV : longWord;
  12499. U1BDTP2 : longWord;
  12500. U1BDTP2CLR : longWord;
  12501. U1BDTP2SET : longWord;
  12502. U1BDTP2INV : longWord;
  12503. U1BDTP3 : longWord;
  12504. U1BDTP3CLR : longWord;
  12505. U1BDTP3SET : longWord;
  12506. U1BDTP3INV : longWord;
  12507. U1CNFG1 : longWord;
  12508. U1CNFG1CLR : longWord;
  12509. U1CNFG1SET : longWord;
  12510. U1CNFG1INV : longWord;
  12511. U1EP0 : longWord;
  12512. U1EP0CLR : longWord;
  12513. U1EP0SET : longWord;
  12514. U1EP0INV : longWord;
  12515. U1EP1 : longWord;
  12516. U1EP1CLR : longWord;
  12517. U1EP1SET : longWord;
  12518. U1EP1INV : longWord;
  12519. U1EP2 : longWord;
  12520. U1EP2CLR : longWord;
  12521. U1EP2SET : longWord;
  12522. U1EP2INV : longWord;
  12523. U1EP3 : longWord;
  12524. U1EP3CLR : longWord;
  12525. U1EP3SET : longWord;
  12526. U1EP3INV : longWord;
  12527. U1EP4 : longWord;
  12528. U1EP4CLR : longWord;
  12529. U1EP4SET : longWord;
  12530. U1EP4INV : longWord;
  12531. U1EP5 : longWord;
  12532. U1EP5CLR : longWord;
  12533. U1EP5SET : longWord;
  12534. U1EP5INV : longWord;
  12535. U1EP6 : longWord;
  12536. U1EP6CLR : longWord;
  12537. U1EP6SET : longWord;
  12538. U1EP6INV : longWord;
  12539. U1EP7 : longWord;
  12540. U1EP7CLR : longWord;
  12541. U1EP7SET : longWord;
  12542. U1EP7INV : longWord;
  12543. U1EP8 : longWord;
  12544. U1EP8CLR : longWord;
  12545. U1EP8SET : longWord;
  12546. U1EP8INV : longWord;
  12547. U1EP9 : longWord;
  12548. U1EP9CLR : longWord;
  12549. U1EP9SET : longWord;
  12550. U1EP9INV : longWord;
  12551. U1EP10 : longWord;
  12552. U1EP10CLR : longWord;
  12553. U1EP10SET : longWord;
  12554. U1EP10INV : longWord;
  12555. U1EP11 : longWord;
  12556. U1EP11CLR : longWord;
  12557. U1EP11SET : longWord;
  12558. U1EP11INV : longWord;
  12559. U1EP12 : longWord;
  12560. U1EP12CLR : longWord;
  12561. U1EP12SET : longWord;
  12562. U1EP12INV : longWord;
  12563. U1EP13 : longWord;
  12564. U1EP13CLR : longWord;
  12565. U1EP13SET : longWord;
  12566. U1EP13INV : longWord;
  12567. U1EP14 : longWord;
  12568. U1EP14CLR : longWord;
  12569. U1EP14SET : longWord;
  12570. U1EP14INV : longWord;
  12571. U1EP15 : longWord;
  12572. U1EP15CLR : longWord;
  12573. U1EP15SET : longWord;
  12574. U1EP15INV : longWord;
  12575. end;
  12576. TPORTB_TRISB = record
  12577. private
  12578. function getTRISB0 : TBits_1; inline;
  12579. function getTRISB1 : TBits_1; inline;
  12580. function getTRISB10 : TBits_1; inline;
  12581. function getTRISB11 : TBits_1; inline;
  12582. function getTRISB12 : TBits_1; inline;
  12583. function getTRISB13 : TBits_1; inline;
  12584. function getTRISB14 : TBits_1; inline;
  12585. function getTRISB15 : TBits_1; inline;
  12586. function getTRISB2 : TBits_1; inline;
  12587. function getTRISB3 : TBits_1; inline;
  12588. function getTRISB4 : TBits_1; inline;
  12589. function getTRISB5 : TBits_1; inline;
  12590. function getTRISB6 : TBits_1; inline;
  12591. function getTRISB7 : TBits_1; inline;
  12592. function getTRISB8 : TBits_1; inline;
  12593. function getTRISB9 : TBits_1; inline;
  12594. function getw : TBits_32; inline;
  12595. procedure setTRISB0(thebits : TBits_1); inline;
  12596. procedure setTRISB1(thebits : TBits_1); inline;
  12597. procedure setTRISB10(thebits : TBits_1); inline;
  12598. procedure setTRISB11(thebits : TBits_1); inline;
  12599. procedure setTRISB12(thebits : TBits_1); inline;
  12600. procedure setTRISB13(thebits : TBits_1); inline;
  12601. procedure setTRISB14(thebits : TBits_1); inline;
  12602. procedure setTRISB15(thebits : TBits_1); inline;
  12603. procedure setTRISB2(thebits : TBits_1); inline;
  12604. procedure setTRISB3(thebits : TBits_1); inline;
  12605. procedure setTRISB4(thebits : TBits_1); inline;
  12606. procedure setTRISB5(thebits : TBits_1); inline;
  12607. procedure setTRISB6(thebits : TBits_1); inline;
  12608. procedure setTRISB7(thebits : TBits_1); inline;
  12609. procedure setTRISB8(thebits : TBits_1); inline;
  12610. procedure setTRISB9(thebits : TBits_1); inline;
  12611. procedure setw(thebits : TBits_32); inline;
  12612. public
  12613. procedure clearTRISB0; inline;
  12614. procedure clearTRISB10; inline;
  12615. procedure clearTRISB11; inline;
  12616. procedure clearTRISB12; inline;
  12617. procedure clearTRISB13; inline;
  12618. procedure clearTRISB14; inline;
  12619. procedure clearTRISB15; inline;
  12620. procedure clearTRISB1; inline;
  12621. procedure clearTRISB2; inline;
  12622. procedure clearTRISB3; inline;
  12623. procedure clearTRISB4; inline;
  12624. procedure clearTRISB5; inline;
  12625. procedure clearTRISB6; inline;
  12626. procedure clearTRISB7; inline;
  12627. procedure clearTRISB8; inline;
  12628. procedure clearTRISB9; inline;
  12629. procedure setTRISB0; inline;
  12630. procedure setTRISB10; inline;
  12631. procedure setTRISB11; inline;
  12632. procedure setTRISB12; inline;
  12633. procedure setTRISB13; inline;
  12634. procedure setTRISB14; inline;
  12635. procedure setTRISB15; inline;
  12636. procedure setTRISB1; inline;
  12637. procedure setTRISB2; inline;
  12638. procedure setTRISB3; inline;
  12639. procedure setTRISB4; inline;
  12640. procedure setTRISB5; inline;
  12641. procedure setTRISB6; inline;
  12642. procedure setTRISB7; inline;
  12643. procedure setTRISB8; inline;
  12644. procedure setTRISB9; inline;
  12645. property TRISB0 : TBits_1 read getTRISB0 write setTRISB0;
  12646. property TRISB1 : TBits_1 read getTRISB1 write setTRISB1;
  12647. property TRISB10 : TBits_1 read getTRISB10 write setTRISB10;
  12648. property TRISB11 : TBits_1 read getTRISB11 write setTRISB11;
  12649. property TRISB12 : TBits_1 read getTRISB12 write setTRISB12;
  12650. property TRISB13 : TBits_1 read getTRISB13 write setTRISB13;
  12651. property TRISB14 : TBits_1 read getTRISB14 write setTRISB14;
  12652. property TRISB15 : TBits_1 read getTRISB15 write setTRISB15;
  12653. property TRISB2 : TBits_1 read getTRISB2 write setTRISB2;
  12654. property TRISB3 : TBits_1 read getTRISB3 write setTRISB3;
  12655. property TRISB4 : TBits_1 read getTRISB4 write setTRISB4;
  12656. property TRISB5 : TBits_1 read getTRISB5 write setTRISB5;
  12657. property TRISB6 : TBits_1 read getTRISB6 write setTRISB6;
  12658. property TRISB7 : TBits_1 read getTRISB7 write setTRISB7;
  12659. property TRISB8 : TBits_1 read getTRISB8 write setTRISB8;
  12660. property TRISB9 : TBits_1 read getTRISB9 write setTRISB9;
  12661. property w : TBits_32 read getw write setw;
  12662. end;
  12663. TPORTB_PORTB = record
  12664. private
  12665. function getRB0 : TBits_1; inline;
  12666. function getRB1 : TBits_1; inline;
  12667. function getRB10 : TBits_1; inline;
  12668. function getRB11 : TBits_1; inline;
  12669. function getRB12 : TBits_1; inline;
  12670. function getRB13 : TBits_1; inline;
  12671. function getRB14 : TBits_1; inline;
  12672. function getRB15 : TBits_1; inline;
  12673. function getRB2 : TBits_1; inline;
  12674. function getRB3 : TBits_1; inline;
  12675. function getRB4 : TBits_1; inline;
  12676. function getRB5 : TBits_1; inline;
  12677. function getRB6 : TBits_1; inline;
  12678. function getRB7 : TBits_1; inline;
  12679. function getRB8 : TBits_1; inline;
  12680. function getRB9 : TBits_1; inline;
  12681. function getw : TBits_32; inline;
  12682. procedure setRB0(thebits : TBits_1); inline;
  12683. procedure setRB1(thebits : TBits_1); inline;
  12684. procedure setRB10(thebits : TBits_1); inline;
  12685. procedure setRB11(thebits : TBits_1); inline;
  12686. procedure setRB12(thebits : TBits_1); inline;
  12687. procedure setRB13(thebits : TBits_1); inline;
  12688. procedure setRB14(thebits : TBits_1); inline;
  12689. procedure setRB15(thebits : TBits_1); inline;
  12690. procedure setRB2(thebits : TBits_1); inline;
  12691. procedure setRB3(thebits : TBits_1); inline;
  12692. procedure setRB4(thebits : TBits_1); inline;
  12693. procedure setRB5(thebits : TBits_1); inline;
  12694. procedure setRB6(thebits : TBits_1); inline;
  12695. procedure setRB7(thebits : TBits_1); inline;
  12696. procedure setRB8(thebits : TBits_1); inline;
  12697. procedure setRB9(thebits : TBits_1); inline;
  12698. procedure setw(thebits : TBits_32); inline;
  12699. public
  12700. procedure clearRB0; inline;
  12701. procedure clearRB10; inline;
  12702. procedure clearRB11; inline;
  12703. procedure clearRB12; inline;
  12704. procedure clearRB13; inline;
  12705. procedure clearRB14; inline;
  12706. procedure clearRB15; inline;
  12707. procedure clearRB1; inline;
  12708. procedure clearRB2; inline;
  12709. procedure clearRB3; inline;
  12710. procedure clearRB4; inline;
  12711. procedure clearRB5; inline;
  12712. procedure clearRB6; inline;
  12713. procedure clearRB7; inline;
  12714. procedure clearRB8; inline;
  12715. procedure clearRB9; inline;
  12716. procedure setRB0; inline;
  12717. procedure setRB10; inline;
  12718. procedure setRB11; inline;
  12719. procedure setRB12; inline;
  12720. procedure setRB13; inline;
  12721. procedure setRB14; inline;
  12722. procedure setRB15; inline;
  12723. procedure setRB1; inline;
  12724. procedure setRB2; inline;
  12725. procedure setRB3; inline;
  12726. procedure setRB4; inline;
  12727. procedure setRB5; inline;
  12728. procedure setRB6; inline;
  12729. procedure setRB7; inline;
  12730. procedure setRB8; inline;
  12731. procedure setRB9; inline;
  12732. property RB0 : TBits_1 read getRB0 write setRB0;
  12733. property RB1 : TBits_1 read getRB1 write setRB1;
  12734. property RB10 : TBits_1 read getRB10 write setRB10;
  12735. property RB11 : TBits_1 read getRB11 write setRB11;
  12736. property RB12 : TBits_1 read getRB12 write setRB12;
  12737. property RB13 : TBits_1 read getRB13 write setRB13;
  12738. property RB14 : TBits_1 read getRB14 write setRB14;
  12739. property RB15 : TBits_1 read getRB15 write setRB15;
  12740. property RB2 : TBits_1 read getRB2 write setRB2;
  12741. property RB3 : TBits_1 read getRB3 write setRB3;
  12742. property RB4 : TBits_1 read getRB4 write setRB4;
  12743. property RB5 : TBits_1 read getRB5 write setRB5;
  12744. property RB6 : TBits_1 read getRB6 write setRB6;
  12745. property RB7 : TBits_1 read getRB7 write setRB7;
  12746. property RB8 : TBits_1 read getRB8 write setRB8;
  12747. property RB9 : TBits_1 read getRB9 write setRB9;
  12748. property w : TBits_32 read getw write setw;
  12749. end;
  12750. 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);
  12751. TPortB_bitset = set of TPortB_bits;
  12752. TPORTB_LATB = record
  12753. private
  12754. function getLATB0 : TBits_1; inline;
  12755. function getLATB1 : TBits_1; inline;
  12756. function getLATB10 : TBits_1; inline;
  12757. function getLATB11 : TBits_1; inline;
  12758. function getLATB12 : TBits_1; inline;
  12759. function getLATB13 : TBits_1; inline;
  12760. function getLATB14 : TBits_1; inline;
  12761. function getLATB15 : TBits_1; inline;
  12762. function getLATB2 : TBits_1; inline;
  12763. function getLATB3 : TBits_1; inline;
  12764. function getLATB4 : TBits_1; inline;
  12765. function getLATB5 : TBits_1; inline;
  12766. function getLATB6 : TBits_1; inline;
  12767. function getLATB7 : TBits_1; inline;
  12768. function getLATB8 : TBits_1; inline;
  12769. function getLATB9 : TBits_1; inline;
  12770. function getw : TBits_32; inline;
  12771. procedure setLATB0(thebits : TBits_1); inline;
  12772. procedure setLATB1(thebits : TBits_1); inline;
  12773. procedure setLATB10(thebits : TBits_1); inline;
  12774. procedure setLATB11(thebits : TBits_1); inline;
  12775. procedure setLATB12(thebits : TBits_1); inline;
  12776. procedure setLATB13(thebits : TBits_1); inline;
  12777. procedure setLATB14(thebits : TBits_1); inline;
  12778. procedure setLATB15(thebits : TBits_1); inline;
  12779. procedure setLATB2(thebits : TBits_1); inline;
  12780. procedure setLATB3(thebits : TBits_1); inline;
  12781. procedure setLATB4(thebits : TBits_1); inline;
  12782. procedure setLATB5(thebits : TBits_1); inline;
  12783. procedure setLATB6(thebits : TBits_1); inline;
  12784. procedure setLATB7(thebits : TBits_1); inline;
  12785. procedure setLATB8(thebits : TBits_1); inline;
  12786. procedure setLATB9(thebits : TBits_1); inline;
  12787. procedure setw(thebits : TBits_32); inline;
  12788. public
  12789. procedure clearLATB0; inline;
  12790. procedure clearLATB10; inline;
  12791. procedure clearLATB11; inline;
  12792. procedure clearLATB12; inline;
  12793. procedure clearLATB13; inline;
  12794. procedure clearLATB14; inline;
  12795. procedure clearLATB15; inline;
  12796. procedure clearLATB1; inline;
  12797. procedure clearLATB2; inline;
  12798. procedure clearLATB3; inline;
  12799. procedure clearLATB4; inline;
  12800. procedure clearLATB5; inline;
  12801. procedure clearLATB6; inline;
  12802. procedure clearLATB7; inline;
  12803. procedure clearLATB8; inline;
  12804. procedure clearLATB9; inline;
  12805. procedure setLATB0; inline;
  12806. procedure setLATB10; inline;
  12807. procedure setLATB11; inline;
  12808. procedure setLATB12; inline;
  12809. procedure setLATB13; inline;
  12810. procedure setLATB14; inline;
  12811. procedure setLATB15; inline;
  12812. procedure setLATB1; inline;
  12813. procedure setLATB2; inline;
  12814. procedure setLATB3; inline;
  12815. procedure setLATB4; inline;
  12816. procedure setLATB5; inline;
  12817. procedure setLATB6; inline;
  12818. procedure setLATB7; inline;
  12819. procedure setLATB8; inline;
  12820. procedure setLATB9; inline;
  12821. property LATB0 : TBits_1 read getLATB0 write setLATB0;
  12822. property LATB1 : TBits_1 read getLATB1 write setLATB1;
  12823. property LATB10 : TBits_1 read getLATB10 write setLATB10;
  12824. property LATB11 : TBits_1 read getLATB11 write setLATB11;
  12825. property LATB12 : TBits_1 read getLATB12 write setLATB12;
  12826. property LATB13 : TBits_1 read getLATB13 write setLATB13;
  12827. property LATB14 : TBits_1 read getLATB14 write setLATB14;
  12828. property LATB15 : TBits_1 read getLATB15 write setLATB15;
  12829. property LATB2 : TBits_1 read getLATB2 write setLATB2;
  12830. property LATB3 : TBits_1 read getLATB3 write setLATB3;
  12831. property LATB4 : TBits_1 read getLATB4 write setLATB4;
  12832. property LATB5 : TBits_1 read getLATB5 write setLATB5;
  12833. property LATB6 : TBits_1 read getLATB6 write setLATB6;
  12834. property LATB7 : TBits_1 read getLATB7 write setLATB7;
  12835. property LATB8 : TBits_1 read getLATB8 write setLATB8;
  12836. property LATB9 : TBits_1 read getLATB9 write setLATB9;
  12837. property w : TBits_32 read getw write setw;
  12838. end;
  12839. TPORTB_ODCB = record
  12840. private
  12841. function getODCB0 : TBits_1; inline;
  12842. function getODCB1 : TBits_1; inline;
  12843. function getODCB10 : TBits_1; inline;
  12844. function getODCB11 : TBits_1; inline;
  12845. function getODCB12 : TBits_1; inline;
  12846. function getODCB13 : TBits_1; inline;
  12847. function getODCB14 : TBits_1; inline;
  12848. function getODCB15 : TBits_1; inline;
  12849. function getODCB2 : TBits_1; inline;
  12850. function getODCB3 : TBits_1; inline;
  12851. function getODCB4 : TBits_1; inline;
  12852. function getODCB5 : TBits_1; inline;
  12853. function getODCB6 : TBits_1; inline;
  12854. function getODCB7 : TBits_1; inline;
  12855. function getODCB8 : TBits_1; inline;
  12856. function getODCB9 : TBits_1; inline;
  12857. function getw : TBits_32; inline;
  12858. procedure setODCB0(thebits : TBits_1); inline;
  12859. procedure setODCB1(thebits : TBits_1); inline;
  12860. procedure setODCB10(thebits : TBits_1); inline;
  12861. procedure setODCB11(thebits : TBits_1); inline;
  12862. procedure setODCB12(thebits : TBits_1); inline;
  12863. procedure setODCB13(thebits : TBits_1); inline;
  12864. procedure setODCB14(thebits : TBits_1); inline;
  12865. procedure setODCB15(thebits : TBits_1); inline;
  12866. procedure setODCB2(thebits : TBits_1); inline;
  12867. procedure setODCB3(thebits : TBits_1); inline;
  12868. procedure setODCB4(thebits : TBits_1); inline;
  12869. procedure setODCB5(thebits : TBits_1); inline;
  12870. procedure setODCB6(thebits : TBits_1); inline;
  12871. procedure setODCB7(thebits : TBits_1); inline;
  12872. procedure setODCB8(thebits : TBits_1); inline;
  12873. procedure setODCB9(thebits : TBits_1); inline;
  12874. procedure setw(thebits : TBits_32); inline;
  12875. public
  12876. procedure clearODCB0; inline;
  12877. procedure clearODCB10; inline;
  12878. procedure clearODCB11; inline;
  12879. procedure clearODCB12; inline;
  12880. procedure clearODCB13; inline;
  12881. procedure clearODCB14; inline;
  12882. procedure clearODCB15; inline;
  12883. procedure clearODCB1; inline;
  12884. procedure clearODCB2; inline;
  12885. procedure clearODCB3; inline;
  12886. procedure clearODCB4; inline;
  12887. procedure clearODCB5; inline;
  12888. procedure clearODCB6; inline;
  12889. procedure clearODCB7; inline;
  12890. procedure clearODCB8; inline;
  12891. procedure clearODCB9; inline;
  12892. procedure setODCB0; inline;
  12893. procedure setODCB10; inline;
  12894. procedure setODCB11; inline;
  12895. procedure setODCB12; inline;
  12896. procedure setODCB13; inline;
  12897. procedure setODCB14; inline;
  12898. procedure setODCB15; inline;
  12899. procedure setODCB1; inline;
  12900. procedure setODCB2; inline;
  12901. procedure setODCB3; inline;
  12902. procedure setODCB4; inline;
  12903. procedure setODCB5; inline;
  12904. procedure setODCB6; inline;
  12905. procedure setODCB7; inline;
  12906. procedure setODCB8; inline;
  12907. procedure setODCB9; inline;
  12908. property ODCB0 : TBits_1 read getODCB0 write setODCB0;
  12909. property ODCB1 : TBits_1 read getODCB1 write setODCB1;
  12910. property ODCB10 : TBits_1 read getODCB10 write setODCB10;
  12911. property ODCB11 : TBits_1 read getODCB11 write setODCB11;
  12912. property ODCB12 : TBits_1 read getODCB12 write setODCB12;
  12913. property ODCB13 : TBits_1 read getODCB13 write setODCB13;
  12914. property ODCB14 : TBits_1 read getODCB14 write setODCB14;
  12915. property ODCB15 : TBits_1 read getODCB15 write setODCB15;
  12916. property ODCB2 : TBits_1 read getODCB2 write setODCB2;
  12917. property ODCB3 : TBits_1 read getODCB3 write setODCB3;
  12918. property ODCB4 : TBits_1 read getODCB4 write setODCB4;
  12919. property ODCB5 : TBits_1 read getODCB5 write setODCB5;
  12920. property ODCB6 : TBits_1 read getODCB6 write setODCB6;
  12921. property ODCB7 : TBits_1 read getODCB7 write setODCB7;
  12922. property ODCB8 : TBits_1 read getODCB8 write setODCB8;
  12923. property ODCB9 : TBits_1 read getODCB9 write setODCB9;
  12924. property w : TBits_32 read getw write setw;
  12925. end;
  12926. type
  12927. TPORTBRegisters = record
  12928. TRISBbits : TPORTB_TRISB;
  12929. TRISB : longWord;
  12930. TRISBCLR : longWord;
  12931. TRISBSET : longWord;
  12932. TRISBINV : longWord;
  12933. PORTBbits : TPORTB_PORTB;
  12934. PORTB : longWord;
  12935. PORTBCLR : longWord;
  12936. PORTBSET : longWord;
  12937. PORTBINV : longWord;
  12938. LATBbits : TPORTB_LATB;
  12939. LATB : longWord;
  12940. LATBCLR : longWord;
  12941. LATBSET : longWord;
  12942. LATBINV : longWord;
  12943. ODCBbits : TPORTB_ODCB;
  12944. ODCB : longWord;
  12945. ODCBCLR : longWord;
  12946. ODCBSET : longWord;
  12947. ODCBINV : longWord;
  12948. end;
  12949. TPORTC_TRISC = record
  12950. private
  12951. function getTRISC12 : TBits_1; inline;
  12952. function getTRISC13 : TBits_1; inline;
  12953. function getTRISC14 : TBits_1; inline;
  12954. function getTRISC15 : TBits_1; inline;
  12955. function getw : TBits_32; inline;
  12956. procedure setTRISC12(thebits : TBits_1); inline;
  12957. procedure setTRISC13(thebits : TBits_1); inline;
  12958. procedure setTRISC14(thebits : TBits_1); inline;
  12959. procedure setTRISC15(thebits : TBits_1); inline;
  12960. procedure setw(thebits : TBits_32); inline;
  12961. public
  12962. procedure clearTRISC12; inline;
  12963. procedure clearTRISC13; inline;
  12964. procedure clearTRISC14; inline;
  12965. procedure clearTRISC15; inline;
  12966. procedure setTRISC12; inline;
  12967. procedure setTRISC13; inline;
  12968. procedure setTRISC14; inline;
  12969. procedure setTRISC15; inline;
  12970. property TRISC12 : TBits_1 read getTRISC12 write setTRISC12;
  12971. property TRISC13 : TBits_1 read getTRISC13 write setTRISC13;
  12972. property TRISC14 : TBits_1 read getTRISC14 write setTRISC14;
  12973. property TRISC15 : TBits_1 read getTRISC15 write setTRISC15;
  12974. property w : TBits_32 read getw write setw;
  12975. end;
  12976. TPORTC_PORTC = record
  12977. private
  12978. function getRC12 : TBits_1; inline;
  12979. function getRC13 : TBits_1; inline;
  12980. function getRC14 : TBits_1; inline;
  12981. function getRC15 : TBits_1; inline;
  12982. function getw : TBits_32; inline;
  12983. procedure setRC12(thebits : TBits_1); inline;
  12984. procedure setRC13(thebits : TBits_1); inline;
  12985. procedure setRC14(thebits : TBits_1); inline;
  12986. procedure setRC15(thebits : TBits_1); inline;
  12987. procedure setw(thebits : TBits_32); inline;
  12988. public
  12989. procedure clearRC12; inline;
  12990. procedure clearRC13; inline;
  12991. procedure clearRC14; inline;
  12992. procedure clearRC15; inline;
  12993. procedure setRC12; inline;
  12994. procedure setRC13; inline;
  12995. procedure setRC14; inline;
  12996. procedure setRC15; inline;
  12997. property RC12 : TBits_1 read getRC12 write setRC12;
  12998. property RC13 : TBits_1 read getRC13 write setRC13;
  12999. property RC14 : TBits_1 read getRC14 write setRC14;
  13000. property RC15 : TBits_1 read getRC15 write setRC15;
  13001. property w : TBits_32 read getw write setw;
  13002. end;
  13003. TPortC_bits=(RC12=12,RC13=13,RC14=14,RC15=15);
  13004. TPortC_bitset = set of TPortC_bits;
  13005. TPORTC_LATC = record
  13006. private
  13007. function getLATC12 : TBits_1; inline;
  13008. function getLATC13 : TBits_1; inline;
  13009. function getLATC14 : TBits_1; inline;
  13010. function getLATC15 : TBits_1; inline;
  13011. function getw : TBits_32; inline;
  13012. procedure setLATC12(thebits : TBits_1); inline;
  13013. procedure setLATC13(thebits : TBits_1); inline;
  13014. procedure setLATC14(thebits : TBits_1); inline;
  13015. procedure setLATC15(thebits : TBits_1); inline;
  13016. procedure setw(thebits : TBits_32); inline;
  13017. public
  13018. procedure clearLATC12; inline;
  13019. procedure clearLATC13; inline;
  13020. procedure clearLATC14; inline;
  13021. procedure clearLATC15; inline;
  13022. procedure setLATC12; inline;
  13023. procedure setLATC13; inline;
  13024. procedure setLATC14; inline;
  13025. procedure setLATC15; inline;
  13026. property LATC12 : TBits_1 read getLATC12 write setLATC12;
  13027. property LATC13 : TBits_1 read getLATC13 write setLATC13;
  13028. property LATC14 : TBits_1 read getLATC14 write setLATC14;
  13029. property LATC15 : TBits_1 read getLATC15 write setLATC15;
  13030. property w : TBits_32 read getw write setw;
  13031. end;
  13032. TPORTC_ODCC = record
  13033. private
  13034. function getODCC12 : TBits_1; inline;
  13035. function getODCC13 : TBits_1; inline;
  13036. function getODCC14 : TBits_1; inline;
  13037. function getODCC15 : TBits_1; inline;
  13038. function getw : TBits_32; inline;
  13039. procedure setODCC12(thebits : TBits_1); inline;
  13040. procedure setODCC13(thebits : TBits_1); inline;
  13041. procedure setODCC14(thebits : TBits_1); inline;
  13042. procedure setODCC15(thebits : TBits_1); inline;
  13043. procedure setw(thebits : TBits_32); inline;
  13044. public
  13045. procedure clearODCC12; inline;
  13046. procedure clearODCC13; inline;
  13047. procedure clearODCC14; inline;
  13048. procedure clearODCC15; inline;
  13049. procedure setODCC12; inline;
  13050. procedure setODCC13; inline;
  13051. procedure setODCC14; inline;
  13052. procedure setODCC15; inline;
  13053. property ODCC12 : TBits_1 read getODCC12 write setODCC12;
  13054. property ODCC13 : TBits_1 read getODCC13 write setODCC13;
  13055. property ODCC14 : TBits_1 read getODCC14 write setODCC14;
  13056. property ODCC15 : TBits_1 read getODCC15 write setODCC15;
  13057. property w : TBits_32 read getw write setw;
  13058. end;
  13059. type
  13060. TPORTCRegisters = record
  13061. TRISCbits : TPORTC_TRISC;
  13062. TRISC : longWord;
  13063. TRISCCLR : longWord;
  13064. TRISCSET : longWord;
  13065. TRISCINV : longWord;
  13066. PORTCbits : TPORTC_PORTC;
  13067. PORTC : longWord;
  13068. PORTCCLR : longWord;
  13069. PORTCSET : longWord;
  13070. PORTCINV : longWord;
  13071. LATCbits : TPORTC_LATC;
  13072. LATC : longWord;
  13073. LATCCLR : longWord;
  13074. LATCSET : longWord;
  13075. LATCINV : longWord;
  13076. ODCCbits : TPORTC_ODCC;
  13077. ODCC : longWord;
  13078. ODCCCLR : longWord;
  13079. ODCCSET : longWord;
  13080. ODCCINV : longWord;
  13081. end;
  13082. TPORTD_TRISD = record
  13083. private
  13084. function getTRISD0 : TBits_1; inline;
  13085. function getTRISD1 : TBits_1; inline;
  13086. function getTRISD10 : TBits_1; inline;
  13087. function getTRISD11 : TBits_1; inline;
  13088. function getTRISD2 : TBits_1; inline;
  13089. function getTRISD3 : TBits_1; inline;
  13090. function getTRISD4 : TBits_1; inline;
  13091. function getTRISD5 : TBits_1; inline;
  13092. function getTRISD6 : TBits_1; inline;
  13093. function getTRISD7 : TBits_1; inline;
  13094. function getTRISD8 : TBits_1; inline;
  13095. function getTRISD9 : TBits_1; inline;
  13096. function getw : TBits_32; inline;
  13097. procedure setTRISD0(thebits : TBits_1); inline;
  13098. procedure setTRISD1(thebits : TBits_1); inline;
  13099. procedure setTRISD10(thebits : TBits_1); inline;
  13100. procedure setTRISD11(thebits : TBits_1); inline;
  13101. procedure setTRISD2(thebits : TBits_1); inline;
  13102. procedure setTRISD3(thebits : TBits_1); inline;
  13103. procedure setTRISD4(thebits : TBits_1); inline;
  13104. procedure setTRISD5(thebits : TBits_1); inline;
  13105. procedure setTRISD6(thebits : TBits_1); inline;
  13106. procedure setTRISD7(thebits : TBits_1); inline;
  13107. procedure setTRISD8(thebits : TBits_1); inline;
  13108. procedure setTRISD9(thebits : TBits_1); inline;
  13109. procedure setw(thebits : TBits_32); inline;
  13110. public
  13111. procedure clearTRISD0; inline;
  13112. procedure clearTRISD10; inline;
  13113. procedure clearTRISD11; inline;
  13114. procedure clearTRISD1; inline;
  13115. procedure clearTRISD2; inline;
  13116. procedure clearTRISD3; inline;
  13117. procedure clearTRISD4; inline;
  13118. procedure clearTRISD5; inline;
  13119. procedure clearTRISD6; inline;
  13120. procedure clearTRISD7; inline;
  13121. procedure clearTRISD8; inline;
  13122. procedure clearTRISD9; inline;
  13123. procedure setTRISD0; inline;
  13124. procedure setTRISD10; inline;
  13125. procedure setTRISD11; inline;
  13126. procedure setTRISD1; inline;
  13127. procedure setTRISD2; inline;
  13128. procedure setTRISD3; inline;
  13129. procedure setTRISD4; inline;
  13130. procedure setTRISD5; inline;
  13131. procedure setTRISD6; inline;
  13132. procedure setTRISD7; inline;
  13133. procedure setTRISD8; inline;
  13134. procedure setTRISD9; inline;
  13135. property TRISD0 : TBits_1 read getTRISD0 write setTRISD0;
  13136. property TRISD1 : TBits_1 read getTRISD1 write setTRISD1;
  13137. property TRISD10 : TBits_1 read getTRISD10 write setTRISD10;
  13138. property TRISD11 : TBits_1 read getTRISD11 write setTRISD11;
  13139. property TRISD2 : TBits_1 read getTRISD2 write setTRISD2;
  13140. property TRISD3 : TBits_1 read getTRISD3 write setTRISD3;
  13141. property TRISD4 : TBits_1 read getTRISD4 write setTRISD4;
  13142. property TRISD5 : TBits_1 read getTRISD5 write setTRISD5;
  13143. property TRISD6 : TBits_1 read getTRISD6 write setTRISD6;
  13144. property TRISD7 : TBits_1 read getTRISD7 write setTRISD7;
  13145. property TRISD8 : TBits_1 read getTRISD8 write setTRISD8;
  13146. property TRISD9 : TBits_1 read getTRISD9 write setTRISD9;
  13147. property w : TBits_32 read getw write setw;
  13148. end;
  13149. TPORTD_PORTD = record
  13150. private
  13151. function getRD0 : TBits_1; inline;
  13152. function getRD1 : TBits_1; inline;
  13153. function getRD10 : TBits_1; inline;
  13154. function getRD11 : TBits_1; inline;
  13155. function getRD2 : TBits_1; inline;
  13156. function getRD3 : TBits_1; inline;
  13157. function getRD4 : TBits_1; inline;
  13158. function getRD5 : TBits_1; inline;
  13159. function getRD6 : TBits_1; inline;
  13160. function getRD7 : TBits_1; inline;
  13161. function getRD8 : TBits_1; inline;
  13162. function getRD9 : TBits_1; inline;
  13163. function getw : TBits_32; inline;
  13164. procedure setRD0(thebits : TBits_1); inline;
  13165. procedure setRD1(thebits : TBits_1); inline;
  13166. procedure setRD10(thebits : TBits_1); inline;
  13167. procedure setRD11(thebits : TBits_1); inline;
  13168. procedure setRD2(thebits : TBits_1); inline;
  13169. procedure setRD3(thebits : TBits_1); inline;
  13170. procedure setRD4(thebits : TBits_1); inline;
  13171. procedure setRD5(thebits : TBits_1); inline;
  13172. procedure setRD6(thebits : TBits_1); inline;
  13173. procedure setRD7(thebits : TBits_1); inline;
  13174. procedure setRD8(thebits : TBits_1); inline;
  13175. procedure setRD9(thebits : TBits_1); inline;
  13176. procedure setw(thebits : TBits_32); inline;
  13177. public
  13178. procedure clearRD0; inline;
  13179. procedure clearRD10; inline;
  13180. procedure clearRD11; inline;
  13181. procedure clearRD1; inline;
  13182. procedure clearRD2; inline;
  13183. procedure clearRD3; inline;
  13184. procedure clearRD4; inline;
  13185. procedure clearRD5; inline;
  13186. procedure clearRD6; inline;
  13187. procedure clearRD7; inline;
  13188. procedure clearRD8; inline;
  13189. procedure clearRD9; inline;
  13190. procedure setRD0; inline;
  13191. procedure setRD10; inline;
  13192. procedure setRD11; inline;
  13193. procedure setRD1; inline;
  13194. procedure setRD2; inline;
  13195. procedure setRD3; inline;
  13196. procedure setRD4; inline;
  13197. procedure setRD5; inline;
  13198. procedure setRD6; inline;
  13199. procedure setRD7; inline;
  13200. procedure setRD8; inline;
  13201. procedure setRD9; inline;
  13202. property RD0 : TBits_1 read getRD0 write setRD0;
  13203. property RD1 : TBits_1 read getRD1 write setRD1;
  13204. property RD10 : TBits_1 read getRD10 write setRD10;
  13205. property RD11 : TBits_1 read getRD11 write setRD11;
  13206. property RD2 : TBits_1 read getRD2 write setRD2;
  13207. property RD3 : TBits_1 read getRD3 write setRD3;
  13208. property RD4 : TBits_1 read getRD4 write setRD4;
  13209. property RD5 : TBits_1 read getRD5 write setRD5;
  13210. property RD6 : TBits_1 read getRD6 write setRD6;
  13211. property RD7 : TBits_1 read getRD7 write setRD7;
  13212. property RD8 : TBits_1 read getRD8 write setRD8;
  13213. property RD9 : TBits_1 read getRD9 write setRD9;
  13214. property w : TBits_32 read getw write setw;
  13215. end;
  13216. 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);
  13217. TPortD_bitset = set of TPortD_bits;
  13218. TPORTD_LATD = record
  13219. private
  13220. function getLATD0 : TBits_1; inline;
  13221. function getLATD1 : TBits_1; inline;
  13222. function getLATD10 : TBits_1; inline;
  13223. function getLATD11 : TBits_1; inline;
  13224. function getLATD2 : TBits_1; inline;
  13225. function getLATD3 : TBits_1; inline;
  13226. function getLATD4 : TBits_1; inline;
  13227. function getLATD5 : TBits_1; inline;
  13228. function getLATD6 : TBits_1; inline;
  13229. function getLATD7 : TBits_1; inline;
  13230. function getLATD8 : TBits_1; inline;
  13231. function getLATD9 : TBits_1; inline;
  13232. function getw : TBits_32; inline;
  13233. procedure setLATD0(thebits : TBits_1); inline;
  13234. procedure setLATD1(thebits : TBits_1); inline;
  13235. procedure setLATD10(thebits : TBits_1); inline;
  13236. procedure setLATD11(thebits : TBits_1); inline;
  13237. procedure setLATD2(thebits : TBits_1); inline;
  13238. procedure setLATD3(thebits : TBits_1); inline;
  13239. procedure setLATD4(thebits : TBits_1); inline;
  13240. procedure setLATD5(thebits : TBits_1); inline;
  13241. procedure setLATD6(thebits : TBits_1); inline;
  13242. procedure setLATD7(thebits : TBits_1); inline;
  13243. procedure setLATD8(thebits : TBits_1); inline;
  13244. procedure setLATD9(thebits : TBits_1); inline;
  13245. procedure setw(thebits : TBits_32); inline;
  13246. public
  13247. procedure clearLATD0; inline;
  13248. procedure clearLATD10; inline;
  13249. procedure clearLATD11; inline;
  13250. procedure clearLATD1; inline;
  13251. procedure clearLATD2; inline;
  13252. procedure clearLATD3; inline;
  13253. procedure clearLATD4; inline;
  13254. procedure clearLATD5; inline;
  13255. procedure clearLATD6; inline;
  13256. procedure clearLATD7; inline;
  13257. procedure clearLATD8; inline;
  13258. procedure clearLATD9; inline;
  13259. procedure setLATD0; inline;
  13260. procedure setLATD10; inline;
  13261. procedure setLATD11; inline;
  13262. procedure setLATD1; inline;
  13263. procedure setLATD2; inline;
  13264. procedure setLATD3; inline;
  13265. procedure setLATD4; inline;
  13266. procedure setLATD5; inline;
  13267. procedure setLATD6; inline;
  13268. procedure setLATD7; inline;
  13269. procedure setLATD8; inline;
  13270. procedure setLATD9; inline;
  13271. property LATD0 : TBits_1 read getLATD0 write setLATD0;
  13272. property LATD1 : TBits_1 read getLATD1 write setLATD1;
  13273. property LATD10 : TBits_1 read getLATD10 write setLATD10;
  13274. property LATD11 : TBits_1 read getLATD11 write setLATD11;
  13275. property LATD2 : TBits_1 read getLATD2 write setLATD2;
  13276. property LATD3 : TBits_1 read getLATD3 write setLATD3;
  13277. property LATD4 : TBits_1 read getLATD4 write setLATD4;
  13278. property LATD5 : TBits_1 read getLATD5 write setLATD5;
  13279. property LATD6 : TBits_1 read getLATD6 write setLATD6;
  13280. property LATD7 : TBits_1 read getLATD7 write setLATD7;
  13281. property LATD8 : TBits_1 read getLATD8 write setLATD8;
  13282. property LATD9 : TBits_1 read getLATD9 write setLATD9;
  13283. property w : TBits_32 read getw write setw;
  13284. end;
  13285. TPORTD_ODCD = record
  13286. private
  13287. function getODCD0 : TBits_1; inline;
  13288. function getODCD1 : TBits_1; inline;
  13289. function getODCD10 : TBits_1; inline;
  13290. function getODCD11 : TBits_1; inline;
  13291. function getODCD2 : TBits_1; inline;
  13292. function getODCD3 : TBits_1; inline;
  13293. function getODCD4 : TBits_1; inline;
  13294. function getODCD5 : TBits_1; inline;
  13295. function getODCD6 : TBits_1; inline;
  13296. function getODCD7 : TBits_1; inline;
  13297. function getODCD8 : TBits_1; inline;
  13298. function getODCD9 : TBits_1; inline;
  13299. function getw : TBits_32; inline;
  13300. procedure setODCD0(thebits : TBits_1); inline;
  13301. procedure setODCD1(thebits : TBits_1); inline;
  13302. procedure setODCD10(thebits : TBits_1); inline;
  13303. procedure setODCD11(thebits : TBits_1); inline;
  13304. procedure setODCD2(thebits : TBits_1); inline;
  13305. procedure setODCD3(thebits : TBits_1); inline;
  13306. procedure setODCD4(thebits : TBits_1); inline;
  13307. procedure setODCD5(thebits : TBits_1); inline;
  13308. procedure setODCD6(thebits : TBits_1); inline;
  13309. procedure setODCD7(thebits : TBits_1); inline;
  13310. procedure setODCD8(thebits : TBits_1); inline;
  13311. procedure setODCD9(thebits : TBits_1); inline;
  13312. procedure setw(thebits : TBits_32); inline;
  13313. public
  13314. procedure clearODCD0; inline;
  13315. procedure clearODCD10; inline;
  13316. procedure clearODCD11; inline;
  13317. procedure clearODCD1; inline;
  13318. procedure clearODCD2; inline;
  13319. procedure clearODCD3; inline;
  13320. procedure clearODCD4; inline;
  13321. procedure clearODCD5; inline;
  13322. procedure clearODCD6; inline;
  13323. procedure clearODCD7; inline;
  13324. procedure clearODCD8; inline;
  13325. procedure clearODCD9; inline;
  13326. procedure setODCD0; inline;
  13327. procedure setODCD10; inline;
  13328. procedure setODCD11; inline;
  13329. procedure setODCD1; inline;
  13330. procedure setODCD2; inline;
  13331. procedure setODCD3; inline;
  13332. procedure setODCD4; inline;
  13333. procedure setODCD5; inline;
  13334. procedure setODCD6; inline;
  13335. procedure setODCD7; inline;
  13336. procedure setODCD8; inline;
  13337. procedure setODCD9; inline;
  13338. property ODCD0 : TBits_1 read getODCD0 write setODCD0;
  13339. property ODCD1 : TBits_1 read getODCD1 write setODCD1;
  13340. property ODCD10 : TBits_1 read getODCD10 write setODCD10;
  13341. property ODCD11 : TBits_1 read getODCD11 write setODCD11;
  13342. property ODCD2 : TBits_1 read getODCD2 write setODCD2;
  13343. property ODCD3 : TBits_1 read getODCD3 write setODCD3;
  13344. property ODCD4 : TBits_1 read getODCD4 write setODCD4;
  13345. property ODCD5 : TBits_1 read getODCD5 write setODCD5;
  13346. property ODCD6 : TBits_1 read getODCD6 write setODCD6;
  13347. property ODCD7 : TBits_1 read getODCD7 write setODCD7;
  13348. property ODCD8 : TBits_1 read getODCD8 write setODCD8;
  13349. property ODCD9 : TBits_1 read getODCD9 write setODCD9;
  13350. property w : TBits_32 read getw write setw;
  13351. end;
  13352. type
  13353. TPORTDRegisters = record
  13354. TRISDbits : TPORTD_TRISD;
  13355. TRISD : longWord;
  13356. TRISDCLR : longWord;
  13357. TRISDSET : longWord;
  13358. TRISDINV : longWord;
  13359. PORTDbits : TPORTD_PORTD;
  13360. PORTD : longWord;
  13361. PORTDCLR : longWord;
  13362. PORTDSET : longWord;
  13363. PORTDINV : longWord;
  13364. LATDbits : TPORTD_LATD;
  13365. LATD : longWord;
  13366. LATDCLR : longWord;
  13367. LATDSET : longWord;
  13368. LATDINV : longWord;
  13369. ODCDbits : TPORTD_ODCD;
  13370. ODCD : longWord;
  13371. ODCDCLR : longWord;
  13372. ODCDSET : longWord;
  13373. ODCDINV : longWord;
  13374. end;
  13375. TPORTE_TRISE = record
  13376. private
  13377. function getTRISE0 : TBits_1; inline;
  13378. function getTRISE1 : TBits_1; inline;
  13379. function getTRISE2 : TBits_1; inline;
  13380. function getTRISE3 : TBits_1; inline;
  13381. function getTRISE4 : TBits_1; inline;
  13382. function getTRISE5 : TBits_1; inline;
  13383. function getTRISE6 : TBits_1; inline;
  13384. function getTRISE7 : TBits_1; inline;
  13385. function getw : TBits_32; inline;
  13386. procedure setTRISE0(thebits : TBits_1); inline;
  13387. procedure setTRISE1(thebits : TBits_1); inline;
  13388. procedure setTRISE2(thebits : TBits_1); inline;
  13389. procedure setTRISE3(thebits : TBits_1); inline;
  13390. procedure setTRISE4(thebits : TBits_1); inline;
  13391. procedure setTRISE5(thebits : TBits_1); inline;
  13392. procedure setTRISE6(thebits : TBits_1); inline;
  13393. procedure setTRISE7(thebits : TBits_1); inline;
  13394. procedure setw(thebits : TBits_32); inline;
  13395. public
  13396. procedure clearTRISE0; inline;
  13397. procedure clearTRISE1; inline;
  13398. procedure clearTRISE2; inline;
  13399. procedure clearTRISE3; inline;
  13400. procedure clearTRISE4; inline;
  13401. procedure clearTRISE5; inline;
  13402. procedure clearTRISE6; inline;
  13403. procedure clearTRISE7; inline;
  13404. procedure setTRISE0; inline;
  13405. procedure setTRISE1; inline;
  13406. procedure setTRISE2; inline;
  13407. procedure setTRISE3; inline;
  13408. procedure setTRISE4; inline;
  13409. procedure setTRISE5; inline;
  13410. procedure setTRISE6; inline;
  13411. procedure setTRISE7; inline;
  13412. property TRISE0 : TBits_1 read getTRISE0 write setTRISE0;
  13413. property TRISE1 : TBits_1 read getTRISE1 write setTRISE1;
  13414. property TRISE2 : TBits_1 read getTRISE2 write setTRISE2;
  13415. property TRISE3 : TBits_1 read getTRISE3 write setTRISE3;
  13416. property TRISE4 : TBits_1 read getTRISE4 write setTRISE4;
  13417. property TRISE5 : TBits_1 read getTRISE5 write setTRISE5;
  13418. property TRISE6 : TBits_1 read getTRISE6 write setTRISE6;
  13419. property TRISE7 : TBits_1 read getTRISE7 write setTRISE7;
  13420. property w : TBits_32 read getw write setw;
  13421. end;
  13422. TPORTE_PORTE = record
  13423. private
  13424. function getRE0 : TBits_1; inline;
  13425. function getRE1 : TBits_1; inline;
  13426. function getRE2 : TBits_1; inline;
  13427. function getRE3 : TBits_1; inline;
  13428. function getRE4 : TBits_1; inline;
  13429. function getRE5 : TBits_1; inline;
  13430. function getRE6 : TBits_1; inline;
  13431. function getRE7 : TBits_1; inline;
  13432. function getw : TBits_32; inline;
  13433. procedure setRE0(thebits : TBits_1); inline;
  13434. procedure setRE1(thebits : TBits_1); inline;
  13435. procedure setRE2(thebits : TBits_1); inline;
  13436. procedure setRE3(thebits : TBits_1); inline;
  13437. procedure setRE4(thebits : TBits_1); inline;
  13438. procedure setRE5(thebits : TBits_1); inline;
  13439. procedure setRE6(thebits : TBits_1); inline;
  13440. procedure setRE7(thebits : TBits_1); inline;
  13441. procedure setw(thebits : TBits_32); inline;
  13442. public
  13443. procedure clearRE0; inline;
  13444. procedure clearRE1; inline;
  13445. procedure clearRE2; inline;
  13446. procedure clearRE3; inline;
  13447. procedure clearRE4; inline;
  13448. procedure clearRE5; inline;
  13449. procedure clearRE6; inline;
  13450. procedure clearRE7; inline;
  13451. procedure setRE0; inline;
  13452. procedure setRE1; inline;
  13453. procedure setRE2; inline;
  13454. procedure setRE3; inline;
  13455. procedure setRE4; inline;
  13456. procedure setRE5; inline;
  13457. procedure setRE6; inline;
  13458. procedure setRE7; inline;
  13459. property RE0 : TBits_1 read getRE0 write setRE0;
  13460. property RE1 : TBits_1 read getRE1 write setRE1;
  13461. property RE2 : TBits_1 read getRE2 write setRE2;
  13462. property RE3 : TBits_1 read getRE3 write setRE3;
  13463. property RE4 : TBits_1 read getRE4 write setRE4;
  13464. property RE5 : TBits_1 read getRE5 write setRE5;
  13465. property RE6 : TBits_1 read getRE6 write setRE6;
  13466. property RE7 : TBits_1 read getRE7 write setRE7;
  13467. property w : TBits_32 read getw write setw;
  13468. end;
  13469. TPortE_bits=(RE0=0,RE1=1,RE2=2,RE3=3,RE4=4,RE5=5,RE6=6,RE7=7);
  13470. TPortE_bitset = set of TPortE_bits;
  13471. TPORTE_LATE = record
  13472. private
  13473. function getLATE0 : TBits_1; inline;
  13474. function getLATE1 : TBits_1; inline;
  13475. function getLATE2 : TBits_1; inline;
  13476. function getLATE3 : TBits_1; inline;
  13477. function getLATE4 : TBits_1; inline;
  13478. function getLATE5 : TBits_1; inline;
  13479. function getLATE6 : TBits_1; inline;
  13480. function getLATE7 : TBits_1; inline;
  13481. function getw : TBits_32; inline;
  13482. procedure setLATE0(thebits : TBits_1); inline;
  13483. procedure setLATE1(thebits : TBits_1); inline;
  13484. procedure setLATE2(thebits : TBits_1); inline;
  13485. procedure setLATE3(thebits : TBits_1); inline;
  13486. procedure setLATE4(thebits : TBits_1); inline;
  13487. procedure setLATE5(thebits : TBits_1); inline;
  13488. procedure setLATE6(thebits : TBits_1); inline;
  13489. procedure setLATE7(thebits : TBits_1); inline;
  13490. procedure setw(thebits : TBits_32); inline;
  13491. public
  13492. procedure clearLATE0; inline;
  13493. procedure clearLATE1; inline;
  13494. procedure clearLATE2; inline;
  13495. procedure clearLATE3; inline;
  13496. procedure clearLATE4; inline;
  13497. procedure clearLATE5; inline;
  13498. procedure clearLATE6; inline;
  13499. procedure clearLATE7; inline;
  13500. procedure setLATE0; inline;
  13501. procedure setLATE1; inline;
  13502. procedure setLATE2; inline;
  13503. procedure setLATE3; inline;
  13504. procedure setLATE4; inline;
  13505. procedure setLATE5; inline;
  13506. procedure setLATE6; inline;
  13507. procedure setLATE7; inline;
  13508. property LATE0 : TBits_1 read getLATE0 write setLATE0;
  13509. property LATE1 : TBits_1 read getLATE1 write setLATE1;
  13510. property LATE2 : TBits_1 read getLATE2 write setLATE2;
  13511. property LATE3 : TBits_1 read getLATE3 write setLATE3;
  13512. property LATE4 : TBits_1 read getLATE4 write setLATE4;
  13513. property LATE5 : TBits_1 read getLATE5 write setLATE5;
  13514. property LATE6 : TBits_1 read getLATE6 write setLATE6;
  13515. property LATE7 : TBits_1 read getLATE7 write setLATE7;
  13516. property w : TBits_32 read getw write setw;
  13517. end;
  13518. TPORTE_ODCE = record
  13519. private
  13520. function getODCE0 : TBits_1; inline;
  13521. function getODCE1 : TBits_1; inline;
  13522. function getODCE2 : TBits_1; inline;
  13523. function getODCE3 : TBits_1; inline;
  13524. function getODCE4 : TBits_1; inline;
  13525. function getODCE5 : TBits_1; inline;
  13526. function getODCE6 : TBits_1; inline;
  13527. function getODCE7 : TBits_1; inline;
  13528. function getw : TBits_32; inline;
  13529. procedure setODCE0(thebits : TBits_1); inline;
  13530. procedure setODCE1(thebits : TBits_1); inline;
  13531. procedure setODCE2(thebits : TBits_1); inline;
  13532. procedure setODCE3(thebits : TBits_1); inline;
  13533. procedure setODCE4(thebits : TBits_1); inline;
  13534. procedure setODCE5(thebits : TBits_1); inline;
  13535. procedure setODCE6(thebits : TBits_1); inline;
  13536. procedure setODCE7(thebits : TBits_1); inline;
  13537. procedure setw(thebits : TBits_32); inline;
  13538. public
  13539. procedure clearODCE0; inline;
  13540. procedure clearODCE1; inline;
  13541. procedure clearODCE2; inline;
  13542. procedure clearODCE3; inline;
  13543. procedure clearODCE4; inline;
  13544. procedure clearODCE5; inline;
  13545. procedure clearODCE6; inline;
  13546. procedure clearODCE7; inline;
  13547. procedure setODCE0; inline;
  13548. procedure setODCE1; inline;
  13549. procedure setODCE2; inline;
  13550. procedure setODCE3; inline;
  13551. procedure setODCE4; inline;
  13552. procedure setODCE5; inline;
  13553. procedure setODCE6; inline;
  13554. procedure setODCE7; inline;
  13555. property ODCE0 : TBits_1 read getODCE0 write setODCE0;
  13556. property ODCE1 : TBits_1 read getODCE1 write setODCE1;
  13557. property ODCE2 : TBits_1 read getODCE2 write setODCE2;
  13558. property ODCE3 : TBits_1 read getODCE3 write setODCE3;
  13559. property ODCE4 : TBits_1 read getODCE4 write setODCE4;
  13560. property ODCE5 : TBits_1 read getODCE5 write setODCE5;
  13561. property ODCE6 : TBits_1 read getODCE6 write setODCE6;
  13562. property ODCE7 : TBits_1 read getODCE7 write setODCE7;
  13563. property w : TBits_32 read getw write setw;
  13564. end;
  13565. type
  13566. TPORTERegisters = record
  13567. TRISEbits : TPORTE_TRISE;
  13568. TRISE : longWord;
  13569. TRISECLR : longWord;
  13570. TRISESET : longWord;
  13571. TRISEINV : longWord;
  13572. PORTEbits : TPORTE_PORTE;
  13573. PORTE : longWord;
  13574. PORTECLR : longWord;
  13575. PORTESET : longWord;
  13576. PORTEINV : longWord;
  13577. LATEbits : TPORTE_LATE;
  13578. LATE : longWord;
  13579. LATECLR : longWord;
  13580. LATESET : longWord;
  13581. LATEINV : longWord;
  13582. ODCEbits : TPORTE_ODCE;
  13583. ODCE : longWord;
  13584. ODCECLR : longWord;
  13585. ODCESET : longWord;
  13586. ODCEINV : longWord;
  13587. end;
  13588. TPORTF_TRISF = record
  13589. private
  13590. function getTRISF0 : TBits_1; inline;
  13591. function getTRISF1 : TBits_1; inline;
  13592. function getTRISF2 : TBits_1; inline;
  13593. function getTRISF3 : TBits_1; inline;
  13594. function getTRISF4 : TBits_1; inline;
  13595. function getTRISF5 : TBits_1; inline;
  13596. function getw : TBits_32; inline;
  13597. procedure setTRISF0(thebits : TBits_1); inline;
  13598. procedure setTRISF1(thebits : TBits_1); inline;
  13599. procedure setTRISF2(thebits : TBits_1); inline;
  13600. procedure setTRISF3(thebits : TBits_1); inline;
  13601. procedure setTRISF4(thebits : TBits_1); inline;
  13602. procedure setTRISF5(thebits : TBits_1); inline;
  13603. procedure setw(thebits : TBits_32); inline;
  13604. public
  13605. procedure clearTRISF0; inline;
  13606. procedure clearTRISF1; inline;
  13607. procedure clearTRISF2; inline;
  13608. procedure clearTRISF3; inline;
  13609. procedure clearTRISF4; inline;
  13610. procedure clearTRISF5; inline;
  13611. procedure setTRISF0; inline;
  13612. procedure setTRISF1; inline;
  13613. procedure setTRISF2; inline;
  13614. procedure setTRISF3; inline;
  13615. procedure setTRISF4; inline;
  13616. procedure setTRISF5; inline;
  13617. property TRISF0 : TBits_1 read getTRISF0 write setTRISF0;
  13618. property TRISF1 : TBits_1 read getTRISF1 write setTRISF1;
  13619. property TRISF2 : TBits_1 read getTRISF2 write setTRISF2;
  13620. property TRISF3 : TBits_1 read getTRISF3 write setTRISF3;
  13621. property TRISF4 : TBits_1 read getTRISF4 write setTRISF4;
  13622. property TRISF5 : TBits_1 read getTRISF5 write setTRISF5;
  13623. property w : TBits_32 read getw write setw;
  13624. end;
  13625. TPORTF_PORTF = record
  13626. private
  13627. function getRF0 : TBits_1; inline;
  13628. function getRF1 : TBits_1; inline;
  13629. function getRF2 : TBits_1; inline;
  13630. function getRF3 : TBits_1; inline;
  13631. function getRF4 : TBits_1; inline;
  13632. function getRF5 : TBits_1; inline;
  13633. function getw : TBits_32; inline;
  13634. procedure setRF0(thebits : TBits_1); inline;
  13635. procedure setRF1(thebits : TBits_1); inline;
  13636. procedure setRF2(thebits : TBits_1); inline;
  13637. procedure setRF3(thebits : TBits_1); inline;
  13638. procedure setRF4(thebits : TBits_1); inline;
  13639. procedure setRF5(thebits : TBits_1); inline;
  13640. procedure setw(thebits : TBits_32); inline;
  13641. public
  13642. procedure clearRF0; inline;
  13643. procedure clearRF1; inline;
  13644. procedure clearRF2; inline;
  13645. procedure clearRF3; inline;
  13646. procedure clearRF4; inline;
  13647. procedure clearRF5; inline;
  13648. procedure setRF0; inline;
  13649. procedure setRF1; inline;
  13650. procedure setRF2; inline;
  13651. procedure setRF3; inline;
  13652. procedure setRF4; inline;
  13653. procedure setRF5; inline;
  13654. property RF0 : TBits_1 read getRF0 write setRF0;
  13655. property RF1 : TBits_1 read getRF1 write setRF1;
  13656. property RF2 : TBits_1 read getRF2 write setRF2;
  13657. property RF3 : TBits_1 read getRF3 write setRF3;
  13658. property RF4 : TBits_1 read getRF4 write setRF4;
  13659. property RF5 : TBits_1 read getRF5 write setRF5;
  13660. property w : TBits_32 read getw write setw;
  13661. end;
  13662. TPortF_bits=(RF0=0,RF1=1,RF2=2,RF3=3,RF4=4,RF5=5);
  13663. TPortF_bitset = set of TPortF_bits;
  13664. TPORTF_LATF = record
  13665. private
  13666. function getLATF0 : TBits_1; inline;
  13667. function getLATF1 : TBits_1; inline;
  13668. function getLATF2 : TBits_1; inline;
  13669. function getLATF3 : TBits_1; inline;
  13670. function getLATF4 : TBits_1; inline;
  13671. function getLATF5 : TBits_1; inline;
  13672. function getw : TBits_32; inline;
  13673. procedure setLATF0(thebits : TBits_1); inline;
  13674. procedure setLATF1(thebits : TBits_1); inline;
  13675. procedure setLATF2(thebits : TBits_1); inline;
  13676. procedure setLATF3(thebits : TBits_1); inline;
  13677. procedure setLATF4(thebits : TBits_1); inline;
  13678. procedure setLATF5(thebits : TBits_1); inline;
  13679. procedure setw(thebits : TBits_32); inline;
  13680. public
  13681. procedure clearLATF0; inline;
  13682. procedure clearLATF1; inline;
  13683. procedure clearLATF2; inline;
  13684. procedure clearLATF3; inline;
  13685. procedure clearLATF4; inline;
  13686. procedure clearLATF5; inline;
  13687. procedure setLATF0; inline;
  13688. procedure setLATF1; inline;
  13689. procedure setLATF2; inline;
  13690. procedure setLATF3; inline;
  13691. procedure setLATF4; inline;
  13692. procedure setLATF5; inline;
  13693. property LATF0 : TBits_1 read getLATF0 write setLATF0;
  13694. property LATF1 : TBits_1 read getLATF1 write setLATF1;
  13695. property LATF2 : TBits_1 read getLATF2 write setLATF2;
  13696. property LATF3 : TBits_1 read getLATF3 write setLATF3;
  13697. property LATF4 : TBits_1 read getLATF4 write setLATF4;
  13698. property LATF5 : TBits_1 read getLATF5 write setLATF5;
  13699. property w : TBits_32 read getw write setw;
  13700. end;
  13701. TPORTF_ODCF = record
  13702. private
  13703. function getODCF0 : TBits_1; inline;
  13704. function getODCF1 : TBits_1; inline;
  13705. function getODCF2 : TBits_1; inline;
  13706. function getODCF3 : TBits_1; inline;
  13707. function getODCF4 : TBits_1; inline;
  13708. function getODCF5 : TBits_1; inline;
  13709. function getw : TBits_32; inline;
  13710. procedure setODCF0(thebits : TBits_1); inline;
  13711. procedure setODCF1(thebits : TBits_1); inline;
  13712. procedure setODCF2(thebits : TBits_1); inline;
  13713. procedure setODCF3(thebits : TBits_1); inline;
  13714. procedure setODCF4(thebits : TBits_1); inline;
  13715. procedure setODCF5(thebits : TBits_1); inline;
  13716. procedure setw(thebits : TBits_32); inline;
  13717. public
  13718. procedure clearODCF0; inline;
  13719. procedure clearODCF1; inline;
  13720. procedure clearODCF2; inline;
  13721. procedure clearODCF3; inline;
  13722. procedure clearODCF4; inline;
  13723. procedure clearODCF5; inline;
  13724. procedure setODCF0; inline;
  13725. procedure setODCF1; inline;
  13726. procedure setODCF2; inline;
  13727. procedure setODCF3; inline;
  13728. procedure setODCF4; inline;
  13729. procedure setODCF5; inline;
  13730. property ODCF0 : TBits_1 read getODCF0 write setODCF0;
  13731. property ODCF1 : TBits_1 read getODCF1 write setODCF1;
  13732. property ODCF2 : TBits_1 read getODCF2 write setODCF2;
  13733. property ODCF3 : TBits_1 read getODCF3 write setODCF3;
  13734. property ODCF4 : TBits_1 read getODCF4 write setODCF4;
  13735. property ODCF5 : TBits_1 read getODCF5 write setODCF5;
  13736. property w : TBits_32 read getw write setw;
  13737. end;
  13738. type
  13739. TPORTFRegisters = record
  13740. TRISFbits : TPORTF_TRISF;
  13741. TRISF : longWord;
  13742. TRISFCLR : longWord;
  13743. TRISFSET : longWord;
  13744. TRISFINV : longWord;
  13745. PORTFbits : TPORTF_PORTF;
  13746. PORTF : longWord;
  13747. PORTFCLR : longWord;
  13748. PORTFSET : longWord;
  13749. PORTFINV : longWord;
  13750. LATFbits : TPORTF_LATF;
  13751. LATF : longWord;
  13752. LATFCLR : longWord;
  13753. LATFSET : longWord;
  13754. LATFINV : longWord;
  13755. ODCFbits : TPORTF_ODCF;
  13756. ODCF : longWord;
  13757. ODCFCLR : longWord;
  13758. ODCFSET : longWord;
  13759. ODCFINV : longWord;
  13760. end;
  13761. TPORTG_TRISG = record
  13762. private
  13763. function getTRISG2 : TBits_1; inline;
  13764. function getTRISG3 : TBits_1; inline;
  13765. function getTRISG6 : TBits_1; inline;
  13766. function getTRISG7 : TBits_1; inline;
  13767. function getTRISG8 : TBits_1; inline;
  13768. function getTRISG9 : TBits_1; inline;
  13769. function getw : TBits_32; inline;
  13770. procedure setTRISG2(thebits : TBits_1); inline;
  13771. procedure setTRISG3(thebits : TBits_1); inline;
  13772. procedure setTRISG6(thebits : TBits_1); inline;
  13773. procedure setTRISG7(thebits : TBits_1); inline;
  13774. procedure setTRISG8(thebits : TBits_1); inline;
  13775. procedure setTRISG9(thebits : TBits_1); inline;
  13776. procedure setw(thebits : TBits_32); inline;
  13777. public
  13778. procedure clearTRISG2; inline;
  13779. procedure clearTRISG3; inline;
  13780. procedure clearTRISG6; inline;
  13781. procedure clearTRISG7; inline;
  13782. procedure clearTRISG8; inline;
  13783. procedure clearTRISG9; inline;
  13784. procedure setTRISG2; inline;
  13785. procedure setTRISG3; inline;
  13786. procedure setTRISG6; inline;
  13787. procedure setTRISG7; inline;
  13788. procedure setTRISG8; inline;
  13789. procedure setTRISG9; inline;
  13790. property TRISG2 : TBits_1 read getTRISG2 write setTRISG2;
  13791. property TRISG3 : TBits_1 read getTRISG3 write setTRISG3;
  13792. property TRISG6 : TBits_1 read getTRISG6 write setTRISG6;
  13793. property TRISG7 : TBits_1 read getTRISG7 write setTRISG7;
  13794. property TRISG8 : TBits_1 read getTRISG8 write setTRISG8;
  13795. property TRISG9 : TBits_1 read getTRISG9 write setTRISG9;
  13796. property w : TBits_32 read getw write setw;
  13797. end;
  13798. TPORTG_PORTG = record
  13799. private
  13800. function getRG2 : TBits_1; inline;
  13801. function getRG3 : TBits_1; inline;
  13802. function getRG6 : TBits_1; inline;
  13803. function getRG7 : TBits_1; inline;
  13804. function getRG8 : TBits_1; inline;
  13805. function getRG9 : TBits_1; inline;
  13806. function getw : TBits_32; inline;
  13807. procedure setRG2(thebits : TBits_1); inline;
  13808. procedure setRG3(thebits : TBits_1); inline;
  13809. procedure setRG6(thebits : TBits_1); inline;
  13810. procedure setRG7(thebits : TBits_1); inline;
  13811. procedure setRG8(thebits : TBits_1); inline;
  13812. procedure setRG9(thebits : TBits_1); inline;
  13813. procedure setw(thebits : TBits_32); inline;
  13814. public
  13815. procedure clearRG2; inline;
  13816. procedure clearRG3; inline;
  13817. procedure clearRG6; inline;
  13818. procedure clearRG7; inline;
  13819. procedure clearRG8; inline;
  13820. procedure clearRG9; inline;
  13821. procedure setRG2; inline;
  13822. procedure setRG3; inline;
  13823. procedure setRG6; inline;
  13824. procedure setRG7; inline;
  13825. procedure setRG8; inline;
  13826. procedure setRG9; inline;
  13827. property RG2 : TBits_1 read getRG2 write setRG2;
  13828. property RG3 : TBits_1 read getRG3 write setRG3;
  13829. property RG6 : TBits_1 read getRG6 write setRG6;
  13830. property RG7 : TBits_1 read getRG7 write setRG7;
  13831. property RG8 : TBits_1 read getRG8 write setRG8;
  13832. property RG9 : TBits_1 read getRG9 write setRG9;
  13833. property w : TBits_32 read getw write setw;
  13834. end;
  13835. TPortG_bits=(RG2=2,RG3=3,RG6=6,RG7=7,RG8=8,RG9=9);
  13836. TPortG_bitset = set of TPortG_bits;
  13837. TPORTG_LATG = record
  13838. private
  13839. function getLATG2 : TBits_1; inline;
  13840. function getLATG3 : TBits_1; inline;
  13841. function getLATG6 : TBits_1; inline;
  13842. function getLATG7 : TBits_1; inline;
  13843. function getLATG8 : TBits_1; inline;
  13844. function getLATG9 : TBits_1; inline;
  13845. function getw : TBits_32; inline;
  13846. procedure setLATG2(thebits : TBits_1); inline;
  13847. procedure setLATG3(thebits : TBits_1); inline;
  13848. procedure setLATG6(thebits : TBits_1); inline;
  13849. procedure setLATG7(thebits : TBits_1); inline;
  13850. procedure setLATG8(thebits : TBits_1); inline;
  13851. procedure setLATG9(thebits : TBits_1); inline;
  13852. procedure setw(thebits : TBits_32); inline;
  13853. public
  13854. procedure clearLATG2; inline;
  13855. procedure clearLATG3; inline;
  13856. procedure clearLATG6; inline;
  13857. procedure clearLATG7; inline;
  13858. procedure clearLATG8; inline;
  13859. procedure clearLATG9; inline;
  13860. procedure setLATG2; inline;
  13861. procedure setLATG3; inline;
  13862. procedure setLATG6; inline;
  13863. procedure setLATG7; inline;
  13864. procedure setLATG8; inline;
  13865. procedure setLATG9; inline;
  13866. property LATG2 : TBits_1 read getLATG2 write setLATG2;
  13867. property LATG3 : TBits_1 read getLATG3 write setLATG3;
  13868. property LATG6 : TBits_1 read getLATG6 write setLATG6;
  13869. property LATG7 : TBits_1 read getLATG7 write setLATG7;
  13870. property LATG8 : TBits_1 read getLATG8 write setLATG8;
  13871. property LATG9 : TBits_1 read getLATG9 write setLATG9;
  13872. property w : TBits_32 read getw write setw;
  13873. end;
  13874. TPORTG_ODCG = record
  13875. private
  13876. function getODCG2 : TBits_1; inline;
  13877. function getODCG3 : TBits_1; inline;
  13878. function getODCG6 : TBits_1; inline;
  13879. function getODCG7 : TBits_1; inline;
  13880. function getODCG8 : TBits_1; inline;
  13881. function getODCG9 : TBits_1; inline;
  13882. function getw : TBits_32; inline;
  13883. procedure setODCG2(thebits : TBits_1); inline;
  13884. procedure setODCG3(thebits : TBits_1); inline;
  13885. procedure setODCG6(thebits : TBits_1); inline;
  13886. procedure setODCG7(thebits : TBits_1); inline;
  13887. procedure setODCG8(thebits : TBits_1); inline;
  13888. procedure setODCG9(thebits : TBits_1); inline;
  13889. procedure setw(thebits : TBits_32); inline;
  13890. public
  13891. procedure clearODCG2; inline;
  13892. procedure clearODCG3; inline;
  13893. procedure clearODCG6; inline;
  13894. procedure clearODCG7; inline;
  13895. procedure clearODCG8; inline;
  13896. procedure clearODCG9; inline;
  13897. procedure setODCG2; inline;
  13898. procedure setODCG3; inline;
  13899. procedure setODCG6; inline;
  13900. procedure setODCG7; inline;
  13901. procedure setODCG8; inline;
  13902. procedure setODCG9; inline;
  13903. property ODCG2 : TBits_1 read getODCG2 write setODCG2;
  13904. property ODCG3 : TBits_1 read getODCG3 write setODCG3;
  13905. property ODCG6 : TBits_1 read getODCG6 write setODCG6;
  13906. property ODCG7 : TBits_1 read getODCG7 write setODCG7;
  13907. property ODCG8 : TBits_1 read getODCG8 write setODCG8;
  13908. property ODCG9 : TBits_1 read getODCG9 write setODCG9;
  13909. property w : TBits_32 read getw write setw;
  13910. end;
  13911. TPORTG_CNCON = record
  13912. private
  13913. function getON : TBits_1; inline;
  13914. function getSIDL : TBits_1; inline;
  13915. function getw : TBits_32; inline;
  13916. procedure setON(thebits : TBits_1); inline;
  13917. procedure setSIDL(thebits : TBits_1); inline;
  13918. procedure setw(thebits : TBits_32); inline;
  13919. public
  13920. procedure clearON; inline;
  13921. procedure clearSIDL; inline;
  13922. procedure setON; inline;
  13923. procedure setSIDL; inline;
  13924. property ON : TBits_1 read getON write setON;
  13925. property SIDL : TBits_1 read getSIDL write setSIDL;
  13926. property w : TBits_32 read getw write setw;
  13927. end;
  13928. TPORTG_CNEN = record
  13929. private
  13930. function getCNEN0 : TBits_1; inline;
  13931. function getCNEN1 : TBits_1; inline;
  13932. function getCNEN10 : TBits_1; inline;
  13933. function getCNEN11 : TBits_1; inline;
  13934. function getCNEN12 : TBits_1; inline;
  13935. function getCNEN13 : TBits_1; inline;
  13936. function getCNEN14 : TBits_1; inline;
  13937. function getCNEN15 : TBits_1; inline;
  13938. function getCNEN16 : TBits_1; inline;
  13939. function getCNEN17 : TBits_1; inline;
  13940. function getCNEN18 : TBits_1; inline;
  13941. function getCNEN2 : TBits_1; inline;
  13942. function getCNEN3 : TBits_1; inline;
  13943. function getCNEN4 : TBits_1; inline;
  13944. function getCNEN5 : TBits_1; inline;
  13945. function getCNEN6 : TBits_1; inline;
  13946. function getCNEN7 : TBits_1; inline;
  13947. function getCNEN8 : TBits_1; inline;
  13948. function getCNEN9 : TBits_1; inline;
  13949. function getw : TBits_32; inline;
  13950. procedure setCNEN0(thebits : TBits_1); inline;
  13951. procedure setCNEN1(thebits : TBits_1); inline;
  13952. procedure setCNEN10(thebits : TBits_1); inline;
  13953. procedure setCNEN11(thebits : TBits_1); inline;
  13954. procedure setCNEN12(thebits : TBits_1); inline;
  13955. procedure setCNEN13(thebits : TBits_1); inline;
  13956. procedure setCNEN14(thebits : TBits_1); inline;
  13957. procedure setCNEN15(thebits : TBits_1); inline;
  13958. procedure setCNEN16(thebits : TBits_1); inline;
  13959. procedure setCNEN17(thebits : TBits_1); inline;
  13960. procedure setCNEN18(thebits : TBits_1); inline;
  13961. procedure setCNEN2(thebits : TBits_1); inline;
  13962. procedure setCNEN3(thebits : TBits_1); inline;
  13963. procedure setCNEN4(thebits : TBits_1); inline;
  13964. procedure setCNEN5(thebits : TBits_1); inline;
  13965. procedure setCNEN6(thebits : TBits_1); inline;
  13966. procedure setCNEN7(thebits : TBits_1); inline;
  13967. procedure setCNEN8(thebits : TBits_1); inline;
  13968. procedure setCNEN9(thebits : TBits_1); inline;
  13969. procedure setw(thebits : TBits_32); inline;
  13970. public
  13971. procedure clearCNEN0; inline;
  13972. procedure clearCNEN10; inline;
  13973. procedure clearCNEN11; inline;
  13974. procedure clearCNEN12; inline;
  13975. procedure clearCNEN13; inline;
  13976. procedure clearCNEN14; inline;
  13977. procedure clearCNEN15; inline;
  13978. procedure clearCNEN16; inline;
  13979. procedure clearCNEN17; inline;
  13980. procedure clearCNEN18; inline;
  13981. procedure clearCNEN1; inline;
  13982. procedure clearCNEN2; inline;
  13983. procedure clearCNEN3; inline;
  13984. procedure clearCNEN4; inline;
  13985. procedure clearCNEN5; inline;
  13986. procedure clearCNEN6; inline;
  13987. procedure clearCNEN7; inline;
  13988. procedure clearCNEN8; inline;
  13989. procedure clearCNEN9; inline;
  13990. procedure setCNEN0; inline;
  13991. procedure setCNEN10; inline;
  13992. procedure setCNEN11; inline;
  13993. procedure setCNEN12; inline;
  13994. procedure setCNEN13; inline;
  13995. procedure setCNEN14; inline;
  13996. procedure setCNEN15; inline;
  13997. procedure setCNEN16; inline;
  13998. procedure setCNEN17; inline;
  13999. procedure setCNEN18; inline;
  14000. procedure setCNEN1; inline;
  14001. procedure setCNEN2; inline;
  14002. procedure setCNEN3; inline;
  14003. procedure setCNEN4; inline;
  14004. procedure setCNEN5; inline;
  14005. procedure setCNEN6; inline;
  14006. procedure setCNEN7; inline;
  14007. procedure setCNEN8; inline;
  14008. procedure setCNEN9; inline;
  14009. property CNEN0 : TBits_1 read getCNEN0 write setCNEN0;
  14010. property CNEN1 : TBits_1 read getCNEN1 write setCNEN1;
  14011. property CNEN10 : TBits_1 read getCNEN10 write setCNEN10;
  14012. property CNEN11 : TBits_1 read getCNEN11 write setCNEN11;
  14013. property CNEN12 : TBits_1 read getCNEN12 write setCNEN12;
  14014. property CNEN13 : TBits_1 read getCNEN13 write setCNEN13;
  14015. property CNEN14 : TBits_1 read getCNEN14 write setCNEN14;
  14016. property CNEN15 : TBits_1 read getCNEN15 write setCNEN15;
  14017. property CNEN16 : TBits_1 read getCNEN16 write setCNEN16;
  14018. property CNEN17 : TBits_1 read getCNEN17 write setCNEN17;
  14019. property CNEN18 : TBits_1 read getCNEN18 write setCNEN18;
  14020. property CNEN2 : TBits_1 read getCNEN2 write setCNEN2;
  14021. property CNEN3 : TBits_1 read getCNEN3 write setCNEN3;
  14022. property CNEN4 : TBits_1 read getCNEN4 write setCNEN4;
  14023. property CNEN5 : TBits_1 read getCNEN5 write setCNEN5;
  14024. property CNEN6 : TBits_1 read getCNEN6 write setCNEN6;
  14025. property CNEN7 : TBits_1 read getCNEN7 write setCNEN7;
  14026. property CNEN8 : TBits_1 read getCNEN8 write setCNEN8;
  14027. property CNEN9 : TBits_1 read getCNEN9 write setCNEN9;
  14028. property w : TBits_32 read getw write setw;
  14029. end;
  14030. TPORTG_CNPUE = record
  14031. private
  14032. function getCNPUE0 : TBits_1; inline;
  14033. function getCNPUE1 : TBits_1; inline;
  14034. function getCNPUE10 : TBits_1; inline;
  14035. function getCNPUE11 : TBits_1; inline;
  14036. function getCNPUE12 : TBits_1; inline;
  14037. function getCNPUE13 : TBits_1; inline;
  14038. function getCNPUE14 : TBits_1; inline;
  14039. function getCNPUE15 : TBits_1; inline;
  14040. function getCNPUE16 : TBits_1; inline;
  14041. function getCNPUE17 : TBits_1; inline;
  14042. function getCNPUE18 : TBits_1; inline;
  14043. function getCNPUE2 : TBits_1; inline;
  14044. function getCNPUE3 : TBits_1; inline;
  14045. function getCNPUE4 : TBits_1; inline;
  14046. function getCNPUE5 : TBits_1; inline;
  14047. function getCNPUE6 : TBits_1; inline;
  14048. function getCNPUE7 : TBits_1; inline;
  14049. function getCNPUE8 : TBits_1; inline;
  14050. function getCNPUE9 : TBits_1; inline;
  14051. function getw : TBits_32; inline;
  14052. procedure setCNPUE0(thebits : TBits_1); inline;
  14053. procedure setCNPUE1(thebits : TBits_1); inline;
  14054. procedure setCNPUE10(thebits : TBits_1); inline;
  14055. procedure setCNPUE11(thebits : TBits_1); inline;
  14056. procedure setCNPUE12(thebits : TBits_1); inline;
  14057. procedure setCNPUE13(thebits : TBits_1); inline;
  14058. procedure setCNPUE14(thebits : TBits_1); inline;
  14059. procedure setCNPUE15(thebits : TBits_1); inline;
  14060. procedure setCNPUE16(thebits : TBits_1); inline;
  14061. procedure setCNPUE17(thebits : TBits_1); inline;
  14062. procedure setCNPUE18(thebits : TBits_1); inline;
  14063. procedure setCNPUE2(thebits : TBits_1); inline;
  14064. procedure setCNPUE3(thebits : TBits_1); inline;
  14065. procedure setCNPUE4(thebits : TBits_1); inline;
  14066. procedure setCNPUE5(thebits : TBits_1); inline;
  14067. procedure setCNPUE6(thebits : TBits_1); inline;
  14068. procedure setCNPUE7(thebits : TBits_1); inline;
  14069. procedure setCNPUE8(thebits : TBits_1); inline;
  14070. procedure setCNPUE9(thebits : TBits_1); inline;
  14071. procedure setw(thebits : TBits_32); inline;
  14072. public
  14073. procedure clearCNPUE0; inline;
  14074. procedure clearCNPUE10; inline;
  14075. procedure clearCNPUE11; inline;
  14076. procedure clearCNPUE12; inline;
  14077. procedure clearCNPUE13; inline;
  14078. procedure clearCNPUE14; inline;
  14079. procedure clearCNPUE15; inline;
  14080. procedure clearCNPUE16; inline;
  14081. procedure clearCNPUE17; inline;
  14082. procedure clearCNPUE18; inline;
  14083. procedure clearCNPUE1; inline;
  14084. procedure clearCNPUE2; inline;
  14085. procedure clearCNPUE3; inline;
  14086. procedure clearCNPUE4; inline;
  14087. procedure clearCNPUE5; inline;
  14088. procedure clearCNPUE6; inline;
  14089. procedure clearCNPUE7; inline;
  14090. procedure clearCNPUE8; inline;
  14091. procedure clearCNPUE9; inline;
  14092. procedure setCNPUE0; inline;
  14093. procedure setCNPUE10; inline;
  14094. procedure setCNPUE11; inline;
  14095. procedure setCNPUE12; inline;
  14096. procedure setCNPUE13; inline;
  14097. procedure setCNPUE14; inline;
  14098. procedure setCNPUE15; inline;
  14099. procedure setCNPUE16; inline;
  14100. procedure setCNPUE17; inline;
  14101. procedure setCNPUE18; inline;
  14102. procedure setCNPUE1; inline;
  14103. procedure setCNPUE2; inline;
  14104. procedure setCNPUE3; inline;
  14105. procedure setCNPUE4; inline;
  14106. procedure setCNPUE5; inline;
  14107. procedure setCNPUE6; inline;
  14108. procedure setCNPUE7; inline;
  14109. procedure setCNPUE8; inline;
  14110. procedure setCNPUE9; inline;
  14111. property CNPUE0 : TBits_1 read getCNPUE0 write setCNPUE0;
  14112. property CNPUE1 : TBits_1 read getCNPUE1 write setCNPUE1;
  14113. property CNPUE10 : TBits_1 read getCNPUE10 write setCNPUE10;
  14114. property CNPUE11 : TBits_1 read getCNPUE11 write setCNPUE11;
  14115. property CNPUE12 : TBits_1 read getCNPUE12 write setCNPUE12;
  14116. property CNPUE13 : TBits_1 read getCNPUE13 write setCNPUE13;
  14117. property CNPUE14 : TBits_1 read getCNPUE14 write setCNPUE14;
  14118. property CNPUE15 : TBits_1 read getCNPUE15 write setCNPUE15;
  14119. property CNPUE16 : TBits_1 read getCNPUE16 write setCNPUE16;
  14120. property CNPUE17 : TBits_1 read getCNPUE17 write setCNPUE17;
  14121. property CNPUE18 : TBits_1 read getCNPUE18 write setCNPUE18;
  14122. property CNPUE2 : TBits_1 read getCNPUE2 write setCNPUE2;
  14123. property CNPUE3 : TBits_1 read getCNPUE3 write setCNPUE3;
  14124. property CNPUE4 : TBits_1 read getCNPUE4 write setCNPUE4;
  14125. property CNPUE5 : TBits_1 read getCNPUE5 write setCNPUE5;
  14126. property CNPUE6 : TBits_1 read getCNPUE6 write setCNPUE6;
  14127. property CNPUE7 : TBits_1 read getCNPUE7 write setCNPUE7;
  14128. property CNPUE8 : TBits_1 read getCNPUE8 write setCNPUE8;
  14129. property CNPUE9 : TBits_1 read getCNPUE9 write setCNPUE9;
  14130. property w : TBits_32 read getw write setw;
  14131. end;
  14132. type
  14133. TPORTGRegisters = record
  14134. TRISGbits : TPORTG_TRISG;
  14135. TRISG : longWord;
  14136. TRISGCLR : longWord;
  14137. TRISGSET : longWord;
  14138. TRISGINV : longWord;
  14139. PORTGbits : TPORTG_PORTG;
  14140. PORTG : longWord;
  14141. PORTGCLR : longWord;
  14142. PORTGSET : longWord;
  14143. PORTGINV : longWord;
  14144. LATGbits : TPORTG_LATG;
  14145. LATG : longWord;
  14146. LATGCLR : longWord;
  14147. LATGSET : longWord;
  14148. LATGINV : longWord;
  14149. ODCGbits : TPORTG_ODCG;
  14150. ODCG : longWord;
  14151. ODCGCLR : longWord;
  14152. ODCGSET : longWord;
  14153. ODCGINV : longWord;
  14154. CNCONbits : TPORTG_CNCON;
  14155. CNCON : longWord;
  14156. CNCONCLR : longWord;
  14157. CNCONSET : longWord;
  14158. CNCONINV : longWord;
  14159. CNENbits : TPORTG_CNEN;
  14160. CNEN : longWord;
  14161. CNENCLR : longWord;
  14162. CNENSET : longWord;
  14163. CNENINV : longWord;
  14164. CNPUEbits : TPORTG_CNPUE;
  14165. CNPUE : longWord;
  14166. CNPUECLR : longWord;
  14167. CNPUESET : longWord;
  14168. CNPUEINV : longWord;
  14169. end;
  14170. TETH_ETHCON1 = record
  14171. private
  14172. function getAUTOFC : TBits_1; inline;
  14173. function getBUFCDEC : TBits_1; inline;
  14174. function getMANFC : TBits_1; inline;
  14175. function getON : TBits_1; inline;
  14176. function getPTV : TBits_16; inline;
  14177. function getRXEN : TBits_1; inline;
  14178. function getSIDL : TBits_1; inline;
  14179. function getTXRTS : TBits_1; inline;
  14180. function getw : TBits_32; inline;
  14181. procedure setAUTOFC(thebits : TBits_1); inline;
  14182. procedure setBUFCDEC(thebits : TBits_1); inline;
  14183. procedure setMANFC(thebits : TBits_1); inline;
  14184. procedure setON(thebits : TBits_1); inline;
  14185. procedure setPTV(thebits : TBits_16); inline;
  14186. procedure setRXEN(thebits : TBits_1); inline;
  14187. procedure setSIDL(thebits : TBits_1); inline;
  14188. procedure setTXRTS(thebits : TBits_1); inline;
  14189. procedure setw(thebits : TBits_32); inline;
  14190. public
  14191. procedure clearAUTOFC; inline;
  14192. procedure clearBUFCDEC; inline;
  14193. procedure clearMANFC; inline;
  14194. procedure clearON; inline;
  14195. procedure clearRXEN; inline;
  14196. procedure clearSIDL; inline;
  14197. procedure clearTXRTS; inline;
  14198. procedure setAUTOFC; inline;
  14199. procedure setBUFCDEC; inline;
  14200. procedure setMANFC; inline;
  14201. procedure setON; inline;
  14202. procedure setRXEN; inline;
  14203. procedure setSIDL; inline;
  14204. procedure setTXRTS; inline;
  14205. property AUTOFC : TBits_1 read getAUTOFC write setAUTOFC;
  14206. property BUFCDEC : TBits_1 read getBUFCDEC write setBUFCDEC;
  14207. property MANFC : TBits_1 read getMANFC write setMANFC;
  14208. property ON : TBits_1 read getON write setON;
  14209. property PTV : TBits_16 read getPTV write setPTV;
  14210. property RXEN : TBits_1 read getRXEN write setRXEN;
  14211. property SIDL : TBits_1 read getSIDL write setSIDL;
  14212. property TXRTS : TBits_1 read getTXRTS write setTXRTS;
  14213. property w : TBits_32 read getw write setw;
  14214. end;
  14215. TETH_ETHCON2 = record
  14216. private
  14217. function getRXBUF_SZ : TBits_7; inline;
  14218. function getw : TBits_32; inline;
  14219. procedure setRXBUF_SZ(thebits : TBits_7); inline;
  14220. procedure setw(thebits : TBits_32); inline;
  14221. public
  14222. property RXBUF_SZ : TBits_7 read getRXBUF_SZ write setRXBUF_SZ;
  14223. property w : TBits_32 read getw write setw;
  14224. end;
  14225. TETH_ETHTXST = record
  14226. private
  14227. function getTXSTADDR : TBits_30; inline;
  14228. function getw : TBits_32; inline;
  14229. procedure setTXSTADDR(thebits : TBits_30); inline;
  14230. procedure setw(thebits : TBits_32); inline;
  14231. public
  14232. property TXSTADDR : TBits_30 read getTXSTADDR write setTXSTADDR;
  14233. property w : TBits_32 read getw write setw;
  14234. end;
  14235. TETH_ETHRXST = record
  14236. private
  14237. function getRXSTADDR : TBits_30; inline;
  14238. function getw : TBits_32; inline;
  14239. procedure setRXSTADDR(thebits : TBits_30); inline;
  14240. procedure setw(thebits : TBits_32); inline;
  14241. public
  14242. property RXSTADDR : TBits_30 read getRXSTADDR write setRXSTADDR;
  14243. property w : TBits_32 read getw write setw;
  14244. end;
  14245. TETH_ETHHT0 = record
  14246. private
  14247. function getHTLOWER : TBits_32; inline;
  14248. function getw : TBits_32; inline;
  14249. procedure setHTLOWER(thebits : TBits_32); inline;
  14250. procedure setw(thebits : TBits_32); inline;
  14251. public
  14252. property HTLOWER : TBits_32 read getHTLOWER write setHTLOWER;
  14253. property w : TBits_32 read getw write setw;
  14254. end;
  14255. TETH_ETHHT1 = record
  14256. private
  14257. function getHTUPPER : TBits_32; inline;
  14258. function getw : TBits_32; inline;
  14259. procedure setHTUPPER(thebits : TBits_32); inline;
  14260. procedure setw(thebits : TBits_32); inline;
  14261. public
  14262. property HTUPPER : TBits_32 read getHTUPPER write setHTUPPER;
  14263. property w : TBits_32 read getw write setw;
  14264. end;
  14265. TETH_ETHPMM0 = record
  14266. private
  14267. function getPMMLOWER : TBits_32; inline;
  14268. function getw : TBits_32; inline;
  14269. procedure setPMMLOWER(thebits : TBits_32); inline;
  14270. procedure setw(thebits : TBits_32); inline;
  14271. public
  14272. property PMMLOWER : TBits_32 read getPMMLOWER write setPMMLOWER;
  14273. property w : TBits_32 read getw write setw;
  14274. end;
  14275. TETH_ETHPMM1 = record
  14276. private
  14277. function getPMMUPPER : TBits_32; inline;
  14278. function getw : TBits_32; inline;
  14279. procedure setPMMUPPER(thebits : TBits_32); inline;
  14280. procedure setw(thebits : TBits_32); inline;
  14281. public
  14282. property PMMUPPER : TBits_32 read getPMMUPPER write setPMMUPPER;
  14283. property w : TBits_32 read getw write setw;
  14284. end;
  14285. TETH_ETHPMCS = record
  14286. private
  14287. function getPMCS : TBits_16; inline;
  14288. function getw : TBits_32; inline;
  14289. procedure setPMCS(thebits : TBits_16); inline;
  14290. procedure setw(thebits : TBits_32); inline;
  14291. public
  14292. property PMCS : TBits_16 read getPMCS write setPMCS;
  14293. property w : TBits_32 read getw write setw;
  14294. end;
  14295. TETH_ETHPMO = record
  14296. private
  14297. function getPMO : TBits_16; inline;
  14298. function getw : TBits_32; inline;
  14299. procedure setPMO(thebits : TBits_16); inline;
  14300. procedure setw(thebits : TBits_32); inline;
  14301. public
  14302. property PMO : TBits_16 read getPMO write setPMO;
  14303. property w : TBits_32 read getw write setw;
  14304. end;
  14305. TETH_ETHRXFC = record
  14306. private
  14307. function getBCEN : TBits_1; inline;
  14308. function getCRCERREN : TBits_1; inline;
  14309. function getCRCOKEN : TBits_1; inline;
  14310. function getHTEN : TBits_1; inline;
  14311. function getMCEN : TBits_1; inline;
  14312. function getMPEN : TBits_1; inline;
  14313. function getNOTMEEN : TBits_1; inline;
  14314. function getNOTPM : TBits_1; inline;
  14315. function getPMMODE : TBits_4; inline;
  14316. function getRUNTEN : TBits_1; inline;
  14317. function getRUNTERREN : TBits_1; inline;
  14318. function getUCEN : TBits_1; inline;
  14319. function getw : TBits_32; inline;
  14320. procedure setBCEN(thebits : TBits_1); inline;
  14321. procedure setCRCERREN(thebits : TBits_1); inline;
  14322. procedure setCRCOKEN(thebits : TBits_1); inline;
  14323. procedure setHTEN(thebits : TBits_1); inline;
  14324. procedure setMCEN(thebits : TBits_1); inline;
  14325. procedure setMPEN(thebits : TBits_1); inline;
  14326. procedure setNOTMEEN(thebits : TBits_1); inline;
  14327. procedure setNOTPM(thebits : TBits_1); inline;
  14328. procedure setPMMODE(thebits : TBits_4); inline;
  14329. procedure setRUNTEN(thebits : TBits_1); inline;
  14330. procedure setRUNTERREN(thebits : TBits_1); inline;
  14331. procedure setUCEN(thebits : TBits_1); inline;
  14332. procedure setw(thebits : TBits_32); inline;
  14333. public
  14334. procedure clearBCEN; inline;
  14335. procedure clearCRCERREN; inline;
  14336. procedure clearCRCOKEN; inline;
  14337. procedure clearHTEN; inline;
  14338. procedure clearMCEN; inline;
  14339. procedure clearMPEN; inline;
  14340. procedure clearNOTMEEN; inline;
  14341. procedure clearNOTPM; inline;
  14342. procedure clearRUNTEN; inline;
  14343. procedure clearRUNTERREN; inline;
  14344. procedure clearUCEN; inline;
  14345. procedure setBCEN; inline;
  14346. procedure setCRCERREN; inline;
  14347. procedure setCRCOKEN; inline;
  14348. procedure setHTEN; inline;
  14349. procedure setMCEN; inline;
  14350. procedure setMPEN; inline;
  14351. procedure setNOTMEEN; inline;
  14352. procedure setNOTPM; inline;
  14353. procedure setRUNTEN; inline;
  14354. procedure setRUNTERREN; inline;
  14355. procedure setUCEN; inline;
  14356. property BCEN : TBits_1 read getBCEN write setBCEN;
  14357. property CRCERREN : TBits_1 read getCRCERREN write setCRCERREN;
  14358. property CRCOKEN : TBits_1 read getCRCOKEN write setCRCOKEN;
  14359. property HTEN : TBits_1 read getHTEN write setHTEN;
  14360. property MCEN : TBits_1 read getMCEN write setMCEN;
  14361. property MPEN : TBits_1 read getMPEN write setMPEN;
  14362. property NOTMEEN : TBits_1 read getNOTMEEN write setNOTMEEN;
  14363. property NOTPM : TBits_1 read getNOTPM write setNOTPM;
  14364. property PMMODE : TBits_4 read getPMMODE write setPMMODE;
  14365. property RUNTEN : TBits_1 read getRUNTEN write setRUNTEN;
  14366. property RUNTERREN : TBits_1 read getRUNTERREN write setRUNTERREN;
  14367. property UCEN : TBits_1 read getUCEN write setUCEN;
  14368. property w : TBits_32 read getw write setw;
  14369. end;
  14370. TETH_ETHRXWM = record
  14371. private
  14372. function getRXEWM : TBits_8; inline;
  14373. function getRXFWM : TBits_8; inline;
  14374. function getw : TBits_32; inline;
  14375. procedure setRXEWM(thebits : TBits_8); inline;
  14376. procedure setRXFWM(thebits : TBits_8); inline;
  14377. procedure setw(thebits : TBits_32); inline;
  14378. public
  14379. property RXEWM : TBits_8 read getRXEWM write setRXEWM;
  14380. property RXFWM : TBits_8 read getRXFWM write setRXFWM;
  14381. property w : TBits_32 read getw write setw;
  14382. end;
  14383. TETH_ETHIEN = record
  14384. private
  14385. function getEWMARKIE : TBits_1; inline;
  14386. function getFWMARKIE : TBits_1; inline;
  14387. function getPKTPENDIE : TBits_1; inline;
  14388. function getRXACTIE : TBits_1; inline;
  14389. function getRXBUFNAIE : TBits_1; inline;
  14390. function getRXBUSEIE : TBits_1; inline;
  14391. function getRXDONEIE : TBits_1; inline;
  14392. function getRXOVFLWIE : TBits_1; inline;
  14393. function getTXABORTIE : TBits_1; inline;
  14394. function getTXBUSEIE : TBits_1; inline;
  14395. function getTXDONEIE : TBits_1; inline;
  14396. function getw : TBits_32; inline;
  14397. procedure setEWMARKIE(thebits : TBits_1); inline;
  14398. procedure setFWMARKIE(thebits : TBits_1); inline;
  14399. procedure setPKTPENDIE(thebits : TBits_1); inline;
  14400. procedure setRXACTIE(thebits : TBits_1); inline;
  14401. procedure setRXBUFNAIE(thebits : TBits_1); inline;
  14402. procedure setRXBUSEIE(thebits : TBits_1); inline;
  14403. procedure setRXDONEIE(thebits : TBits_1); inline;
  14404. procedure setRXOVFLWIE(thebits : TBits_1); inline;
  14405. procedure setTXABORTIE(thebits : TBits_1); inline;
  14406. procedure setTXBUSEIE(thebits : TBits_1); inline;
  14407. procedure setTXDONEIE(thebits : TBits_1); inline;
  14408. procedure setw(thebits : TBits_32); inline;
  14409. public
  14410. procedure clearEWMARKIE; inline;
  14411. procedure clearFWMARKIE; inline;
  14412. procedure clearPKTPENDIE; inline;
  14413. procedure clearRXACTIE; inline;
  14414. procedure clearRXBUFNAIE; inline;
  14415. procedure clearRXBUSEIE; inline;
  14416. procedure clearRXDONEIE; inline;
  14417. procedure clearRXOVFLWIE; inline;
  14418. procedure clearTXABORTIE; inline;
  14419. procedure clearTXBUSEIE; inline;
  14420. procedure clearTXDONEIE; inline;
  14421. procedure setEWMARKIE; inline;
  14422. procedure setFWMARKIE; inline;
  14423. procedure setPKTPENDIE; inline;
  14424. procedure setRXACTIE; inline;
  14425. procedure setRXBUFNAIE; inline;
  14426. procedure setRXBUSEIE; inline;
  14427. procedure setRXDONEIE; inline;
  14428. procedure setRXOVFLWIE; inline;
  14429. procedure setTXABORTIE; inline;
  14430. procedure setTXBUSEIE; inline;
  14431. procedure setTXDONEIE; inline;
  14432. property EWMARKIE : TBits_1 read getEWMARKIE write setEWMARKIE;
  14433. property FWMARKIE : TBits_1 read getFWMARKIE write setFWMARKIE;
  14434. property PKTPENDIE : TBits_1 read getPKTPENDIE write setPKTPENDIE;
  14435. property RXACTIE : TBits_1 read getRXACTIE write setRXACTIE;
  14436. property RXBUFNAIE : TBits_1 read getRXBUFNAIE write setRXBUFNAIE;
  14437. property RXBUSEIE : TBits_1 read getRXBUSEIE write setRXBUSEIE;
  14438. property RXDONEIE : TBits_1 read getRXDONEIE write setRXDONEIE;
  14439. property RXOVFLWIE : TBits_1 read getRXOVFLWIE write setRXOVFLWIE;
  14440. property TXABORTIE : TBits_1 read getTXABORTIE write setTXABORTIE;
  14441. property TXBUSEIE : TBits_1 read getTXBUSEIE write setTXBUSEIE;
  14442. property TXDONEIE : TBits_1 read getTXDONEIE write setTXDONEIE;
  14443. property w : TBits_32 read getw write setw;
  14444. end;
  14445. TETH_ETHIRQ = record
  14446. private
  14447. function getEWMARK : TBits_1; inline;
  14448. function getFWMARK : TBits_1; inline;
  14449. function getPKTPEND : TBits_1; inline;
  14450. function getRXACT : TBits_1; inline;
  14451. function getRXBUFNA : TBits_1; inline;
  14452. function getRXBUSE : TBits_1; inline;
  14453. function getRXDONE : TBits_1; inline;
  14454. function getRXOVFLW : TBits_1; inline;
  14455. function getTXABORT : TBits_1; inline;
  14456. function getTXBUSE : TBits_1; inline;
  14457. function getTXDONE : TBits_1; inline;
  14458. function getw : TBits_32; inline;
  14459. procedure setEWMARK(thebits : TBits_1); inline;
  14460. procedure setFWMARK(thebits : TBits_1); inline;
  14461. procedure setPKTPEND(thebits : TBits_1); inline;
  14462. procedure setRXACT(thebits : TBits_1); inline;
  14463. procedure setRXBUFNA(thebits : TBits_1); inline;
  14464. procedure setRXBUSE(thebits : TBits_1); inline;
  14465. procedure setRXDONE(thebits : TBits_1); inline;
  14466. procedure setRXOVFLW(thebits : TBits_1); inline;
  14467. procedure setTXABORT(thebits : TBits_1); inline;
  14468. procedure setTXBUSE(thebits : TBits_1); inline;
  14469. procedure setTXDONE(thebits : TBits_1); inline;
  14470. procedure setw(thebits : TBits_32); inline;
  14471. public
  14472. procedure clearEWMARK; inline;
  14473. procedure clearFWMARK; inline;
  14474. procedure clearPKTPEND; inline;
  14475. procedure clearRXACT; inline;
  14476. procedure clearRXBUFNA; inline;
  14477. procedure clearRXBUSE; inline;
  14478. procedure clearRXDONE; inline;
  14479. procedure clearRXOVFLW; inline;
  14480. procedure clearTXABORT; inline;
  14481. procedure clearTXBUSE; inline;
  14482. procedure clearTXDONE; inline;
  14483. procedure setEWMARK; inline;
  14484. procedure setFWMARK; inline;
  14485. procedure setPKTPEND; inline;
  14486. procedure setRXACT; inline;
  14487. procedure setRXBUFNA; inline;
  14488. procedure setRXBUSE; inline;
  14489. procedure setRXDONE; inline;
  14490. procedure setRXOVFLW; inline;
  14491. procedure setTXABORT; inline;
  14492. procedure setTXBUSE; inline;
  14493. procedure setTXDONE; inline;
  14494. property EWMARK : TBits_1 read getEWMARK write setEWMARK;
  14495. property FWMARK : TBits_1 read getFWMARK write setFWMARK;
  14496. property PKTPEND : TBits_1 read getPKTPEND write setPKTPEND;
  14497. property RXACT : TBits_1 read getRXACT write setRXACT;
  14498. property RXBUFNA : TBits_1 read getRXBUFNA write setRXBUFNA;
  14499. property RXBUSE : TBits_1 read getRXBUSE write setRXBUSE;
  14500. property RXDONE : TBits_1 read getRXDONE write setRXDONE;
  14501. property RXOVFLW : TBits_1 read getRXOVFLW write setRXOVFLW;
  14502. property TXABORT : TBits_1 read getTXABORT write setTXABORT;
  14503. property TXBUSE : TBits_1 read getTXBUSE write setTXBUSE;
  14504. property TXDONE : TBits_1 read getTXDONE write setTXDONE;
  14505. property w : TBits_32 read getw write setw;
  14506. end;
  14507. TETH_ETHSTAT = record
  14508. private
  14509. function getBUFCNT : TBits_8; inline;
  14510. function getBUSY : TBits_1; inline;
  14511. function getETHBUSY : TBits_1; inline;
  14512. function getRXBUSY : TBits_1; inline;
  14513. function getTXBUSY : TBits_1; inline;
  14514. function getw : TBits_32; inline;
  14515. procedure setBUFCNT(thebits : TBits_8); inline;
  14516. procedure setBUSY(thebits : TBits_1); inline;
  14517. procedure setETHBUSY(thebits : TBits_1); inline;
  14518. procedure setRXBUSY(thebits : TBits_1); inline;
  14519. procedure setTXBUSY(thebits : TBits_1); inline;
  14520. procedure setw(thebits : TBits_32); inline;
  14521. public
  14522. procedure clearBUSY; inline;
  14523. procedure clearETHBUSY; inline;
  14524. procedure clearRXBUSY; inline;
  14525. procedure clearTXBUSY; inline;
  14526. procedure setBUSY; inline;
  14527. procedure setETHBUSY; inline;
  14528. procedure setRXBUSY; inline;
  14529. procedure setTXBUSY; inline;
  14530. property BUFCNT : TBits_8 read getBUFCNT write setBUFCNT;
  14531. property BUSY : TBits_1 read getBUSY write setBUSY;
  14532. property ETHBUSY : TBits_1 read getETHBUSY write setETHBUSY;
  14533. property RXBUSY : TBits_1 read getRXBUSY write setRXBUSY;
  14534. property TXBUSY : TBits_1 read getTXBUSY write setTXBUSY;
  14535. property w : TBits_32 read getw write setw;
  14536. end;
  14537. TETH_ETHRXOVFLOW = record
  14538. private
  14539. function getRXOVFLWCNT : TBits_16; inline;
  14540. function getw : TBits_32; inline;
  14541. procedure setRXOVFLWCNT(thebits : TBits_16); inline;
  14542. procedure setw(thebits : TBits_32); inline;
  14543. public
  14544. property RXOVFLWCNT : TBits_16 read getRXOVFLWCNT write setRXOVFLWCNT;
  14545. property w : TBits_32 read getw write setw;
  14546. end;
  14547. TETH_ETHFRMTXOK = record
  14548. private
  14549. function getFRMTXOKCNT : TBits_16; inline;
  14550. function getw : TBits_32; inline;
  14551. procedure setFRMTXOKCNT(thebits : TBits_16); inline;
  14552. procedure setw(thebits : TBits_32); inline;
  14553. public
  14554. property FRMTXOKCNT : TBits_16 read getFRMTXOKCNT write setFRMTXOKCNT;
  14555. property w : TBits_32 read getw write setw;
  14556. end;
  14557. TETH_ETHSCOLFRM = record
  14558. private
  14559. function getSCOLFRMCNT : TBits_16; inline;
  14560. function getw : TBits_32; inline;
  14561. procedure setSCOLFRMCNT(thebits : TBits_16); inline;
  14562. procedure setw(thebits : TBits_32); inline;
  14563. public
  14564. property SCOLFRMCNT : TBits_16 read getSCOLFRMCNT write setSCOLFRMCNT;
  14565. property w : TBits_32 read getw write setw;
  14566. end;
  14567. TETH_ETHMCOLFRM = record
  14568. private
  14569. function getMCOLFRMCNT : TBits_16; inline;
  14570. function getMCOLFRM_CNT : TBits_16; inline;
  14571. function getw : TBits_32; inline;
  14572. procedure setMCOLFRMCNT(thebits : TBits_16); inline;
  14573. procedure setMCOLFRM_CNT(thebits : TBits_16); inline;
  14574. procedure setw(thebits : TBits_32); inline;
  14575. public
  14576. property MCOLFRMCNT : TBits_16 read getMCOLFRMCNT write setMCOLFRMCNT;
  14577. property MCOLFRM_CNT : TBits_16 read getMCOLFRM_CNT write setMCOLFRM_CNT;
  14578. property w : TBits_32 read getw write setw;
  14579. end;
  14580. TETH_ETHFRMRXOK = record
  14581. private
  14582. function getFRMRXOKCNT : TBits_16; inline;
  14583. function getw : TBits_32; inline;
  14584. procedure setFRMRXOKCNT(thebits : TBits_16); inline;
  14585. procedure setw(thebits : TBits_32); inline;
  14586. public
  14587. property FRMRXOKCNT : TBits_16 read getFRMRXOKCNT write setFRMRXOKCNT;
  14588. property w : TBits_32 read getw write setw;
  14589. end;
  14590. TETH_ETHFCSERR = record
  14591. private
  14592. function getFCSERRCNT : TBits_16; inline;
  14593. function getw : TBits_32; inline;
  14594. procedure setFCSERRCNT(thebits : TBits_16); inline;
  14595. procedure setw(thebits : TBits_32); inline;
  14596. public
  14597. property FCSERRCNT : TBits_16 read getFCSERRCNT write setFCSERRCNT;
  14598. property w : TBits_32 read getw write setw;
  14599. end;
  14600. TETH_ETHALGNERR = record
  14601. private
  14602. function getALGNERRCNT : TBits_16; inline;
  14603. function getw : TBits_32; inline;
  14604. procedure setALGNERRCNT(thebits : TBits_16); inline;
  14605. procedure setw(thebits : TBits_32); inline;
  14606. public
  14607. property ALGNERRCNT : TBits_16 read getALGNERRCNT write setALGNERRCNT;
  14608. property w : TBits_32 read getw write setw;
  14609. end;
  14610. TETH_EMAC1CFG1 = record
  14611. private
  14612. function getLOOPBACK : TBits_1; inline;
  14613. function getPASSALL : TBits_1; inline;
  14614. function getRESETRFUN : TBits_1; inline;
  14615. function getRESETRMCS : TBits_1; inline;
  14616. function getRESETTFUN : TBits_1; inline;
  14617. function getRESETTMCS : TBits_1; inline;
  14618. function getRXENABLE : TBits_1; inline;
  14619. function getRXPAUSE : TBits_1; inline;
  14620. function getSIMRESET : TBits_1; inline;
  14621. function getSOFTRESET : TBits_1; inline;
  14622. function getTXPAUSE : TBits_1; inline;
  14623. function getw : TBits_32; inline;
  14624. procedure setLOOPBACK(thebits : TBits_1); inline;
  14625. procedure setPASSALL(thebits : TBits_1); inline;
  14626. procedure setRESETRFUN(thebits : TBits_1); inline;
  14627. procedure setRESETRMCS(thebits : TBits_1); inline;
  14628. procedure setRESETTFUN(thebits : TBits_1); inline;
  14629. procedure setRESETTMCS(thebits : TBits_1); inline;
  14630. procedure setRXENABLE(thebits : TBits_1); inline;
  14631. procedure setRXPAUSE(thebits : TBits_1); inline;
  14632. procedure setSIMRESET(thebits : TBits_1); inline;
  14633. procedure setSOFTRESET(thebits : TBits_1); inline;
  14634. procedure setTXPAUSE(thebits : TBits_1); inline;
  14635. procedure setw(thebits : TBits_32); inline;
  14636. public
  14637. procedure clearLOOPBACK; inline;
  14638. procedure clearPASSALL; inline;
  14639. procedure clearRESETRFUN; inline;
  14640. procedure clearRESETRMCS; inline;
  14641. procedure clearRESETTFUN; inline;
  14642. procedure clearRESETTMCS; inline;
  14643. procedure clearRXENABLE; inline;
  14644. procedure clearRXPAUSE; inline;
  14645. procedure clearSIMRESET; inline;
  14646. procedure clearSOFTRESET; inline;
  14647. procedure clearTXPAUSE; inline;
  14648. procedure setLOOPBACK; inline;
  14649. procedure setPASSALL; inline;
  14650. procedure setRESETRFUN; inline;
  14651. procedure setRESETRMCS; inline;
  14652. procedure setRESETTFUN; inline;
  14653. procedure setRESETTMCS; inline;
  14654. procedure setRXENABLE; inline;
  14655. procedure setRXPAUSE; inline;
  14656. procedure setSIMRESET; inline;
  14657. procedure setSOFTRESET; inline;
  14658. procedure setTXPAUSE; inline;
  14659. property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
  14660. property PASSALL : TBits_1 read getPASSALL write setPASSALL;
  14661. property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
  14662. property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
  14663. property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
  14664. property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
  14665. property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
  14666. property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
  14667. property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
  14668. property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
  14669. property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
  14670. property w : TBits_32 read getw write setw;
  14671. end;
  14672. TETH_EMACxCFG1 = record
  14673. private
  14674. function getLOOPBACK : TBits_1; inline;
  14675. function getPASSALL : TBits_1; inline;
  14676. function getRESETRFUN : TBits_1; inline;
  14677. function getRESETRMCS : TBits_1; inline;
  14678. function getRESETTFUN : TBits_1; inline;
  14679. function getRESETTMCS : TBits_1; inline;
  14680. function getRXENABLE : TBits_1; inline;
  14681. function getRXPAUSE : TBits_1; inline;
  14682. function getSIMRESET : TBits_1; inline;
  14683. function getSOFTRESET : TBits_1; inline;
  14684. function getTXPAUSE : TBits_1; inline;
  14685. function getw : TBits_32; inline;
  14686. procedure setLOOPBACK(thebits : TBits_1); inline;
  14687. procedure setPASSALL(thebits : TBits_1); inline;
  14688. procedure setRESETRFUN(thebits : TBits_1); inline;
  14689. procedure setRESETRMCS(thebits : TBits_1); inline;
  14690. procedure setRESETTFUN(thebits : TBits_1); inline;
  14691. procedure setRESETTMCS(thebits : TBits_1); inline;
  14692. procedure setRXENABLE(thebits : TBits_1); inline;
  14693. procedure setRXPAUSE(thebits : TBits_1); inline;
  14694. procedure setSIMRESET(thebits : TBits_1); inline;
  14695. procedure setSOFTRESET(thebits : TBits_1); inline;
  14696. procedure setTXPAUSE(thebits : TBits_1); inline;
  14697. procedure setw(thebits : TBits_32); inline;
  14698. public
  14699. procedure clearLOOPBACK; inline;
  14700. procedure clearPASSALL; inline;
  14701. procedure clearRESETRFUN; inline;
  14702. procedure clearRESETRMCS; inline;
  14703. procedure clearRESETTFUN; inline;
  14704. procedure clearRESETTMCS; inline;
  14705. procedure clearRXENABLE; inline;
  14706. procedure clearRXPAUSE; inline;
  14707. procedure clearSIMRESET; inline;
  14708. procedure clearSOFTRESET; inline;
  14709. procedure clearTXPAUSE; inline;
  14710. procedure setLOOPBACK; inline;
  14711. procedure setPASSALL; inline;
  14712. procedure setRESETRFUN; inline;
  14713. procedure setRESETRMCS; inline;
  14714. procedure setRESETTFUN; inline;
  14715. procedure setRESETTMCS; inline;
  14716. procedure setRXENABLE; inline;
  14717. procedure setRXPAUSE; inline;
  14718. procedure setSIMRESET; inline;
  14719. procedure setSOFTRESET; inline;
  14720. procedure setTXPAUSE; inline;
  14721. property LOOPBACK : TBits_1 read getLOOPBACK write setLOOPBACK;
  14722. property PASSALL : TBits_1 read getPASSALL write setPASSALL;
  14723. property RESETRFUN : TBits_1 read getRESETRFUN write setRESETRFUN;
  14724. property RESETRMCS : TBits_1 read getRESETRMCS write setRESETRMCS;
  14725. property RESETTFUN : TBits_1 read getRESETTFUN write setRESETTFUN;
  14726. property RESETTMCS : TBits_1 read getRESETTMCS write setRESETTMCS;
  14727. property RXENABLE : TBits_1 read getRXENABLE write setRXENABLE;
  14728. property RXPAUSE : TBits_1 read getRXPAUSE write setRXPAUSE;
  14729. property SIMRESET : TBits_1 read getSIMRESET write setSIMRESET;
  14730. property SOFTRESET : TBits_1 read getSOFTRESET write setSOFTRESET;
  14731. property TXPAUSE : TBits_1 read getTXPAUSE write setTXPAUSE;
  14732. property w : TBits_32 read getw write setw;
  14733. end;
  14734. TETH_EMAC1CFG2 = record
  14735. private
  14736. function getAUTOPAD : TBits_1; inline;
  14737. function getBPNOBKOFF : TBits_1; inline;
  14738. function getCRCENABLE : TBits_1; inline;
  14739. function getDELAYCRC : TBits_1; inline;
  14740. function getEXCESSDFR : TBits_1; inline;
  14741. function getFULLDPLX : TBits_1; inline;
  14742. function getHUGEFRM : TBits_1; inline;
  14743. function getLENGTHCK : TBits_1; inline;
  14744. function getLONGPRE : TBits_1; inline;
  14745. function getNOBKOFF : TBits_1; inline;
  14746. function getPADENABLE : TBits_1; inline;
  14747. function getPUREPRE : TBits_1; inline;
  14748. function getVLANPAD : TBits_1; inline;
  14749. function getw : TBits_32; inline;
  14750. procedure setAUTOPAD(thebits : TBits_1); inline;
  14751. procedure setBPNOBKOFF(thebits : TBits_1); inline;
  14752. procedure setCRCENABLE(thebits : TBits_1); inline;
  14753. procedure setDELAYCRC(thebits : TBits_1); inline;
  14754. procedure setEXCESSDFR(thebits : TBits_1); inline;
  14755. procedure setFULLDPLX(thebits : TBits_1); inline;
  14756. procedure setHUGEFRM(thebits : TBits_1); inline;
  14757. procedure setLENGTHCK(thebits : TBits_1); inline;
  14758. procedure setLONGPRE(thebits : TBits_1); inline;
  14759. procedure setNOBKOFF(thebits : TBits_1); inline;
  14760. procedure setPADENABLE(thebits : TBits_1); inline;
  14761. procedure setPUREPRE(thebits : TBits_1); inline;
  14762. procedure setVLANPAD(thebits : TBits_1); inline;
  14763. procedure setw(thebits : TBits_32); inline;
  14764. public
  14765. procedure clearAUTOPAD; inline;
  14766. procedure clearBPNOBKOFF; inline;
  14767. procedure clearCRCENABLE; inline;
  14768. procedure clearDELAYCRC; inline;
  14769. procedure clearEXCESSDFR; inline;
  14770. procedure clearFULLDPLX; inline;
  14771. procedure clearHUGEFRM; inline;
  14772. procedure clearLENGTHCK; inline;
  14773. procedure clearLONGPRE; inline;
  14774. procedure clearNOBKOFF; inline;
  14775. procedure clearPADENABLE; inline;
  14776. procedure clearPUREPRE; inline;
  14777. procedure clearVLANPAD; inline;
  14778. procedure setAUTOPAD; inline;
  14779. procedure setBPNOBKOFF; inline;
  14780. procedure setCRCENABLE; inline;
  14781. procedure setDELAYCRC; inline;
  14782. procedure setEXCESSDFR; inline;
  14783. procedure setFULLDPLX; inline;
  14784. procedure setHUGEFRM; inline;
  14785. procedure setLENGTHCK; inline;
  14786. procedure setLONGPRE; inline;
  14787. procedure setNOBKOFF; inline;
  14788. procedure setPADENABLE; inline;
  14789. procedure setPUREPRE; inline;
  14790. procedure setVLANPAD; inline;
  14791. property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
  14792. property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
  14793. property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
  14794. property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
  14795. property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
  14796. property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
  14797. property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
  14798. property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
  14799. property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
  14800. property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
  14801. property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
  14802. property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
  14803. property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
  14804. property w : TBits_32 read getw write setw;
  14805. end;
  14806. TETH_EMACxCFG2 = record
  14807. private
  14808. function getAUTOPAD : TBits_1; inline;
  14809. function getBPNOBKOFF : TBits_1; inline;
  14810. function getCRCENABLE : TBits_1; inline;
  14811. function getDELAYCRC : TBits_1; inline;
  14812. function getEXCESSDFR : TBits_1; inline;
  14813. function getFULLDPLX : TBits_1; inline;
  14814. function getHUGEFRM : TBits_1; inline;
  14815. function getLENGTHCK : TBits_1; inline;
  14816. function getLONGPRE : TBits_1; inline;
  14817. function getNOBKOFF : TBits_1; inline;
  14818. function getPADENABLE : TBits_1; inline;
  14819. function getPUREPRE : TBits_1; inline;
  14820. function getVLANPAD : TBits_1; inline;
  14821. function getw : TBits_32; inline;
  14822. procedure setAUTOPAD(thebits : TBits_1); inline;
  14823. procedure setBPNOBKOFF(thebits : TBits_1); inline;
  14824. procedure setCRCENABLE(thebits : TBits_1); inline;
  14825. procedure setDELAYCRC(thebits : TBits_1); inline;
  14826. procedure setEXCESSDFR(thebits : TBits_1); inline;
  14827. procedure setFULLDPLX(thebits : TBits_1); inline;
  14828. procedure setHUGEFRM(thebits : TBits_1); inline;
  14829. procedure setLENGTHCK(thebits : TBits_1); inline;
  14830. procedure setLONGPRE(thebits : TBits_1); inline;
  14831. procedure setNOBKOFF(thebits : TBits_1); inline;
  14832. procedure setPADENABLE(thebits : TBits_1); inline;
  14833. procedure setPUREPRE(thebits : TBits_1); inline;
  14834. procedure setVLANPAD(thebits : TBits_1); inline;
  14835. procedure setw(thebits : TBits_32); inline;
  14836. public
  14837. procedure clearAUTOPAD; inline;
  14838. procedure clearBPNOBKOFF; inline;
  14839. procedure clearCRCENABLE; inline;
  14840. procedure clearDELAYCRC; inline;
  14841. procedure clearEXCESSDFR; inline;
  14842. procedure clearFULLDPLX; inline;
  14843. procedure clearHUGEFRM; inline;
  14844. procedure clearLENGTHCK; inline;
  14845. procedure clearLONGPRE; inline;
  14846. procedure clearNOBKOFF; inline;
  14847. procedure clearPADENABLE; inline;
  14848. procedure clearPUREPRE; inline;
  14849. procedure clearVLANPAD; inline;
  14850. procedure setAUTOPAD; inline;
  14851. procedure setBPNOBKOFF; inline;
  14852. procedure setCRCENABLE; inline;
  14853. procedure setDELAYCRC; inline;
  14854. procedure setEXCESSDFR; inline;
  14855. procedure setFULLDPLX; inline;
  14856. procedure setHUGEFRM; inline;
  14857. procedure setLENGTHCK; inline;
  14858. procedure setLONGPRE; inline;
  14859. procedure setNOBKOFF; inline;
  14860. procedure setPADENABLE; inline;
  14861. procedure setPUREPRE; inline;
  14862. procedure setVLANPAD; inline;
  14863. property AUTOPAD : TBits_1 read getAUTOPAD write setAUTOPAD;
  14864. property BPNOBKOFF : TBits_1 read getBPNOBKOFF write setBPNOBKOFF;
  14865. property CRCENABLE : TBits_1 read getCRCENABLE write setCRCENABLE;
  14866. property DELAYCRC : TBits_1 read getDELAYCRC write setDELAYCRC;
  14867. property EXCESSDFR : TBits_1 read getEXCESSDFR write setEXCESSDFR;
  14868. property FULLDPLX : TBits_1 read getFULLDPLX write setFULLDPLX;
  14869. property HUGEFRM : TBits_1 read getHUGEFRM write setHUGEFRM;
  14870. property LENGTHCK : TBits_1 read getLENGTHCK write setLENGTHCK;
  14871. property LONGPRE : TBits_1 read getLONGPRE write setLONGPRE;
  14872. property NOBKOFF : TBits_1 read getNOBKOFF write setNOBKOFF;
  14873. property PADENABLE : TBits_1 read getPADENABLE write setPADENABLE;
  14874. property PUREPRE : TBits_1 read getPUREPRE write setPUREPRE;
  14875. property VLANPAD : TBits_1 read getVLANPAD write setVLANPAD;
  14876. property w : TBits_32 read getw write setw;
  14877. end;
  14878. TETH_EMAC1IPGT = record
  14879. private
  14880. function getB2BIPKTGP : TBits_7; inline;
  14881. function getw : TBits_32; inline;
  14882. procedure setB2BIPKTGP(thebits : TBits_7); inline;
  14883. procedure setw(thebits : TBits_32); inline;
  14884. public
  14885. property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
  14886. property w : TBits_32 read getw write setw;
  14887. end;
  14888. TETH_EMACxIPGT = record
  14889. private
  14890. function getB2BIPKTGP : TBits_7; inline;
  14891. function getw : TBits_32; inline;
  14892. procedure setB2BIPKTGP(thebits : TBits_7); inline;
  14893. procedure setw(thebits : TBits_32); inline;
  14894. public
  14895. property B2BIPKTGP : TBits_7 read getB2BIPKTGP write setB2BIPKTGP;
  14896. property w : TBits_32 read getw write setw;
  14897. end;
  14898. TETH_EMAC1IPGR = record
  14899. private
  14900. function getNB2BIPKTGP1 : TBits_7; inline;
  14901. function getNB2BIPKTGP2 : TBits_7; inline;
  14902. function getw : TBits_32; inline;
  14903. procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
  14904. procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
  14905. procedure setw(thebits : TBits_32); inline;
  14906. public
  14907. property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
  14908. property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
  14909. property w : TBits_32 read getw write setw;
  14910. end;
  14911. TETH_EMACxIPGR = record
  14912. private
  14913. function getNB2BIPKTGP1 : TBits_7; inline;
  14914. function getNB2BIPKTGP2 : TBits_7; inline;
  14915. function getw : TBits_32; inline;
  14916. procedure setNB2BIPKTGP1(thebits : TBits_7); inline;
  14917. procedure setNB2BIPKTGP2(thebits : TBits_7); inline;
  14918. procedure setw(thebits : TBits_32); inline;
  14919. public
  14920. property NB2BIPKTGP1 : TBits_7 read getNB2BIPKTGP1 write setNB2BIPKTGP1;
  14921. property NB2BIPKTGP2 : TBits_7 read getNB2BIPKTGP2 write setNB2BIPKTGP2;
  14922. property w : TBits_32 read getw write setw;
  14923. end;
  14924. TETH_EMAC1CLRT = record
  14925. private
  14926. function getCWINDOW : TBits_6; inline;
  14927. function getRETX : TBits_4; inline;
  14928. function getw : TBits_32; inline;
  14929. procedure setCWINDOW(thebits : TBits_6); inline;
  14930. procedure setRETX(thebits : TBits_4); inline;
  14931. procedure setw(thebits : TBits_32); inline;
  14932. public
  14933. property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
  14934. property RETX : TBits_4 read getRETX write setRETX;
  14935. property w : TBits_32 read getw write setw;
  14936. end;
  14937. TETH_EMACxCLRT = record
  14938. private
  14939. function getCWINDOW : TBits_6; inline;
  14940. function getRETX : TBits_4; inline;
  14941. function getw : TBits_32; inline;
  14942. procedure setCWINDOW(thebits : TBits_6); inline;
  14943. procedure setRETX(thebits : TBits_4); inline;
  14944. procedure setw(thebits : TBits_32); inline;
  14945. public
  14946. property CWINDOW : TBits_6 read getCWINDOW write setCWINDOW;
  14947. property RETX : TBits_4 read getRETX write setRETX;
  14948. property w : TBits_32 read getw write setw;
  14949. end;
  14950. TETH_EMAC1MAXF = record
  14951. private
  14952. function getMACMAXF : TBits_16; inline;
  14953. function getw : TBits_32; inline;
  14954. procedure setMACMAXF(thebits : TBits_16); inline;
  14955. procedure setw(thebits : TBits_32); inline;
  14956. public
  14957. property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
  14958. property w : TBits_32 read getw write setw;
  14959. end;
  14960. TETH_EMACxMAXF = record
  14961. private
  14962. function getMACMAXF : TBits_16; inline;
  14963. function getw : TBits_32; inline;
  14964. procedure setMACMAXF(thebits : TBits_16); inline;
  14965. procedure setw(thebits : TBits_32); inline;
  14966. public
  14967. property MACMAXF : TBits_16 read getMACMAXF write setMACMAXF;
  14968. property w : TBits_32 read getw write setw;
  14969. end;
  14970. TETH_EMAC1SUPP = record
  14971. private
  14972. function getRESETRMII : TBits_1; inline;
  14973. function getSPEEDRMII : TBits_1; inline;
  14974. function getw : TBits_32; inline;
  14975. procedure setRESETRMII(thebits : TBits_1); inline;
  14976. procedure setSPEEDRMII(thebits : TBits_1); inline;
  14977. procedure setw(thebits : TBits_32); inline;
  14978. public
  14979. procedure clearRESETRMII; inline;
  14980. procedure clearSPEEDRMII; inline;
  14981. procedure setRESETRMII; inline;
  14982. procedure setSPEEDRMII; inline;
  14983. property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
  14984. property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
  14985. property w : TBits_32 read getw write setw;
  14986. end;
  14987. TETH_EMACxSUPP = record
  14988. private
  14989. function getRESETRMII : TBits_1; inline;
  14990. function getSPEEDRMII : TBits_1; inline;
  14991. function getw : TBits_32; inline;
  14992. procedure setRESETRMII(thebits : TBits_1); inline;
  14993. procedure setSPEEDRMII(thebits : TBits_1); inline;
  14994. procedure setw(thebits : TBits_32); inline;
  14995. public
  14996. procedure clearRESETRMII; inline;
  14997. procedure clearSPEEDRMII; inline;
  14998. procedure setRESETRMII; inline;
  14999. procedure setSPEEDRMII; inline;
  15000. property RESETRMII : TBits_1 read getRESETRMII write setRESETRMII;
  15001. property SPEEDRMII : TBits_1 read getSPEEDRMII write setSPEEDRMII;
  15002. property w : TBits_32 read getw write setw;
  15003. end;
  15004. TETH_EMAC1TEST = record
  15005. private
  15006. function getSHRTQNTA : TBits_1; inline;
  15007. function getTESTBP : TBits_1; inline;
  15008. function getTESTPAUSE : TBits_1; inline;
  15009. function getw : TBits_32; inline;
  15010. procedure setSHRTQNTA(thebits : TBits_1); inline;
  15011. procedure setTESTBP(thebits : TBits_1); inline;
  15012. procedure setTESTPAUSE(thebits : TBits_1); inline;
  15013. procedure setw(thebits : TBits_32); inline;
  15014. public
  15015. procedure clearSHRTQNTA; inline;
  15016. procedure clearTESTBP; inline;
  15017. procedure clearTESTPAUSE; inline;
  15018. procedure setSHRTQNTA; inline;
  15019. procedure setTESTBP; inline;
  15020. procedure setTESTPAUSE; inline;
  15021. property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
  15022. property TESTBP : TBits_1 read getTESTBP write setTESTBP;
  15023. property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
  15024. property w : TBits_32 read getw write setw;
  15025. end;
  15026. TETH_EMACxTEST = record
  15027. private
  15028. function getSHRTQNTA : TBits_1; inline;
  15029. function getTESTBP : TBits_1; inline;
  15030. function getTESTPAUSE : TBits_1; inline;
  15031. function getw : TBits_32; inline;
  15032. procedure setSHRTQNTA(thebits : TBits_1); inline;
  15033. procedure setTESTBP(thebits : TBits_1); inline;
  15034. procedure setTESTPAUSE(thebits : TBits_1); inline;
  15035. procedure setw(thebits : TBits_32); inline;
  15036. public
  15037. procedure clearSHRTQNTA; inline;
  15038. procedure clearTESTBP; inline;
  15039. procedure clearTESTPAUSE; inline;
  15040. procedure setSHRTQNTA; inline;
  15041. procedure setTESTBP; inline;
  15042. procedure setTESTPAUSE; inline;
  15043. property SHRTQNTA : TBits_1 read getSHRTQNTA write setSHRTQNTA;
  15044. property TESTBP : TBits_1 read getTESTBP write setTESTBP;
  15045. property TESTPAUSE : TBits_1 read getTESTPAUSE write setTESTPAUSE;
  15046. property w : TBits_32 read getw write setw;
  15047. end;
  15048. TETH_EMAC1MCFG = record
  15049. private
  15050. function getCLKSEL : TBits_4; inline;
  15051. function getNOPRE : TBits_1; inline;
  15052. function getRESETMGMT : TBits_1; inline;
  15053. function getSCANINC : TBits_1; inline;
  15054. function getw : TBits_32; inline;
  15055. procedure setCLKSEL(thebits : TBits_4); inline;
  15056. procedure setNOPRE(thebits : TBits_1); inline;
  15057. procedure setRESETMGMT(thebits : TBits_1); inline;
  15058. procedure setSCANINC(thebits : TBits_1); inline;
  15059. procedure setw(thebits : TBits_32); inline;
  15060. public
  15061. procedure clearNOPRE; inline;
  15062. procedure clearRESETMGMT; inline;
  15063. procedure clearSCANINC; inline;
  15064. procedure setNOPRE; inline;
  15065. procedure setRESETMGMT; inline;
  15066. procedure setSCANINC; inline;
  15067. property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
  15068. property NOPRE : TBits_1 read getNOPRE write setNOPRE;
  15069. property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
  15070. property SCANINC : TBits_1 read getSCANINC write setSCANINC;
  15071. property w : TBits_32 read getw write setw;
  15072. end;
  15073. TETH_EMACxMCFG = record
  15074. private
  15075. function getCLKSEL : TBits_4; inline;
  15076. function getNOPRE : TBits_1; inline;
  15077. function getRESETMGMT : TBits_1; inline;
  15078. function getSCANINC : TBits_1; inline;
  15079. function getw : TBits_32; inline;
  15080. procedure setCLKSEL(thebits : TBits_4); inline;
  15081. procedure setNOPRE(thebits : TBits_1); inline;
  15082. procedure setRESETMGMT(thebits : TBits_1); inline;
  15083. procedure setSCANINC(thebits : TBits_1); inline;
  15084. procedure setw(thebits : TBits_32); inline;
  15085. public
  15086. procedure clearNOPRE; inline;
  15087. procedure clearRESETMGMT; inline;
  15088. procedure clearSCANINC; inline;
  15089. procedure setNOPRE; inline;
  15090. procedure setRESETMGMT; inline;
  15091. procedure setSCANINC; inline;
  15092. property CLKSEL : TBits_4 read getCLKSEL write setCLKSEL;
  15093. property NOPRE : TBits_1 read getNOPRE write setNOPRE;
  15094. property RESETMGMT : TBits_1 read getRESETMGMT write setRESETMGMT;
  15095. property SCANINC : TBits_1 read getSCANINC write setSCANINC;
  15096. property w : TBits_32 read getw write setw;
  15097. end;
  15098. TETH_EMAC1MCMD = record
  15099. private
  15100. function getREAD : TBits_1; inline;
  15101. function getSCAN : TBits_1; inline;
  15102. function getw : TBits_32; inline;
  15103. procedure setREAD(thebits : TBits_1); inline;
  15104. procedure setSCAN(thebits : TBits_1); inline;
  15105. procedure setw(thebits : TBits_32); inline;
  15106. public
  15107. procedure clearREAD; inline;
  15108. procedure clearSCAN; inline;
  15109. procedure setREAD; inline;
  15110. procedure setSCAN; inline;
  15111. property READ : TBits_1 read getREAD write setREAD;
  15112. property SCAN : TBits_1 read getSCAN write setSCAN;
  15113. property w : TBits_32 read getw write setw;
  15114. end;
  15115. TETH_EMACxMCMD = record
  15116. private
  15117. function getREAD : TBits_1; inline;
  15118. function getSCAN : TBits_1; inline;
  15119. function getw : TBits_32; inline;
  15120. procedure setREAD(thebits : TBits_1); inline;
  15121. procedure setSCAN(thebits : TBits_1); inline;
  15122. procedure setw(thebits : TBits_32); inline;
  15123. public
  15124. procedure clearREAD; inline;
  15125. procedure clearSCAN; inline;
  15126. procedure setREAD; inline;
  15127. procedure setSCAN; inline;
  15128. property READ : TBits_1 read getREAD write setREAD;
  15129. property SCAN : TBits_1 read getSCAN write setSCAN;
  15130. property w : TBits_32 read getw write setw;
  15131. end;
  15132. TETH_EMAC1MADR = record
  15133. private
  15134. function getPHYADDR : TBits_5; inline;
  15135. function getREGADDR : TBits_5; inline;
  15136. function getw : TBits_32; inline;
  15137. procedure setPHYADDR(thebits : TBits_5); inline;
  15138. procedure setREGADDR(thebits : TBits_5); inline;
  15139. procedure setw(thebits : TBits_32); inline;
  15140. public
  15141. property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
  15142. property REGADDR : TBits_5 read getREGADDR write setREGADDR;
  15143. property w : TBits_32 read getw write setw;
  15144. end;
  15145. TETH_EMACxMADR = record
  15146. private
  15147. function getPHYADDR : TBits_5; inline;
  15148. function getREGADDR : TBits_5; inline;
  15149. function getw : TBits_32; inline;
  15150. procedure setPHYADDR(thebits : TBits_5); inline;
  15151. procedure setREGADDR(thebits : TBits_5); inline;
  15152. procedure setw(thebits : TBits_32); inline;
  15153. public
  15154. property PHYADDR : TBits_5 read getPHYADDR write setPHYADDR;
  15155. property REGADDR : TBits_5 read getREGADDR write setREGADDR;
  15156. property w : TBits_32 read getw write setw;
  15157. end;
  15158. TETH_EMAC1MWTD = record
  15159. private
  15160. function getMWTD : TBits_16; inline;
  15161. function getw : TBits_32; inline;
  15162. procedure setMWTD(thebits : TBits_16); inline;
  15163. procedure setw(thebits : TBits_32); inline;
  15164. public
  15165. property MWTD : TBits_16 read getMWTD write setMWTD;
  15166. property w : TBits_32 read getw write setw;
  15167. end;
  15168. TETH_EMACxMWTD = record
  15169. private
  15170. function getMWTD : TBits_16; inline;
  15171. function getw : TBits_32; inline;
  15172. procedure setMWTD(thebits : TBits_16); inline;
  15173. procedure setw(thebits : TBits_32); inline;
  15174. public
  15175. property MWTD : TBits_16 read getMWTD write setMWTD;
  15176. property w : TBits_32 read getw write setw;
  15177. end;
  15178. TETH_EMAC1MRDD = record
  15179. private
  15180. function getMRDD : TBits_16; inline;
  15181. function getw : TBits_32; inline;
  15182. procedure setMRDD(thebits : TBits_16); inline;
  15183. procedure setw(thebits : TBits_32); inline;
  15184. public
  15185. property MRDD : TBits_16 read getMRDD write setMRDD;
  15186. property w : TBits_32 read getw write setw;
  15187. end;
  15188. TETH_EMACxMRDD = record
  15189. private
  15190. function getMRDD : TBits_16; inline;
  15191. function getw : TBits_32; inline;
  15192. procedure setMRDD(thebits : TBits_16); inline;
  15193. procedure setw(thebits : TBits_32); inline;
  15194. public
  15195. property MRDD : TBits_16 read getMRDD write setMRDD;
  15196. property w : TBits_32 read getw write setw;
  15197. end;
  15198. TETH_EMAC1MIND = record
  15199. private
  15200. function getLINKFAIL : TBits_1; inline;
  15201. function getMIIMBUSY : TBits_1; inline;
  15202. function getNOTVALID : TBits_1; inline;
  15203. function getSCAN : TBits_1; inline;
  15204. function getw : TBits_32; inline;
  15205. procedure setLINKFAIL(thebits : TBits_1); inline;
  15206. procedure setMIIMBUSY(thebits : TBits_1); inline;
  15207. procedure setNOTVALID(thebits : TBits_1); inline;
  15208. procedure setSCAN(thebits : TBits_1); inline;
  15209. procedure setw(thebits : TBits_32); inline;
  15210. public
  15211. procedure clearLINKFAIL; inline;
  15212. procedure clearMIIMBUSY; inline;
  15213. procedure clearNOTVALID; inline;
  15214. procedure clearSCAN; inline;
  15215. procedure setLINKFAIL; inline;
  15216. procedure setMIIMBUSY; inline;
  15217. procedure setNOTVALID; inline;
  15218. procedure setSCAN; inline;
  15219. property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
  15220. property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
  15221. property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
  15222. property SCAN : TBits_1 read getSCAN write setSCAN;
  15223. property w : TBits_32 read getw write setw;
  15224. end;
  15225. TETH_EMACxMIND = record
  15226. private
  15227. function getLINKFAIL : TBits_1; inline;
  15228. function getMIIMBUSY : TBits_1; inline;
  15229. function getNOTVALID : TBits_1; inline;
  15230. function getSCAN : TBits_1; inline;
  15231. function getw : TBits_32; inline;
  15232. procedure setLINKFAIL(thebits : TBits_1); inline;
  15233. procedure setMIIMBUSY(thebits : TBits_1); inline;
  15234. procedure setNOTVALID(thebits : TBits_1); inline;
  15235. procedure setSCAN(thebits : TBits_1); inline;
  15236. procedure setw(thebits : TBits_32); inline;
  15237. public
  15238. procedure clearLINKFAIL; inline;
  15239. procedure clearMIIMBUSY; inline;
  15240. procedure clearNOTVALID; inline;
  15241. procedure clearSCAN; inline;
  15242. procedure setLINKFAIL; inline;
  15243. procedure setMIIMBUSY; inline;
  15244. procedure setNOTVALID; inline;
  15245. procedure setSCAN; inline;
  15246. property LINKFAIL : TBits_1 read getLINKFAIL write setLINKFAIL;
  15247. property MIIMBUSY : TBits_1 read getMIIMBUSY write setMIIMBUSY;
  15248. property NOTVALID : TBits_1 read getNOTVALID write setNOTVALID;
  15249. property SCAN : TBits_1 read getSCAN write setSCAN;
  15250. property w : TBits_32 read getw write setw;
  15251. end;
  15252. TETH_EMAC1SA0 = record
  15253. private
  15254. function getSTNADDR5 : TBits_8; inline;
  15255. function getSTNADDR6 : TBits_8; inline;
  15256. function getw : TBits_32; inline;
  15257. procedure setSTNADDR5(thebits : TBits_8); inline;
  15258. procedure setSTNADDR6(thebits : TBits_8); inline;
  15259. procedure setw(thebits : TBits_32); inline;
  15260. public
  15261. property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
  15262. property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
  15263. property w : TBits_32 read getw write setw;
  15264. end;
  15265. TETH_EMACxSA0 = record
  15266. private
  15267. function getSTNADDR5 : TBits_8; inline;
  15268. function getSTNADDR6 : TBits_8; inline;
  15269. function getw : TBits_32; inline;
  15270. procedure setSTNADDR5(thebits : TBits_8); inline;
  15271. procedure setSTNADDR6(thebits : TBits_8); inline;
  15272. procedure setw(thebits : TBits_32); inline;
  15273. public
  15274. property STNADDR5 : TBits_8 read getSTNADDR5 write setSTNADDR5;
  15275. property STNADDR6 : TBits_8 read getSTNADDR6 write setSTNADDR6;
  15276. property w : TBits_32 read getw write setw;
  15277. end;
  15278. TETH_EMAC1SA1 = record
  15279. private
  15280. function getSTNADDR3 : TBits_8; inline;
  15281. function getSTNADDR4 : TBits_8; inline;
  15282. function getw : TBits_32; inline;
  15283. procedure setSTNADDR3(thebits : TBits_8); inline;
  15284. procedure setSTNADDR4(thebits : TBits_8); inline;
  15285. procedure setw(thebits : TBits_32); inline;
  15286. public
  15287. property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
  15288. property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
  15289. property w : TBits_32 read getw write setw;
  15290. end;
  15291. TETH_EMACxSA1 = record
  15292. private
  15293. function getSTNADDR3 : TBits_8; inline;
  15294. function getSTNADDR4 : TBits_8; inline;
  15295. function getw : TBits_32; inline;
  15296. procedure setSTNADDR3(thebits : TBits_8); inline;
  15297. procedure setSTNADDR4(thebits : TBits_8); inline;
  15298. procedure setw(thebits : TBits_32); inline;
  15299. public
  15300. property STNADDR3 : TBits_8 read getSTNADDR3 write setSTNADDR3;
  15301. property STNADDR4 : TBits_8 read getSTNADDR4 write setSTNADDR4;
  15302. property w : TBits_32 read getw write setw;
  15303. end;
  15304. TETH_EMAC1SA2 = record
  15305. private
  15306. function getSTNADDR1 : TBits_8; inline;
  15307. function getSTNADDR2 : TBits_8; inline;
  15308. function getw : TBits_32; inline;
  15309. procedure setSTNADDR1(thebits : TBits_8); inline;
  15310. procedure setSTNADDR2(thebits : TBits_8); inline;
  15311. procedure setw(thebits : TBits_32); inline;
  15312. public
  15313. property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
  15314. property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
  15315. property w : TBits_32 read getw write setw;
  15316. end;
  15317. TETH_EMACxSA2 = record
  15318. private
  15319. function getSTNADDR1 : TBits_8; inline;
  15320. function getSTNADDR2 : TBits_8; inline;
  15321. function getw : TBits_32; inline;
  15322. procedure setSTNADDR1(thebits : TBits_8); inline;
  15323. procedure setSTNADDR2(thebits : TBits_8); inline;
  15324. procedure setw(thebits : TBits_32); inline;
  15325. public
  15326. property STNADDR1 : TBits_8 read getSTNADDR1 write setSTNADDR1;
  15327. property STNADDR2 : TBits_8 read getSTNADDR2 write setSTNADDR2;
  15328. property w : TBits_32 read getw write setw;
  15329. end;
  15330. type
  15331. TETHRegisters = record
  15332. ETHCON1bits : TETH_ETHCON1;
  15333. ETHCON1 : longWord;
  15334. ETHCON1CLR : longWord;
  15335. ETHCON1SET : longWord;
  15336. ETHCON1INV : longWord;
  15337. ETHCON2bits : TETH_ETHCON2;
  15338. ETHCON2 : longWord;
  15339. ETHCON2CLR : longWord;
  15340. ETHCON2SET : longWord;
  15341. ETHCON2INV : longWord;
  15342. ETHTXSTbits : TETH_ETHTXST;
  15343. ETHTXST : longWord;
  15344. ETHTXSTCLR : longWord;
  15345. ETHTXSTSET : longWord;
  15346. ETHTXSTINV : longWord;
  15347. ETHRXSTbits : TETH_ETHRXST;
  15348. ETHRXST : longWord;
  15349. ETHRXSTCLR : longWord;
  15350. ETHRXSTSET : longWord;
  15351. ETHRXSTINV : longWord;
  15352. ETHHT0bits : TETH_ETHHT0;
  15353. ETHHT0 : longWord;
  15354. ETHHT0CLR : longWord;
  15355. ETHHT0SET : longWord;
  15356. ETHHT0INV : longWord;
  15357. ETHHT1bits : TETH_ETHHT1;
  15358. ETHHT1 : longWord;
  15359. ETHHT1CLR : longWord;
  15360. ETHHT1SET : longWord;
  15361. ETHHT1INV : longWord;
  15362. ETHPMM0bits : TETH_ETHPMM0;
  15363. ETHPMM0 : longWord;
  15364. ETHPMM0CLR : longWord;
  15365. ETHPMM0SET : longWord;
  15366. ETHPMM0INV : longWord;
  15367. ETHPMM1bits : TETH_ETHPMM1;
  15368. ETHPMM1 : longWord;
  15369. ETHPMM1CLR : longWord;
  15370. ETHPMM1SET : longWord;
  15371. ETHPMM1INV : longWord;
  15372. ETHPMCSbits : TETH_ETHPMCS;
  15373. ETHPMCS : longWord;
  15374. ETHPMCSCLR : longWord;
  15375. ETHPMCSSET : longWord;
  15376. ETHPMCSINV : longWord;
  15377. ETHPMObits : TETH_ETHPMO;
  15378. ETHPMO : longWord;
  15379. ETHPMOCLR : longWord;
  15380. ETHPMOSET : longWord;
  15381. ETHPMOINV : longWord;
  15382. ETHRXFCbits : TETH_ETHRXFC;
  15383. ETHRXFC : longWord;
  15384. ETHRXFCCLR : longWord;
  15385. ETHRXFCSET : longWord;
  15386. ETHRXFCINV : longWord;
  15387. ETHRXWMbits : TETH_ETHRXWM;
  15388. ETHRXWM : longWord;
  15389. ETHRXWMCLR : longWord;
  15390. ETHRXWMSET : longWord;
  15391. ETHRXWMINV : longWord;
  15392. ETHIENbits : TETH_ETHIEN;
  15393. ETHIEN : longWord;
  15394. ETHIENCLR : longWord;
  15395. ETHIENSET : longWord;
  15396. ETHIENINV : longWord;
  15397. ETHIRQbits : TETH_ETHIRQ;
  15398. ETHIRQ : longWord;
  15399. ETHIRQCLR : longWord;
  15400. ETHIRQSET : longWord;
  15401. ETHIRQINV : longWord;
  15402. ETHSTATbits : TETH_ETHSTAT;
  15403. ETHSTAT : longWord;
  15404. ETHSTATCLR : longWord;
  15405. ETHSTATSET : longWord;
  15406. ETHSTATINV : longWord;
  15407. ETHRXOVFLOWbits : TETH_ETHRXOVFLOW;
  15408. ETHRXOVFLOW : longWord;
  15409. ETHRXOVFLOWCLR : longWord;
  15410. ETHRXOVFLOWSET : longWord;
  15411. ETHRXOVFLOWINV : longWord;
  15412. ETHFRMTXOKbits : TETH_ETHFRMTXOK;
  15413. ETHFRMTXOK : longWord;
  15414. ETHFRMTXOKCLR : longWord;
  15415. ETHFRMTXOKSET : longWord;
  15416. ETHFRMTXOKINV : longWord;
  15417. ETHSCOLFRMbits : TETH_ETHSCOLFRM;
  15418. ETHSCOLFRM : longWord;
  15419. ETHSCOLFRMCLR : longWord;
  15420. ETHSCOLFRMSET : longWord;
  15421. ETHSCOLFRMINV : longWord;
  15422. ETHMCOLFRMbits : TETH_ETHMCOLFRM;
  15423. ETHMCOLFRM : longWord;
  15424. ETHMCOLFRMCLR : longWord;
  15425. ETHMCOLFRMSET : longWord;
  15426. ETHMCOLFRMINV : longWord;
  15427. ETHFRMRXOKbits : TETH_ETHFRMRXOK;
  15428. ETHFRMRXOK : longWord;
  15429. ETHFRMRXOKCLR : longWord;
  15430. ETHFRMRXOKSET : longWord;
  15431. ETHFRMRXOKINV : longWord;
  15432. ETHFCSERRbits : TETH_ETHFCSERR;
  15433. ETHFCSERR : longWord;
  15434. ETHFCSERRCLR : longWord;
  15435. ETHFCSERRSET : longWord;
  15436. ETHFCSERRINV : longWord;
  15437. ETHALGNERRbits : TETH_ETHALGNERR;
  15438. ETHALGNERR : longWord;
  15439. ETHALGNERRCLR : longWord;
  15440. ETHALGNERRSET : longWord;
  15441. ETHALGNERRINV : longWord;
  15442. EMAC1CFG1bits : TETH_EMAC1CFG1;
  15443. EMAC1CFG1 : longWord;
  15444. EMACxCFG1bits : TETH_EMACxCFG1;
  15445. EMACxCFG1 : longWord;
  15446. EMAC1CFG1CLR : longWord;
  15447. EMACxCFG1CLR : longWord;
  15448. EMAC1CFG1SET : longWord;
  15449. EMACxCFG1SET : longWord;
  15450. EMAC1CFG1INV : longWord;
  15451. EMACxCFG1INV : longWord;
  15452. EMAC1CFG2bits : TETH_EMAC1CFG2;
  15453. EMAC1CFG2 : longWord;
  15454. EMACxCFG2bits : TETH_EMACxCFG2;
  15455. EMACxCFG2 : longWord;
  15456. EMAC1CFG2CLR : longWord;
  15457. EMACxCFG2CLR : longWord;
  15458. EMAC1CFG2SET : longWord;
  15459. EMACxCFG2SET : longWord;
  15460. EMAC1CFG2INV : longWord;
  15461. EMACxCFG2INV : longWord;
  15462. EMAC1IPGTbits : TETH_EMAC1IPGT;
  15463. EMAC1IPGT : longWord;
  15464. EMACxIPGTbits : TETH_EMACxIPGT;
  15465. EMACxIPGT : longWord;
  15466. EMAC1IPGTCLR : longWord;
  15467. EMACxIPGTCLR : longWord;
  15468. EMAC1IPGTSET : longWord;
  15469. EMACxIPGTSET : longWord;
  15470. EMAC1IPGTINV : longWord;
  15471. EMACxIPGTINV : longWord;
  15472. EMAC1IPGRbits : TETH_EMAC1IPGR;
  15473. EMAC1IPGR : longWord;
  15474. EMACxIPGRbits : TETH_EMACxIPGR;
  15475. EMACxIPGR : longWord;
  15476. EMAC1IPGRCLR : longWord;
  15477. EMACxIPGRCLR : longWord;
  15478. EMAC1IPGRSET : longWord;
  15479. EMACxIPGRSET : longWord;
  15480. EMAC1IPGRINV : longWord;
  15481. EMACxIPGRINV : longWord;
  15482. EMAC1CLRTbits : TETH_EMAC1CLRT;
  15483. EMAC1CLRT : longWord;
  15484. EMACxCLRTbits : TETH_EMACxCLRT;
  15485. EMACxCLRT : longWord;
  15486. EMAC1CLRTCLR : longWord;
  15487. EMACxCLRTCLR : longWord;
  15488. EMAC1CLRTSET : longWord;
  15489. EMACxCLRTSET : longWord;
  15490. EMAC1CLRTINV : longWord;
  15491. EMACxCLRTINV : longWord;
  15492. EMAC1MAXFbits : TETH_EMAC1MAXF;
  15493. EMAC1MAXF : longWord;
  15494. EMACxMAXFbits : TETH_EMACxMAXF;
  15495. EMACxMAXF : longWord;
  15496. EMAC1MAXFCLR : longWord;
  15497. EMACxMAXFCLR : longWord;
  15498. EMAC1MAXFSET : longWord;
  15499. EMACxMAXFSET : longWord;
  15500. EMAC1MAXFINV : longWord;
  15501. EMACxMAXFINV : longWord;
  15502. EMAC1SUPPbits : TETH_EMAC1SUPP;
  15503. EMAC1SUPP : longWord;
  15504. EMACxSUPPbits : TETH_EMACxSUPP;
  15505. EMACxSUPP : longWord;
  15506. EMAC1SUPPCLR : longWord;
  15507. EMACxSUPPCLR : longWord;
  15508. EMAC1SUPPSET : longWord;
  15509. EMACxSUPPSET : longWord;
  15510. EMAC1SUPPINV : longWord;
  15511. EMACxSUPPINV : longWord;
  15512. EMAC1TESTbits : TETH_EMAC1TEST;
  15513. EMAC1TEST : longWord;
  15514. EMACxTESTbits : TETH_EMACxTEST;
  15515. EMACxTEST : longWord;
  15516. EMAC1TESTCLR : longWord;
  15517. EMACxTESTCLR : longWord;
  15518. EMAC1TESTSET : longWord;
  15519. EMACxTESTSET : longWord;
  15520. EMAC1TESTINV : longWord;
  15521. EMACxTESTINV : longWord;
  15522. EMAC1MCFGbits : TETH_EMAC1MCFG;
  15523. EMAC1MCFG : longWord;
  15524. EMACxMCFGbits : TETH_EMACxMCFG;
  15525. EMACxMCFG : longWord;
  15526. EMAC1MCFGCLR : longWord;
  15527. EMACxMCFGCLR : longWord;
  15528. EMAC1MCFGSET : longWord;
  15529. EMACxMCFGSET : longWord;
  15530. EMAC1MCFGINV : longWord;
  15531. EMACxMCFGINV : longWord;
  15532. EMAC1MCMDbits : TETH_EMAC1MCMD;
  15533. EMAC1MCMD : longWord;
  15534. EMACxMCMDbits : TETH_EMACxMCMD;
  15535. EMACxMCMD : longWord;
  15536. EMAC1MCMDCLR : longWord;
  15537. EMACxMCMDCLR : longWord;
  15538. EMAC1MCMDSET : longWord;
  15539. EMACxMCMDSET : longWord;
  15540. EMAC1MCMDINV : longWord;
  15541. EMACxMCMDINV : longWord;
  15542. EMAC1MADRbits : TETH_EMAC1MADR;
  15543. EMAC1MADR : longWord;
  15544. EMACxMADRbits : TETH_EMACxMADR;
  15545. EMACxMADR : longWord;
  15546. EMAC1MADRCLR : longWord;
  15547. EMACxMADRCLR : longWord;
  15548. EMAC1MADRSET : longWord;
  15549. EMACxMADRSET : longWord;
  15550. EMAC1MADRINV : longWord;
  15551. EMACxMADRINV : longWord;
  15552. EMAC1MWTDbits : TETH_EMAC1MWTD;
  15553. EMAC1MWTD : longWord;
  15554. EMACxMWTDbits : TETH_EMACxMWTD;
  15555. EMACxMWTD : longWord;
  15556. EMAC1MWTDCLR : longWord;
  15557. EMACxMWTDCLR : longWord;
  15558. EMAC1MWTDSET : longWord;
  15559. EMACxMWTDSET : longWord;
  15560. EMAC1MWTDINV : longWord;
  15561. EMACxMWTDINV : longWord;
  15562. EMAC1MRDDbits : TETH_EMAC1MRDD;
  15563. EMAC1MRDD : longWord;
  15564. EMACxMRDDbits : TETH_EMACxMRDD;
  15565. EMACxMRDD : longWord;
  15566. EMAC1MRDDCLR : longWord;
  15567. EMACxMRDDCLR : longWord;
  15568. EMAC1MRDDSET : longWord;
  15569. EMACxMRDDSET : longWord;
  15570. EMAC1MRDDINV : longWord;
  15571. EMACxMRDDINV : longWord;
  15572. EMAC1MINDbits : TETH_EMAC1MIND;
  15573. EMAC1MIND : longWord;
  15574. EMACxMINDbits : TETH_EMACxMIND;
  15575. EMACxMIND : longWord;
  15576. EMAC1MINDCLR : longWord;
  15577. EMACxMINDCLR : longWord;
  15578. EMAC1MINDSET : longWord;
  15579. EMACxMINDSET : longWord;
  15580. EMAC1MINDINV : longWord;
  15581. EMACxMINDINV : longWord;
  15582. EMAC1SA0bits : TETH_EMAC1SA0;
  15583. EMAC1SA0 : longWord;
  15584. EMACxSA0bits : TETH_EMACxSA0;
  15585. EMACxSA0 : longWord;
  15586. EMAC1SA0CLR : longWord;
  15587. EMACxSA0CLR : longWord;
  15588. EMAC1SA0SET : longWord;
  15589. EMACxSA0SET : longWord;
  15590. EMAC1SA0INV : longWord;
  15591. EMACxSA0INV : longWord;
  15592. EMAC1SA1bits : TETH_EMAC1SA1;
  15593. EMAC1SA1 : longWord;
  15594. EMACxSA1bits : TETH_EMACxSA1;
  15595. EMACxSA1 : longWord;
  15596. EMAC1SA1CLR : longWord;
  15597. EMACxSA1CLR : longWord;
  15598. EMAC1SA1SET : longWord;
  15599. EMACxSA1SET : longWord;
  15600. EMAC1SA1INV : longWord;
  15601. EMACxSA1INV : longWord;
  15602. EMAC1SA2bits : TETH_EMAC1SA2;
  15603. EMAC1SA2 : longWord;
  15604. EMACxSA2bits : TETH_EMACxSA2;
  15605. EMACxSA2 : longWord;
  15606. EMAC1SA2CLR : longWord;
  15607. EMACxSA2CLR : longWord;
  15608. EMAC1SA2SET : longWord;
  15609. EMACxSA2SET : longWord;
  15610. EMAC1SA2INV : longWord;
  15611. EMACxSA2INV : longWord;
  15612. end;
  15613. TCAN1_C1CON = record
  15614. private
  15615. function getABAT : TBits_1; inline;
  15616. function getCANBUSY : TBits_1; inline;
  15617. function getCANCAP : TBits_1; inline;
  15618. function getDNCNT : TBits_5; inline;
  15619. function getON : TBits_1; inline;
  15620. function getOPMOD : TBits_3; inline;
  15621. function getREQOP : TBits_3; inline;
  15622. function getSIDL : TBits_1; inline;
  15623. function getw : TBits_32; inline;
  15624. procedure setABAT(thebits : TBits_1); inline;
  15625. procedure setCANBUSY(thebits : TBits_1); inline;
  15626. procedure setCANCAP(thebits : TBits_1); inline;
  15627. procedure setDNCNT(thebits : TBits_5); inline;
  15628. procedure setON(thebits : TBits_1); inline;
  15629. procedure setOPMOD(thebits : TBits_3); inline;
  15630. procedure setREQOP(thebits : TBits_3); inline;
  15631. procedure setSIDL(thebits : TBits_1); inline;
  15632. procedure setw(thebits : TBits_32); inline;
  15633. public
  15634. procedure clearABAT; inline;
  15635. procedure clearCANBUSY; inline;
  15636. procedure clearCANCAP; inline;
  15637. procedure clearON; inline;
  15638. procedure clearSIDL; inline;
  15639. procedure setABAT; inline;
  15640. procedure setCANBUSY; inline;
  15641. procedure setCANCAP; inline;
  15642. procedure setON; inline;
  15643. procedure setSIDL; inline;
  15644. property ABAT : TBits_1 read getABAT write setABAT;
  15645. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  15646. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  15647. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  15648. property ON : TBits_1 read getON write setON;
  15649. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  15650. property REQOP : TBits_3 read getREQOP write setREQOP;
  15651. property SIDL : TBits_1 read getSIDL write setSIDL;
  15652. property w : TBits_32 read getw write setw;
  15653. end;
  15654. TCAN1_C1CFG = record
  15655. private
  15656. function getBRP : TBits_6; inline;
  15657. function getPRSEG : TBits_3; inline;
  15658. function getSAM : TBits_1; inline;
  15659. function getSEG1PH : TBits_3; inline;
  15660. function getSEG2PH : TBits_3; inline;
  15661. function getSEG2PHTS : TBits_1; inline;
  15662. function getSJW : TBits_2; inline;
  15663. function getWAKFIL : TBits_1; inline;
  15664. function getw : TBits_32; inline;
  15665. procedure setBRP(thebits : TBits_6); inline;
  15666. procedure setPRSEG(thebits : TBits_3); inline;
  15667. procedure setSAM(thebits : TBits_1); inline;
  15668. procedure setSEG1PH(thebits : TBits_3); inline;
  15669. procedure setSEG2PH(thebits : TBits_3); inline;
  15670. procedure setSEG2PHTS(thebits : TBits_1); inline;
  15671. procedure setSJW(thebits : TBits_2); inline;
  15672. procedure setWAKFIL(thebits : TBits_1); inline;
  15673. procedure setw(thebits : TBits_32); inline;
  15674. public
  15675. procedure clearSAM; inline;
  15676. procedure clearSEG2PHTS; inline;
  15677. procedure clearWAKFIL; inline;
  15678. procedure setSAM; inline;
  15679. procedure setSEG2PHTS; inline;
  15680. procedure setWAKFIL; inline;
  15681. property BRP : TBits_6 read getBRP write setBRP;
  15682. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  15683. property SAM : TBits_1 read getSAM write setSAM;
  15684. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  15685. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  15686. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  15687. property SJW : TBits_2 read getSJW write setSJW;
  15688. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  15689. property w : TBits_32 read getw write setw;
  15690. end;
  15691. TCAN1_C1INT = record
  15692. private
  15693. function getCERRIE : TBits_1; inline;
  15694. function getCERRIF : TBits_1; inline;
  15695. function getCTMRIE : TBits_1; inline;
  15696. function getCTMRIF : TBits_1; inline;
  15697. function getIVRIE : TBits_1; inline;
  15698. function getIVRIF : TBits_1; inline;
  15699. function getMODIE : TBits_1; inline;
  15700. function getMODIF : TBits_1; inline;
  15701. function getRBIE : TBits_1; inline;
  15702. function getRBIF : TBits_1; inline;
  15703. function getRBOVIE : TBits_1; inline;
  15704. function getRBOVIF : TBits_1; inline;
  15705. function getSERRIE : TBits_1; inline;
  15706. function getSERRIF : TBits_1; inline;
  15707. function getTBIE : TBits_1; inline;
  15708. function getTBIF : TBits_1; inline;
  15709. function getWAKIE : TBits_1; inline;
  15710. function getWAKIF : TBits_1; inline;
  15711. function getw : TBits_32; inline;
  15712. procedure setCERRIE(thebits : TBits_1); inline;
  15713. procedure setCERRIF(thebits : TBits_1); inline;
  15714. procedure setCTMRIE(thebits : TBits_1); inline;
  15715. procedure setCTMRIF(thebits : TBits_1); inline;
  15716. procedure setIVRIE(thebits : TBits_1); inline;
  15717. procedure setIVRIF(thebits : TBits_1); inline;
  15718. procedure setMODIE(thebits : TBits_1); inline;
  15719. procedure setMODIF(thebits : TBits_1); inline;
  15720. procedure setRBIE(thebits : TBits_1); inline;
  15721. procedure setRBIF(thebits : TBits_1); inline;
  15722. procedure setRBOVIE(thebits : TBits_1); inline;
  15723. procedure setRBOVIF(thebits : TBits_1); inline;
  15724. procedure setSERRIE(thebits : TBits_1); inline;
  15725. procedure setSERRIF(thebits : TBits_1); inline;
  15726. procedure setTBIE(thebits : TBits_1); inline;
  15727. procedure setTBIF(thebits : TBits_1); inline;
  15728. procedure setWAKIE(thebits : TBits_1); inline;
  15729. procedure setWAKIF(thebits : TBits_1); inline;
  15730. procedure setw(thebits : TBits_32); inline;
  15731. public
  15732. procedure clearCERRIE; inline;
  15733. procedure clearCERRIF; inline;
  15734. procedure clearCTMRIE; inline;
  15735. procedure clearCTMRIF; inline;
  15736. procedure clearIVRIE; inline;
  15737. procedure clearIVRIF; inline;
  15738. procedure clearMODIE; inline;
  15739. procedure clearMODIF; inline;
  15740. procedure clearRBIE; inline;
  15741. procedure clearRBIF; inline;
  15742. procedure clearRBOVIE; inline;
  15743. procedure clearRBOVIF; inline;
  15744. procedure clearSERRIE; inline;
  15745. procedure clearSERRIF; inline;
  15746. procedure clearTBIE; inline;
  15747. procedure clearTBIF; inline;
  15748. procedure clearWAKIE; inline;
  15749. procedure clearWAKIF; inline;
  15750. procedure setCERRIE; inline;
  15751. procedure setCERRIF; inline;
  15752. procedure setCTMRIE; inline;
  15753. procedure setCTMRIF; inline;
  15754. procedure setIVRIE; inline;
  15755. procedure setIVRIF; inline;
  15756. procedure setMODIE; inline;
  15757. procedure setMODIF; inline;
  15758. procedure setRBIE; inline;
  15759. procedure setRBIF; inline;
  15760. procedure setRBOVIE; inline;
  15761. procedure setRBOVIF; inline;
  15762. procedure setSERRIE; inline;
  15763. procedure setSERRIF; inline;
  15764. procedure setTBIE; inline;
  15765. procedure setTBIF; inline;
  15766. procedure setWAKIE; inline;
  15767. procedure setWAKIF; inline;
  15768. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  15769. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  15770. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  15771. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  15772. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  15773. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  15774. property MODIE : TBits_1 read getMODIE write setMODIE;
  15775. property MODIF : TBits_1 read getMODIF write setMODIF;
  15776. property RBIE : TBits_1 read getRBIE write setRBIE;
  15777. property RBIF : TBits_1 read getRBIF write setRBIF;
  15778. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  15779. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  15780. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  15781. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  15782. property TBIE : TBits_1 read getTBIE write setTBIE;
  15783. property TBIF : TBits_1 read getTBIF write setTBIF;
  15784. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  15785. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  15786. property w : TBits_32 read getw write setw;
  15787. end;
  15788. TCAN1_C1VEC = record
  15789. private
  15790. function getFILHIT : TBits_5; inline;
  15791. function getICODE : TBits_7; inline;
  15792. function getw : TBits_32; inline;
  15793. procedure setFILHIT(thebits : TBits_5); inline;
  15794. procedure setICODE(thebits : TBits_7); inline;
  15795. procedure setw(thebits : TBits_32); inline;
  15796. public
  15797. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  15798. property ICODE : TBits_7 read getICODE write setICODE;
  15799. property w : TBits_32 read getw write setw;
  15800. end;
  15801. TCAN1_C1TREC = record
  15802. private
  15803. function getEWARN : TBits_1; inline;
  15804. function getRERRCNT : TBits_8; inline;
  15805. function getRXBP : TBits_1; inline;
  15806. function getRXWARN : TBits_1; inline;
  15807. function getTERRCNT : TBits_8; inline;
  15808. function getTXBO : TBits_1; inline;
  15809. function getTXBP : TBits_1; inline;
  15810. function getTXWARN : TBits_1; inline;
  15811. function getw : TBits_32; inline;
  15812. procedure setEWARN(thebits : TBits_1); inline;
  15813. procedure setRERRCNT(thebits : TBits_8); inline;
  15814. procedure setRXBP(thebits : TBits_1); inline;
  15815. procedure setRXWARN(thebits : TBits_1); inline;
  15816. procedure setTERRCNT(thebits : TBits_8); inline;
  15817. procedure setTXBO(thebits : TBits_1); inline;
  15818. procedure setTXBP(thebits : TBits_1); inline;
  15819. procedure setTXWARN(thebits : TBits_1); inline;
  15820. procedure setw(thebits : TBits_32); inline;
  15821. public
  15822. procedure clearEWARN; inline;
  15823. procedure clearRXBP; inline;
  15824. procedure clearRXWARN; inline;
  15825. procedure clearTXBO; inline;
  15826. procedure clearTXBP; inline;
  15827. procedure clearTXWARN; inline;
  15828. procedure setEWARN; inline;
  15829. procedure setRXBP; inline;
  15830. procedure setRXWARN; inline;
  15831. procedure setTXBO; inline;
  15832. procedure setTXBP; inline;
  15833. procedure setTXWARN; inline;
  15834. property EWARN : TBits_1 read getEWARN write setEWARN;
  15835. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  15836. property RXBP : TBits_1 read getRXBP write setRXBP;
  15837. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  15838. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  15839. property TXBO : TBits_1 read getTXBO write setTXBO;
  15840. property TXBP : TBits_1 read getTXBP write setTXBP;
  15841. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  15842. property w : TBits_32 read getw write setw;
  15843. end;
  15844. TCAN1_C1FSTAT = record
  15845. private
  15846. function getFIFOIP : TBits_32; inline;
  15847. function getFIFOIP0 : TBits_1; inline;
  15848. function getFIFOIP1 : TBits_1; inline;
  15849. function getFIFOIP10 : TBits_1; inline;
  15850. function getFIFOIP11 : TBits_1; inline;
  15851. function getFIFOIP12 : TBits_1; inline;
  15852. function getFIFOIP13 : TBits_1; inline;
  15853. function getFIFOIP14 : TBits_1; inline;
  15854. function getFIFOIP15 : TBits_1; inline;
  15855. function getFIFOIP16 : TBits_1; inline;
  15856. function getFIFOIP17 : TBits_1; inline;
  15857. function getFIFOIP18 : TBits_1; inline;
  15858. function getFIFOIP19 : TBits_1; inline;
  15859. function getFIFOIP2 : TBits_1; inline;
  15860. function getFIFOIP20 : TBits_1; inline;
  15861. function getFIFOIP21 : TBits_1; inline;
  15862. function getFIFOIP22 : TBits_1; inline;
  15863. function getFIFOIP23 : TBits_1; inline;
  15864. function getFIFOIP24 : TBits_1; inline;
  15865. function getFIFOIP25 : TBits_1; inline;
  15866. function getFIFOIP26 : TBits_1; inline;
  15867. function getFIFOIP27 : TBits_1; inline;
  15868. function getFIFOIP28 : TBits_1; inline;
  15869. function getFIFOIP29 : TBits_1; inline;
  15870. function getFIFOIP3 : TBits_1; inline;
  15871. function getFIFOIP30 : TBits_1; inline;
  15872. function getFIFOIP31 : TBits_1; inline;
  15873. function getFIFOIP4 : TBits_1; inline;
  15874. function getFIFOIP5 : TBits_1; inline;
  15875. function getFIFOIP6 : TBits_1; inline;
  15876. function getFIFOIP7 : TBits_1; inline;
  15877. function getFIFOIP8 : TBits_1; inline;
  15878. function getFIFOIP9 : TBits_1; inline;
  15879. function getw : TBits_32; inline;
  15880. procedure setFIFOIP(thebits : TBits_32); inline;
  15881. procedure setFIFOIP0(thebits : TBits_1); inline;
  15882. procedure setFIFOIP1(thebits : TBits_1); inline;
  15883. procedure setFIFOIP10(thebits : TBits_1); inline;
  15884. procedure setFIFOIP11(thebits : TBits_1); inline;
  15885. procedure setFIFOIP12(thebits : TBits_1); inline;
  15886. procedure setFIFOIP13(thebits : TBits_1); inline;
  15887. procedure setFIFOIP14(thebits : TBits_1); inline;
  15888. procedure setFIFOIP15(thebits : TBits_1); inline;
  15889. procedure setFIFOIP16(thebits : TBits_1); inline;
  15890. procedure setFIFOIP17(thebits : TBits_1); inline;
  15891. procedure setFIFOIP18(thebits : TBits_1); inline;
  15892. procedure setFIFOIP19(thebits : TBits_1); inline;
  15893. procedure setFIFOIP2(thebits : TBits_1); inline;
  15894. procedure setFIFOIP20(thebits : TBits_1); inline;
  15895. procedure setFIFOIP21(thebits : TBits_1); inline;
  15896. procedure setFIFOIP22(thebits : TBits_1); inline;
  15897. procedure setFIFOIP23(thebits : TBits_1); inline;
  15898. procedure setFIFOIP24(thebits : TBits_1); inline;
  15899. procedure setFIFOIP25(thebits : TBits_1); inline;
  15900. procedure setFIFOIP26(thebits : TBits_1); inline;
  15901. procedure setFIFOIP27(thebits : TBits_1); inline;
  15902. procedure setFIFOIP28(thebits : TBits_1); inline;
  15903. procedure setFIFOIP29(thebits : TBits_1); inline;
  15904. procedure setFIFOIP3(thebits : TBits_1); inline;
  15905. procedure setFIFOIP30(thebits : TBits_1); inline;
  15906. procedure setFIFOIP31(thebits : TBits_1); inline;
  15907. procedure setFIFOIP4(thebits : TBits_1); inline;
  15908. procedure setFIFOIP5(thebits : TBits_1); inline;
  15909. procedure setFIFOIP6(thebits : TBits_1); inline;
  15910. procedure setFIFOIP7(thebits : TBits_1); inline;
  15911. procedure setFIFOIP8(thebits : TBits_1); inline;
  15912. procedure setFIFOIP9(thebits : TBits_1); inline;
  15913. procedure setw(thebits : TBits_32); inline;
  15914. public
  15915. procedure clearFIFOIP0; inline;
  15916. procedure clearFIFOIP10; inline;
  15917. procedure clearFIFOIP11; inline;
  15918. procedure clearFIFOIP12; inline;
  15919. procedure clearFIFOIP13; inline;
  15920. procedure clearFIFOIP14; inline;
  15921. procedure clearFIFOIP15; inline;
  15922. procedure clearFIFOIP16; inline;
  15923. procedure clearFIFOIP17; inline;
  15924. procedure clearFIFOIP18; inline;
  15925. procedure clearFIFOIP19; inline;
  15926. procedure clearFIFOIP1; inline;
  15927. procedure clearFIFOIP20; inline;
  15928. procedure clearFIFOIP21; inline;
  15929. procedure clearFIFOIP22; inline;
  15930. procedure clearFIFOIP23; inline;
  15931. procedure clearFIFOIP24; inline;
  15932. procedure clearFIFOIP25; inline;
  15933. procedure clearFIFOIP26; inline;
  15934. procedure clearFIFOIP27; inline;
  15935. procedure clearFIFOIP28; inline;
  15936. procedure clearFIFOIP29; inline;
  15937. procedure clearFIFOIP2; inline;
  15938. procedure clearFIFOIP30; inline;
  15939. procedure clearFIFOIP31; inline;
  15940. procedure clearFIFOIP3; inline;
  15941. procedure clearFIFOIP4; inline;
  15942. procedure clearFIFOIP5; inline;
  15943. procedure clearFIFOIP6; inline;
  15944. procedure clearFIFOIP7; inline;
  15945. procedure clearFIFOIP8; inline;
  15946. procedure clearFIFOIP9; inline;
  15947. procedure setFIFOIP0; inline;
  15948. procedure setFIFOIP10; inline;
  15949. procedure setFIFOIP11; inline;
  15950. procedure setFIFOIP12; inline;
  15951. procedure setFIFOIP13; inline;
  15952. procedure setFIFOIP14; inline;
  15953. procedure setFIFOIP15; inline;
  15954. procedure setFIFOIP16; inline;
  15955. procedure setFIFOIP17; inline;
  15956. procedure setFIFOIP18; inline;
  15957. procedure setFIFOIP19; inline;
  15958. procedure setFIFOIP1; inline;
  15959. procedure setFIFOIP20; inline;
  15960. procedure setFIFOIP21; inline;
  15961. procedure setFIFOIP22; inline;
  15962. procedure setFIFOIP23; inline;
  15963. procedure setFIFOIP24; inline;
  15964. procedure setFIFOIP25; inline;
  15965. procedure setFIFOIP26; inline;
  15966. procedure setFIFOIP27; inline;
  15967. procedure setFIFOIP28; inline;
  15968. procedure setFIFOIP29; inline;
  15969. procedure setFIFOIP2; inline;
  15970. procedure setFIFOIP30; inline;
  15971. procedure setFIFOIP31; inline;
  15972. procedure setFIFOIP3; inline;
  15973. procedure setFIFOIP4; inline;
  15974. procedure setFIFOIP5; inline;
  15975. procedure setFIFOIP6; inline;
  15976. procedure setFIFOIP7; inline;
  15977. procedure setFIFOIP8; inline;
  15978. procedure setFIFOIP9; inline;
  15979. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  15980. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  15981. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  15982. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  15983. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  15984. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  15985. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  15986. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  15987. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  15988. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  15989. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  15990. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  15991. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  15992. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  15993. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  15994. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  15995. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  15996. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  15997. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  15998. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  15999. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  16000. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  16001. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  16002. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  16003. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  16004. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  16005. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  16006. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  16007. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  16008. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  16009. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  16010. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  16011. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  16012. property w : TBits_32 read getw write setw;
  16013. end;
  16014. TCAN1_C1RXOVF = record
  16015. private
  16016. function getRXOVF : TBits_32; inline;
  16017. function getRXOVF0 : TBits_1; inline;
  16018. function getRXOVF1 : TBits_1; inline;
  16019. function getRXOVF10 : TBits_1; inline;
  16020. function getRXOVF11 : TBits_1; inline;
  16021. function getRXOVF12 : TBits_1; inline;
  16022. function getRXOVF13 : TBits_1; inline;
  16023. function getRXOVF14 : TBits_1; inline;
  16024. function getRXOVF15 : TBits_1; inline;
  16025. function getRXOVF16 : TBits_1; inline;
  16026. function getRXOVF17 : TBits_1; inline;
  16027. function getRXOVF18 : TBits_1; inline;
  16028. function getRXOVF19 : TBits_1; inline;
  16029. function getRXOVF2 : TBits_1; inline;
  16030. function getRXOVF20 : TBits_1; inline;
  16031. function getRXOVF21 : TBits_1; inline;
  16032. function getRXOVF22 : TBits_1; inline;
  16033. function getRXOVF23 : TBits_1; inline;
  16034. function getRXOVF24 : TBits_1; inline;
  16035. function getRXOVF25 : TBits_1; inline;
  16036. function getRXOVF26 : TBits_1; inline;
  16037. function getRXOVF27 : TBits_1; inline;
  16038. function getRXOVF28 : TBits_1; inline;
  16039. function getRXOVF29 : TBits_1; inline;
  16040. function getRXOVF3 : TBits_1; inline;
  16041. function getRXOVF30 : TBits_1; inline;
  16042. function getRXOVF31 : TBits_1; inline;
  16043. function getRXOVF4 : TBits_1; inline;
  16044. function getRXOVF5 : TBits_1; inline;
  16045. function getRXOVF6 : TBits_1; inline;
  16046. function getRXOVF7 : TBits_1; inline;
  16047. function getRXOVF8 : TBits_1; inline;
  16048. function getRXOVF9 : TBits_1; inline;
  16049. function getw : TBits_32; inline;
  16050. procedure setRXOVF(thebits : TBits_32); inline;
  16051. procedure setRXOVF0(thebits : TBits_1); inline;
  16052. procedure setRXOVF1(thebits : TBits_1); inline;
  16053. procedure setRXOVF10(thebits : TBits_1); inline;
  16054. procedure setRXOVF11(thebits : TBits_1); inline;
  16055. procedure setRXOVF12(thebits : TBits_1); inline;
  16056. procedure setRXOVF13(thebits : TBits_1); inline;
  16057. procedure setRXOVF14(thebits : TBits_1); inline;
  16058. procedure setRXOVF15(thebits : TBits_1); inline;
  16059. procedure setRXOVF16(thebits : TBits_1); inline;
  16060. procedure setRXOVF17(thebits : TBits_1); inline;
  16061. procedure setRXOVF18(thebits : TBits_1); inline;
  16062. procedure setRXOVF19(thebits : TBits_1); inline;
  16063. procedure setRXOVF2(thebits : TBits_1); inline;
  16064. procedure setRXOVF20(thebits : TBits_1); inline;
  16065. procedure setRXOVF21(thebits : TBits_1); inline;
  16066. procedure setRXOVF22(thebits : TBits_1); inline;
  16067. procedure setRXOVF23(thebits : TBits_1); inline;
  16068. procedure setRXOVF24(thebits : TBits_1); inline;
  16069. procedure setRXOVF25(thebits : TBits_1); inline;
  16070. procedure setRXOVF26(thebits : TBits_1); inline;
  16071. procedure setRXOVF27(thebits : TBits_1); inline;
  16072. procedure setRXOVF28(thebits : TBits_1); inline;
  16073. procedure setRXOVF29(thebits : TBits_1); inline;
  16074. procedure setRXOVF3(thebits : TBits_1); inline;
  16075. procedure setRXOVF30(thebits : TBits_1); inline;
  16076. procedure setRXOVF31(thebits : TBits_1); inline;
  16077. procedure setRXOVF4(thebits : TBits_1); inline;
  16078. procedure setRXOVF5(thebits : TBits_1); inline;
  16079. procedure setRXOVF6(thebits : TBits_1); inline;
  16080. procedure setRXOVF7(thebits : TBits_1); inline;
  16081. procedure setRXOVF8(thebits : TBits_1); inline;
  16082. procedure setRXOVF9(thebits : TBits_1); inline;
  16083. procedure setw(thebits : TBits_32); inline;
  16084. public
  16085. procedure clearRXOVF0; inline;
  16086. procedure clearRXOVF10; inline;
  16087. procedure clearRXOVF11; inline;
  16088. procedure clearRXOVF12; inline;
  16089. procedure clearRXOVF13; inline;
  16090. procedure clearRXOVF14; inline;
  16091. procedure clearRXOVF15; inline;
  16092. procedure clearRXOVF16; inline;
  16093. procedure clearRXOVF17; inline;
  16094. procedure clearRXOVF18; inline;
  16095. procedure clearRXOVF19; inline;
  16096. procedure clearRXOVF1; inline;
  16097. procedure clearRXOVF20; inline;
  16098. procedure clearRXOVF21; inline;
  16099. procedure clearRXOVF22; inline;
  16100. procedure clearRXOVF23; inline;
  16101. procedure clearRXOVF24; inline;
  16102. procedure clearRXOVF25; inline;
  16103. procedure clearRXOVF26; inline;
  16104. procedure clearRXOVF27; inline;
  16105. procedure clearRXOVF28; inline;
  16106. procedure clearRXOVF29; inline;
  16107. procedure clearRXOVF2; inline;
  16108. procedure clearRXOVF30; inline;
  16109. procedure clearRXOVF31; inline;
  16110. procedure clearRXOVF3; inline;
  16111. procedure clearRXOVF4; inline;
  16112. procedure clearRXOVF5; inline;
  16113. procedure clearRXOVF6; inline;
  16114. procedure clearRXOVF7; inline;
  16115. procedure clearRXOVF8; inline;
  16116. procedure clearRXOVF9; inline;
  16117. procedure setRXOVF0; inline;
  16118. procedure setRXOVF10; inline;
  16119. procedure setRXOVF11; inline;
  16120. procedure setRXOVF12; inline;
  16121. procedure setRXOVF13; inline;
  16122. procedure setRXOVF14; inline;
  16123. procedure setRXOVF15; inline;
  16124. procedure setRXOVF16; inline;
  16125. procedure setRXOVF17; inline;
  16126. procedure setRXOVF18; inline;
  16127. procedure setRXOVF19; inline;
  16128. procedure setRXOVF1; inline;
  16129. procedure setRXOVF20; inline;
  16130. procedure setRXOVF21; inline;
  16131. procedure setRXOVF22; inline;
  16132. procedure setRXOVF23; inline;
  16133. procedure setRXOVF24; inline;
  16134. procedure setRXOVF25; inline;
  16135. procedure setRXOVF26; inline;
  16136. procedure setRXOVF27; inline;
  16137. procedure setRXOVF28; inline;
  16138. procedure setRXOVF29; inline;
  16139. procedure setRXOVF2; inline;
  16140. procedure setRXOVF30; inline;
  16141. procedure setRXOVF31; inline;
  16142. procedure setRXOVF3; inline;
  16143. procedure setRXOVF4; inline;
  16144. procedure setRXOVF5; inline;
  16145. procedure setRXOVF6; inline;
  16146. procedure setRXOVF7; inline;
  16147. procedure setRXOVF8; inline;
  16148. procedure setRXOVF9; inline;
  16149. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  16150. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  16151. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  16152. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  16153. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  16154. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  16155. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  16156. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  16157. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  16158. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  16159. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  16160. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  16161. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  16162. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  16163. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  16164. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  16165. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  16166. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  16167. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  16168. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  16169. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  16170. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  16171. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  16172. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  16173. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  16174. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  16175. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  16176. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  16177. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  16178. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  16179. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  16180. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  16181. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  16182. property w : TBits_32 read getw write setw;
  16183. end;
  16184. TCAN1_C1TMR = record
  16185. private
  16186. function getCANTS : TBits_16; inline;
  16187. function getCANTSPRE : TBits_16; inline;
  16188. function getw : TBits_32; inline;
  16189. procedure setCANTS(thebits : TBits_16); inline;
  16190. procedure setCANTSPRE(thebits : TBits_16); inline;
  16191. procedure setw(thebits : TBits_32); inline;
  16192. public
  16193. property CANTS : TBits_16 read getCANTS write setCANTS;
  16194. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  16195. property w : TBits_32 read getw write setw;
  16196. end;
  16197. TCAN1_C1RXM0 = record
  16198. private
  16199. function getEID : TBits_18; inline;
  16200. function getMIDE : TBits_1; inline;
  16201. function getSID : TBits_11; inline;
  16202. function getw : TBits_32; inline;
  16203. procedure setEID(thebits : TBits_18); inline;
  16204. procedure setMIDE(thebits : TBits_1); inline;
  16205. procedure setSID(thebits : TBits_11); inline;
  16206. procedure setw(thebits : TBits_32); inline;
  16207. public
  16208. procedure clearMIDE; inline;
  16209. procedure setMIDE; inline;
  16210. property EID : TBits_18 read getEID write setEID;
  16211. property MIDE : TBits_1 read getMIDE write setMIDE;
  16212. property SID : TBits_11 read getSID write setSID;
  16213. property w : TBits_32 read getw write setw;
  16214. end;
  16215. TCAN1_C1RXM1 = record
  16216. private
  16217. function getEID : TBits_18; inline;
  16218. function getMIDE : TBits_1; inline;
  16219. function getSID : TBits_11; inline;
  16220. function getw : TBits_32; inline;
  16221. procedure setEID(thebits : TBits_18); inline;
  16222. procedure setMIDE(thebits : TBits_1); inline;
  16223. procedure setSID(thebits : TBits_11); inline;
  16224. procedure setw(thebits : TBits_32); inline;
  16225. public
  16226. procedure clearMIDE; inline;
  16227. procedure setMIDE; inline;
  16228. property EID : TBits_18 read getEID write setEID;
  16229. property MIDE : TBits_1 read getMIDE write setMIDE;
  16230. property SID : TBits_11 read getSID write setSID;
  16231. property w : TBits_32 read getw write setw;
  16232. end;
  16233. TCAN1_C1RXM2 = record
  16234. private
  16235. function getEID : TBits_18; inline;
  16236. function getMIDE : TBits_1; inline;
  16237. function getSID : TBits_11; inline;
  16238. function getw : TBits_32; inline;
  16239. procedure setEID(thebits : TBits_18); inline;
  16240. procedure setMIDE(thebits : TBits_1); inline;
  16241. procedure setSID(thebits : TBits_11); inline;
  16242. procedure setw(thebits : TBits_32); inline;
  16243. public
  16244. procedure clearMIDE; inline;
  16245. procedure setMIDE; inline;
  16246. property EID : TBits_18 read getEID write setEID;
  16247. property MIDE : TBits_1 read getMIDE write setMIDE;
  16248. property SID : TBits_11 read getSID write setSID;
  16249. property w : TBits_32 read getw write setw;
  16250. end;
  16251. TCAN1_C1RXM3 = record
  16252. private
  16253. function getEID : TBits_18; inline;
  16254. function getMIDE : TBits_1; inline;
  16255. function getSID : TBits_11; inline;
  16256. function getw : TBits_32; inline;
  16257. procedure setEID(thebits : TBits_18); inline;
  16258. procedure setMIDE(thebits : TBits_1); inline;
  16259. procedure setSID(thebits : TBits_11); inline;
  16260. procedure setw(thebits : TBits_32); inline;
  16261. public
  16262. procedure clearMIDE; inline;
  16263. procedure setMIDE; inline;
  16264. property EID : TBits_18 read getEID write setEID;
  16265. property MIDE : TBits_1 read getMIDE write setMIDE;
  16266. property SID : TBits_11 read getSID write setSID;
  16267. property w : TBits_32 read getw write setw;
  16268. end;
  16269. TCAN1_C1FLTCON0 = record
  16270. private
  16271. function getFLTEN0 : TBits_1; inline;
  16272. function getFLTEN1 : TBits_1; inline;
  16273. function getFLTEN2 : TBits_1; inline;
  16274. function getFLTEN3 : TBits_1; inline;
  16275. function getFSEL0 : TBits_5; inline;
  16276. function getFSEL1 : TBits_5; inline;
  16277. function getFSEL2 : TBits_5; inline;
  16278. function getFSEL3 : TBits_5; inline;
  16279. function getMSEL0 : TBits_2; inline;
  16280. function getMSEL1 : TBits_2; inline;
  16281. function getMSEL2 : TBits_2; inline;
  16282. function getMSEL3 : TBits_2; inline;
  16283. function getw : TBits_32; inline;
  16284. procedure setFLTEN0(thebits : TBits_1); inline;
  16285. procedure setFLTEN1(thebits : TBits_1); inline;
  16286. procedure setFLTEN2(thebits : TBits_1); inline;
  16287. procedure setFLTEN3(thebits : TBits_1); inline;
  16288. procedure setFSEL0(thebits : TBits_5); inline;
  16289. procedure setFSEL1(thebits : TBits_5); inline;
  16290. procedure setFSEL2(thebits : TBits_5); inline;
  16291. procedure setFSEL3(thebits : TBits_5); inline;
  16292. procedure setMSEL0(thebits : TBits_2); inline;
  16293. procedure setMSEL1(thebits : TBits_2); inline;
  16294. procedure setMSEL2(thebits : TBits_2); inline;
  16295. procedure setMSEL3(thebits : TBits_2); inline;
  16296. procedure setw(thebits : TBits_32); inline;
  16297. public
  16298. procedure clearFLTEN0; inline;
  16299. procedure clearFLTEN1; inline;
  16300. procedure clearFLTEN2; inline;
  16301. procedure clearFLTEN3; inline;
  16302. procedure setFLTEN0; inline;
  16303. procedure setFLTEN1; inline;
  16304. procedure setFLTEN2; inline;
  16305. procedure setFLTEN3; inline;
  16306. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  16307. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  16308. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  16309. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  16310. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  16311. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  16312. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  16313. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  16314. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  16315. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  16316. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  16317. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  16318. property w : TBits_32 read getw write setw;
  16319. end;
  16320. TCAN1_C1FLTCON1 = record
  16321. private
  16322. function getFLTEN4 : TBits_1; inline;
  16323. function getFLTEN5 : TBits_1; inline;
  16324. function getFLTEN6 : TBits_1; inline;
  16325. function getFLTEN7 : TBits_1; inline;
  16326. function getFSEL4 : TBits_5; inline;
  16327. function getFSEL5 : TBits_5; inline;
  16328. function getFSEL6 : TBits_5; inline;
  16329. function getFSEL7 : TBits_5; inline;
  16330. function getMSEL4 : TBits_2; inline;
  16331. function getMSEL5 : TBits_2; inline;
  16332. function getMSEL6 : TBits_2; inline;
  16333. function getMSEL7 : TBits_2; inline;
  16334. function getw : TBits_32; inline;
  16335. procedure setFLTEN4(thebits : TBits_1); inline;
  16336. procedure setFLTEN5(thebits : TBits_1); inline;
  16337. procedure setFLTEN6(thebits : TBits_1); inline;
  16338. procedure setFLTEN7(thebits : TBits_1); inline;
  16339. procedure setFSEL4(thebits : TBits_5); inline;
  16340. procedure setFSEL5(thebits : TBits_5); inline;
  16341. procedure setFSEL6(thebits : TBits_5); inline;
  16342. procedure setFSEL7(thebits : TBits_5); inline;
  16343. procedure setMSEL4(thebits : TBits_2); inline;
  16344. procedure setMSEL5(thebits : TBits_2); inline;
  16345. procedure setMSEL6(thebits : TBits_2); inline;
  16346. procedure setMSEL7(thebits : TBits_2); inline;
  16347. procedure setw(thebits : TBits_32); inline;
  16348. public
  16349. procedure clearFLTEN4; inline;
  16350. procedure clearFLTEN5; inline;
  16351. procedure clearFLTEN6; inline;
  16352. procedure clearFLTEN7; inline;
  16353. procedure setFLTEN4; inline;
  16354. procedure setFLTEN5; inline;
  16355. procedure setFLTEN6; inline;
  16356. procedure setFLTEN7; inline;
  16357. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  16358. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  16359. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  16360. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  16361. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  16362. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  16363. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  16364. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  16365. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  16366. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  16367. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  16368. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  16369. property w : TBits_32 read getw write setw;
  16370. end;
  16371. TCAN1_C1FLTCON2 = record
  16372. private
  16373. function getFLTEN10 : TBits_1; inline;
  16374. function getFLTEN11 : TBits_1; inline;
  16375. function getFLTEN8 : TBits_1; inline;
  16376. function getFLTEN9 : TBits_1; inline;
  16377. function getFSEL10 : TBits_5; inline;
  16378. function getFSEL11 : TBits_5; inline;
  16379. function getFSEL8 : TBits_5; inline;
  16380. function getFSEL9 : TBits_5; inline;
  16381. function getMSEL10 : TBits_2; inline;
  16382. function getMSEL11 : TBits_2; inline;
  16383. function getMSEL8 : TBits_2; inline;
  16384. function getMSEL9 : TBits_2; inline;
  16385. function getw : TBits_32; inline;
  16386. procedure setFLTEN10(thebits : TBits_1); inline;
  16387. procedure setFLTEN11(thebits : TBits_1); inline;
  16388. procedure setFLTEN8(thebits : TBits_1); inline;
  16389. procedure setFLTEN9(thebits : TBits_1); inline;
  16390. procedure setFSEL10(thebits : TBits_5); inline;
  16391. procedure setFSEL11(thebits : TBits_5); inline;
  16392. procedure setFSEL8(thebits : TBits_5); inline;
  16393. procedure setFSEL9(thebits : TBits_5); inline;
  16394. procedure setMSEL10(thebits : TBits_2); inline;
  16395. procedure setMSEL11(thebits : TBits_2); inline;
  16396. procedure setMSEL8(thebits : TBits_2); inline;
  16397. procedure setMSEL9(thebits : TBits_2); inline;
  16398. procedure setw(thebits : TBits_32); inline;
  16399. public
  16400. procedure clearFLTEN10; inline;
  16401. procedure clearFLTEN11; inline;
  16402. procedure clearFLTEN8; inline;
  16403. procedure clearFLTEN9; inline;
  16404. procedure setFLTEN10; inline;
  16405. procedure setFLTEN11; inline;
  16406. procedure setFLTEN8; inline;
  16407. procedure setFLTEN9; inline;
  16408. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  16409. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  16410. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  16411. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  16412. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  16413. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  16414. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  16415. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  16416. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  16417. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  16418. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  16419. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  16420. property w : TBits_32 read getw write setw;
  16421. end;
  16422. TCAN1_C1FLTCON3 = record
  16423. private
  16424. function getFLTEN12 : TBits_1; inline;
  16425. function getFLTEN13 : TBits_1; inline;
  16426. function getFLTEN14 : TBits_1; inline;
  16427. function getFLTEN15 : TBits_1; inline;
  16428. function getFSEL12 : TBits_5; inline;
  16429. function getFSEL13 : TBits_5; inline;
  16430. function getFSEL14 : TBits_5; inline;
  16431. function getFSEL15 : TBits_5; inline;
  16432. function getMSEL12 : TBits_2; inline;
  16433. function getMSEL13 : TBits_2; inline;
  16434. function getMSEL14 : TBits_2; inline;
  16435. function getMSEL15 : TBits_2; inline;
  16436. function getw : TBits_32; inline;
  16437. procedure setFLTEN12(thebits : TBits_1); inline;
  16438. procedure setFLTEN13(thebits : TBits_1); inline;
  16439. procedure setFLTEN14(thebits : TBits_1); inline;
  16440. procedure setFLTEN15(thebits : TBits_1); inline;
  16441. procedure setFSEL12(thebits : TBits_5); inline;
  16442. procedure setFSEL13(thebits : TBits_5); inline;
  16443. procedure setFSEL14(thebits : TBits_5); inline;
  16444. procedure setFSEL15(thebits : TBits_5); inline;
  16445. procedure setMSEL12(thebits : TBits_2); inline;
  16446. procedure setMSEL13(thebits : TBits_2); inline;
  16447. procedure setMSEL14(thebits : TBits_2); inline;
  16448. procedure setMSEL15(thebits : TBits_2); inline;
  16449. procedure setw(thebits : TBits_32); inline;
  16450. public
  16451. procedure clearFLTEN12; inline;
  16452. procedure clearFLTEN13; inline;
  16453. procedure clearFLTEN14; inline;
  16454. procedure clearFLTEN15; inline;
  16455. procedure setFLTEN12; inline;
  16456. procedure setFLTEN13; inline;
  16457. procedure setFLTEN14; inline;
  16458. procedure setFLTEN15; inline;
  16459. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  16460. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  16461. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  16462. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  16463. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  16464. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  16465. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  16466. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  16467. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  16468. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  16469. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  16470. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  16471. property w : TBits_32 read getw write setw;
  16472. end;
  16473. TCAN1_C1FLTCON4 = record
  16474. private
  16475. function getFLTEN16 : TBits_1; inline;
  16476. function getFLTEN17 : TBits_1; inline;
  16477. function getFLTEN18 : TBits_1; inline;
  16478. function getFLTEN19 : TBits_1; inline;
  16479. function getFSEL16 : TBits_5; inline;
  16480. function getFSEL17 : TBits_5; inline;
  16481. function getFSEL18 : TBits_5; inline;
  16482. function getFSEL19 : TBits_5; inline;
  16483. function getMSEL16 : TBits_2; inline;
  16484. function getMSEL17 : TBits_2; inline;
  16485. function getMSEL18 : TBits_2; inline;
  16486. function getMSEL19 : TBits_2; inline;
  16487. function getw : TBits_32; inline;
  16488. procedure setFLTEN16(thebits : TBits_1); inline;
  16489. procedure setFLTEN17(thebits : TBits_1); inline;
  16490. procedure setFLTEN18(thebits : TBits_1); inline;
  16491. procedure setFLTEN19(thebits : TBits_1); inline;
  16492. procedure setFSEL16(thebits : TBits_5); inline;
  16493. procedure setFSEL17(thebits : TBits_5); inline;
  16494. procedure setFSEL18(thebits : TBits_5); inline;
  16495. procedure setFSEL19(thebits : TBits_5); inline;
  16496. procedure setMSEL16(thebits : TBits_2); inline;
  16497. procedure setMSEL17(thebits : TBits_2); inline;
  16498. procedure setMSEL18(thebits : TBits_2); inline;
  16499. procedure setMSEL19(thebits : TBits_2); inline;
  16500. procedure setw(thebits : TBits_32); inline;
  16501. public
  16502. procedure clearFLTEN16; inline;
  16503. procedure clearFLTEN17; inline;
  16504. procedure clearFLTEN18; inline;
  16505. procedure clearFLTEN19; inline;
  16506. procedure setFLTEN16; inline;
  16507. procedure setFLTEN17; inline;
  16508. procedure setFLTEN18; inline;
  16509. procedure setFLTEN19; inline;
  16510. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  16511. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  16512. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  16513. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  16514. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  16515. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  16516. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  16517. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  16518. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  16519. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  16520. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  16521. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  16522. property w : TBits_32 read getw write setw;
  16523. end;
  16524. TCAN1_C1FLTCON5 = record
  16525. private
  16526. function getFLTEN20 : TBits_1; inline;
  16527. function getFLTEN21 : TBits_1; inline;
  16528. function getFLTEN22 : TBits_1; inline;
  16529. function getFLTEN23 : TBits_1; inline;
  16530. function getFSEL20 : TBits_5; inline;
  16531. function getFSEL21 : TBits_5; inline;
  16532. function getFSEL22 : TBits_5; inline;
  16533. function getFSEL23 : TBits_5; inline;
  16534. function getMSEL20 : TBits_2; inline;
  16535. function getMSEL21 : TBits_2; inline;
  16536. function getMSEL22 : TBits_2; inline;
  16537. function getMSEL23 : TBits_2; inline;
  16538. function getw : TBits_32; inline;
  16539. procedure setFLTEN20(thebits : TBits_1); inline;
  16540. procedure setFLTEN21(thebits : TBits_1); inline;
  16541. procedure setFLTEN22(thebits : TBits_1); inline;
  16542. procedure setFLTEN23(thebits : TBits_1); inline;
  16543. procedure setFSEL20(thebits : TBits_5); inline;
  16544. procedure setFSEL21(thebits : TBits_5); inline;
  16545. procedure setFSEL22(thebits : TBits_5); inline;
  16546. procedure setFSEL23(thebits : TBits_5); inline;
  16547. procedure setMSEL20(thebits : TBits_2); inline;
  16548. procedure setMSEL21(thebits : TBits_2); inline;
  16549. procedure setMSEL22(thebits : TBits_2); inline;
  16550. procedure setMSEL23(thebits : TBits_2); inline;
  16551. procedure setw(thebits : TBits_32); inline;
  16552. public
  16553. procedure clearFLTEN20; inline;
  16554. procedure clearFLTEN21; inline;
  16555. procedure clearFLTEN22; inline;
  16556. procedure clearFLTEN23; inline;
  16557. procedure setFLTEN20; inline;
  16558. procedure setFLTEN21; inline;
  16559. procedure setFLTEN22; inline;
  16560. procedure setFLTEN23; inline;
  16561. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  16562. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  16563. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  16564. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  16565. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  16566. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  16567. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  16568. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  16569. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  16570. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  16571. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  16572. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  16573. property w : TBits_32 read getw write setw;
  16574. end;
  16575. TCAN1_C1FLTCON6 = record
  16576. private
  16577. function getFLTEN24 : TBits_1; inline;
  16578. function getFLTEN25 : TBits_1; inline;
  16579. function getFLTEN26 : TBits_1; inline;
  16580. function getFLTEN27 : TBits_1; inline;
  16581. function getFSEL24 : TBits_5; inline;
  16582. function getFSEL25 : TBits_5; inline;
  16583. function getFSEL26 : TBits_5; inline;
  16584. function getFSEL27 : TBits_5; inline;
  16585. function getMSEL24 : TBits_2; inline;
  16586. function getMSEL25 : TBits_2; inline;
  16587. function getMSEL26 : TBits_2; inline;
  16588. function getMSEL27 : TBits_2; inline;
  16589. function getw : TBits_32; inline;
  16590. procedure setFLTEN24(thebits : TBits_1); inline;
  16591. procedure setFLTEN25(thebits : TBits_1); inline;
  16592. procedure setFLTEN26(thebits : TBits_1); inline;
  16593. procedure setFLTEN27(thebits : TBits_1); inline;
  16594. procedure setFSEL24(thebits : TBits_5); inline;
  16595. procedure setFSEL25(thebits : TBits_5); inline;
  16596. procedure setFSEL26(thebits : TBits_5); inline;
  16597. procedure setFSEL27(thebits : TBits_5); inline;
  16598. procedure setMSEL24(thebits : TBits_2); inline;
  16599. procedure setMSEL25(thebits : TBits_2); inline;
  16600. procedure setMSEL26(thebits : TBits_2); inline;
  16601. procedure setMSEL27(thebits : TBits_2); inline;
  16602. procedure setw(thebits : TBits_32); inline;
  16603. public
  16604. procedure clearFLTEN24; inline;
  16605. procedure clearFLTEN25; inline;
  16606. procedure clearFLTEN26; inline;
  16607. procedure clearFLTEN27; inline;
  16608. procedure setFLTEN24; inline;
  16609. procedure setFLTEN25; inline;
  16610. procedure setFLTEN26; inline;
  16611. procedure setFLTEN27; inline;
  16612. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  16613. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  16614. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  16615. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  16616. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  16617. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  16618. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  16619. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  16620. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  16621. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  16622. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  16623. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  16624. property w : TBits_32 read getw write setw;
  16625. end;
  16626. TCAN1_C1FLTCON7 = record
  16627. private
  16628. function getFLTEN28 : TBits_1; inline;
  16629. function getFLTEN29 : TBits_1; inline;
  16630. function getFLTEN30 : TBits_1; inline;
  16631. function getFLTEN31 : TBits_1; inline;
  16632. function getFSEL28 : TBits_5; inline;
  16633. function getFSEL29 : TBits_5; inline;
  16634. function getFSEL30 : TBits_5; inline;
  16635. function getFSEL31 : TBits_5; inline;
  16636. function getMSEL28 : TBits_2; inline;
  16637. function getMSEL29 : TBits_2; inline;
  16638. function getMSEL30 : TBits_2; inline;
  16639. function getMSEL31 : TBits_2; inline;
  16640. function getw : TBits_32; inline;
  16641. procedure setFLTEN28(thebits : TBits_1); inline;
  16642. procedure setFLTEN29(thebits : TBits_1); inline;
  16643. procedure setFLTEN30(thebits : TBits_1); inline;
  16644. procedure setFLTEN31(thebits : TBits_1); inline;
  16645. procedure setFSEL28(thebits : TBits_5); inline;
  16646. procedure setFSEL29(thebits : TBits_5); inline;
  16647. procedure setFSEL30(thebits : TBits_5); inline;
  16648. procedure setFSEL31(thebits : TBits_5); inline;
  16649. procedure setMSEL28(thebits : TBits_2); inline;
  16650. procedure setMSEL29(thebits : TBits_2); inline;
  16651. procedure setMSEL30(thebits : TBits_2); inline;
  16652. procedure setMSEL31(thebits : TBits_2); inline;
  16653. procedure setw(thebits : TBits_32); inline;
  16654. public
  16655. procedure clearFLTEN28; inline;
  16656. procedure clearFLTEN29; inline;
  16657. procedure clearFLTEN30; inline;
  16658. procedure clearFLTEN31; inline;
  16659. procedure setFLTEN28; inline;
  16660. procedure setFLTEN29; inline;
  16661. procedure setFLTEN30; inline;
  16662. procedure setFLTEN31; inline;
  16663. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  16664. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  16665. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  16666. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  16667. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  16668. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  16669. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  16670. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  16671. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  16672. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  16673. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  16674. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  16675. property w : TBits_32 read getw write setw;
  16676. end;
  16677. TCAN1_C1RXF0 = record
  16678. private
  16679. function getEID : TBits_18; inline;
  16680. function getEXID : TBits_1; inline;
  16681. function getSID : TBits_11; inline;
  16682. function getw : TBits_32; inline;
  16683. procedure setEID(thebits : TBits_18); inline;
  16684. procedure setEXID(thebits : TBits_1); inline;
  16685. procedure setSID(thebits : TBits_11); inline;
  16686. procedure setw(thebits : TBits_32); inline;
  16687. public
  16688. procedure clearEXID; inline;
  16689. procedure setEXID; inline;
  16690. property EID : TBits_18 read getEID write setEID;
  16691. property EXID : TBits_1 read getEXID write setEXID;
  16692. property SID : TBits_11 read getSID write setSID;
  16693. property w : TBits_32 read getw write setw;
  16694. end;
  16695. TCAN1_C1RXF1 = record
  16696. private
  16697. function getEID : TBits_18; inline;
  16698. function getEXID : TBits_1; inline;
  16699. function getSID : TBits_11; inline;
  16700. function getw : TBits_32; inline;
  16701. procedure setEID(thebits : TBits_18); inline;
  16702. procedure setEXID(thebits : TBits_1); inline;
  16703. procedure setSID(thebits : TBits_11); inline;
  16704. procedure setw(thebits : TBits_32); inline;
  16705. public
  16706. procedure clearEXID; inline;
  16707. procedure setEXID; inline;
  16708. property EID : TBits_18 read getEID write setEID;
  16709. property EXID : TBits_1 read getEXID write setEXID;
  16710. property SID : TBits_11 read getSID write setSID;
  16711. property w : TBits_32 read getw write setw;
  16712. end;
  16713. TCAN1_C1RXF2 = record
  16714. private
  16715. function getEID : TBits_18; inline;
  16716. function getEXID : TBits_1; inline;
  16717. function getSID : TBits_11; inline;
  16718. function getw : TBits_32; inline;
  16719. procedure setEID(thebits : TBits_18); inline;
  16720. procedure setEXID(thebits : TBits_1); inline;
  16721. procedure setSID(thebits : TBits_11); inline;
  16722. procedure setw(thebits : TBits_32); inline;
  16723. public
  16724. procedure clearEXID; inline;
  16725. procedure setEXID; inline;
  16726. property EID : TBits_18 read getEID write setEID;
  16727. property EXID : TBits_1 read getEXID write setEXID;
  16728. property SID : TBits_11 read getSID write setSID;
  16729. property w : TBits_32 read getw write setw;
  16730. end;
  16731. TCAN1_C1RXF3 = record
  16732. private
  16733. function getEID : TBits_18; inline;
  16734. function getEXID : TBits_1; inline;
  16735. function getSID : TBits_11; inline;
  16736. function getw : TBits_32; inline;
  16737. procedure setEID(thebits : TBits_18); inline;
  16738. procedure setEXID(thebits : TBits_1); inline;
  16739. procedure setSID(thebits : TBits_11); inline;
  16740. procedure setw(thebits : TBits_32); inline;
  16741. public
  16742. procedure clearEXID; inline;
  16743. procedure setEXID; inline;
  16744. property EID : TBits_18 read getEID write setEID;
  16745. property EXID : TBits_1 read getEXID write setEXID;
  16746. property SID : TBits_11 read getSID write setSID;
  16747. property w : TBits_32 read getw write setw;
  16748. end;
  16749. TCAN1_C1RXF4 = record
  16750. private
  16751. function getEID : TBits_18; inline;
  16752. function getEXID : TBits_1; inline;
  16753. function getSID : TBits_11; inline;
  16754. function getw : TBits_32; inline;
  16755. procedure setEID(thebits : TBits_18); inline;
  16756. procedure setEXID(thebits : TBits_1); inline;
  16757. procedure setSID(thebits : TBits_11); inline;
  16758. procedure setw(thebits : TBits_32); inline;
  16759. public
  16760. procedure clearEXID; inline;
  16761. procedure setEXID; inline;
  16762. property EID : TBits_18 read getEID write setEID;
  16763. property EXID : TBits_1 read getEXID write setEXID;
  16764. property SID : TBits_11 read getSID write setSID;
  16765. property w : TBits_32 read getw write setw;
  16766. end;
  16767. TCAN1_C1RXF5 = record
  16768. private
  16769. function getEID : TBits_18; inline;
  16770. function getEXID : TBits_1; inline;
  16771. function getSID : TBits_11; inline;
  16772. function getw : TBits_32; inline;
  16773. procedure setEID(thebits : TBits_18); inline;
  16774. procedure setEXID(thebits : TBits_1); inline;
  16775. procedure setSID(thebits : TBits_11); inline;
  16776. procedure setw(thebits : TBits_32); inline;
  16777. public
  16778. procedure clearEXID; inline;
  16779. procedure setEXID; inline;
  16780. property EID : TBits_18 read getEID write setEID;
  16781. property EXID : TBits_1 read getEXID write setEXID;
  16782. property SID : TBits_11 read getSID write setSID;
  16783. property w : TBits_32 read getw write setw;
  16784. end;
  16785. TCAN1_C1RXF6 = record
  16786. private
  16787. function getEID : TBits_18; inline;
  16788. function getEXID : TBits_1; inline;
  16789. function getSID : TBits_11; inline;
  16790. function getw : TBits_32; inline;
  16791. procedure setEID(thebits : TBits_18); inline;
  16792. procedure setEXID(thebits : TBits_1); inline;
  16793. procedure setSID(thebits : TBits_11); inline;
  16794. procedure setw(thebits : TBits_32); inline;
  16795. public
  16796. procedure clearEXID; inline;
  16797. procedure setEXID; inline;
  16798. property EID : TBits_18 read getEID write setEID;
  16799. property EXID : TBits_1 read getEXID write setEXID;
  16800. property SID : TBits_11 read getSID write setSID;
  16801. property w : TBits_32 read getw write setw;
  16802. end;
  16803. TCAN1_C1RXF7 = record
  16804. private
  16805. function getEID : TBits_18; inline;
  16806. function getEXID : TBits_1; inline;
  16807. function getSID : TBits_11; inline;
  16808. function getw : TBits_32; inline;
  16809. procedure setEID(thebits : TBits_18); inline;
  16810. procedure setEXID(thebits : TBits_1); inline;
  16811. procedure setSID(thebits : TBits_11); inline;
  16812. procedure setw(thebits : TBits_32); inline;
  16813. public
  16814. procedure clearEXID; inline;
  16815. procedure setEXID; inline;
  16816. property EID : TBits_18 read getEID write setEID;
  16817. property EXID : TBits_1 read getEXID write setEXID;
  16818. property SID : TBits_11 read getSID write setSID;
  16819. property w : TBits_32 read getw write setw;
  16820. end;
  16821. TCAN1_C1RXF8 = record
  16822. private
  16823. function getEID : TBits_18; inline;
  16824. function getEXID : TBits_1; inline;
  16825. function getSID : TBits_11; inline;
  16826. function getw : TBits_32; inline;
  16827. procedure setEID(thebits : TBits_18); inline;
  16828. procedure setEXID(thebits : TBits_1); inline;
  16829. procedure setSID(thebits : TBits_11); inline;
  16830. procedure setw(thebits : TBits_32); inline;
  16831. public
  16832. procedure clearEXID; inline;
  16833. procedure setEXID; inline;
  16834. property EID : TBits_18 read getEID write setEID;
  16835. property EXID : TBits_1 read getEXID write setEXID;
  16836. property SID : TBits_11 read getSID write setSID;
  16837. property w : TBits_32 read getw write setw;
  16838. end;
  16839. TCAN1_C1RXF9 = record
  16840. private
  16841. function getEID : TBits_18; inline;
  16842. function getEXID : TBits_1; inline;
  16843. function getSID : TBits_11; inline;
  16844. function getw : TBits_32; inline;
  16845. procedure setEID(thebits : TBits_18); inline;
  16846. procedure setEXID(thebits : TBits_1); inline;
  16847. procedure setSID(thebits : TBits_11); inline;
  16848. procedure setw(thebits : TBits_32); inline;
  16849. public
  16850. procedure clearEXID; inline;
  16851. procedure setEXID; inline;
  16852. property EID : TBits_18 read getEID write setEID;
  16853. property EXID : TBits_1 read getEXID write setEXID;
  16854. property SID : TBits_11 read getSID write setSID;
  16855. property w : TBits_32 read getw write setw;
  16856. end;
  16857. TCAN1_C1RXF10 = record
  16858. private
  16859. function getEID : TBits_18; inline;
  16860. function getEXID : TBits_1; inline;
  16861. function getSID : TBits_11; inline;
  16862. function getw : TBits_32; inline;
  16863. procedure setEID(thebits : TBits_18); inline;
  16864. procedure setEXID(thebits : TBits_1); inline;
  16865. procedure setSID(thebits : TBits_11); inline;
  16866. procedure setw(thebits : TBits_32); inline;
  16867. public
  16868. procedure clearEXID; inline;
  16869. procedure setEXID; inline;
  16870. property EID : TBits_18 read getEID write setEID;
  16871. property EXID : TBits_1 read getEXID write setEXID;
  16872. property SID : TBits_11 read getSID write setSID;
  16873. property w : TBits_32 read getw write setw;
  16874. end;
  16875. TCAN1_C1RXF11 = record
  16876. private
  16877. function getEID : TBits_18; inline;
  16878. function getEXID : TBits_1; inline;
  16879. function getSID : TBits_11; inline;
  16880. function getw : TBits_32; inline;
  16881. procedure setEID(thebits : TBits_18); inline;
  16882. procedure setEXID(thebits : TBits_1); inline;
  16883. procedure setSID(thebits : TBits_11); inline;
  16884. procedure setw(thebits : TBits_32); inline;
  16885. public
  16886. procedure clearEXID; inline;
  16887. procedure setEXID; inline;
  16888. property EID : TBits_18 read getEID write setEID;
  16889. property EXID : TBits_1 read getEXID write setEXID;
  16890. property SID : TBits_11 read getSID write setSID;
  16891. property w : TBits_32 read getw write setw;
  16892. end;
  16893. TCAN1_C1RXF12 = record
  16894. private
  16895. function getEID : TBits_18; inline;
  16896. function getEXID : TBits_1; inline;
  16897. function getSID : TBits_11; inline;
  16898. function getw : TBits_32; inline;
  16899. procedure setEID(thebits : TBits_18); inline;
  16900. procedure setEXID(thebits : TBits_1); inline;
  16901. procedure setSID(thebits : TBits_11); inline;
  16902. procedure setw(thebits : TBits_32); inline;
  16903. public
  16904. procedure clearEXID; inline;
  16905. procedure setEXID; inline;
  16906. property EID : TBits_18 read getEID write setEID;
  16907. property EXID : TBits_1 read getEXID write setEXID;
  16908. property SID : TBits_11 read getSID write setSID;
  16909. property w : TBits_32 read getw write setw;
  16910. end;
  16911. TCAN1_C1RXF13 = record
  16912. private
  16913. function getEID : TBits_18; inline;
  16914. function getEXID : TBits_1; inline;
  16915. function getSID : TBits_11; inline;
  16916. function getw : TBits_32; inline;
  16917. procedure setEID(thebits : TBits_18); inline;
  16918. procedure setEXID(thebits : TBits_1); inline;
  16919. procedure setSID(thebits : TBits_11); inline;
  16920. procedure setw(thebits : TBits_32); inline;
  16921. public
  16922. procedure clearEXID; inline;
  16923. procedure setEXID; inline;
  16924. property EID : TBits_18 read getEID write setEID;
  16925. property EXID : TBits_1 read getEXID write setEXID;
  16926. property SID : TBits_11 read getSID write setSID;
  16927. property w : TBits_32 read getw write setw;
  16928. end;
  16929. TCAN1_C1RXF14 = record
  16930. private
  16931. function getEID : TBits_18; inline;
  16932. function getEXID : TBits_1; inline;
  16933. function getSID : TBits_11; inline;
  16934. function getw : TBits_32; inline;
  16935. procedure setEID(thebits : TBits_18); inline;
  16936. procedure setEXID(thebits : TBits_1); inline;
  16937. procedure setSID(thebits : TBits_11); inline;
  16938. procedure setw(thebits : TBits_32); inline;
  16939. public
  16940. procedure clearEXID; inline;
  16941. procedure setEXID; inline;
  16942. property EID : TBits_18 read getEID write setEID;
  16943. property EXID : TBits_1 read getEXID write setEXID;
  16944. property SID : TBits_11 read getSID write setSID;
  16945. property w : TBits_32 read getw write setw;
  16946. end;
  16947. TCAN1_C1RXF15 = record
  16948. private
  16949. function getEID : TBits_18; inline;
  16950. function getEXID : TBits_1; inline;
  16951. function getSID : TBits_11; inline;
  16952. function getw : TBits_32; inline;
  16953. procedure setEID(thebits : TBits_18); inline;
  16954. procedure setEXID(thebits : TBits_1); inline;
  16955. procedure setSID(thebits : TBits_11); inline;
  16956. procedure setw(thebits : TBits_32); inline;
  16957. public
  16958. procedure clearEXID; inline;
  16959. procedure setEXID; inline;
  16960. property EID : TBits_18 read getEID write setEID;
  16961. property EXID : TBits_1 read getEXID write setEXID;
  16962. property SID : TBits_11 read getSID write setSID;
  16963. property w : TBits_32 read getw write setw;
  16964. end;
  16965. TCAN1_C1RXF16 = record
  16966. private
  16967. function getEID : TBits_18; inline;
  16968. function getEXID : TBits_1; inline;
  16969. function getSID : TBits_11; inline;
  16970. function getw : TBits_32; inline;
  16971. procedure setEID(thebits : TBits_18); inline;
  16972. procedure setEXID(thebits : TBits_1); inline;
  16973. procedure setSID(thebits : TBits_11); inline;
  16974. procedure setw(thebits : TBits_32); inline;
  16975. public
  16976. procedure clearEXID; inline;
  16977. procedure setEXID; inline;
  16978. property EID : TBits_18 read getEID write setEID;
  16979. property EXID : TBits_1 read getEXID write setEXID;
  16980. property SID : TBits_11 read getSID write setSID;
  16981. property w : TBits_32 read getw write setw;
  16982. end;
  16983. TCAN1_C1RXF17 = record
  16984. private
  16985. function getEID : TBits_18; inline;
  16986. function getEXID : TBits_1; inline;
  16987. function getSID : TBits_11; inline;
  16988. function getw : TBits_32; inline;
  16989. procedure setEID(thebits : TBits_18); inline;
  16990. procedure setEXID(thebits : TBits_1); inline;
  16991. procedure setSID(thebits : TBits_11); inline;
  16992. procedure setw(thebits : TBits_32); inline;
  16993. public
  16994. procedure clearEXID; inline;
  16995. procedure setEXID; inline;
  16996. property EID : TBits_18 read getEID write setEID;
  16997. property EXID : TBits_1 read getEXID write setEXID;
  16998. property SID : TBits_11 read getSID write setSID;
  16999. property w : TBits_32 read getw write setw;
  17000. end;
  17001. TCAN1_C1RXF18 = record
  17002. private
  17003. function getEID : TBits_18; inline;
  17004. function getEXID : TBits_1; inline;
  17005. function getSID : TBits_11; inline;
  17006. function getw : TBits_32; inline;
  17007. procedure setEID(thebits : TBits_18); inline;
  17008. procedure setEXID(thebits : TBits_1); inline;
  17009. procedure setSID(thebits : TBits_11); inline;
  17010. procedure setw(thebits : TBits_32); inline;
  17011. public
  17012. procedure clearEXID; inline;
  17013. procedure setEXID; inline;
  17014. property EID : TBits_18 read getEID write setEID;
  17015. property EXID : TBits_1 read getEXID write setEXID;
  17016. property SID : TBits_11 read getSID write setSID;
  17017. property w : TBits_32 read getw write setw;
  17018. end;
  17019. TCAN1_C1RXF19 = record
  17020. private
  17021. function getEID : TBits_18; inline;
  17022. function getEXID : TBits_1; inline;
  17023. function getSID : TBits_11; inline;
  17024. function getw : TBits_32; inline;
  17025. procedure setEID(thebits : TBits_18); inline;
  17026. procedure setEXID(thebits : TBits_1); inline;
  17027. procedure setSID(thebits : TBits_11); inline;
  17028. procedure setw(thebits : TBits_32); inline;
  17029. public
  17030. procedure clearEXID; inline;
  17031. procedure setEXID; inline;
  17032. property EID : TBits_18 read getEID write setEID;
  17033. property EXID : TBits_1 read getEXID write setEXID;
  17034. property SID : TBits_11 read getSID write setSID;
  17035. property w : TBits_32 read getw write setw;
  17036. end;
  17037. TCAN1_C1RXF20 = record
  17038. private
  17039. function getEID : TBits_18; inline;
  17040. function getEXID : TBits_1; inline;
  17041. function getSID : TBits_11; inline;
  17042. function getw : TBits_32; inline;
  17043. procedure setEID(thebits : TBits_18); inline;
  17044. procedure setEXID(thebits : TBits_1); inline;
  17045. procedure setSID(thebits : TBits_11); inline;
  17046. procedure setw(thebits : TBits_32); inline;
  17047. public
  17048. procedure clearEXID; inline;
  17049. procedure setEXID; inline;
  17050. property EID : TBits_18 read getEID write setEID;
  17051. property EXID : TBits_1 read getEXID write setEXID;
  17052. property SID : TBits_11 read getSID write setSID;
  17053. property w : TBits_32 read getw write setw;
  17054. end;
  17055. TCAN1_C1RXF21 = record
  17056. private
  17057. function getEID : TBits_18; inline;
  17058. function getEXID : TBits_1; inline;
  17059. function getSID : TBits_11; inline;
  17060. function getw : TBits_32; inline;
  17061. procedure setEID(thebits : TBits_18); inline;
  17062. procedure setEXID(thebits : TBits_1); inline;
  17063. procedure setSID(thebits : TBits_11); inline;
  17064. procedure setw(thebits : TBits_32); inline;
  17065. public
  17066. procedure clearEXID; inline;
  17067. procedure setEXID; inline;
  17068. property EID : TBits_18 read getEID write setEID;
  17069. property EXID : TBits_1 read getEXID write setEXID;
  17070. property SID : TBits_11 read getSID write setSID;
  17071. property w : TBits_32 read getw write setw;
  17072. end;
  17073. TCAN1_C1RXF22 = record
  17074. private
  17075. function getEID : TBits_18; inline;
  17076. function getEXID : TBits_1; inline;
  17077. function getSID : TBits_11; inline;
  17078. function getw : TBits_32; inline;
  17079. procedure setEID(thebits : TBits_18); inline;
  17080. procedure setEXID(thebits : TBits_1); inline;
  17081. procedure setSID(thebits : TBits_11); inline;
  17082. procedure setw(thebits : TBits_32); inline;
  17083. public
  17084. procedure clearEXID; inline;
  17085. procedure setEXID; inline;
  17086. property EID : TBits_18 read getEID write setEID;
  17087. property EXID : TBits_1 read getEXID write setEXID;
  17088. property SID : TBits_11 read getSID write setSID;
  17089. property w : TBits_32 read getw write setw;
  17090. end;
  17091. TCAN1_C1RXF23 = record
  17092. private
  17093. function getEID : TBits_18; inline;
  17094. function getEXID : TBits_1; inline;
  17095. function getSID : TBits_11; inline;
  17096. function getw : TBits_32; inline;
  17097. procedure setEID(thebits : TBits_18); inline;
  17098. procedure setEXID(thebits : TBits_1); inline;
  17099. procedure setSID(thebits : TBits_11); inline;
  17100. procedure setw(thebits : TBits_32); inline;
  17101. public
  17102. procedure clearEXID; inline;
  17103. procedure setEXID; inline;
  17104. property EID : TBits_18 read getEID write setEID;
  17105. property EXID : TBits_1 read getEXID write setEXID;
  17106. property SID : TBits_11 read getSID write setSID;
  17107. property w : TBits_32 read getw write setw;
  17108. end;
  17109. TCAN1_C1RXF24 = record
  17110. private
  17111. function getEID : TBits_18; inline;
  17112. function getEXID : TBits_1; inline;
  17113. function getSID : TBits_11; inline;
  17114. function getw : TBits_32; inline;
  17115. procedure setEID(thebits : TBits_18); inline;
  17116. procedure setEXID(thebits : TBits_1); inline;
  17117. procedure setSID(thebits : TBits_11); inline;
  17118. procedure setw(thebits : TBits_32); inline;
  17119. public
  17120. procedure clearEXID; inline;
  17121. procedure setEXID; inline;
  17122. property EID : TBits_18 read getEID write setEID;
  17123. property EXID : TBits_1 read getEXID write setEXID;
  17124. property SID : TBits_11 read getSID write setSID;
  17125. property w : TBits_32 read getw write setw;
  17126. end;
  17127. TCAN1_C1RXF25 = record
  17128. private
  17129. function getEID : TBits_18; inline;
  17130. function getEXID : TBits_1; inline;
  17131. function getSID : TBits_11; inline;
  17132. function getw : TBits_32; inline;
  17133. procedure setEID(thebits : TBits_18); inline;
  17134. procedure setEXID(thebits : TBits_1); inline;
  17135. procedure setSID(thebits : TBits_11); inline;
  17136. procedure setw(thebits : TBits_32); inline;
  17137. public
  17138. procedure clearEXID; inline;
  17139. procedure setEXID; inline;
  17140. property EID : TBits_18 read getEID write setEID;
  17141. property EXID : TBits_1 read getEXID write setEXID;
  17142. property SID : TBits_11 read getSID write setSID;
  17143. property w : TBits_32 read getw write setw;
  17144. end;
  17145. TCAN1_C1RXF26 = record
  17146. private
  17147. function getEID : TBits_18; inline;
  17148. function getEXID : TBits_1; inline;
  17149. function getSID : TBits_11; inline;
  17150. function getw : TBits_32; inline;
  17151. procedure setEID(thebits : TBits_18); inline;
  17152. procedure setEXID(thebits : TBits_1); inline;
  17153. procedure setSID(thebits : TBits_11); inline;
  17154. procedure setw(thebits : TBits_32); inline;
  17155. public
  17156. procedure clearEXID; inline;
  17157. procedure setEXID; inline;
  17158. property EID : TBits_18 read getEID write setEID;
  17159. property EXID : TBits_1 read getEXID write setEXID;
  17160. property SID : TBits_11 read getSID write setSID;
  17161. property w : TBits_32 read getw write setw;
  17162. end;
  17163. TCAN1_C1RXF27 = record
  17164. private
  17165. function getEID : TBits_18; inline;
  17166. function getEXID : TBits_1; inline;
  17167. function getSID : TBits_11; inline;
  17168. function getw : TBits_32; inline;
  17169. procedure setEID(thebits : TBits_18); inline;
  17170. procedure setEXID(thebits : TBits_1); inline;
  17171. procedure setSID(thebits : TBits_11); inline;
  17172. procedure setw(thebits : TBits_32); inline;
  17173. public
  17174. procedure clearEXID; inline;
  17175. procedure setEXID; inline;
  17176. property EID : TBits_18 read getEID write setEID;
  17177. property EXID : TBits_1 read getEXID write setEXID;
  17178. property SID : TBits_11 read getSID write setSID;
  17179. property w : TBits_32 read getw write setw;
  17180. end;
  17181. TCAN1_C1RXF28 = record
  17182. private
  17183. function getEID : TBits_18; inline;
  17184. function getEXID : TBits_1; inline;
  17185. function getSID : TBits_11; inline;
  17186. function getw : TBits_32; inline;
  17187. procedure setEID(thebits : TBits_18); inline;
  17188. procedure setEXID(thebits : TBits_1); inline;
  17189. procedure setSID(thebits : TBits_11); inline;
  17190. procedure setw(thebits : TBits_32); inline;
  17191. public
  17192. procedure clearEXID; inline;
  17193. procedure setEXID; inline;
  17194. property EID : TBits_18 read getEID write setEID;
  17195. property EXID : TBits_1 read getEXID write setEXID;
  17196. property SID : TBits_11 read getSID write setSID;
  17197. property w : TBits_32 read getw write setw;
  17198. end;
  17199. TCAN1_C1RXF29 = record
  17200. private
  17201. function getEID : TBits_18; inline;
  17202. function getEXID : TBits_1; inline;
  17203. function getSID : TBits_11; inline;
  17204. function getw : TBits_32; inline;
  17205. procedure setEID(thebits : TBits_18); inline;
  17206. procedure setEXID(thebits : TBits_1); inline;
  17207. procedure setSID(thebits : TBits_11); inline;
  17208. procedure setw(thebits : TBits_32); inline;
  17209. public
  17210. procedure clearEXID; inline;
  17211. procedure setEXID; inline;
  17212. property EID : TBits_18 read getEID write setEID;
  17213. property EXID : TBits_1 read getEXID write setEXID;
  17214. property SID : TBits_11 read getSID write setSID;
  17215. property w : TBits_32 read getw write setw;
  17216. end;
  17217. TCAN1_C1RXF30 = record
  17218. private
  17219. function getEID : TBits_18; inline;
  17220. function getEXID : TBits_1; inline;
  17221. function getSID : TBits_11; inline;
  17222. function getw : TBits_32; inline;
  17223. procedure setEID(thebits : TBits_18); inline;
  17224. procedure setEXID(thebits : TBits_1); inline;
  17225. procedure setSID(thebits : TBits_11); inline;
  17226. procedure setw(thebits : TBits_32); inline;
  17227. public
  17228. procedure clearEXID; inline;
  17229. procedure setEXID; inline;
  17230. property EID : TBits_18 read getEID write setEID;
  17231. property EXID : TBits_1 read getEXID write setEXID;
  17232. property SID : TBits_11 read getSID write setSID;
  17233. property w : TBits_32 read getw write setw;
  17234. end;
  17235. TCAN1_C1RXF31 = record
  17236. private
  17237. function getEID : TBits_18; inline;
  17238. function getEXID : TBits_1; inline;
  17239. function getSID : TBits_11; inline;
  17240. function getw : TBits_32; inline;
  17241. procedure setEID(thebits : TBits_18); inline;
  17242. procedure setEXID(thebits : TBits_1); inline;
  17243. procedure setSID(thebits : TBits_11); inline;
  17244. procedure setw(thebits : TBits_32); inline;
  17245. public
  17246. procedure clearEXID; inline;
  17247. procedure setEXID; inline;
  17248. property EID : TBits_18 read getEID write setEID;
  17249. property EXID : TBits_1 read getEXID write setEXID;
  17250. property SID : TBits_11 read getSID write setSID;
  17251. property w : TBits_32 read getw write setw;
  17252. end;
  17253. TCAN1_C1FIFOCON0 = record
  17254. private
  17255. function getDONLY : TBits_1; inline;
  17256. function getFRESET : TBits_1; inline;
  17257. function getFSIZE : TBits_5; inline;
  17258. function getRTREN : TBits_1; inline;
  17259. function getTXABAT : TBits_1; inline;
  17260. function getTXEN : TBits_1; inline;
  17261. function getTXERR : TBits_1; inline;
  17262. function getTXLARB : TBits_1; inline;
  17263. function getTXPRI : TBits_2; inline;
  17264. function getTXREQ : TBits_1; inline;
  17265. function getUINC : TBits_1; inline;
  17266. function getw : TBits_32; inline;
  17267. procedure setDONLY(thebits : TBits_1); inline;
  17268. procedure setFRESET(thebits : TBits_1); inline;
  17269. procedure setFSIZE(thebits : TBits_5); inline;
  17270. procedure setRTREN(thebits : TBits_1); inline;
  17271. procedure setTXABAT(thebits : TBits_1); inline;
  17272. procedure setTXEN(thebits : TBits_1); inline;
  17273. procedure setTXERR(thebits : TBits_1); inline;
  17274. procedure setTXLARB(thebits : TBits_1); inline;
  17275. procedure setTXPRI(thebits : TBits_2); inline;
  17276. procedure setTXREQ(thebits : TBits_1); inline;
  17277. procedure setUINC(thebits : TBits_1); inline;
  17278. procedure setw(thebits : TBits_32); inline;
  17279. public
  17280. procedure clearDONLY; inline;
  17281. procedure clearFRESET; inline;
  17282. procedure clearRTREN; inline;
  17283. procedure clearTXABAT; inline;
  17284. procedure clearTXEN; inline;
  17285. procedure clearTXERR; inline;
  17286. procedure clearTXLARB; inline;
  17287. procedure clearTXREQ; inline;
  17288. procedure clearUINC; inline;
  17289. procedure setDONLY; inline;
  17290. procedure setFRESET; inline;
  17291. procedure setRTREN; inline;
  17292. procedure setTXABAT; inline;
  17293. procedure setTXEN; inline;
  17294. procedure setTXERR; inline;
  17295. procedure setTXLARB; inline;
  17296. procedure setTXREQ; inline;
  17297. procedure setUINC; inline;
  17298. property DONLY : TBits_1 read getDONLY write setDONLY;
  17299. property FRESET : TBits_1 read getFRESET write setFRESET;
  17300. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17301. property RTREN : TBits_1 read getRTREN write setRTREN;
  17302. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17303. property TXEN : TBits_1 read getTXEN write setTXEN;
  17304. property TXERR : TBits_1 read getTXERR write setTXERR;
  17305. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17306. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17307. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17308. property UINC : TBits_1 read getUINC write setUINC;
  17309. property w : TBits_32 read getw write setw;
  17310. end;
  17311. TCAN1_C1FIFOINT0 = record
  17312. private
  17313. function getRXFULLIE : TBits_1; inline;
  17314. function getRXFULLIF : TBits_1; inline;
  17315. function getRXHALFIE : TBits_1; inline;
  17316. function getRXHALFIF : TBits_1; inline;
  17317. function getRXNEMPTYIE : TBits_1; inline;
  17318. function getRXNEMPTYIF : TBits_1; inline;
  17319. function getRXOVFLIE : TBits_1; inline;
  17320. function getRXOVFLIF : TBits_1; inline;
  17321. function getTXEMPTYIE : TBits_1; inline;
  17322. function getTXEMPTYIF : TBits_1; inline;
  17323. function getTXHALFIE : TBits_1; inline;
  17324. function getTXHALFIF : TBits_1; inline;
  17325. function getTXNFULLIE : TBits_1; inline;
  17326. function getTXNFULLIF : TBits_1; inline;
  17327. function getw : TBits_32; inline;
  17328. procedure setRXFULLIE(thebits : TBits_1); inline;
  17329. procedure setRXFULLIF(thebits : TBits_1); inline;
  17330. procedure setRXHALFIE(thebits : TBits_1); inline;
  17331. procedure setRXHALFIF(thebits : TBits_1); inline;
  17332. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17333. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17334. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17335. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17336. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17337. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17338. procedure setTXHALFIE(thebits : TBits_1); inline;
  17339. procedure setTXHALFIF(thebits : TBits_1); inline;
  17340. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17341. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17342. procedure setw(thebits : TBits_32); inline;
  17343. public
  17344. procedure clearRXFULLIE; inline;
  17345. procedure clearRXFULLIF; inline;
  17346. procedure clearRXHALFIE; inline;
  17347. procedure clearRXHALFIF; inline;
  17348. procedure clearRXNEMPTYIE; inline;
  17349. procedure clearRXNEMPTYIF; inline;
  17350. procedure clearRXOVFLIE; inline;
  17351. procedure clearRXOVFLIF; inline;
  17352. procedure clearTXEMPTYIE; inline;
  17353. procedure clearTXEMPTYIF; inline;
  17354. procedure clearTXHALFIE; inline;
  17355. procedure clearTXHALFIF; inline;
  17356. procedure clearTXNFULLIE; inline;
  17357. procedure clearTXNFULLIF; inline;
  17358. procedure setRXFULLIE; inline;
  17359. procedure setRXFULLIF; inline;
  17360. procedure setRXHALFIE; inline;
  17361. procedure setRXHALFIF; inline;
  17362. procedure setRXNEMPTYIE; inline;
  17363. procedure setRXNEMPTYIF; inline;
  17364. procedure setRXOVFLIE; inline;
  17365. procedure setRXOVFLIF; inline;
  17366. procedure setTXEMPTYIE; inline;
  17367. procedure setTXEMPTYIF; inline;
  17368. procedure setTXHALFIE; inline;
  17369. procedure setTXHALFIF; inline;
  17370. procedure setTXNFULLIE; inline;
  17371. procedure setTXNFULLIF; inline;
  17372. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17373. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17374. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17375. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17376. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17377. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17378. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17379. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17380. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17381. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17382. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17383. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17384. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17385. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17386. property w : TBits_32 read getw write setw;
  17387. end;
  17388. TCAN1_C1FIFOCI0 = record
  17389. private
  17390. function getCFIFOCI : TBits_5; inline;
  17391. function getw : TBits_32; inline;
  17392. procedure setCFIFOCI(thebits : TBits_5); inline;
  17393. procedure setw(thebits : TBits_32); inline;
  17394. public
  17395. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17396. property w : TBits_32 read getw write setw;
  17397. end;
  17398. TCAN1_C1FIFOCON1 = record
  17399. private
  17400. function getDONLY : TBits_1; inline;
  17401. function getFRESET : TBits_1; inline;
  17402. function getFSIZE : TBits_5; inline;
  17403. function getRTREN : TBits_1; inline;
  17404. function getTXABAT : TBits_1; inline;
  17405. function getTXEN : TBits_1; inline;
  17406. function getTXERR : TBits_1; inline;
  17407. function getTXLARB : TBits_1; inline;
  17408. function getTXPRI : TBits_2; inline;
  17409. function getTXREQ : TBits_1; inline;
  17410. function getUINC : TBits_1; inline;
  17411. function getw : TBits_32; inline;
  17412. procedure setDONLY(thebits : TBits_1); inline;
  17413. procedure setFRESET(thebits : TBits_1); inline;
  17414. procedure setFSIZE(thebits : TBits_5); inline;
  17415. procedure setRTREN(thebits : TBits_1); inline;
  17416. procedure setTXABAT(thebits : TBits_1); inline;
  17417. procedure setTXEN(thebits : TBits_1); inline;
  17418. procedure setTXERR(thebits : TBits_1); inline;
  17419. procedure setTXLARB(thebits : TBits_1); inline;
  17420. procedure setTXPRI(thebits : TBits_2); inline;
  17421. procedure setTXREQ(thebits : TBits_1); inline;
  17422. procedure setUINC(thebits : TBits_1); inline;
  17423. procedure setw(thebits : TBits_32); inline;
  17424. public
  17425. procedure clearDONLY; inline;
  17426. procedure clearFRESET; inline;
  17427. procedure clearRTREN; inline;
  17428. procedure clearTXABAT; inline;
  17429. procedure clearTXEN; inline;
  17430. procedure clearTXERR; inline;
  17431. procedure clearTXLARB; inline;
  17432. procedure clearTXREQ; inline;
  17433. procedure clearUINC; inline;
  17434. procedure setDONLY; inline;
  17435. procedure setFRESET; inline;
  17436. procedure setRTREN; inline;
  17437. procedure setTXABAT; inline;
  17438. procedure setTXEN; inline;
  17439. procedure setTXERR; inline;
  17440. procedure setTXLARB; inline;
  17441. procedure setTXREQ; inline;
  17442. procedure setUINC; inline;
  17443. property DONLY : TBits_1 read getDONLY write setDONLY;
  17444. property FRESET : TBits_1 read getFRESET write setFRESET;
  17445. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17446. property RTREN : TBits_1 read getRTREN write setRTREN;
  17447. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17448. property TXEN : TBits_1 read getTXEN write setTXEN;
  17449. property TXERR : TBits_1 read getTXERR write setTXERR;
  17450. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17451. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17452. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17453. property UINC : TBits_1 read getUINC write setUINC;
  17454. property w : TBits_32 read getw write setw;
  17455. end;
  17456. TCAN1_C1FIFOINT1 = record
  17457. private
  17458. function getRXFULLIE : TBits_1; inline;
  17459. function getRXFULLIF : TBits_1; inline;
  17460. function getRXHALFIE : TBits_1; inline;
  17461. function getRXHALFIF : TBits_1; inline;
  17462. function getRXNEMPTYIE : TBits_1; inline;
  17463. function getRXNEMPTYIF : TBits_1; inline;
  17464. function getRXOVFLIE : TBits_1; inline;
  17465. function getRXOVFLIF : TBits_1; inline;
  17466. function getTXEMPTYIE : TBits_1; inline;
  17467. function getTXEMPTYIF : TBits_1; inline;
  17468. function getTXHALFIE : TBits_1; inline;
  17469. function getTXHALFIF : TBits_1; inline;
  17470. function getTXNFULLIE : TBits_1; inline;
  17471. function getTXNFULLIF : TBits_1; inline;
  17472. function getw : TBits_32; inline;
  17473. procedure setRXFULLIE(thebits : TBits_1); inline;
  17474. procedure setRXFULLIF(thebits : TBits_1); inline;
  17475. procedure setRXHALFIE(thebits : TBits_1); inline;
  17476. procedure setRXHALFIF(thebits : TBits_1); inline;
  17477. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17478. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17479. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17480. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17481. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17482. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17483. procedure setTXHALFIE(thebits : TBits_1); inline;
  17484. procedure setTXHALFIF(thebits : TBits_1); inline;
  17485. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17486. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17487. procedure setw(thebits : TBits_32); inline;
  17488. public
  17489. procedure clearRXFULLIE; inline;
  17490. procedure clearRXFULLIF; inline;
  17491. procedure clearRXHALFIE; inline;
  17492. procedure clearRXHALFIF; inline;
  17493. procedure clearRXNEMPTYIE; inline;
  17494. procedure clearRXNEMPTYIF; inline;
  17495. procedure clearRXOVFLIE; inline;
  17496. procedure clearRXOVFLIF; inline;
  17497. procedure clearTXEMPTYIE; inline;
  17498. procedure clearTXEMPTYIF; inline;
  17499. procedure clearTXHALFIE; inline;
  17500. procedure clearTXHALFIF; inline;
  17501. procedure clearTXNFULLIE; inline;
  17502. procedure clearTXNFULLIF; inline;
  17503. procedure setRXFULLIE; inline;
  17504. procedure setRXFULLIF; inline;
  17505. procedure setRXHALFIE; inline;
  17506. procedure setRXHALFIF; inline;
  17507. procedure setRXNEMPTYIE; inline;
  17508. procedure setRXNEMPTYIF; inline;
  17509. procedure setRXOVFLIE; inline;
  17510. procedure setRXOVFLIF; inline;
  17511. procedure setTXEMPTYIE; inline;
  17512. procedure setTXEMPTYIF; inline;
  17513. procedure setTXHALFIE; inline;
  17514. procedure setTXHALFIF; inline;
  17515. procedure setTXNFULLIE; inline;
  17516. procedure setTXNFULLIF; inline;
  17517. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17518. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17519. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17520. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17521. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17522. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17523. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17524. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17525. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17526. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17527. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17528. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17529. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17530. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17531. property w : TBits_32 read getw write setw;
  17532. end;
  17533. TCAN1_C1FIFOCI1 = record
  17534. private
  17535. function getCFIFOCI : TBits_5; inline;
  17536. function getw : TBits_32; inline;
  17537. procedure setCFIFOCI(thebits : TBits_5); inline;
  17538. procedure setw(thebits : TBits_32); inline;
  17539. public
  17540. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17541. property w : TBits_32 read getw write setw;
  17542. end;
  17543. TCAN1_C1FIFOCON2 = record
  17544. private
  17545. function getDONLY : TBits_1; inline;
  17546. function getFRESET : TBits_1; inline;
  17547. function getFSIZE : TBits_5; inline;
  17548. function getRTREN : TBits_1; inline;
  17549. function getTXABAT : TBits_1; inline;
  17550. function getTXEN : TBits_1; inline;
  17551. function getTXERR : TBits_1; inline;
  17552. function getTXLARB : TBits_1; inline;
  17553. function getTXPRI : TBits_2; inline;
  17554. function getTXREQ : TBits_1; inline;
  17555. function getUINC : TBits_1; inline;
  17556. function getw : TBits_32; inline;
  17557. procedure setDONLY(thebits : TBits_1); inline;
  17558. procedure setFRESET(thebits : TBits_1); inline;
  17559. procedure setFSIZE(thebits : TBits_5); inline;
  17560. procedure setRTREN(thebits : TBits_1); inline;
  17561. procedure setTXABAT(thebits : TBits_1); inline;
  17562. procedure setTXEN(thebits : TBits_1); inline;
  17563. procedure setTXERR(thebits : TBits_1); inline;
  17564. procedure setTXLARB(thebits : TBits_1); inline;
  17565. procedure setTXPRI(thebits : TBits_2); inline;
  17566. procedure setTXREQ(thebits : TBits_1); inline;
  17567. procedure setUINC(thebits : TBits_1); inline;
  17568. procedure setw(thebits : TBits_32); inline;
  17569. public
  17570. procedure clearDONLY; inline;
  17571. procedure clearFRESET; inline;
  17572. procedure clearRTREN; inline;
  17573. procedure clearTXABAT; inline;
  17574. procedure clearTXEN; inline;
  17575. procedure clearTXERR; inline;
  17576. procedure clearTXLARB; inline;
  17577. procedure clearTXREQ; inline;
  17578. procedure clearUINC; inline;
  17579. procedure setDONLY; inline;
  17580. procedure setFRESET; inline;
  17581. procedure setRTREN; inline;
  17582. procedure setTXABAT; inline;
  17583. procedure setTXEN; inline;
  17584. procedure setTXERR; inline;
  17585. procedure setTXLARB; inline;
  17586. procedure setTXREQ; inline;
  17587. procedure setUINC; inline;
  17588. property DONLY : TBits_1 read getDONLY write setDONLY;
  17589. property FRESET : TBits_1 read getFRESET write setFRESET;
  17590. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17591. property RTREN : TBits_1 read getRTREN write setRTREN;
  17592. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17593. property TXEN : TBits_1 read getTXEN write setTXEN;
  17594. property TXERR : TBits_1 read getTXERR write setTXERR;
  17595. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17596. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17597. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17598. property UINC : TBits_1 read getUINC write setUINC;
  17599. property w : TBits_32 read getw write setw;
  17600. end;
  17601. TCAN1_C1FIFOINT2 = record
  17602. private
  17603. function getRXFULLIE : TBits_1; inline;
  17604. function getRXFULLIF : TBits_1; inline;
  17605. function getRXHALFIE : TBits_1; inline;
  17606. function getRXHALFIF : TBits_1; inline;
  17607. function getRXNEMPTYIE : TBits_1; inline;
  17608. function getRXNEMPTYIF : TBits_1; inline;
  17609. function getRXOVFLIE : TBits_1; inline;
  17610. function getRXOVFLIF : TBits_1; inline;
  17611. function getTXEMPTYIE : TBits_1; inline;
  17612. function getTXEMPTYIF : TBits_1; inline;
  17613. function getTXHALFIE : TBits_1; inline;
  17614. function getTXHALFIF : TBits_1; inline;
  17615. function getTXNFULLIE : TBits_1; inline;
  17616. function getTXNFULLIF : TBits_1; inline;
  17617. function getw : TBits_32; inline;
  17618. procedure setRXFULLIE(thebits : TBits_1); inline;
  17619. procedure setRXFULLIF(thebits : TBits_1); inline;
  17620. procedure setRXHALFIE(thebits : TBits_1); inline;
  17621. procedure setRXHALFIF(thebits : TBits_1); inline;
  17622. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17623. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17624. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17625. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17626. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17627. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17628. procedure setTXHALFIE(thebits : TBits_1); inline;
  17629. procedure setTXHALFIF(thebits : TBits_1); inline;
  17630. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17631. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17632. procedure setw(thebits : TBits_32); inline;
  17633. public
  17634. procedure clearRXFULLIE; inline;
  17635. procedure clearRXFULLIF; inline;
  17636. procedure clearRXHALFIE; inline;
  17637. procedure clearRXHALFIF; inline;
  17638. procedure clearRXNEMPTYIE; inline;
  17639. procedure clearRXNEMPTYIF; inline;
  17640. procedure clearRXOVFLIE; inline;
  17641. procedure clearRXOVFLIF; inline;
  17642. procedure clearTXEMPTYIE; inline;
  17643. procedure clearTXEMPTYIF; inline;
  17644. procedure clearTXHALFIE; inline;
  17645. procedure clearTXHALFIF; inline;
  17646. procedure clearTXNFULLIE; inline;
  17647. procedure clearTXNFULLIF; inline;
  17648. procedure setRXFULLIE; inline;
  17649. procedure setRXFULLIF; inline;
  17650. procedure setRXHALFIE; inline;
  17651. procedure setRXHALFIF; inline;
  17652. procedure setRXNEMPTYIE; inline;
  17653. procedure setRXNEMPTYIF; inline;
  17654. procedure setRXOVFLIE; inline;
  17655. procedure setRXOVFLIF; inline;
  17656. procedure setTXEMPTYIE; inline;
  17657. procedure setTXEMPTYIF; inline;
  17658. procedure setTXHALFIE; inline;
  17659. procedure setTXHALFIF; inline;
  17660. procedure setTXNFULLIE; inline;
  17661. procedure setTXNFULLIF; inline;
  17662. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17663. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17664. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17665. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17666. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17667. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17668. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17669. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17670. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17671. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17672. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17673. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17674. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17675. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17676. property w : TBits_32 read getw write setw;
  17677. end;
  17678. TCAN1_C1FIFOCI2 = record
  17679. private
  17680. function getCFIFOCI : TBits_5; inline;
  17681. function getw : TBits_32; inline;
  17682. procedure setCFIFOCI(thebits : TBits_5); inline;
  17683. procedure setw(thebits : TBits_32); inline;
  17684. public
  17685. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17686. property w : TBits_32 read getw write setw;
  17687. end;
  17688. TCAN1_C1FIFOCON3 = record
  17689. private
  17690. function getDONLY : TBits_1; inline;
  17691. function getFRESET : TBits_1; inline;
  17692. function getFSIZE : TBits_5; inline;
  17693. function getRTREN : TBits_1; inline;
  17694. function getTXABAT : TBits_1; inline;
  17695. function getTXEN : TBits_1; inline;
  17696. function getTXERR : TBits_1; inline;
  17697. function getTXLARB : TBits_1; inline;
  17698. function getTXPRI : TBits_2; inline;
  17699. function getTXREQ : TBits_1; inline;
  17700. function getUINC : TBits_1; inline;
  17701. function getw : TBits_32; inline;
  17702. procedure setDONLY(thebits : TBits_1); inline;
  17703. procedure setFRESET(thebits : TBits_1); inline;
  17704. procedure setFSIZE(thebits : TBits_5); inline;
  17705. procedure setRTREN(thebits : TBits_1); inline;
  17706. procedure setTXABAT(thebits : TBits_1); inline;
  17707. procedure setTXEN(thebits : TBits_1); inline;
  17708. procedure setTXERR(thebits : TBits_1); inline;
  17709. procedure setTXLARB(thebits : TBits_1); inline;
  17710. procedure setTXPRI(thebits : TBits_2); inline;
  17711. procedure setTXREQ(thebits : TBits_1); inline;
  17712. procedure setUINC(thebits : TBits_1); inline;
  17713. procedure setw(thebits : TBits_32); inline;
  17714. public
  17715. procedure clearDONLY; inline;
  17716. procedure clearFRESET; inline;
  17717. procedure clearRTREN; inline;
  17718. procedure clearTXABAT; inline;
  17719. procedure clearTXEN; inline;
  17720. procedure clearTXERR; inline;
  17721. procedure clearTXLARB; inline;
  17722. procedure clearTXREQ; inline;
  17723. procedure clearUINC; inline;
  17724. procedure setDONLY; inline;
  17725. procedure setFRESET; inline;
  17726. procedure setRTREN; inline;
  17727. procedure setTXABAT; inline;
  17728. procedure setTXEN; inline;
  17729. procedure setTXERR; inline;
  17730. procedure setTXLARB; inline;
  17731. procedure setTXREQ; inline;
  17732. procedure setUINC; inline;
  17733. property DONLY : TBits_1 read getDONLY write setDONLY;
  17734. property FRESET : TBits_1 read getFRESET write setFRESET;
  17735. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17736. property RTREN : TBits_1 read getRTREN write setRTREN;
  17737. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17738. property TXEN : TBits_1 read getTXEN write setTXEN;
  17739. property TXERR : TBits_1 read getTXERR write setTXERR;
  17740. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17741. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17742. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17743. property UINC : TBits_1 read getUINC write setUINC;
  17744. property w : TBits_32 read getw write setw;
  17745. end;
  17746. TCAN1_C1FIFOINT3 = record
  17747. private
  17748. function getRXFULLIE : TBits_1; inline;
  17749. function getRXFULLIF : TBits_1; inline;
  17750. function getRXHALFIE : TBits_1; inline;
  17751. function getRXHALFIF : TBits_1; inline;
  17752. function getRXNEMPTYIE : TBits_1; inline;
  17753. function getRXNEMPTYIF : TBits_1; inline;
  17754. function getRXOVFLIE : TBits_1; inline;
  17755. function getRXOVFLIF : TBits_1; inline;
  17756. function getTXEMPTYIE : TBits_1; inline;
  17757. function getTXEMPTYIF : TBits_1; inline;
  17758. function getTXHALFIE : TBits_1; inline;
  17759. function getTXHALFIF : TBits_1; inline;
  17760. function getTXNFULLIE : TBits_1; inline;
  17761. function getTXNFULLIF : TBits_1; inline;
  17762. function getw : TBits_32; inline;
  17763. procedure setRXFULLIE(thebits : TBits_1); inline;
  17764. procedure setRXFULLIF(thebits : TBits_1); inline;
  17765. procedure setRXHALFIE(thebits : TBits_1); inline;
  17766. procedure setRXHALFIF(thebits : TBits_1); inline;
  17767. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17768. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17769. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17770. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17771. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17772. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17773. procedure setTXHALFIE(thebits : TBits_1); inline;
  17774. procedure setTXHALFIF(thebits : TBits_1); inline;
  17775. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17776. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17777. procedure setw(thebits : TBits_32); inline;
  17778. public
  17779. procedure clearRXFULLIE; inline;
  17780. procedure clearRXFULLIF; inline;
  17781. procedure clearRXHALFIE; inline;
  17782. procedure clearRXHALFIF; inline;
  17783. procedure clearRXNEMPTYIE; inline;
  17784. procedure clearRXNEMPTYIF; inline;
  17785. procedure clearRXOVFLIE; inline;
  17786. procedure clearRXOVFLIF; inline;
  17787. procedure clearTXEMPTYIE; inline;
  17788. procedure clearTXEMPTYIF; inline;
  17789. procedure clearTXHALFIE; inline;
  17790. procedure clearTXHALFIF; inline;
  17791. procedure clearTXNFULLIE; inline;
  17792. procedure clearTXNFULLIF; inline;
  17793. procedure setRXFULLIE; inline;
  17794. procedure setRXFULLIF; inline;
  17795. procedure setRXHALFIE; inline;
  17796. procedure setRXHALFIF; inline;
  17797. procedure setRXNEMPTYIE; inline;
  17798. procedure setRXNEMPTYIF; inline;
  17799. procedure setRXOVFLIE; inline;
  17800. procedure setRXOVFLIF; inline;
  17801. procedure setTXEMPTYIE; inline;
  17802. procedure setTXEMPTYIF; inline;
  17803. procedure setTXHALFIE; inline;
  17804. procedure setTXHALFIF; inline;
  17805. procedure setTXNFULLIE; inline;
  17806. procedure setTXNFULLIF; inline;
  17807. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17808. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17809. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17810. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17811. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17812. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17813. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17814. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17815. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17816. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17817. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17818. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17819. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17820. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17821. property w : TBits_32 read getw write setw;
  17822. end;
  17823. TCAN1_C1FIFOCI3 = record
  17824. private
  17825. function getCFIFOCI : TBits_5; inline;
  17826. function getw : TBits_32; inline;
  17827. procedure setCFIFOCI(thebits : TBits_5); inline;
  17828. procedure setw(thebits : TBits_32); inline;
  17829. public
  17830. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17831. property w : TBits_32 read getw write setw;
  17832. end;
  17833. TCAN1_C1FIFOCON4 = record
  17834. private
  17835. function getDONLY : TBits_1; inline;
  17836. function getFRESET : TBits_1; inline;
  17837. function getFSIZE : TBits_5; inline;
  17838. function getRTREN : TBits_1; inline;
  17839. function getTXABAT : TBits_1; inline;
  17840. function getTXEN : TBits_1; inline;
  17841. function getTXERR : TBits_1; inline;
  17842. function getTXLARB : TBits_1; inline;
  17843. function getTXPRI : TBits_2; inline;
  17844. function getTXREQ : TBits_1; inline;
  17845. function getUINC : TBits_1; inline;
  17846. function getw : TBits_32; inline;
  17847. procedure setDONLY(thebits : TBits_1); inline;
  17848. procedure setFRESET(thebits : TBits_1); inline;
  17849. procedure setFSIZE(thebits : TBits_5); inline;
  17850. procedure setRTREN(thebits : TBits_1); inline;
  17851. procedure setTXABAT(thebits : TBits_1); inline;
  17852. procedure setTXEN(thebits : TBits_1); inline;
  17853. procedure setTXERR(thebits : TBits_1); inline;
  17854. procedure setTXLARB(thebits : TBits_1); inline;
  17855. procedure setTXPRI(thebits : TBits_2); inline;
  17856. procedure setTXREQ(thebits : TBits_1); inline;
  17857. procedure setUINC(thebits : TBits_1); inline;
  17858. procedure setw(thebits : TBits_32); inline;
  17859. public
  17860. procedure clearDONLY; inline;
  17861. procedure clearFRESET; inline;
  17862. procedure clearRTREN; inline;
  17863. procedure clearTXABAT; inline;
  17864. procedure clearTXEN; inline;
  17865. procedure clearTXERR; inline;
  17866. procedure clearTXLARB; inline;
  17867. procedure clearTXREQ; inline;
  17868. procedure clearUINC; inline;
  17869. procedure setDONLY; inline;
  17870. procedure setFRESET; inline;
  17871. procedure setRTREN; inline;
  17872. procedure setTXABAT; inline;
  17873. procedure setTXEN; inline;
  17874. procedure setTXERR; inline;
  17875. procedure setTXLARB; inline;
  17876. procedure setTXREQ; inline;
  17877. procedure setUINC; inline;
  17878. property DONLY : TBits_1 read getDONLY write setDONLY;
  17879. property FRESET : TBits_1 read getFRESET write setFRESET;
  17880. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  17881. property RTREN : TBits_1 read getRTREN write setRTREN;
  17882. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  17883. property TXEN : TBits_1 read getTXEN write setTXEN;
  17884. property TXERR : TBits_1 read getTXERR write setTXERR;
  17885. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  17886. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  17887. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  17888. property UINC : TBits_1 read getUINC write setUINC;
  17889. property w : TBits_32 read getw write setw;
  17890. end;
  17891. TCAN1_C1FIFOINT4 = record
  17892. private
  17893. function getRXFULLIE : TBits_1; inline;
  17894. function getRXFULLIF : TBits_1; inline;
  17895. function getRXHALFIE : TBits_1; inline;
  17896. function getRXHALFIF : TBits_1; inline;
  17897. function getRXNEMPTYIE : TBits_1; inline;
  17898. function getRXNEMPTYIF : TBits_1; inline;
  17899. function getRXOVFLIE : TBits_1; inline;
  17900. function getRXOVFLIF : TBits_1; inline;
  17901. function getTXEMPTYIE : TBits_1; inline;
  17902. function getTXEMPTYIF : TBits_1; inline;
  17903. function getTXHALFIE : TBits_1; inline;
  17904. function getTXHALFIF : TBits_1; inline;
  17905. function getTXNFULLIE : TBits_1; inline;
  17906. function getTXNFULLIF : TBits_1; inline;
  17907. function getw : TBits_32; inline;
  17908. procedure setRXFULLIE(thebits : TBits_1); inline;
  17909. procedure setRXFULLIF(thebits : TBits_1); inline;
  17910. procedure setRXHALFIE(thebits : TBits_1); inline;
  17911. procedure setRXHALFIF(thebits : TBits_1); inline;
  17912. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  17913. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  17914. procedure setRXOVFLIE(thebits : TBits_1); inline;
  17915. procedure setRXOVFLIF(thebits : TBits_1); inline;
  17916. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  17917. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  17918. procedure setTXHALFIE(thebits : TBits_1); inline;
  17919. procedure setTXHALFIF(thebits : TBits_1); inline;
  17920. procedure setTXNFULLIE(thebits : TBits_1); inline;
  17921. procedure setTXNFULLIF(thebits : TBits_1); inline;
  17922. procedure setw(thebits : TBits_32); inline;
  17923. public
  17924. procedure clearRXFULLIE; inline;
  17925. procedure clearRXFULLIF; inline;
  17926. procedure clearRXHALFIE; inline;
  17927. procedure clearRXHALFIF; inline;
  17928. procedure clearRXNEMPTYIE; inline;
  17929. procedure clearRXNEMPTYIF; inline;
  17930. procedure clearRXOVFLIE; inline;
  17931. procedure clearRXOVFLIF; inline;
  17932. procedure clearTXEMPTYIE; inline;
  17933. procedure clearTXEMPTYIF; inline;
  17934. procedure clearTXHALFIE; inline;
  17935. procedure clearTXHALFIF; inline;
  17936. procedure clearTXNFULLIE; inline;
  17937. procedure clearTXNFULLIF; inline;
  17938. procedure setRXFULLIE; inline;
  17939. procedure setRXFULLIF; inline;
  17940. procedure setRXHALFIE; inline;
  17941. procedure setRXHALFIF; inline;
  17942. procedure setRXNEMPTYIE; inline;
  17943. procedure setRXNEMPTYIF; inline;
  17944. procedure setRXOVFLIE; inline;
  17945. procedure setRXOVFLIF; inline;
  17946. procedure setTXEMPTYIE; inline;
  17947. procedure setTXEMPTYIF; inline;
  17948. procedure setTXHALFIE; inline;
  17949. procedure setTXHALFIF; inline;
  17950. procedure setTXNFULLIE; inline;
  17951. procedure setTXNFULLIF; inline;
  17952. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  17953. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  17954. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  17955. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  17956. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  17957. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  17958. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  17959. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  17960. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  17961. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  17962. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  17963. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  17964. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  17965. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  17966. property w : TBits_32 read getw write setw;
  17967. end;
  17968. TCAN1_C1FIFOCI4 = record
  17969. private
  17970. function getCFIFOCI : TBits_5; inline;
  17971. function getw : TBits_32; inline;
  17972. procedure setCFIFOCI(thebits : TBits_5); inline;
  17973. procedure setw(thebits : TBits_32); inline;
  17974. public
  17975. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  17976. property w : TBits_32 read getw write setw;
  17977. end;
  17978. TCAN1_C1FIFOCON5 = record
  17979. private
  17980. function getDONLY : TBits_1; inline;
  17981. function getFRESET : TBits_1; inline;
  17982. function getFSIZE : TBits_5; inline;
  17983. function getRTREN : TBits_1; inline;
  17984. function getTXABAT : TBits_1; inline;
  17985. function getTXEN : TBits_1; inline;
  17986. function getTXERR : TBits_1; inline;
  17987. function getTXLARB : TBits_1; inline;
  17988. function getTXPRI : TBits_2; inline;
  17989. function getTXREQ : TBits_1; inline;
  17990. function getUINC : TBits_1; inline;
  17991. function getw : TBits_32; inline;
  17992. procedure setDONLY(thebits : TBits_1); inline;
  17993. procedure setFRESET(thebits : TBits_1); inline;
  17994. procedure setFSIZE(thebits : TBits_5); inline;
  17995. procedure setRTREN(thebits : TBits_1); inline;
  17996. procedure setTXABAT(thebits : TBits_1); inline;
  17997. procedure setTXEN(thebits : TBits_1); inline;
  17998. procedure setTXERR(thebits : TBits_1); inline;
  17999. procedure setTXLARB(thebits : TBits_1); inline;
  18000. procedure setTXPRI(thebits : TBits_2); inline;
  18001. procedure setTXREQ(thebits : TBits_1); inline;
  18002. procedure setUINC(thebits : TBits_1); inline;
  18003. procedure setw(thebits : TBits_32); inline;
  18004. public
  18005. procedure clearDONLY; inline;
  18006. procedure clearFRESET; inline;
  18007. procedure clearRTREN; inline;
  18008. procedure clearTXABAT; inline;
  18009. procedure clearTXEN; inline;
  18010. procedure clearTXERR; inline;
  18011. procedure clearTXLARB; inline;
  18012. procedure clearTXREQ; inline;
  18013. procedure clearUINC; inline;
  18014. procedure setDONLY; inline;
  18015. procedure setFRESET; inline;
  18016. procedure setRTREN; inline;
  18017. procedure setTXABAT; inline;
  18018. procedure setTXEN; inline;
  18019. procedure setTXERR; inline;
  18020. procedure setTXLARB; inline;
  18021. procedure setTXREQ; inline;
  18022. procedure setUINC; inline;
  18023. property DONLY : TBits_1 read getDONLY write setDONLY;
  18024. property FRESET : TBits_1 read getFRESET write setFRESET;
  18025. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18026. property RTREN : TBits_1 read getRTREN write setRTREN;
  18027. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18028. property TXEN : TBits_1 read getTXEN write setTXEN;
  18029. property TXERR : TBits_1 read getTXERR write setTXERR;
  18030. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18031. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18032. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18033. property UINC : TBits_1 read getUINC write setUINC;
  18034. property w : TBits_32 read getw write setw;
  18035. end;
  18036. TCAN1_C1FIFOINT5 = record
  18037. private
  18038. function getRXFULLIE : TBits_1; inline;
  18039. function getRXFULLIF : TBits_1; inline;
  18040. function getRXHALFIE : TBits_1; inline;
  18041. function getRXHALFIF : TBits_1; inline;
  18042. function getRXNEMPTYIE : TBits_1; inline;
  18043. function getRXNEMPTYIF : TBits_1; inline;
  18044. function getRXOVFLIE : TBits_1; inline;
  18045. function getRXOVFLIF : TBits_1; inline;
  18046. function getTXEMPTYIE : TBits_1; inline;
  18047. function getTXEMPTYIF : TBits_1; inline;
  18048. function getTXHALFIE : TBits_1; inline;
  18049. function getTXHALFIF : TBits_1; inline;
  18050. function getTXNFULLIE : TBits_1; inline;
  18051. function getTXNFULLIF : TBits_1; inline;
  18052. function getw : TBits_32; inline;
  18053. procedure setRXFULLIE(thebits : TBits_1); inline;
  18054. procedure setRXFULLIF(thebits : TBits_1); inline;
  18055. procedure setRXHALFIE(thebits : TBits_1); inline;
  18056. procedure setRXHALFIF(thebits : TBits_1); inline;
  18057. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18058. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18059. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18060. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18061. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18062. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18063. procedure setTXHALFIE(thebits : TBits_1); inline;
  18064. procedure setTXHALFIF(thebits : TBits_1); inline;
  18065. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18066. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18067. procedure setw(thebits : TBits_32); inline;
  18068. public
  18069. procedure clearRXFULLIE; inline;
  18070. procedure clearRXFULLIF; inline;
  18071. procedure clearRXHALFIE; inline;
  18072. procedure clearRXHALFIF; inline;
  18073. procedure clearRXNEMPTYIE; inline;
  18074. procedure clearRXNEMPTYIF; inline;
  18075. procedure clearRXOVFLIE; inline;
  18076. procedure clearRXOVFLIF; inline;
  18077. procedure clearTXEMPTYIE; inline;
  18078. procedure clearTXEMPTYIF; inline;
  18079. procedure clearTXHALFIE; inline;
  18080. procedure clearTXHALFIF; inline;
  18081. procedure clearTXNFULLIE; inline;
  18082. procedure clearTXNFULLIF; inline;
  18083. procedure setRXFULLIE; inline;
  18084. procedure setRXFULLIF; inline;
  18085. procedure setRXHALFIE; inline;
  18086. procedure setRXHALFIF; inline;
  18087. procedure setRXNEMPTYIE; inline;
  18088. procedure setRXNEMPTYIF; inline;
  18089. procedure setRXOVFLIE; inline;
  18090. procedure setRXOVFLIF; inline;
  18091. procedure setTXEMPTYIE; inline;
  18092. procedure setTXEMPTYIF; inline;
  18093. procedure setTXHALFIE; inline;
  18094. procedure setTXHALFIF; inline;
  18095. procedure setTXNFULLIE; inline;
  18096. procedure setTXNFULLIF; inline;
  18097. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18098. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18099. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18100. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18101. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18102. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18103. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18104. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18105. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18106. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18107. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18108. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18109. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18110. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18111. property w : TBits_32 read getw write setw;
  18112. end;
  18113. TCAN1_C1FIFOCI5 = record
  18114. private
  18115. function getCFIFOCI : TBits_5; inline;
  18116. function getw : TBits_32; inline;
  18117. procedure setCFIFOCI(thebits : TBits_5); inline;
  18118. procedure setw(thebits : TBits_32); inline;
  18119. public
  18120. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18121. property w : TBits_32 read getw write setw;
  18122. end;
  18123. TCAN1_C1FIFOCON6 = record
  18124. private
  18125. function getDONLY : TBits_1; inline;
  18126. function getFRESET : TBits_1; inline;
  18127. function getFSIZE : TBits_5; inline;
  18128. function getRTREN : TBits_1; inline;
  18129. function getTXABAT : TBits_1; inline;
  18130. function getTXEN : TBits_1; inline;
  18131. function getTXERR : TBits_1; inline;
  18132. function getTXLARB : TBits_1; inline;
  18133. function getTXPRI : TBits_2; inline;
  18134. function getTXREQ : TBits_1; inline;
  18135. function getUINC : TBits_1; inline;
  18136. function getw : TBits_32; inline;
  18137. procedure setDONLY(thebits : TBits_1); inline;
  18138. procedure setFRESET(thebits : TBits_1); inline;
  18139. procedure setFSIZE(thebits : TBits_5); inline;
  18140. procedure setRTREN(thebits : TBits_1); inline;
  18141. procedure setTXABAT(thebits : TBits_1); inline;
  18142. procedure setTXEN(thebits : TBits_1); inline;
  18143. procedure setTXERR(thebits : TBits_1); inline;
  18144. procedure setTXLARB(thebits : TBits_1); inline;
  18145. procedure setTXPRI(thebits : TBits_2); inline;
  18146. procedure setTXREQ(thebits : TBits_1); inline;
  18147. procedure setUINC(thebits : TBits_1); inline;
  18148. procedure setw(thebits : TBits_32); inline;
  18149. public
  18150. procedure clearDONLY; inline;
  18151. procedure clearFRESET; inline;
  18152. procedure clearRTREN; inline;
  18153. procedure clearTXABAT; inline;
  18154. procedure clearTXEN; inline;
  18155. procedure clearTXERR; inline;
  18156. procedure clearTXLARB; inline;
  18157. procedure clearTXREQ; inline;
  18158. procedure clearUINC; inline;
  18159. procedure setDONLY; inline;
  18160. procedure setFRESET; inline;
  18161. procedure setRTREN; inline;
  18162. procedure setTXABAT; inline;
  18163. procedure setTXEN; inline;
  18164. procedure setTXERR; inline;
  18165. procedure setTXLARB; inline;
  18166. procedure setTXREQ; inline;
  18167. procedure setUINC; inline;
  18168. property DONLY : TBits_1 read getDONLY write setDONLY;
  18169. property FRESET : TBits_1 read getFRESET write setFRESET;
  18170. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18171. property RTREN : TBits_1 read getRTREN write setRTREN;
  18172. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18173. property TXEN : TBits_1 read getTXEN write setTXEN;
  18174. property TXERR : TBits_1 read getTXERR write setTXERR;
  18175. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18176. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18177. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18178. property UINC : TBits_1 read getUINC write setUINC;
  18179. property w : TBits_32 read getw write setw;
  18180. end;
  18181. TCAN1_C1FIFOINT6 = record
  18182. private
  18183. function getRXFULLIE : TBits_1; inline;
  18184. function getRXFULLIF : TBits_1; inline;
  18185. function getRXHALFIE : TBits_1; inline;
  18186. function getRXHALFIF : TBits_1; inline;
  18187. function getRXNEMPTYIE : TBits_1; inline;
  18188. function getRXNEMPTYIF : TBits_1; inline;
  18189. function getRXOVFLIE : TBits_1; inline;
  18190. function getRXOVFLIF : TBits_1; inline;
  18191. function getTXEMPTYIE : TBits_1; inline;
  18192. function getTXEMPTYIF : TBits_1; inline;
  18193. function getTXHALFIE : TBits_1; inline;
  18194. function getTXHALFIF : TBits_1; inline;
  18195. function getTXNFULLIE : TBits_1; inline;
  18196. function getTXNFULLIF : TBits_1; inline;
  18197. function getw : TBits_32; inline;
  18198. procedure setRXFULLIE(thebits : TBits_1); inline;
  18199. procedure setRXFULLIF(thebits : TBits_1); inline;
  18200. procedure setRXHALFIE(thebits : TBits_1); inline;
  18201. procedure setRXHALFIF(thebits : TBits_1); inline;
  18202. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18203. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18204. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18205. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18206. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18207. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18208. procedure setTXHALFIE(thebits : TBits_1); inline;
  18209. procedure setTXHALFIF(thebits : TBits_1); inline;
  18210. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18211. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18212. procedure setw(thebits : TBits_32); inline;
  18213. public
  18214. procedure clearRXFULLIE; inline;
  18215. procedure clearRXFULLIF; inline;
  18216. procedure clearRXHALFIE; inline;
  18217. procedure clearRXHALFIF; inline;
  18218. procedure clearRXNEMPTYIE; inline;
  18219. procedure clearRXNEMPTYIF; inline;
  18220. procedure clearRXOVFLIE; inline;
  18221. procedure clearRXOVFLIF; inline;
  18222. procedure clearTXEMPTYIE; inline;
  18223. procedure clearTXEMPTYIF; inline;
  18224. procedure clearTXHALFIE; inline;
  18225. procedure clearTXHALFIF; inline;
  18226. procedure clearTXNFULLIE; inline;
  18227. procedure clearTXNFULLIF; inline;
  18228. procedure setRXFULLIE; inline;
  18229. procedure setRXFULLIF; inline;
  18230. procedure setRXHALFIE; inline;
  18231. procedure setRXHALFIF; inline;
  18232. procedure setRXNEMPTYIE; inline;
  18233. procedure setRXNEMPTYIF; inline;
  18234. procedure setRXOVFLIE; inline;
  18235. procedure setRXOVFLIF; inline;
  18236. procedure setTXEMPTYIE; inline;
  18237. procedure setTXEMPTYIF; inline;
  18238. procedure setTXHALFIE; inline;
  18239. procedure setTXHALFIF; inline;
  18240. procedure setTXNFULLIE; inline;
  18241. procedure setTXNFULLIF; inline;
  18242. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18243. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18244. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18245. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18246. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18247. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18248. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18249. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18250. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18251. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18252. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18253. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18254. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18255. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18256. property w : TBits_32 read getw write setw;
  18257. end;
  18258. TCAN1_C1FIFOCI6 = record
  18259. private
  18260. function getCFIFOCI : TBits_5; inline;
  18261. function getw : TBits_32; inline;
  18262. procedure setCFIFOCI(thebits : TBits_5); inline;
  18263. procedure setw(thebits : TBits_32); inline;
  18264. public
  18265. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18266. property w : TBits_32 read getw write setw;
  18267. end;
  18268. TCAN1_C1FIFOCON7 = record
  18269. private
  18270. function getDONLY : TBits_1; inline;
  18271. function getFRESET : TBits_1; inline;
  18272. function getFSIZE : TBits_5; inline;
  18273. function getRTREN : TBits_1; inline;
  18274. function getTXABAT : TBits_1; inline;
  18275. function getTXEN : TBits_1; inline;
  18276. function getTXERR : TBits_1; inline;
  18277. function getTXLARB : TBits_1; inline;
  18278. function getTXPRI : TBits_2; inline;
  18279. function getTXREQ : TBits_1; inline;
  18280. function getUINC : TBits_1; inline;
  18281. function getw : TBits_32; inline;
  18282. procedure setDONLY(thebits : TBits_1); inline;
  18283. procedure setFRESET(thebits : TBits_1); inline;
  18284. procedure setFSIZE(thebits : TBits_5); inline;
  18285. procedure setRTREN(thebits : TBits_1); inline;
  18286. procedure setTXABAT(thebits : TBits_1); inline;
  18287. procedure setTXEN(thebits : TBits_1); inline;
  18288. procedure setTXERR(thebits : TBits_1); inline;
  18289. procedure setTXLARB(thebits : TBits_1); inline;
  18290. procedure setTXPRI(thebits : TBits_2); inline;
  18291. procedure setTXREQ(thebits : TBits_1); inline;
  18292. procedure setUINC(thebits : TBits_1); inline;
  18293. procedure setw(thebits : TBits_32); inline;
  18294. public
  18295. procedure clearDONLY; inline;
  18296. procedure clearFRESET; inline;
  18297. procedure clearRTREN; inline;
  18298. procedure clearTXABAT; inline;
  18299. procedure clearTXEN; inline;
  18300. procedure clearTXERR; inline;
  18301. procedure clearTXLARB; inline;
  18302. procedure clearTXREQ; inline;
  18303. procedure clearUINC; inline;
  18304. procedure setDONLY; inline;
  18305. procedure setFRESET; inline;
  18306. procedure setRTREN; inline;
  18307. procedure setTXABAT; inline;
  18308. procedure setTXEN; inline;
  18309. procedure setTXERR; inline;
  18310. procedure setTXLARB; inline;
  18311. procedure setTXREQ; inline;
  18312. procedure setUINC; inline;
  18313. property DONLY : TBits_1 read getDONLY write setDONLY;
  18314. property FRESET : TBits_1 read getFRESET write setFRESET;
  18315. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18316. property RTREN : TBits_1 read getRTREN write setRTREN;
  18317. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18318. property TXEN : TBits_1 read getTXEN write setTXEN;
  18319. property TXERR : TBits_1 read getTXERR write setTXERR;
  18320. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18321. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18322. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18323. property UINC : TBits_1 read getUINC write setUINC;
  18324. property w : TBits_32 read getw write setw;
  18325. end;
  18326. TCAN1_C1FIFOINT7 = record
  18327. private
  18328. function getRXFULLIE : TBits_1; inline;
  18329. function getRXFULLIF : TBits_1; inline;
  18330. function getRXHALFIE : TBits_1; inline;
  18331. function getRXHALFIF : TBits_1; inline;
  18332. function getRXNEMPTYIE : TBits_1; inline;
  18333. function getRXNEMPTYIF : TBits_1; inline;
  18334. function getRXOVFLIE : TBits_1; inline;
  18335. function getRXOVFLIF : TBits_1; inline;
  18336. function getTXEMPTYIE : TBits_1; inline;
  18337. function getTXEMPTYIF : TBits_1; inline;
  18338. function getTXHALFIE : TBits_1; inline;
  18339. function getTXHALFIF : TBits_1; inline;
  18340. function getTXNFULLIE : TBits_1; inline;
  18341. function getTXNFULLIF : TBits_1; inline;
  18342. function getw : TBits_32; inline;
  18343. procedure setRXFULLIE(thebits : TBits_1); inline;
  18344. procedure setRXFULLIF(thebits : TBits_1); inline;
  18345. procedure setRXHALFIE(thebits : TBits_1); inline;
  18346. procedure setRXHALFIF(thebits : TBits_1); inline;
  18347. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18348. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18349. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18350. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18351. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18352. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18353. procedure setTXHALFIE(thebits : TBits_1); inline;
  18354. procedure setTXHALFIF(thebits : TBits_1); inline;
  18355. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18356. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18357. procedure setw(thebits : TBits_32); inline;
  18358. public
  18359. procedure clearRXFULLIE; inline;
  18360. procedure clearRXFULLIF; inline;
  18361. procedure clearRXHALFIE; inline;
  18362. procedure clearRXHALFIF; inline;
  18363. procedure clearRXNEMPTYIE; inline;
  18364. procedure clearRXNEMPTYIF; inline;
  18365. procedure clearRXOVFLIE; inline;
  18366. procedure clearRXOVFLIF; inline;
  18367. procedure clearTXEMPTYIE; inline;
  18368. procedure clearTXEMPTYIF; inline;
  18369. procedure clearTXHALFIE; inline;
  18370. procedure clearTXHALFIF; inline;
  18371. procedure clearTXNFULLIE; inline;
  18372. procedure clearTXNFULLIF; inline;
  18373. procedure setRXFULLIE; inline;
  18374. procedure setRXFULLIF; inline;
  18375. procedure setRXHALFIE; inline;
  18376. procedure setRXHALFIF; inline;
  18377. procedure setRXNEMPTYIE; inline;
  18378. procedure setRXNEMPTYIF; inline;
  18379. procedure setRXOVFLIE; inline;
  18380. procedure setRXOVFLIF; inline;
  18381. procedure setTXEMPTYIE; inline;
  18382. procedure setTXEMPTYIF; inline;
  18383. procedure setTXHALFIE; inline;
  18384. procedure setTXHALFIF; inline;
  18385. procedure setTXNFULLIE; inline;
  18386. procedure setTXNFULLIF; inline;
  18387. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18388. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18389. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18390. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18391. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18392. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18393. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18394. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18395. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18396. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18397. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18398. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18399. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18400. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18401. property w : TBits_32 read getw write setw;
  18402. end;
  18403. TCAN1_C1FIFOCI7 = record
  18404. private
  18405. function getCFIFOCI : TBits_5; inline;
  18406. function getw : TBits_32; inline;
  18407. procedure setCFIFOCI(thebits : TBits_5); inline;
  18408. procedure setw(thebits : TBits_32); inline;
  18409. public
  18410. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18411. property w : TBits_32 read getw write setw;
  18412. end;
  18413. TCAN1_C1FIFOCON8 = record
  18414. private
  18415. function getDONLY : TBits_1; inline;
  18416. function getFRESET : TBits_1; inline;
  18417. function getFSIZE : TBits_5; inline;
  18418. function getRTREN : TBits_1; inline;
  18419. function getTXABAT : TBits_1; inline;
  18420. function getTXEN : TBits_1; inline;
  18421. function getTXERR : TBits_1; inline;
  18422. function getTXLARB : TBits_1; inline;
  18423. function getTXPRI : TBits_2; inline;
  18424. function getTXREQ : TBits_1; inline;
  18425. function getUINC : TBits_1; inline;
  18426. function getw : TBits_32; inline;
  18427. procedure setDONLY(thebits : TBits_1); inline;
  18428. procedure setFRESET(thebits : TBits_1); inline;
  18429. procedure setFSIZE(thebits : TBits_5); inline;
  18430. procedure setRTREN(thebits : TBits_1); inline;
  18431. procedure setTXABAT(thebits : TBits_1); inline;
  18432. procedure setTXEN(thebits : TBits_1); inline;
  18433. procedure setTXERR(thebits : TBits_1); inline;
  18434. procedure setTXLARB(thebits : TBits_1); inline;
  18435. procedure setTXPRI(thebits : TBits_2); inline;
  18436. procedure setTXREQ(thebits : TBits_1); inline;
  18437. procedure setUINC(thebits : TBits_1); inline;
  18438. procedure setw(thebits : TBits_32); inline;
  18439. public
  18440. procedure clearDONLY; inline;
  18441. procedure clearFRESET; inline;
  18442. procedure clearRTREN; inline;
  18443. procedure clearTXABAT; inline;
  18444. procedure clearTXEN; inline;
  18445. procedure clearTXERR; inline;
  18446. procedure clearTXLARB; inline;
  18447. procedure clearTXREQ; inline;
  18448. procedure clearUINC; inline;
  18449. procedure setDONLY; inline;
  18450. procedure setFRESET; inline;
  18451. procedure setRTREN; inline;
  18452. procedure setTXABAT; inline;
  18453. procedure setTXEN; inline;
  18454. procedure setTXERR; inline;
  18455. procedure setTXLARB; inline;
  18456. procedure setTXREQ; inline;
  18457. procedure setUINC; inline;
  18458. property DONLY : TBits_1 read getDONLY write setDONLY;
  18459. property FRESET : TBits_1 read getFRESET write setFRESET;
  18460. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18461. property RTREN : TBits_1 read getRTREN write setRTREN;
  18462. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18463. property TXEN : TBits_1 read getTXEN write setTXEN;
  18464. property TXERR : TBits_1 read getTXERR write setTXERR;
  18465. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18466. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18467. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18468. property UINC : TBits_1 read getUINC write setUINC;
  18469. property w : TBits_32 read getw write setw;
  18470. end;
  18471. TCAN1_C1FIFOINT8 = record
  18472. private
  18473. function getRXFULLIE : TBits_1; inline;
  18474. function getRXFULLIF : TBits_1; inline;
  18475. function getRXHALFIE : TBits_1; inline;
  18476. function getRXHALFIF : TBits_1; inline;
  18477. function getRXNEMPTYIE : TBits_1; inline;
  18478. function getRXNEMPTYIF : TBits_1; inline;
  18479. function getRXOVFLIE : TBits_1; inline;
  18480. function getRXOVFLIF : TBits_1; inline;
  18481. function getTXEMPTYIE : TBits_1; inline;
  18482. function getTXEMPTYIF : TBits_1; inline;
  18483. function getTXHALFIE : TBits_1; inline;
  18484. function getTXHALFIF : TBits_1; inline;
  18485. function getTXNFULLIE : TBits_1; inline;
  18486. function getTXNFULLIF : TBits_1; inline;
  18487. function getw : TBits_32; inline;
  18488. procedure setRXFULLIE(thebits : TBits_1); inline;
  18489. procedure setRXFULLIF(thebits : TBits_1); inline;
  18490. procedure setRXHALFIE(thebits : TBits_1); inline;
  18491. procedure setRXHALFIF(thebits : TBits_1); inline;
  18492. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18493. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18494. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18495. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18496. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18497. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18498. procedure setTXHALFIE(thebits : TBits_1); inline;
  18499. procedure setTXHALFIF(thebits : TBits_1); inline;
  18500. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18501. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18502. procedure setw(thebits : TBits_32); inline;
  18503. public
  18504. procedure clearRXFULLIE; inline;
  18505. procedure clearRXFULLIF; inline;
  18506. procedure clearRXHALFIE; inline;
  18507. procedure clearRXHALFIF; inline;
  18508. procedure clearRXNEMPTYIE; inline;
  18509. procedure clearRXNEMPTYIF; inline;
  18510. procedure clearRXOVFLIE; inline;
  18511. procedure clearRXOVFLIF; inline;
  18512. procedure clearTXEMPTYIE; inline;
  18513. procedure clearTXEMPTYIF; inline;
  18514. procedure clearTXHALFIE; inline;
  18515. procedure clearTXHALFIF; inline;
  18516. procedure clearTXNFULLIE; inline;
  18517. procedure clearTXNFULLIF; inline;
  18518. procedure setRXFULLIE; inline;
  18519. procedure setRXFULLIF; inline;
  18520. procedure setRXHALFIE; inline;
  18521. procedure setRXHALFIF; inline;
  18522. procedure setRXNEMPTYIE; inline;
  18523. procedure setRXNEMPTYIF; inline;
  18524. procedure setRXOVFLIE; inline;
  18525. procedure setRXOVFLIF; inline;
  18526. procedure setTXEMPTYIE; inline;
  18527. procedure setTXEMPTYIF; inline;
  18528. procedure setTXHALFIE; inline;
  18529. procedure setTXHALFIF; inline;
  18530. procedure setTXNFULLIE; inline;
  18531. procedure setTXNFULLIF; inline;
  18532. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18533. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18534. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18535. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18536. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18537. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18538. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18539. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18540. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18541. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18542. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18543. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18544. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18545. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18546. property w : TBits_32 read getw write setw;
  18547. end;
  18548. TCAN1_C1FIFOCI8 = record
  18549. private
  18550. function getCFIFOCI : TBits_5; inline;
  18551. function getw : TBits_32; inline;
  18552. procedure setCFIFOCI(thebits : TBits_5); inline;
  18553. procedure setw(thebits : TBits_32); inline;
  18554. public
  18555. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18556. property w : TBits_32 read getw write setw;
  18557. end;
  18558. TCAN1_C1FIFOCON9 = record
  18559. private
  18560. function getDONLY : TBits_1; inline;
  18561. function getFRESET : TBits_1; inline;
  18562. function getFSIZE : TBits_5; inline;
  18563. function getRTREN : TBits_1; inline;
  18564. function getTXABAT : TBits_1; inline;
  18565. function getTXEN : TBits_1; inline;
  18566. function getTXERR : TBits_1; inline;
  18567. function getTXLARB : TBits_1; inline;
  18568. function getTXPRI : TBits_2; inline;
  18569. function getTXREQ : TBits_1; inline;
  18570. function getUINC : TBits_1; inline;
  18571. function getw : TBits_32; inline;
  18572. procedure setDONLY(thebits : TBits_1); inline;
  18573. procedure setFRESET(thebits : TBits_1); inline;
  18574. procedure setFSIZE(thebits : TBits_5); inline;
  18575. procedure setRTREN(thebits : TBits_1); inline;
  18576. procedure setTXABAT(thebits : TBits_1); inline;
  18577. procedure setTXEN(thebits : TBits_1); inline;
  18578. procedure setTXERR(thebits : TBits_1); inline;
  18579. procedure setTXLARB(thebits : TBits_1); inline;
  18580. procedure setTXPRI(thebits : TBits_2); inline;
  18581. procedure setTXREQ(thebits : TBits_1); inline;
  18582. procedure setUINC(thebits : TBits_1); inline;
  18583. procedure setw(thebits : TBits_32); inline;
  18584. public
  18585. procedure clearDONLY; inline;
  18586. procedure clearFRESET; inline;
  18587. procedure clearRTREN; inline;
  18588. procedure clearTXABAT; inline;
  18589. procedure clearTXEN; inline;
  18590. procedure clearTXERR; inline;
  18591. procedure clearTXLARB; inline;
  18592. procedure clearTXREQ; inline;
  18593. procedure clearUINC; inline;
  18594. procedure setDONLY; inline;
  18595. procedure setFRESET; inline;
  18596. procedure setRTREN; inline;
  18597. procedure setTXABAT; inline;
  18598. procedure setTXEN; inline;
  18599. procedure setTXERR; inline;
  18600. procedure setTXLARB; inline;
  18601. procedure setTXREQ; inline;
  18602. procedure setUINC; inline;
  18603. property DONLY : TBits_1 read getDONLY write setDONLY;
  18604. property FRESET : TBits_1 read getFRESET write setFRESET;
  18605. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18606. property RTREN : TBits_1 read getRTREN write setRTREN;
  18607. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18608. property TXEN : TBits_1 read getTXEN write setTXEN;
  18609. property TXERR : TBits_1 read getTXERR write setTXERR;
  18610. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18611. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18612. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18613. property UINC : TBits_1 read getUINC write setUINC;
  18614. property w : TBits_32 read getw write setw;
  18615. end;
  18616. TCAN1_C1FIFOINT9 = record
  18617. private
  18618. function getRXFULLIE : TBits_1; inline;
  18619. function getRXFULLIF : TBits_1; inline;
  18620. function getRXHALFIE : TBits_1; inline;
  18621. function getRXHALFIF : TBits_1; inline;
  18622. function getRXNEMPTYIE : TBits_1; inline;
  18623. function getRXNEMPTYIF : TBits_1; inline;
  18624. function getRXOVFLIE : TBits_1; inline;
  18625. function getRXOVFLIF : TBits_1; inline;
  18626. function getTXEMPTYIE : TBits_1; inline;
  18627. function getTXEMPTYIF : TBits_1; inline;
  18628. function getTXHALFIE : TBits_1; inline;
  18629. function getTXHALFIF : TBits_1; inline;
  18630. function getTXNFULLIE : TBits_1; inline;
  18631. function getTXNFULLIF : TBits_1; inline;
  18632. function getw : TBits_32; inline;
  18633. procedure setRXFULLIE(thebits : TBits_1); inline;
  18634. procedure setRXFULLIF(thebits : TBits_1); inline;
  18635. procedure setRXHALFIE(thebits : TBits_1); inline;
  18636. procedure setRXHALFIF(thebits : TBits_1); inline;
  18637. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18638. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18639. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18640. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18641. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18642. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18643. procedure setTXHALFIE(thebits : TBits_1); inline;
  18644. procedure setTXHALFIF(thebits : TBits_1); inline;
  18645. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18646. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18647. procedure setw(thebits : TBits_32); inline;
  18648. public
  18649. procedure clearRXFULLIE; inline;
  18650. procedure clearRXFULLIF; inline;
  18651. procedure clearRXHALFIE; inline;
  18652. procedure clearRXHALFIF; inline;
  18653. procedure clearRXNEMPTYIE; inline;
  18654. procedure clearRXNEMPTYIF; inline;
  18655. procedure clearRXOVFLIE; inline;
  18656. procedure clearRXOVFLIF; inline;
  18657. procedure clearTXEMPTYIE; inline;
  18658. procedure clearTXEMPTYIF; inline;
  18659. procedure clearTXHALFIE; inline;
  18660. procedure clearTXHALFIF; inline;
  18661. procedure clearTXNFULLIE; inline;
  18662. procedure clearTXNFULLIF; inline;
  18663. procedure setRXFULLIE; inline;
  18664. procedure setRXFULLIF; inline;
  18665. procedure setRXHALFIE; inline;
  18666. procedure setRXHALFIF; inline;
  18667. procedure setRXNEMPTYIE; inline;
  18668. procedure setRXNEMPTYIF; inline;
  18669. procedure setRXOVFLIE; inline;
  18670. procedure setRXOVFLIF; inline;
  18671. procedure setTXEMPTYIE; inline;
  18672. procedure setTXEMPTYIF; inline;
  18673. procedure setTXHALFIE; inline;
  18674. procedure setTXHALFIF; inline;
  18675. procedure setTXNFULLIE; inline;
  18676. procedure setTXNFULLIF; inline;
  18677. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18678. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18679. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18680. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18681. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18682. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18683. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18684. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18685. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18686. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18687. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18688. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18689. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18690. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18691. property w : TBits_32 read getw write setw;
  18692. end;
  18693. TCAN1_C1FIFOCI9 = record
  18694. private
  18695. function getCFIFOCI : TBits_5; inline;
  18696. function getw : TBits_32; inline;
  18697. procedure setCFIFOCI(thebits : TBits_5); inline;
  18698. procedure setw(thebits : TBits_32); inline;
  18699. public
  18700. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18701. property w : TBits_32 read getw write setw;
  18702. end;
  18703. TCAN1_C1FIFOCON10 = record
  18704. private
  18705. function getDONLY : TBits_1; inline;
  18706. function getFRESET : TBits_1; inline;
  18707. function getFSIZE : TBits_5; inline;
  18708. function getRTREN : TBits_1; inline;
  18709. function getTXABAT : TBits_1; inline;
  18710. function getTXEN : TBits_1; inline;
  18711. function getTXERR : TBits_1; inline;
  18712. function getTXLARB : TBits_1; inline;
  18713. function getTXPRI : TBits_2; inline;
  18714. function getTXREQ : TBits_1; inline;
  18715. function getUINC : TBits_1; inline;
  18716. function getw : TBits_32; inline;
  18717. procedure setDONLY(thebits : TBits_1); inline;
  18718. procedure setFRESET(thebits : TBits_1); inline;
  18719. procedure setFSIZE(thebits : TBits_5); inline;
  18720. procedure setRTREN(thebits : TBits_1); inline;
  18721. procedure setTXABAT(thebits : TBits_1); inline;
  18722. procedure setTXEN(thebits : TBits_1); inline;
  18723. procedure setTXERR(thebits : TBits_1); inline;
  18724. procedure setTXLARB(thebits : TBits_1); inline;
  18725. procedure setTXPRI(thebits : TBits_2); inline;
  18726. procedure setTXREQ(thebits : TBits_1); inline;
  18727. procedure setUINC(thebits : TBits_1); inline;
  18728. procedure setw(thebits : TBits_32); inline;
  18729. public
  18730. procedure clearDONLY; inline;
  18731. procedure clearFRESET; inline;
  18732. procedure clearRTREN; inline;
  18733. procedure clearTXABAT; inline;
  18734. procedure clearTXEN; inline;
  18735. procedure clearTXERR; inline;
  18736. procedure clearTXLARB; inline;
  18737. procedure clearTXREQ; inline;
  18738. procedure clearUINC; inline;
  18739. procedure setDONLY; inline;
  18740. procedure setFRESET; inline;
  18741. procedure setRTREN; inline;
  18742. procedure setTXABAT; inline;
  18743. procedure setTXEN; inline;
  18744. procedure setTXERR; inline;
  18745. procedure setTXLARB; inline;
  18746. procedure setTXREQ; inline;
  18747. procedure setUINC; inline;
  18748. property DONLY : TBits_1 read getDONLY write setDONLY;
  18749. property FRESET : TBits_1 read getFRESET write setFRESET;
  18750. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18751. property RTREN : TBits_1 read getRTREN write setRTREN;
  18752. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18753. property TXEN : TBits_1 read getTXEN write setTXEN;
  18754. property TXERR : TBits_1 read getTXERR write setTXERR;
  18755. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18756. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18757. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18758. property UINC : TBits_1 read getUINC write setUINC;
  18759. property w : TBits_32 read getw write setw;
  18760. end;
  18761. TCAN1_C1FIFOINT10 = record
  18762. private
  18763. function getRXFULLIE : TBits_1; inline;
  18764. function getRXFULLIF : TBits_1; inline;
  18765. function getRXHALFIE : TBits_1; inline;
  18766. function getRXHALFIF : TBits_1; inline;
  18767. function getRXNEMPTYIE : TBits_1; inline;
  18768. function getRXNEMPTYIF : TBits_1; inline;
  18769. function getRXOVFLIE : TBits_1; inline;
  18770. function getRXOVFLIF : TBits_1; inline;
  18771. function getTXEMPTYIE : TBits_1; inline;
  18772. function getTXEMPTYIF : TBits_1; inline;
  18773. function getTXHALFIE : TBits_1; inline;
  18774. function getTXHALFIF : TBits_1; inline;
  18775. function getTXNFULLIE : TBits_1; inline;
  18776. function getTXNFULLIF : TBits_1; inline;
  18777. function getw : TBits_32; inline;
  18778. procedure setRXFULLIE(thebits : TBits_1); inline;
  18779. procedure setRXFULLIF(thebits : TBits_1); inline;
  18780. procedure setRXHALFIE(thebits : TBits_1); inline;
  18781. procedure setRXHALFIF(thebits : TBits_1); inline;
  18782. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18783. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18784. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18785. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18786. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18787. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18788. procedure setTXHALFIE(thebits : TBits_1); inline;
  18789. procedure setTXHALFIF(thebits : TBits_1); inline;
  18790. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18791. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18792. procedure setw(thebits : TBits_32); inline;
  18793. public
  18794. procedure clearRXFULLIE; inline;
  18795. procedure clearRXFULLIF; inline;
  18796. procedure clearRXHALFIE; inline;
  18797. procedure clearRXHALFIF; inline;
  18798. procedure clearRXNEMPTYIE; inline;
  18799. procedure clearRXNEMPTYIF; inline;
  18800. procedure clearRXOVFLIE; inline;
  18801. procedure clearRXOVFLIF; inline;
  18802. procedure clearTXEMPTYIE; inline;
  18803. procedure clearTXEMPTYIF; inline;
  18804. procedure clearTXHALFIE; inline;
  18805. procedure clearTXHALFIF; inline;
  18806. procedure clearTXNFULLIE; inline;
  18807. procedure clearTXNFULLIF; inline;
  18808. procedure setRXFULLIE; inline;
  18809. procedure setRXFULLIF; inline;
  18810. procedure setRXHALFIE; inline;
  18811. procedure setRXHALFIF; inline;
  18812. procedure setRXNEMPTYIE; inline;
  18813. procedure setRXNEMPTYIF; inline;
  18814. procedure setRXOVFLIE; inline;
  18815. procedure setRXOVFLIF; inline;
  18816. procedure setTXEMPTYIE; inline;
  18817. procedure setTXEMPTYIF; inline;
  18818. procedure setTXHALFIE; inline;
  18819. procedure setTXHALFIF; inline;
  18820. procedure setTXNFULLIE; inline;
  18821. procedure setTXNFULLIF; inline;
  18822. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18823. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18824. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18825. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18826. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18827. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18828. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18829. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18830. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18831. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18832. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18833. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18834. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18835. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18836. property w : TBits_32 read getw write setw;
  18837. end;
  18838. TCAN1_C1FIFOCI10 = record
  18839. private
  18840. function getCFIFOCI : TBits_5; inline;
  18841. function getw : TBits_32; inline;
  18842. procedure setCFIFOCI(thebits : TBits_5); inline;
  18843. procedure setw(thebits : TBits_32); inline;
  18844. public
  18845. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18846. property w : TBits_32 read getw write setw;
  18847. end;
  18848. TCAN1_C1FIFOCON11 = record
  18849. private
  18850. function getDONLY : TBits_1; inline;
  18851. function getFRESET : TBits_1; inline;
  18852. function getFSIZE : TBits_5; inline;
  18853. function getRTREN : TBits_1; inline;
  18854. function getTXABAT : TBits_1; inline;
  18855. function getTXEN : TBits_1; inline;
  18856. function getTXERR : TBits_1; inline;
  18857. function getTXLARB : TBits_1; inline;
  18858. function getTXPRI : TBits_2; inline;
  18859. function getTXREQ : TBits_1; inline;
  18860. function getUINC : TBits_1; inline;
  18861. function getw : TBits_32; inline;
  18862. procedure setDONLY(thebits : TBits_1); inline;
  18863. procedure setFRESET(thebits : TBits_1); inline;
  18864. procedure setFSIZE(thebits : TBits_5); inline;
  18865. procedure setRTREN(thebits : TBits_1); inline;
  18866. procedure setTXABAT(thebits : TBits_1); inline;
  18867. procedure setTXEN(thebits : TBits_1); inline;
  18868. procedure setTXERR(thebits : TBits_1); inline;
  18869. procedure setTXLARB(thebits : TBits_1); inline;
  18870. procedure setTXPRI(thebits : TBits_2); inline;
  18871. procedure setTXREQ(thebits : TBits_1); inline;
  18872. procedure setUINC(thebits : TBits_1); inline;
  18873. procedure setw(thebits : TBits_32); inline;
  18874. public
  18875. procedure clearDONLY; inline;
  18876. procedure clearFRESET; inline;
  18877. procedure clearRTREN; inline;
  18878. procedure clearTXABAT; inline;
  18879. procedure clearTXEN; inline;
  18880. procedure clearTXERR; inline;
  18881. procedure clearTXLARB; inline;
  18882. procedure clearTXREQ; inline;
  18883. procedure clearUINC; inline;
  18884. procedure setDONLY; inline;
  18885. procedure setFRESET; inline;
  18886. procedure setRTREN; inline;
  18887. procedure setTXABAT; inline;
  18888. procedure setTXEN; inline;
  18889. procedure setTXERR; inline;
  18890. procedure setTXLARB; inline;
  18891. procedure setTXREQ; inline;
  18892. procedure setUINC; inline;
  18893. property DONLY : TBits_1 read getDONLY write setDONLY;
  18894. property FRESET : TBits_1 read getFRESET write setFRESET;
  18895. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  18896. property RTREN : TBits_1 read getRTREN write setRTREN;
  18897. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  18898. property TXEN : TBits_1 read getTXEN write setTXEN;
  18899. property TXERR : TBits_1 read getTXERR write setTXERR;
  18900. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  18901. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  18902. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  18903. property UINC : TBits_1 read getUINC write setUINC;
  18904. property w : TBits_32 read getw write setw;
  18905. end;
  18906. TCAN1_C1FIFOINT11 = record
  18907. private
  18908. function getRXFULLIE : TBits_1; inline;
  18909. function getRXFULLIF : TBits_1; inline;
  18910. function getRXHALFIE : TBits_1; inline;
  18911. function getRXHALFIF : TBits_1; inline;
  18912. function getRXNEMPTYIE : TBits_1; inline;
  18913. function getRXNEMPTYIF : TBits_1; inline;
  18914. function getRXOVFLIE : TBits_1; inline;
  18915. function getRXOVFLIF : TBits_1; inline;
  18916. function getTXEMPTYIE : TBits_1; inline;
  18917. function getTXEMPTYIF : TBits_1; inline;
  18918. function getTXHALFIE : TBits_1; inline;
  18919. function getTXHALFIF : TBits_1; inline;
  18920. function getTXNFULLIE : TBits_1; inline;
  18921. function getTXNFULLIF : TBits_1; inline;
  18922. function getw : TBits_32; inline;
  18923. procedure setRXFULLIE(thebits : TBits_1); inline;
  18924. procedure setRXFULLIF(thebits : TBits_1); inline;
  18925. procedure setRXHALFIE(thebits : TBits_1); inline;
  18926. procedure setRXHALFIF(thebits : TBits_1); inline;
  18927. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  18928. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  18929. procedure setRXOVFLIE(thebits : TBits_1); inline;
  18930. procedure setRXOVFLIF(thebits : TBits_1); inline;
  18931. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  18932. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  18933. procedure setTXHALFIE(thebits : TBits_1); inline;
  18934. procedure setTXHALFIF(thebits : TBits_1); inline;
  18935. procedure setTXNFULLIE(thebits : TBits_1); inline;
  18936. procedure setTXNFULLIF(thebits : TBits_1); inline;
  18937. procedure setw(thebits : TBits_32); inline;
  18938. public
  18939. procedure clearRXFULLIE; inline;
  18940. procedure clearRXFULLIF; inline;
  18941. procedure clearRXHALFIE; inline;
  18942. procedure clearRXHALFIF; inline;
  18943. procedure clearRXNEMPTYIE; inline;
  18944. procedure clearRXNEMPTYIF; inline;
  18945. procedure clearRXOVFLIE; inline;
  18946. procedure clearRXOVFLIF; inline;
  18947. procedure clearTXEMPTYIE; inline;
  18948. procedure clearTXEMPTYIF; inline;
  18949. procedure clearTXHALFIE; inline;
  18950. procedure clearTXHALFIF; inline;
  18951. procedure clearTXNFULLIE; inline;
  18952. procedure clearTXNFULLIF; inline;
  18953. procedure setRXFULLIE; inline;
  18954. procedure setRXFULLIF; inline;
  18955. procedure setRXHALFIE; inline;
  18956. procedure setRXHALFIF; inline;
  18957. procedure setRXNEMPTYIE; inline;
  18958. procedure setRXNEMPTYIF; inline;
  18959. procedure setRXOVFLIE; inline;
  18960. procedure setRXOVFLIF; inline;
  18961. procedure setTXEMPTYIE; inline;
  18962. procedure setTXEMPTYIF; inline;
  18963. procedure setTXHALFIE; inline;
  18964. procedure setTXHALFIF; inline;
  18965. procedure setTXNFULLIE; inline;
  18966. procedure setTXNFULLIF; inline;
  18967. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  18968. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  18969. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  18970. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  18971. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  18972. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  18973. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  18974. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  18975. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  18976. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  18977. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  18978. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  18979. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  18980. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  18981. property w : TBits_32 read getw write setw;
  18982. end;
  18983. TCAN1_C1FIFOCI11 = record
  18984. private
  18985. function getCFIFOCI : TBits_5; inline;
  18986. function getw : TBits_32; inline;
  18987. procedure setCFIFOCI(thebits : TBits_5); inline;
  18988. procedure setw(thebits : TBits_32); inline;
  18989. public
  18990. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  18991. property w : TBits_32 read getw write setw;
  18992. end;
  18993. TCAN1_C1FIFOCON12 = record
  18994. private
  18995. function getDONLY : TBits_1; inline;
  18996. function getFRESET : TBits_1; inline;
  18997. function getFSIZE : TBits_5; inline;
  18998. function getRTREN : TBits_1; inline;
  18999. function getTXABAT : TBits_1; inline;
  19000. function getTXEN : TBits_1; inline;
  19001. function getTXERR : TBits_1; inline;
  19002. function getTXLARB : TBits_1; inline;
  19003. function getTXPRI : TBits_2; inline;
  19004. function getTXREQ : TBits_1; inline;
  19005. function getUINC : TBits_1; inline;
  19006. function getw : TBits_32; inline;
  19007. procedure setDONLY(thebits : TBits_1); inline;
  19008. procedure setFRESET(thebits : TBits_1); inline;
  19009. procedure setFSIZE(thebits : TBits_5); inline;
  19010. procedure setRTREN(thebits : TBits_1); inline;
  19011. procedure setTXABAT(thebits : TBits_1); inline;
  19012. procedure setTXEN(thebits : TBits_1); inline;
  19013. procedure setTXERR(thebits : TBits_1); inline;
  19014. procedure setTXLARB(thebits : TBits_1); inline;
  19015. procedure setTXPRI(thebits : TBits_2); inline;
  19016. procedure setTXREQ(thebits : TBits_1); inline;
  19017. procedure setUINC(thebits : TBits_1); inline;
  19018. procedure setw(thebits : TBits_32); inline;
  19019. public
  19020. procedure clearDONLY; inline;
  19021. procedure clearFRESET; inline;
  19022. procedure clearRTREN; inline;
  19023. procedure clearTXABAT; inline;
  19024. procedure clearTXEN; inline;
  19025. procedure clearTXERR; inline;
  19026. procedure clearTXLARB; inline;
  19027. procedure clearTXREQ; inline;
  19028. procedure clearUINC; inline;
  19029. procedure setDONLY; inline;
  19030. procedure setFRESET; inline;
  19031. procedure setRTREN; inline;
  19032. procedure setTXABAT; inline;
  19033. procedure setTXEN; inline;
  19034. procedure setTXERR; inline;
  19035. procedure setTXLARB; inline;
  19036. procedure setTXREQ; inline;
  19037. procedure setUINC; inline;
  19038. property DONLY : TBits_1 read getDONLY write setDONLY;
  19039. property FRESET : TBits_1 read getFRESET write setFRESET;
  19040. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19041. property RTREN : TBits_1 read getRTREN write setRTREN;
  19042. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19043. property TXEN : TBits_1 read getTXEN write setTXEN;
  19044. property TXERR : TBits_1 read getTXERR write setTXERR;
  19045. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19046. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19047. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19048. property UINC : TBits_1 read getUINC write setUINC;
  19049. property w : TBits_32 read getw write setw;
  19050. end;
  19051. TCAN1_C1FIFOINT12 = record
  19052. private
  19053. function getRXFULLIE : TBits_1; inline;
  19054. function getRXFULLIF : TBits_1; inline;
  19055. function getRXHALFIE : TBits_1; inline;
  19056. function getRXHALFIF : TBits_1; inline;
  19057. function getRXNEMPTYIE : TBits_1; inline;
  19058. function getRXNEMPTYIF : TBits_1; inline;
  19059. function getRXOVFLIE : TBits_1; inline;
  19060. function getRXOVFLIF : TBits_1; inline;
  19061. function getTXEMPTYIE : TBits_1; inline;
  19062. function getTXEMPTYIF : TBits_1; inline;
  19063. function getTXHALFIE : TBits_1; inline;
  19064. function getTXHALFIF : TBits_1; inline;
  19065. function getTXNFULLIE : TBits_1; inline;
  19066. function getTXNFULLIF : TBits_1; inline;
  19067. function getw : TBits_32; inline;
  19068. procedure setRXFULLIE(thebits : TBits_1); inline;
  19069. procedure setRXFULLIF(thebits : TBits_1); inline;
  19070. procedure setRXHALFIE(thebits : TBits_1); inline;
  19071. procedure setRXHALFIF(thebits : TBits_1); inline;
  19072. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19073. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19074. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19075. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19076. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19077. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19078. procedure setTXHALFIE(thebits : TBits_1); inline;
  19079. procedure setTXHALFIF(thebits : TBits_1); inline;
  19080. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19081. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19082. procedure setw(thebits : TBits_32); inline;
  19083. public
  19084. procedure clearRXFULLIE; inline;
  19085. procedure clearRXFULLIF; inline;
  19086. procedure clearRXHALFIE; inline;
  19087. procedure clearRXHALFIF; inline;
  19088. procedure clearRXNEMPTYIE; inline;
  19089. procedure clearRXNEMPTYIF; inline;
  19090. procedure clearRXOVFLIE; inline;
  19091. procedure clearRXOVFLIF; inline;
  19092. procedure clearTXEMPTYIE; inline;
  19093. procedure clearTXEMPTYIF; inline;
  19094. procedure clearTXHALFIE; inline;
  19095. procedure clearTXHALFIF; inline;
  19096. procedure clearTXNFULLIE; inline;
  19097. procedure clearTXNFULLIF; inline;
  19098. procedure setRXFULLIE; inline;
  19099. procedure setRXFULLIF; inline;
  19100. procedure setRXHALFIE; inline;
  19101. procedure setRXHALFIF; inline;
  19102. procedure setRXNEMPTYIE; inline;
  19103. procedure setRXNEMPTYIF; inline;
  19104. procedure setRXOVFLIE; inline;
  19105. procedure setRXOVFLIF; inline;
  19106. procedure setTXEMPTYIE; inline;
  19107. procedure setTXEMPTYIF; inline;
  19108. procedure setTXHALFIE; inline;
  19109. procedure setTXHALFIF; inline;
  19110. procedure setTXNFULLIE; inline;
  19111. procedure setTXNFULLIF; inline;
  19112. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19113. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19114. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19115. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19116. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19117. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19118. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19119. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19120. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19121. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19122. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19123. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19124. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19125. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19126. property w : TBits_32 read getw write setw;
  19127. end;
  19128. TCAN1_C1FIFOCI12 = record
  19129. private
  19130. function getCFIFOCI : TBits_5; inline;
  19131. function getw : TBits_32; inline;
  19132. procedure setCFIFOCI(thebits : TBits_5); inline;
  19133. procedure setw(thebits : TBits_32); inline;
  19134. public
  19135. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19136. property w : TBits_32 read getw write setw;
  19137. end;
  19138. TCAN1_C1FIFOCON13 = record
  19139. private
  19140. function getDONLY : TBits_1; inline;
  19141. function getFRESET : TBits_1; inline;
  19142. function getFSIZE : TBits_5; inline;
  19143. function getRTREN : TBits_1; inline;
  19144. function getTXABAT : TBits_1; inline;
  19145. function getTXEN : TBits_1; inline;
  19146. function getTXERR : TBits_1; inline;
  19147. function getTXLARB : TBits_1; inline;
  19148. function getTXPRI : TBits_2; inline;
  19149. function getTXREQ : TBits_1; inline;
  19150. function getUINC : TBits_1; inline;
  19151. function getw : TBits_32; inline;
  19152. procedure setDONLY(thebits : TBits_1); inline;
  19153. procedure setFRESET(thebits : TBits_1); inline;
  19154. procedure setFSIZE(thebits : TBits_5); inline;
  19155. procedure setRTREN(thebits : TBits_1); inline;
  19156. procedure setTXABAT(thebits : TBits_1); inline;
  19157. procedure setTXEN(thebits : TBits_1); inline;
  19158. procedure setTXERR(thebits : TBits_1); inline;
  19159. procedure setTXLARB(thebits : TBits_1); inline;
  19160. procedure setTXPRI(thebits : TBits_2); inline;
  19161. procedure setTXREQ(thebits : TBits_1); inline;
  19162. procedure setUINC(thebits : TBits_1); inline;
  19163. procedure setw(thebits : TBits_32); inline;
  19164. public
  19165. procedure clearDONLY; inline;
  19166. procedure clearFRESET; inline;
  19167. procedure clearRTREN; inline;
  19168. procedure clearTXABAT; inline;
  19169. procedure clearTXEN; inline;
  19170. procedure clearTXERR; inline;
  19171. procedure clearTXLARB; inline;
  19172. procedure clearTXREQ; inline;
  19173. procedure clearUINC; inline;
  19174. procedure setDONLY; inline;
  19175. procedure setFRESET; inline;
  19176. procedure setRTREN; inline;
  19177. procedure setTXABAT; inline;
  19178. procedure setTXEN; inline;
  19179. procedure setTXERR; inline;
  19180. procedure setTXLARB; inline;
  19181. procedure setTXREQ; inline;
  19182. procedure setUINC; inline;
  19183. property DONLY : TBits_1 read getDONLY write setDONLY;
  19184. property FRESET : TBits_1 read getFRESET write setFRESET;
  19185. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19186. property RTREN : TBits_1 read getRTREN write setRTREN;
  19187. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19188. property TXEN : TBits_1 read getTXEN write setTXEN;
  19189. property TXERR : TBits_1 read getTXERR write setTXERR;
  19190. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19191. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19192. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19193. property UINC : TBits_1 read getUINC write setUINC;
  19194. property w : TBits_32 read getw write setw;
  19195. end;
  19196. TCAN1_C1FIFOINT13 = record
  19197. private
  19198. function getRXFULLIE : TBits_1; inline;
  19199. function getRXFULLIF : TBits_1; inline;
  19200. function getRXHALFIE : TBits_1; inline;
  19201. function getRXHALFIF : TBits_1; inline;
  19202. function getRXNEMPTYIE : TBits_1; inline;
  19203. function getRXNEMPTYIF : TBits_1; inline;
  19204. function getRXOVFLIE : TBits_1; inline;
  19205. function getRXOVFLIF : TBits_1; inline;
  19206. function getTXEMPTYIE : TBits_1; inline;
  19207. function getTXEMPTYIF : TBits_1; inline;
  19208. function getTXHALFIE : TBits_1; inline;
  19209. function getTXHALFIF : TBits_1; inline;
  19210. function getTXNFULLIE : TBits_1; inline;
  19211. function getTXNFULLIF : TBits_1; inline;
  19212. function getw : TBits_32; inline;
  19213. procedure setRXFULLIE(thebits : TBits_1); inline;
  19214. procedure setRXFULLIF(thebits : TBits_1); inline;
  19215. procedure setRXHALFIE(thebits : TBits_1); inline;
  19216. procedure setRXHALFIF(thebits : TBits_1); inline;
  19217. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19218. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19219. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19220. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19221. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19222. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19223. procedure setTXHALFIE(thebits : TBits_1); inline;
  19224. procedure setTXHALFIF(thebits : TBits_1); inline;
  19225. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19226. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19227. procedure setw(thebits : TBits_32); inline;
  19228. public
  19229. procedure clearRXFULLIE; inline;
  19230. procedure clearRXFULLIF; inline;
  19231. procedure clearRXHALFIE; inline;
  19232. procedure clearRXHALFIF; inline;
  19233. procedure clearRXNEMPTYIE; inline;
  19234. procedure clearRXNEMPTYIF; inline;
  19235. procedure clearRXOVFLIE; inline;
  19236. procedure clearRXOVFLIF; inline;
  19237. procedure clearTXEMPTYIE; inline;
  19238. procedure clearTXEMPTYIF; inline;
  19239. procedure clearTXHALFIE; inline;
  19240. procedure clearTXHALFIF; inline;
  19241. procedure clearTXNFULLIE; inline;
  19242. procedure clearTXNFULLIF; inline;
  19243. procedure setRXFULLIE; inline;
  19244. procedure setRXFULLIF; inline;
  19245. procedure setRXHALFIE; inline;
  19246. procedure setRXHALFIF; inline;
  19247. procedure setRXNEMPTYIE; inline;
  19248. procedure setRXNEMPTYIF; inline;
  19249. procedure setRXOVFLIE; inline;
  19250. procedure setRXOVFLIF; inline;
  19251. procedure setTXEMPTYIE; inline;
  19252. procedure setTXEMPTYIF; inline;
  19253. procedure setTXHALFIE; inline;
  19254. procedure setTXHALFIF; inline;
  19255. procedure setTXNFULLIE; inline;
  19256. procedure setTXNFULLIF; inline;
  19257. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19258. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19259. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19260. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19261. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19262. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19263. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19264. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19265. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19266. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19267. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19268. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19269. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19270. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19271. property w : TBits_32 read getw write setw;
  19272. end;
  19273. TCAN1_C1FIFOCI13 = record
  19274. private
  19275. function getCFIFOCI : TBits_5; inline;
  19276. function getw : TBits_32; inline;
  19277. procedure setCFIFOCI(thebits : TBits_5); inline;
  19278. procedure setw(thebits : TBits_32); inline;
  19279. public
  19280. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19281. property w : TBits_32 read getw write setw;
  19282. end;
  19283. TCAN1_C1FIFOCON14 = record
  19284. private
  19285. function getDONLY : TBits_1; inline;
  19286. function getFRESET : TBits_1; inline;
  19287. function getFSIZE : TBits_5; inline;
  19288. function getRTREN : TBits_1; inline;
  19289. function getTXABAT : TBits_1; inline;
  19290. function getTXEN : TBits_1; inline;
  19291. function getTXERR : TBits_1; inline;
  19292. function getTXLARB : TBits_1; inline;
  19293. function getTXPRI : TBits_2; inline;
  19294. function getTXREQ : TBits_1; inline;
  19295. function getUINC : TBits_1; inline;
  19296. function getw : TBits_32; inline;
  19297. procedure setDONLY(thebits : TBits_1); inline;
  19298. procedure setFRESET(thebits : TBits_1); inline;
  19299. procedure setFSIZE(thebits : TBits_5); inline;
  19300. procedure setRTREN(thebits : TBits_1); inline;
  19301. procedure setTXABAT(thebits : TBits_1); inline;
  19302. procedure setTXEN(thebits : TBits_1); inline;
  19303. procedure setTXERR(thebits : TBits_1); inline;
  19304. procedure setTXLARB(thebits : TBits_1); inline;
  19305. procedure setTXPRI(thebits : TBits_2); inline;
  19306. procedure setTXREQ(thebits : TBits_1); inline;
  19307. procedure setUINC(thebits : TBits_1); inline;
  19308. procedure setw(thebits : TBits_32); inline;
  19309. public
  19310. procedure clearDONLY; inline;
  19311. procedure clearFRESET; inline;
  19312. procedure clearRTREN; inline;
  19313. procedure clearTXABAT; inline;
  19314. procedure clearTXEN; inline;
  19315. procedure clearTXERR; inline;
  19316. procedure clearTXLARB; inline;
  19317. procedure clearTXREQ; inline;
  19318. procedure clearUINC; inline;
  19319. procedure setDONLY; inline;
  19320. procedure setFRESET; inline;
  19321. procedure setRTREN; inline;
  19322. procedure setTXABAT; inline;
  19323. procedure setTXEN; inline;
  19324. procedure setTXERR; inline;
  19325. procedure setTXLARB; inline;
  19326. procedure setTXREQ; inline;
  19327. procedure setUINC; inline;
  19328. property DONLY : TBits_1 read getDONLY write setDONLY;
  19329. property FRESET : TBits_1 read getFRESET write setFRESET;
  19330. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19331. property RTREN : TBits_1 read getRTREN write setRTREN;
  19332. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19333. property TXEN : TBits_1 read getTXEN write setTXEN;
  19334. property TXERR : TBits_1 read getTXERR write setTXERR;
  19335. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19336. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19337. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19338. property UINC : TBits_1 read getUINC write setUINC;
  19339. property w : TBits_32 read getw write setw;
  19340. end;
  19341. TCAN1_C1FIFOINT14 = record
  19342. private
  19343. function getRXFULLIE : TBits_1; inline;
  19344. function getRXFULLIF : TBits_1; inline;
  19345. function getRXHALFIE : TBits_1; inline;
  19346. function getRXHALFIF : TBits_1; inline;
  19347. function getRXNEMPTYIE : TBits_1; inline;
  19348. function getRXNEMPTYIF : TBits_1; inline;
  19349. function getRXOVFLIE : TBits_1; inline;
  19350. function getRXOVFLIF : TBits_1; inline;
  19351. function getTXEMPTYIE : TBits_1; inline;
  19352. function getTXEMPTYIF : TBits_1; inline;
  19353. function getTXHALFIE : TBits_1; inline;
  19354. function getTXHALFIF : TBits_1; inline;
  19355. function getTXNFULLIE : TBits_1; inline;
  19356. function getTXNFULLIF : TBits_1; inline;
  19357. function getw : TBits_32; inline;
  19358. procedure setRXFULLIE(thebits : TBits_1); inline;
  19359. procedure setRXFULLIF(thebits : TBits_1); inline;
  19360. procedure setRXHALFIE(thebits : TBits_1); inline;
  19361. procedure setRXHALFIF(thebits : TBits_1); inline;
  19362. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19363. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19364. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19365. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19366. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19367. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19368. procedure setTXHALFIE(thebits : TBits_1); inline;
  19369. procedure setTXHALFIF(thebits : TBits_1); inline;
  19370. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19371. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19372. procedure setw(thebits : TBits_32); inline;
  19373. public
  19374. procedure clearRXFULLIE; inline;
  19375. procedure clearRXFULLIF; inline;
  19376. procedure clearRXHALFIE; inline;
  19377. procedure clearRXHALFIF; inline;
  19378. procedure clearRXNEMPTYIE; inline;
  19379. procedure clearRXNEMPTYIF; inline;
  19380. procedure clearRXOVFLIE; inline;
  19381. procedure clearRXOVFLIF; inline;
  19382. procedure clearTXEMPTYIE; inline;
  19383. procedure clearTXEMPTYIF; inline;
  19384. procedure clearTXHALFIE; inline;
  19385. procedure clearTXHALFIF; inline;
  19386. procedure clearTXNFULLIE; inline;
  19387. procedure clearTXNFULLIF; inline;
  19388. procedure setRXFULLIE; inline;
  19389. procedure setRXFULLIF; inline;
  19390. procedure setRXHALFIE; inline;
  19391. procedure setRXHALFIF; inline;
  19392. procedure setRXNEMPTYIE; inline;
  19393. procedure setRXNEMPTYIF; inline;
  19394. procedure setRXOVFLIE; inline;
  19395. procedure setRXOVFLIF; inline;
  19396. procedure setTXEMPTYIE; inline;
  19397. procedure setTXEMPTYIF; inline;
  19398. procedure setTXHALFIE; inline;
  19399. procedure setTXHALFIF; inline;
  19400. procedure setTXNFULLIE; inline;
  19401. procedure setTXNFULLIF; inline;
  19402. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19403. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19404. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19405. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19406. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19407. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19408. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19409. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19410. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19411. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19412. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19413. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19414. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19415. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19416. property w : TBits_32 read getw write setw;
  19417. end;
  19418. TCAN1_C1FIFOCI14 = record
  19419. private
  19420. function getCFIFOCI : TBits_5; inline;
  19421. function getw : TBits_32; inline;
  19422. procedure setCFIFOCI(thebits : TBits_5); inline;
  19423. procedure setw(thebits : TBits_32); inline;
  19424. public
  19425. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19426. property w : TBits_32 read getw write setw;
  19427. end;
  19428. TCAN1_C1FIFOCON15 = record
  19429. private
  19430. function getDONLY : TBits_1; inline;
  19431. function getFRESET : TBits_1; inline;
  19432. function getFSIZE : TBits_5; inline;
  19433. function getRTREN : TBits_1; inline;
  19434. function getTXABAT : TBits_1; inline;
  19435. function getTXEN : TBits_1; inline;
  19436. function getTXERR : TBits_1; inline;
  19437. function getTXLARB : TBits_1; inline;
  19438. function getTXPRI : TBits_2; inline;
  19439. function getTXREQ : TBits_1; inline;
  19440. function getUINC : TBits_1; inline;
  19441. function getw : TBits_32; inline;
  19442. procedure setDONLY(thebits : TBits_1); inline;
  19443. procedure setFRESET(thebits : TBits_1); inline;
  19444. procedure setFSIZE(thebits : TBits_5); inline;
  19445. procedure setRTREN(thebits : TBits_1); inline;
  19446. procedure setTXABAT(thebits : TBits_1); inline;
  19447. procedure setTXEN(thebits : TBits_1); inline;
  19448. procedure setTXERR(thebits : TBits_1); inline;
  19449. procedure setTXLARB(thebits : TBits_1); inline;
  19450. procedure setTXPRI(thebits : TBits_2); inline;
  19451. procedure setTXREQ(thebits : TBits_1); inline;
  19452. procedure setUINC(thebits : TBits_1); inline;
  19453. procedure setw(thebits : TBits_32); inline;
  19454. public
  19455. procedure clearDONLY; inline;
  19456. procedure clearFRESET; inline;
  19457. procedure clearRTREN; inline;
  19458. procedure clearTXABAT; inline;
  19459. procedure clearTXEN; inline;
  19460. procedure clearTXERR; inline;
  19461. procedure clearTXLARB; inline;
  19462. procedure clearTXREQ; inline;
  19463. procedure clearUINC; inline;
  19464. procedure setDONLY; inline;
  19465. procedure setFRESET; inline;
  19466. procedure setRTREN; inline;
  19467. procedure setTXABAT; inline;
  19468. procedure setTXEN; inline;
  19469. procedure setTXERR; inline;
  19470. procedure setTXLARB; inline;
  19471. procedure setTXREQ; inline;
  19472. procedure setUINC; inline;
  19473. property DONLY : TBits_1 read getDONLY write setDONLY;
  19474. property FRESET : TBits_1 read getFRESET write setFRESET;
  19475. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19476. property RTREN : TBits_1 read getRTREN write setRTREN;
  19477. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19478. property TXEN : TBits_1 read getTXEN write setTXEN;
  19479. property TXERR : TBits_1 read getTXERR write setTXERR;
  19480. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19481. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19482. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19483. property UINC : TBits_1 read getUINC write setUINC;
  19484. property w : TBits_32 read getw write setw;
  19485. end;
  19486. TCAN1_C1FIFOINT15 = record
  19487. private
  19488. function getRXFULLIE : TBits_1; inline;
  19489. function getRXFULLIF : TBits_1; inline;
  19490. function getRXHALFIE : TBits_1; inline;
  19491. function getRXHALFIF : TBits_1; inline;
  19492. function getRXNEMPTYIE : TBits_1; inline;
  19493. function getRXNEMPTYIF : TBits_1; inline;
  19494. function getRXOVFLIE : TBits_1; inline;
  19495. function getRXOVFLIF : TBits_1; inline;
  19496. function getTXEMPTYIE : TBits_1; inline;
  19497. function getTXEMPTYIF : TBits_1; inline;
  19498. function getTXHALFIE : TBits_1; inline;
  19499. function getTXHALFIF : TBits_1; inline;
  19500. function getTXNFULLIE : TBits_1; inline;
  19501. function getTXNFULLIF : TBits_1; inline;
  19502. function getw : TBits_32; inline;
  19503. procedure setRXFULLIE(thebits : TBits_1); inline;
  19504. procedure setRXFULLIF(thebits : TBits_1); inline;
  19505. procedure setRXHALFIE(thebits : TBits_1); inline;
  19506. procedure setRXHALFIF(thebits : TBits_1); inline;
  19507. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19508. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19509. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19510. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19511. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19512. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19513. procedure setTXHALFIE(thebits : TBits_1); inline;
  19514. procedure setTXHALFIF(thebits : TBits_1); inline;
  19515. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19516. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19517. procedure setw(thebits : TBits_32); inline;
  19518. public
  19519. procedure clearRXFULLIE; inline;
  19520. procedure clearRXFULLIF; inline;
  19521. procedure clearRXHALFIE; inline;
  19522. procedure clearRXHALFIF; inline;
  19523. procedure clearRXNEMPTYIE; inline;
  19524. procedure clearRXNEMPTYIF; inline;
  19525. procedure clearRXOVFLIE; inline;
  19526. procedure clearRXOVFLIF; inline;
  19527. procedure clearTXEMPTYIE; inline;
  19528. procedure clearTXEMPTYIF; inline;
  19529. procedure clearTXHALFIE; inline;
  19530. procedure clearTXHALFIF; inline;
  19531. procedure clearTXNFULLIE; inline;
  19532. procedure clearTXNFULLIF; inline;
  19533. procedure setRXFULLIE; inline;
  19534. procedure setRXFULLIF; inline;
  19535. procedure setRXHALFIE; inline;
  19536. procedure setRXHALFIF; inline;
  19537. procedure setRXNEMPTYIE; inline;
  19538. procedure setRXNEMPTYIF; inline;
  19539. procedure setRXOVFLIE; inline;
  19540. procedure setRXOVFLIF; inline;
  19541. procedure setTXEMPTYIE; inline;
  19542. procedure setTXEMPTYIF; inline;
  19543. procedure setTXHALFIE; inline;
  19544. procedure setTXHALFIF; inline;
  19545. procedure setTXNFULLIE; inline;
  19546. procedure setTXNFULLIF; inline;
  19547. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19548. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19549. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19550. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19551. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19552. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19553. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19554. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19555. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19556. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19557. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19558. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19559. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19560. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19561. property w : TBits_32 read getw write setw;
  19562. end;
  19563. TCAN1_C1FIFOCI15 = record
  19564. private
  19565. function getCFIFOCI : TBits_5; inline;
  19566. function getw : TBits_32; inline;
  19567. procedure setCFIFOCI(thebits : TBits_5); inline;
  19568. procedure setw(thebits : TBits_32); inline;
  19569. public
  19570. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19571. property w : TBits_32 read getw write setw;
  19572. end;
  19573. TCAN1_C1FIFOCON16 = record
  19574. private
  19575. function getDONLY : TBits_1; inline;
  19576. function getFRESET : TBits_1; inline;
  19577. function getFSIZE : TBits_5; inline;
  19578. function getRTREN : TBits_1; inline;
  19579. function getTXABAT : TBits_1; inline;
  19580. function getTXEN : TBits_1; inline;
  19581. function getTXERR : TBits_1; inline;
  19582. function getTXLARB : TBits_1; inline;
  19583. function getTXPRI : TBits_2; inline;
  19584. function getTXREQ : TBits_1; inline;
  19585. function getUINC : TBits_1; inline;
  19586. function getw : TBits_32; inline;
  19587. procedure setDONLY(thebits : TBits_1); inline;
  19588. procedure setFRESET(thebits : TBits_1); inline;
  19589. procedure setFSIZE(thebits : TBits_5); inline;
  19590. procedure setRTREN(thebits : TBits_1); inline;
  19591. procedure setTXABAT(thebits : TBits_1); inline;
  19592. procedure setTXEN(thebits : TBits_1); inline;
  19593. procedure setTXERR(thebits : TBits_1); inline;
  19594. procedure setTXLARB(thebits : TBits_1); inline;
  19595. procedure setTXPRI(thebits : TBits_2); inline;
  19596. procedure setTXREQ(thebits : TBits_1); inline;
  19597. procedure setUINC(thebits : TBits_1); inline;
  19598. procedure setw(thebits : TBits_32); inline;
  19599. public
  19600. procedure clearDONLY; inline;
  19601. procedure clearFRESET; inline;
  19602. procedure clearRTREN; inline;
  19603. procedure clearTXABAT; inline;
  19604. procedure clearTXEN; inline;
  19605. procedure clearTXERR; inline;
  19606. procedure clearTXLARB; inline;
  19607. procedure clearTXREQ; inline;
  19608. procedure clearUINC; inline;
  19609. procedure setDONLY; inline;
  19610. procedure setFRESET; inline;
  19611. procedure setRTREN; inline;
  19612. procedure setTXABAT; inline;
  19613. procedure setTXEN; inline;
  19614. procedure setTXERR; inline;
  19615. procedure setTXLARB; inline;
  19616. procedure setTXREQ; inline;
  19617. procedure setUINC; inline;
  19618. property DONLY : TBits_1 read getDONLY write setDONLY;
  19619. property FRESET : TBits_1 read getFRESET write setFRESET;
  19620. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19621. property RTREN : TBits_1 read getRTREN write setRTREN;
  19622. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19623. property TXEN : TBits_1 read getTXEN write setTXEN;
  19624. property TXERR : TBits_1 read getTXERR write setTXERR;
  19625. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19626. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19627. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19628. property UINC : TBits_1 read getUINC write setUINC;
  19629. property w : TBits_32 read getw write setw;
  19630. end;
  19631. TCAN1_C1FIFOINT16 = record
  19632. private
  19633. function getRXFULLIE : TBits_1; inline;
  19634. function getRXFULLIF : TBits_1; inline;
  19635. function getRXHALFIE : TBits_1; inline;
  19636. function getRXHALFIF : TBits_1; inline;
  19637. function getRXNEMPTYIE : TBits_1; inline;
  19638. function getRXNEMPTYIF : TBits_1; inline;
  19639. function getRXOVFLIE : TBits_1; inline;
  19640. function getRXOVFLIF : TBits_1; inline;
  19641. function getTXEMPTYIE : TBits_1; inline;
  19642. function getTXEMPTYIF : TBits_1; inline;
  19643. function getTXHALFIE : TBits_1; inline;
  19644. function getTXHALFIF : TBits_1; inline;
  19645. function getTXNFULLIE : TBits_1; inline;
  19646. function getTXNFULLIF : TBits_1; inline;
  19647. function getw : TBits_32; inline;
  19648. procedure setRXFULLIE(thebits : TBits_1); inline;
  19649. procedure setRXFULLIF(thebits : TBits_1); inline;
  19650. procedure setRXHALFIE(thebits : TBits_1); inline;
  19651. procedure setRXHALFIF(thebits : TBits_1); inline;
  19652. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19653. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19654. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19655. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19656. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19657. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19658. procedure setTXHALFIE(thebits : TBits_1); inline;
  19659. procedure setTXHALFIF(thebits : TBits_1); inline;
  19660. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19661. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19662. procedure setw(thebits : TBits_32); inline;
  19663. public
  19664. procedure clearRXFULLIE; inline;
  19665. procedure clearRXFULLIF; inline;
  19666. procedure clearRXHALFIE; inline;
  19667. procedure clearRXHALFIF; inline;
  19668. procedure clearRXNEMPTYIE; inline;
  19669. procedure clearRXNEMPTYIF; inline;
  19670. procedure clearRXOVFLIE; inline;
  19671. procedure clearRXOVFLIF; inline;
  19672. procedure clearTXEMPTYIE; inline;
  19673. procedure clearTXEMPTYIF; inline;
  19674. procedure clearTXHALFIE; inline;
  19675. procedure clearTXHALFIF; inline;
  19676. procedure clearTXNFULLIE; inline;
  19677. procedure clearTXNFULLIF; inline;
  19678. procedure setRXFULLIE; inline;
  19679. procedure setRXFULLIF; inline;
  19680. procedure setRXHALFIE; inline;
  19681. procedure setRXHALFIF; inline;
  19682. procedure setRXNEMPTYIE; inline;
  19683. procedure setRXNEMPTYIF; inline;
  19684. procedure setRXOVFLIE; inline;
  19685. procedure setRXOVFLIF; inline;
  19686. procedure setTXEMPTYIE; inline;
  19687. procedure setTXEMPTYIF; inline;
  19688. procedure setTXHALFIE; inline;
  19689. procedure setTXHALFIF; inline;
  19690. procedure setTXNFULLIE; inline;
  19691. procedure setTXNFULLIF; inline;
  19692. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19693. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19694. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19695. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19696. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19697. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19698. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19699. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19700. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19701. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19702. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19703. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19704. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19705. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19706. property w : TBits_32 read getw write setw;
  19707. end;
  19708. TCAN1_C1FIFOCI16 = record
  19709. private
  19710. function getCFIFOCI : TBits_5; inline;
  19711. function getw : TBits_32; inline;
  19712. procedure setCFIFOCI(thebits : TBits_5); inline;
  19713. procedure setw(thebits : TBits_32); inline;
  19714. public
  19715. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19716. property w : TBits_32 read getw write setw;
  19717. end;
  19718. TCAN1_C1FIFOCON17 = record
  19719. private
  19720. function getDONLY : TBits_1; inline;
  19721. function getFRESET : TBits_1; inline;
  19722. function getFSIZE : TBits_5; inline;
  19723. function getRTREN : TBits_1; inline;
  19724. function getTXABAT : TBits_1; inline;
  19725. function getTXEN : TBits_1; inline;
  19726. function getTXERR : TBits_1; inline;
  19727. function getTXLARB : TBits_1; inline;
  19728. function getTXPRI : TBits_2; inline;
  19729. function getTXREQ : TBits_1; inline;
  19730. function getUINC : TBits_1; inline;
  19731. function getw : TBits_32; inline;
  19732. procedure setDONLY(thebits : TBits_1); inline;
  19733. procedure setFRESET(thebits : TBits_1); inline;
  19734. procedure setFSIZE(thebits : TBits_5); inline;
  19735. procedure setRTREN(thebits : TBits_1); inline;
  19736. procedure setTXABAT(thebits : TBits_1); inline;
  19737. procedure setTXEN(thebits : TBits_1); inline;
  19738. procedure setTXERR(thebits : TBits_1); inline;
  19739. procedure setTXLARB(thebits : TBits_1); inline;
  19740. procedure setTXPRI(thebits : TBits_2); inline;
  19741. procedure setTXREQ(thebits : TBits_1); inline;
  19742. procedure setUINC(thebits : TBits_1); inline;
  19743. procedure setw(thebits : TBits_32); inline;
  19744. public
  19745. procedure clearDONLY; inline;
  19746. procedure clearFRESET; inline;
  19747. procedure clearRTREN; inline;
  19748. procedure clearTXABAT; inline;
  19749. procedure clearTXEN; inline;
  19750. procedure clearTXERR; inline;
  19751. procedure clearTXLARB; inline;
  19752. procedure clearTXREQ; inline;
  19753. procedure clearUINC; inline;
  19754. procedure setDONLY; inline;
  19755. procedure setFRESET; inline;
  19756. procedure setRTREN; inline;
  19757. procedure setTXABAT; inline;
  19758. procedure setTXEN; inline;
  19759. procedure setTXERR; inline;
  19760. procedure setTXLARB; inline;
  19761. procedure setTXREQ; inline;
  19762. procedure setUINC; inline;
  19763. property DONLY : TBits_1 read getDONLY write setDONLY;
  19764. property FRESET : TBits_1 read getFRESET write setFRESET;
  19765. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19766. property RTREN : TBits_1 read getRTREN write setRTREN;
  19767. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19768. property TXEN : TBits_1 read getTXEN write setTXEN;
  19769. property TXERR : TBits_1 read getTXERR write setTXERR;
  19770. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19771. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19772. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19773. property UINC : TBits_1 read getUINC write setUINC;
  19774. property w : TBits_32 read getw write setw;
  19775. end;
  19776. TCAN1_C1FIFOINT17 = record
  19777. private
  19778. function getRXFULLIE : TBits_1; inline;
  19779. function getRXFULLIF : TBits_1; inline;
  19780. function getRXHALFIE : TBits_1; inline;
  19781. function getRXHALFIF : TBits_1; inline;
  19782. function getRXNEMPTYIE : TBits_1; inline;
  19783. function getRXNEMPTYIF : TBits_1; inline;
  19784. function getRXOVFLIE : TBits_1; inline;
  19785. function getRXOVFLIF : TBits_1; inline;
  19786. function getTXEMPTYIE : TBits_1; inline;
  19787. function getTXEMPTYIF : TBits_1; inline;
  19788. function getTXHALFIE : TBits_1; inline;
  19789. function getTXHALFIF : TBits_1; inline;
  19790. function getTXNFULLIE : TBits_1; inline;
  19791. function getTXNFULLIF : TBits_1; inline;
  19792. function getw : TBits_32; inline;
  19793. procedure setRXFULLIE(thebits : TBits_1); inline;
  19794. procedure setRXFULLIF(thebits : TBits_1); inline;
  19795. procedure setRXHALFIE(thebits : TBits_1); inline;
  19796. procedure setRXHALFIF(thebits : TBits_1); inline;
  19797. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19798. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19799. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19800. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19801. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19802. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19803. procedure setTXHALFIE(thebits : TBits_1); inline;
  19804. procedure setTXHALFIF(thebits : TBits_1); inline;
  19805. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19806. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19807. procedure setw(thebits : TBits_32); inline;
  19808. public
  19809. procedure clearRXFULLIE; inline;
  19810. procedure clearRXFULLIF; inline;
  19811. procedure clearRXHALFIE; inline;
  19812. procedure clearRXHALFIF; inline;
  19813. procedure clearRXNEMPTYIE; inline;
  19814. procedure clearRXNEMPTYIF; inline;
  19815. procedure clearRXOVFLIE; inline;
  19816. procedure clearRXOVFLIF; inline;
  19817. procedure clearTXEMPTYIE; inline;
  19818. procedure clearTXEMPTYIF; inline;
  19819. procedure clearTXHALFIE; inline;
  19820. procedure clearTXHALFIF; inline;
  19821. procedure clearTXNFULLIE; inline;
  19822. procedure clearTXNFULLIF; inline;
  19823. procedure setRXFULLIE; inline;
  19824. procedure setRXFULLIF; inline;
  19825. procedure setRXHALFIE; inline;
  19826. procedure setRXHALFIF; inline;
  19827. procedure setRXNEMPTYIE; inline;
  19828. procedure setRXNEMPTYIF; inline;
  19829. procedure setRXOVFLIE; inline;
  19830. procedure setRXOVFLIF; inline;
  19831. procedure setTXEMPTYIE; inline;
  19832. procedure setTXEMPTYIF; inline;
  19833. procedure setTXHALFIE; inline;
  19834. procedure setTXHALFIF; inline;
  19835. procedure setTXNFULLIE; inline;
  19836. procedure setTXNFULLIF; inline;
  19837. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19838. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19839. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19840. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19841. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19842. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19843. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19844. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19845. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19846. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19847. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19848. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19849. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19850. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19851. property w : TBits_32 read getw write setw;
  19852. end;
  19853. TCAN1_C1FIFOCI17 = record
  19854. private
  19855. function getCFIFOCI : TBits_5; inline;
  19856. function getw : TBits_32; inline;
  19857. procedure setCFIFOCI(thebits : TBits_5); inline;
  19858. procedure setw(thebits : TBits_32); inline;
  19859. public
  19860. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  19861. property w : TBits_32 read getw write setw;
  19862. end;
  19863. TCAN1_C1FIFOCON18 = record
  19864. private
  19865. function getDONLY : TBits_1; inline;
  19866. function getFRESET : TBits_1; inline;
  19867. function getFSIZE : TBits_5; inline;
  19868. function getRTREN : TBits_1; inline;
  19869. function getTXABAT : TBits_1; inline;
  19870. function getTXEN : TBits_1; inline;
  19871. function getTXERR : TBits_1; inline;
  19872. function getTXLARB : TBits_1; inline;
  19873. function getTXPRI : TBits_2; inline;
  19874. function getTXREQ : TBits_1; inline;
  19875. function getUINC : TBits_1; inline;
  19876. function getw : TBits_32; inline;
  19877. procedure setDONLY(thebits : TBits_1); inline;
  19878. procedure setFRESET(thebits : TBits_1); inline;
  19879. procedure setFSIZE(thebits : TBits_5); inline;
  19880. procedure setRTREN(thebits : TBits_1); inline;
  19881. procedure setTXABAT(thebits : TBits_1); inline;
  19882. procedure setTXEN(thebits : TBits_1); inline;
  19883. procedure setTXERR(thebits : TBits_1); inline;
  19884. procedure setTXLARB(thebits : TBits_1); inline;
  19885. procedure setTXPRI(thebits : TBits_2); inline;
  19886. procedure setTXREQ(thebits : TBits_1); inline;
  19887. procedure setUINC(thebits : TBits_1); inline;
  19888. procedure setw(thebits : TBits_32); inline;
  19889. public
  19890. procedure clearDONLY; inline;
  19891. procedure clearFRESET; inline;
  19892. procedure clearRTREN; inline;
  19893. procedure clearTXABAT; inline;
  19894. procedure clearTXEN; inline;
  19895. procedure clearTXERR; inline;
  19896. procedure clearTXLARB; inline;
  19897. procedure clearTXREQ; inline;
  19898. procedure clearUINC; inline;
  19899. procedure setDONLY; inline;
  19900. procedure setFRESET; inline;
  19901. procedure setRTREN; inline;
  19902. procedure setTXABAT; inline;
  19903. procedure setTXEN; inline;
  19904. procedure setTXERR; inline;
  19905. procedure setTXLARB; inline;
  19906. procedure setTXREQ; inline;
  19907. procedure setUINC; inline;
  19908. property DONLY : TBits_1 read getDONLY write setDONLY;
  19909. property FRESET : TBits_1 read getFRESET write setFRESET;
  19910. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  19911. property RTREN : TBits_1 read getRTREN write setRTREN;
  19912. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  19913. property TXEN : TBits_1 read getTXEN write setTXEN;
  19914. property TXERR : TBits_1 read getTXERR write setTXERR;
  19915. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  19916. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  19917. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  19918. property UINC : TBits_1 read getUINC write setUINC;
  19919. property w : TBits_32 read getw write setw;
  19920. end;
  19921. TCAN1_C1FIFOINT18 = record
  19922. private
  19923. function getRXFULLIE : TBits_1; inline;
  19924. function getRXFULLIF : TBits_1; inline;
  19925. function getRXHALFIE : TBits_1; inline;
  19926. function getRXHALFIF : TBits_1; inline;
  19927. function getRXNEMPTYIE : TBits_1; inline;
  19928. function getRXNEMPTYIF : TBits_1; inline;
  19929. function getRXOVFLIE : TBits_1; inline;
  19930. function getRXOVFLIF : TBits_1; inline;
  19931. function getTXEMPTYIE : TBits_1; inline;
  19932. function getTXEMPTYIF : TBits_1; inline;
  19933. function getTXHALFIE : TBits_1; inline;
  19934. function getTXHALFIF : TBits_1; inline;
  19935. function getTXNFULLIE : TBits_1; inline;
  19936. function getTXNFULLIF : TBits_1; inline;
  19937. function getw : TBits_32; inline;
  19938. procedure setRXFULLIE(thebits : TBits_1); inline;
  19939. procedure setRXFULLIF(thebits : TBits_1); inline;
  19940. procedure setRXHALFIE(thebits : TBits_1); inline;
  19941. procedure setRXHALFIF(thebits : TBits_1); inline;
  19942. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  19943. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  19944. procedure setRXOVFLIE(thebits : TBits_1); inline;
  19945. procedure setRXOVFLIF(thebits : TBits_1); inline;
  19946. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  19947. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  19948. procedure setTXHALFIE(thebits : TBits_1); inline;
  19949. procedure setTXHALFIF(thebits : TBits_1); inline;
  19950. procedure setTXNFULLIE(thebits : TBits_1); inline;
  19951. procedure setTXNFULLIF(thebits : TBits_1); inline;
  19952. procedure setw(thebits : TBits_32); inline;
  19953. public
  19954. procedure clearRXFULLIE; inline;
  19955. procedure clearRXFULLIF; inline;
  19956. procedure clearRXHALFIE; inline;
  19957. procedure clearRXHALFIF; inline;
  19958. procedure clearRXNEMPTYIE; inline;
  19959. procedure clearRXNEMPTYIF; inline;
  19960. procedure clearRXOVFLIE; inline;
  19961. procedure clearRXOVFLIF; inline;
  19962. procedure clearTXEMPTYIE; inline;
  19963. procedure clearTXEMPTYIF; inline;
  19964. procedure clearTXHALFIE; inline;
  19965. procedure clearTXHALFIF; inline;
  19966. procedure clearTXNFULLIE; inline;
  19967. procedure clearTXNFULLIF; inline;
  19968. procedure setRXFULLIE; inline;
  19969. procedure setRXFULLIF; inline;
  19970. procedure setRXHALFIE; inline;
  19971. procedure setRXHALFIF; inline;
  19972. procedure setRXNEMPTYIE; inline;
  19973. procedure setRXNEMPTYIF; inline;
  19974. procedure setRXOVFLIE; inline;
  19975. procedure setRXOVFLIF; inline;
  19976. procedure setTXEMPTYIE; inline;
  19977. procedure setTXEMPTYIF; inline;
  19978. procedure setTXHALFIE; inline;
  19979. procedure setTXHALFIF; inline;
  19980. procedure setTXNFULLIE; inline;
  19981. procedure setTXNFULLIF; inline;
  19982. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  19983. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  19984. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  19985. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  19986. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  19987. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  19988. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  19989. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  19990. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  19991. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  19992. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  19993. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  19994. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  19995. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  19996. property w : TBits_32 read getw write setw;
  19997. end;
  19998. TCAN1_C1FIFOCI18 = record
  19999. private
  20000. function getCFIFOCI : TBits_5; inline;
  20001. function getw : TBits_32; inline;
  20002. procedure setCFIFOCI(thebits : TBits_5); inline;
  20003. procedure setw(thebits : TBits_32); inline;
  20004. public
  20005. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20006. property w : TBits_32 read getw write setw;
  20007. end;
  20008. TCAN1_C1FIFOCON19 = record
  20009. private
  20010. function getDONLY : TBits_1; inline;
  20011. function getFRESET : TBits_1; inline;
  20012. function getFSIZE : TBits_5; inline;
  20013. function getRTREN : TBits_1; inline;
  20014. function getTXABAT : TBits_1; inline;
  20015. function getTXEN : TBits_1; inline;
  20016. function getTXERR : TBits_1; inline;
  20017. function getTXLARB : TBits_1; inline;
  20018. function getTXPRI : TBits_2; inline;
  20019. function getTXREQ : TBits_1; inline;
  20020. function getUINC : TBits_1; inline;
  20021. function getw : TBits_32; inline;
  20022. procedure setDONLY(thebits : TBits_1); inline;
  20023. procedure setFRESET(thebits : TBits_1); inline;
  20024. procedure setFSIZE(thebits : TBits_5); inline;
  20025. procedure setRTREN(thebits : TBits_1); inline;
  20026. procedure setTXABAT(thebits : TBits_1); inline;
  20027. procedure setTXEN(thebits : TBits_1); inline;
  20028. procedure setTXERR(thebits : TBits_1); inline;
  20029. procedure setTXLARB(thebits : TBits_1); inline;
  20030. procedure setTXPRI(thebits : TBits_2); inline;
  20031. procedure setTXREQ(thebits : TBits_1); inline;
  20032. procedure setUINC(thebits : TBits_1); inline;
  20033. procedure setw(thebits : TBits_32); inline;
  20034. public
  20035. procedure clearDONLY; inline;
  20036. procedure clearFRESET; inline;
  20037. procedure clearRTREN; inline;
  20038. procedure clearTXABAT; inline;
  20039. procedure clearTXEN; inline;
  20040. procedure clearTXERR; inline;
  20041. procedure clearTXLARB; inline;
  20042. procedure clearTXREQ; inline;
  20043. procedure clearUINC; inline;
  20044. procedure setDONLY; inline;
  20045. procedure setFRESET; inline;
  20046. procedure setRTREN; inline;
  20047. procedure setTXABAT; inline;
  20048. procedure setTXEN; inline;
  20049. procedure setTXERR; inline;
  20050. procedure setTXLARB; inline;
  20051. procedure setTXREQ; inline;
  20052. procedure setUINC; inline;
  20053. property DONLY : TBits_1 read getDONLY write setDONLY;
  20054. property FRESET : TBits_1 read getFRESET write setFRESET;
  20055. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20056. property RTREN : TBits_1 read getRTREN write setRTREN;
  20057. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20058. property TXEN : TBits_1 read getTXEN write setTXEN;
  20059. property TXERR : TBits_1 read getTXERR write setTXERR;
  20060. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20061. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20062. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20063. property UINC : TBits_1 read getUINC write setUINC;
  20064. property w : TBits_32 read getw write setw;
  20065. end;
  20066. TCAN1_C1FIFOINT19 = record
  20067. private
  20068. function getRXFULLIE : TBits_1; inline;
  20069. function getRXFULLIF : TBits_1; inline;
  20070. function getRXHALFIE : TBits_1; inline;
  20071. function getRXHALFIF : TBits_1; inline;
  20072. function getRXNEMPTYIE : TBits_1; inline;
  20073. function getRXNEMPTYIF : TBits_1; inline;
  20074. function getRXOVFLIE : TBits_1; inline;
  20075. function getRXOVFLIF : TBits_1; inline;
  20076. function getTXEMPTYIE : TBits_1; inline;
  20077. function getTXEMPTYIF : TBits_1; inline;
  20078. function getTXHALFIE : TBits_1; inline;
  20079. function getTXHALFIF : TBits_1; inline;
  20080. function getTXNFULLIE : TBits_1; inline;
  20081. function getTXNFULLIF : TBits_1; inline;
  20082. function getw : TBits_32; inline;
  20083. procedure setRXFULLIE(thebits : TBits_1); inline;
  20084. procedure setRXFULLIF(thebits : TBits_1); inline;
  20085. procedure setRXHALFIE(thebits : TBits_1); inline;
  20086. procedure setRXHALFIF(thebits : TBits_1); inline;
  20087. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20088. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20089. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20090. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20091. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20092. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20093. procedure setTXHALFIE(thebits : TBits_1); inline;
  20094. procedure setTXHALFIF(thebits : TBits_1); inline;
  20095. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20096. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20097. procedure setw(thebits : TBits_32); inline;
  20098. public
  20099. procedure clearRXFULLIE; inline;
  20100. procedure clearRXFULLIF; inline;
  20101. procedure clearRXHALFIE; inline;
  20102. procedure clearRXHALFIF; inline;
  20103. procedure clearRXNEMPTYIE; inline;
  20104. procedure clearRXNEMPTYIF; inline;
  20105. procedure clearRXOVFLIE; inline;
  20106. procedure clearRXOVFLIF; inline;
  20107. procedure clearTXEMPTYIE; inline;
  20108. procedure clearTXEMPTYIF; inline;
  20109. procedure clearTXHALFIE; inline;
  20110. procedure clearTXHALFIF; inline;
  20111. procedure clearTXNFULLIE; inline;
  20112. procedure clearTXNFULLIF; inline;
  20113. procedure setRXFULLIE; inline;
  20114. procedure setRXFULLIF; inline;
  20115. procedure setRXHALFIE; inline;
  20116. procedure setRXHALFIF; inline;
  20117. procedure setRXNEMPTYIE; inline;
  20118. procedure setRXNEMPTYIF; inline;
  20119. procedure setRXOVFLIE; inline;
  20120. procedure setRXOVFLIF; inline;
  20121. procedure setTXEMPTYIE; inline;
  20122. procedure setTXEMPTYIF; inline;
  20123. procedure setTXHALFIE; inline;
  20124. procedure setTXHALFIF; inline;
  20125. procedure setTXNFULLIE; inline;
  20126. procedure setTXNFULLIF; inline;
  20127. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20128. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20129. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20130. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20131. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20132. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20133. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20134. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20135. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20136. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20137. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20138. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20139. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20140. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20141. property w : TBits_32 read getw write setw;
  20142. end;
  20143. TCAN1_C1FIFOCI19 = record
  20144. private
  20145. function getCFIFOCI : TBits_5; inline;
  20146. function getw : TBits_32; inline;
  20147. procedure setCFIFOCI(thebits : TBits_5); inline;
  20148. procedure setw(thebits : TBits_32); inline;
  20149. public
  20150. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20151. property w : TBits_32 read getw write setw;
  20152. end;
  20153. TCAN1_C1FIFOCON20 = record
  20154. private
  20155. function getDONLY : TBits_1; inline;
  20156. function getFRESET : TBits_1; inline;
  20157. function getFSIZE : TBits_5; inline;
  20158. function getRTREN : TBits_1; inline;
  20159. function getTXABAT : TBits_1; inline;
  20160. function getTXEN : TBits_1; inline;
  20161. function getTXERR : TBits_1; inline;
  20162. function getTXLARB : TBits_1; inline;
  20163. function getTXPRI : TBits_2; inline;
  20164. function getTXREQ : TBits_1; inline;
  20165. function getUINC : TBits_1; inline;
  20166. function getw : TBits_32; inline;
  20167. procedure setDONLY(thebits : TBits_1); inline;
  20168. procedure setFRESET(thebits : TBits_1); inline;
  20169. procedure setFSIZE(thebits : TBits_5); inline;
  20170. procedure setRTREN(thebits : TBits_1); inline;
  20171. procedure setTXABAT(thebits : TBits_1); inline;
  20172. procedure setTXEN(thebits : TBits_1); inline;
  20173. procedure setTXERR(thebits : TBits_1); inline;
  20174. procedure setTXLARB(thebits : TBits_1); inline;
  20175. procedure setTXPRI(thebits : TBits_2); inline;
  20176. procedure setTXREQ(thebits : TBits_1); inline;
  20177. procedure setUINC(thebits : TBits_1); inline;
  20178. procedure setw(thebits : TBits_32); inline;
  20179. public
  20180. procedure clearDONLY; inline;
  20181. procedure clearFRESET; inline;
  20182. procedure clearRTREN; inline;
  20183. procedure clearTXABAT; inline;
  20184. procedure clearTXEN; inline;
  20185. procedure clearTXERR; inline;
  20186. procedure clearTXLARB; inline;
  20187. procedure clearTXREQ; inline;
  20188. procedure clearUINC; inline;
  20189. procedure setDONLY; inline;
  20190. procedure setFRESET; inline;
  20191. procedure setRTREN; inline;
  20192. procedure setTXABAT; inline;
  20193. procedure setTXEN; inline;
  20194. procedure setTXERR; inline;
  20195. procedure setTXLARB; inline;
  20196. procedure setTXREQ; inline;
  20197. procedure setUINC; inline;
  20198. property DONLY : TBits_1 read getDONLY write setDONLY;
  20199. property FRESET : TBits_1 read getFRESET write setFRESET;
  20200. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20201. property RTREN : TBits_1 read getRTREN write setRTREN;
  20202. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20203. property TXEN : TBits_1 read getTXEN write setTXEN;
  20204. property TXERR : TBits_1 read getTXERR write setTXERR;
  20205. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20206. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20207. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20208. property UINC : TBits_1 read getUINC write setUINC;
  20209. property w : TBits_32 read getw write setw;
  20210. end;
  20211. TCAN1_C1FIFOINT20 = record
  20212. private
  20213. function getRXFULLIE : TBits_1; inline;
  20214. function getRXFULLIF : TBits_1; inline;
  20215. function getRXHALFIE : TBits_1; inline;
  20216. function getRXHALFIF : TBits_1; inline;
  20217. function getRXNEMPTYIE : TBits_1; inline;
  20218. function getRXNEMPTYIF : TBits_1; inline;
  20219. function getRXOVFLIE : TBits_1; inline;
  20220. function getRXOVFLIF : TBits_1; inline;
  20221. function getTXEMPTYIE : TBits_1; inline;
  20222. function getTXEMPTYIF : TBits_1; inline;
  20223. function getTXHALFIE : TBits_1; inline;
  20224. function getTXHALFIF : TBits_1; inline;
  20225. function getTXNFULLIE : TBits_1; inline;
  20226. function getTXNFULLIF : TBits_1; inline;
  20227. function getw : TBits_32; inline;
  20228. procedure setRXFULLIE(thebits : TBits_1); inline;
  20229. procedure setRXFULLIF(thebits : TBits_1); inline;
  20230. procedure setRXHALFIE(thebits : TBits_1); inline;
  20231. procedure setRXHALFIF(thebits : TBits_1); inline;
  20232. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20233. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20234. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20235. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20236. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20237. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20238. procedure setTXHALFIE(thebits : TBits_1); inline;
  20239. procedure setTXHALFIF(thebits : TBits_1); inline;
  20240. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20241. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20242. procedure setw(thebits : TBits_32); inline;
  20243. public
  20244. procedure clearRXFULLIE; inline;
  20245. procedure clearRXFULLIF; inline;
  20246. procedure clearRXHALFIE; inline;
  20247. procedure clearRXHALFIF; inline;
  20248. procedure clearRXNEMPTYIE; inline;
  20249. procedure clearRXNEMPTYIF; inline;
  20250. procedure clearRXOVFLIE; inline;
  20251. procedure clearRXOVFLIF; inline;
  20252. procedure clearTXEMPTYIE; inline;
  20253. procedure clearTXEMPTYIF; inline;
  20254. procedure clearTXHALFIE; inline;
  20255. procedure clearTXHALFIF; inline;
  20256. procedure clearTXNFULLIE; inline;
  20257. procedure clearTXNFULLIF; inline;
  20258. procedure setRXFULLIE; inline;
  20259. procedure setRXFULLIF; inline;
  20260. procedure setRXHALFIE; inline;
  20261. procedure setRXHALFIF; inline;
  20262. procedure setRXNEMPTYIE; inline;
  20263. procedure setRXNEMPTYIF; inline;
  20264. procedure setRXOVFLIE; inline;
  20265. procedure setRXOVFLIF; inline;
  20266. procedure setTXEMPTYIE; inline;
  20267. procedure setTXEMPTYIF; inline;
  20268. procedure setTXHALFIE; inline;
  20269. procedure setTXHALFIF; inline;
  20270. procedure setTXNFULLIE; inline;
  20271. procedure setTXNFULLIF; inline;
  20272. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20273. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20274. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20275. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20276. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20277. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20278. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20279. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20280. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20281. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20282. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20283. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20284. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20285. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20286. property w : TBits_32 read getw write setw;
  20287. end;
  20288. TCAN1_C1FIFOCI20 = record
  20289. private
  20290. function getCFIFOCI : TBits_5; inline;
  20291. function getw : TBits_32; inline;
  20292. procedure setCFIFOCI(thebits : TBits_5); inline;
  20293. procedure setw(thebits : TBits_32); inline;
  20294. public
  20295. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20296. property w : TBits_32 read getw write setw;
  20297. end;
  20298. TCAN1_C1FIFOCON21 = record
  20299. private
  20300. function getDONLY : TBits_1; inline;
  20301. function getFRESET : TBits_1; inline;
  20302. function getFSIZE : TBits_5; inline;
  20303. function getRTREN : TBits_1; inline;
  20304. function getTXABAT : TBits_1; inline;
  20305. function getTXEN : TBits_1; inline;
  20306. function getTXERR : TBits_1; inline;
  20307. function getTXLARB : TBits_1; inline;
  20308. function getTXPRI : TBits_2; inline;
  20309. function getTXREQ : TBits_1; inline;
  20310. function getUINC : TBits_1; inline;
  20311. function getw : TBits_32; inline;
  20312. procedure setDONLY(thebits : TBits_1); inline;
  20313. procedure setFRESET(thebits : TBits_1); inline;
  20314. procedure setFSIZE(thebits : TBits_5); inline;
  20315. procedure setRTREN(thebits : TBits_1); inline;
  20316. procedure setTXABAT(thebits : TBits_1); inline;
  20317. procedure setTXEN(thebits : TBits_1); inline;
  20318. procedure setTXERR(thebits : TBits_1); inline;
  20319. procedure setTXLARB(thebits : TBits_1); inline;
  20320. procedure setTXPRI(thebits : TBits_2); inline;
  20321. procedure setTXREQ(thebits : TBits_1); inline;
  20322. procedure setUINC(thebits : TBits_1); inline;
  20323. procedure setw(thebits : TBits_32); inline;
  20324. public
  20325. procedure clearDONLY; inline;
  20326. procedure clearFRESET; inline;
  20327. procedure clearRTREN; inline;
  20328. procedure clearTXABAT; inline;
  20329. procedure clearTXEN; inline;
  20330. procedure clearTXERR; inline;
  20331. procedure clearTXLARB; inline;
  20332. procedure clearTXREQ; inline;
  20333. procedure clearUINC; inline;
  20334. procedure setDONLY; inline;
  20335. procedure setFRESET; inline;
  20336. procedure setRTREN; inline;
  20337. procedure setTXABAT; inline;
  20338. procedure setTXEN; inline;
  20339. procedure setTXERR; inline;
  20340. procedure setTXLARB; inline;
  20341. procedure setTXREQ; inline;
  20342. procedure setUINC; inline;
  20343. property DONLY : TBits_1 read getDONLY write setDONLY;
  20344. property FRESET : TBits_1 read getFRESET write setFRESET;
  20345. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20346. property RTREN : TBits_1 read getRTREN write setRTREN;
  20347. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20348. property TXEN : TBits_1 read getTXEN write setTXEN;
  20349. property TXERR : TBits_1 read getTXERR write setTXERR;
  20350. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20351. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20352. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20353. property UINC : TBits_1 read getUINC write setUINC;
  20354. property w : TBits_32 read getw write setw;
  20355. end;
  20356. TCAN1_C1FIFOINT21 = record
  20357. private
  20358. function getRXFULLIE : TBits_1; inline;
  20359. function getRXFULLIF : TBits_1; inline;
  20360. function getRXHALFIE : TBits_1; inline;
  20361. function getRXHALFIF : TBits_1; inline;
  20362. function getRXNEMPTYIE : TBits_1; inline;
  20363. function getRXNEMPTYIF : TBits_1; inline;
  20364. function getRXOVFLIE : TBits_1; inline;
  20365. function getRXOVFLIF : TBits_1; inline;
  20366. function getTXEMPTYIE : TBits_1; inline;
  20367. function getTXEMPTYIF : TBits_1; inline;
  20368. function getTXHALFIE : TBits_1; inline;
  20369. function getTXHALFIF : TBits_1; inline;
  20370. function getTXNFULLIE : TBits_1; inline;
  20371. function getTXNFULLIF : TBits_1; inline;
  20372. function getw : TBits_32; inline;
  20373. procedure setRXFULLIE(thebits : TBits_1); inline;
  20374. procedure setRXFULLIF(thebits : TBits_1); inline;
  20375. procedure setRXHALFIE(thebits : TBits_1); inline;
  20376. procedure setRXHALFIF(thebits : TBits_1); inline;
  20377. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20378. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20379. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20380. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20381. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20382. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20383. procedure setTXHALFIE(thebits : TBits_1); inline;
  20384. procedure setTXHALFIF(thebits : TBits_1); inline;
  20385. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20386. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20387. procedure setw(thebits : TBits_32); inline;
  20388. public
  20389. procedure clearRXFULLIE; inline;
  20390. procedure clearRXFULLIF; inline;
  20391. procedure clearRXHALFIE; inline;
  20392. procedure clearRXHALFIF; inline;
  20393. procedure clearRXNEMPTYIE; inline;
  20394. procedure clearRXNEMPTYIF; inline;
  20395. procedure clearRXOVFLIE; inline;
  20396. procedure clearRXOVFLIF; inline;
  20397. procedure clearTXEMPTYIE; inline;
  20398. procedure clearTXEMPTYIF; inline;
  20399. procedure clearTXHALFIE; inline;
  20400. procedure clearTXHALFIF; inline;
  20401. procedure clearTXNFULLIE; inline;
  20402. procedure clearTXNFULLIF; inline;
  20403. procedure setRXFULLIE; inline;
  20404. procedure setRXFULLIF; inline;
  20405. procedure setRXHALFIE; inline;
  20406. procedure setRXHALFIF; inline;
  20407. procedure setRXNEMPTYIE; inline;
  20408. procedure setRXNEMPTYIF; inline;
  20409. procedure setRXOVFLIE; inline;
  20410. procedure setRXOVFLIF; inline;
  20411. procedure setTXEMPTYIE; inline;
  20412. procedure setTXEMPTYIF; inline;
  20413. procedure setTXHALFIE; inline;
  20414. procedure setTXHALFIF; inline;
  20415. procedure setTXNFULLIE; inline;
  20416. procedure setTXNFULLIF; inline;
  20417. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20418. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20419. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20420. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20421. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20422. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20423. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20424. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20425. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20426. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20427. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20428. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20429. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20430. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20431. property w : TBits_32 read getw write setw;
  20432. end;
  20433. TCAN1_C1FIFOCI21 = record
  20434. private
  20435. function getCFIFOCI : TBits_5; inline;
  20436. function getw : TBits_32; inline;
  20437. procedure setCFIFOCI(thebits : TBits_5); inline;
  20438. procedure setw(thebits : TBits_32); inline;
  20439. public
  20440. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20441. property w : TBits_32 read getw write setw;
  20442. end;
  20443. TCAN1_C1FIFOCON22 = record
  20444. private
  20445. function getDONLY : TBits_1; inline;
  20446. function getFRESET : TBits_1; inline;
  20447. function getFSIZE : TBits_5; inline;
  20448. function getRTREN : TBits_1; inline;
  20449. function getTXABAT : TBits_1; inline;
  20450. function getTXEN : TBits_1; inline;
  20451. function getTXERR : TBits_1; inline;
  20452. function getTXLARB : TBits_1; inline;
  20453. function getTXPRI : TBits_2; inline;
  20454. function getTXREQ : TBits_1; inline;
  20455. function getUINC : TBits_1; inline;
  20456. function getw : TBits_32; inline;
  20457. procedure setDONLY(thebits : TBits_1); inline;
  20458. procedure setFRESET(thebits : TBits_1); inline;
  20459. procedure setFSIZE(thebits : TBits_5); inline;
  20460. procedure setRTREN(thebits : TBits_1); inline;
  20461. procedure setTXABAT(thebits : TBits_1); inline;
  20462. procedure setTXEN(thebits : TBits_1); inline;
  20463. procedure setTXERR(thebits : TBits_1); inline;
  20464. procedure setTXLARB(thebits : TBits_1); inline;
  20465. procedure setTXPRI(thebits : TBits_2); inline;
  20466. procedure setTXREQ(thebits : TBits_1); inline;
  20467. procedure setUINC(thebits : TBits_1); inline;
  20468. procedure setw(thebits : TBits_32); inline;
  20469. public
  20470. procedure clearDONLY; inline;
  20471. procedure clearFRESET; inline;
  20472. procedure clearRTREN; inline;
  20473. procedure clearTXABAT; inline;
  20474. procedure clearTXEN; inline;
  20475. procedure clearTXERR; inline;
  20476. procedure clearTXLARB; inline;
  20477. procedure clearTXREQ; inline;
  20478. procedure clearUINC; inline;
  20479. procedure setDONLY; inline;
  20480. procedure setFRESET; inline;
  20481. procedure setRTREN; inline;
  20482. procedure setTXABAT; inline;
  20483. procedure setTXEN; inline;
  20484. procedure setTXERR; inline;
  20485. procedure setTXLARB; inline;
  20486. procedure setTXREQ; inline;
  20487. procedure setUINC; inline;
  20488. property DONLY : TBits_1 read getDONLY write setDONLY;
  20489. property FRESET : TBits_1 read getFRESET write setFRESET;
  20490. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20491. property RTREN : TBits_1 read getRTREN write setRTREN;
  20492. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20493. property TXEN : TBits_1 read getTXEN write setTXEN;
  20494. property TXERR : TBits_1 read getTXERR write setTXERR;
  20495. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20496. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20497. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20498. property UINC : TBits_1 read getUINC write setUINC;
  20499. property w : TBits_32 read getw write setw;
  20500. end;
  20501. TCAN1_C1FIFOINT22 = record
  20502. private
  20503. function getRXFULLIE : TBits_1; inline;
  20504. function getRXFULLIF : TBits_1; inline;
  20505. function getRXHALFIE : TBits_1; inline;
  20506. function getRXHALFIF : TBits_1; inline;
  20507. function getRXNEMPTYIE : TBits_1; inline;
  20508. function getRXNEMPTYIF : TBits_1; inline;
  20509. function getRXOVFLIE : TBits_1; inline;
  20510. function getRXOVFLIF : TBits_1; inline;
  20511. function getTXEMPTYIE : TBits_1; inline;
  20512. function getTXEMPTYIF : TBits_1; inline;
  20513. function getTXHALFIE : TBits_1; inline;
  20514. function getTXHALFIF : TBits_1; inline;
  20515. function getTXNFULLIE : TBits_1; inline;
  20516. function getTXNFULLIF : TBits_1; inline;
  20517. function getw : TBits_32; inline;
  20518. procedure setRXFULLIE(thebits : TBits_1); inline;
  20519. procedure setRXFULLIF(thebits : TBits_1); inline;
  20520. procedure setRXHALFIE(thebits : TBits_1); inline;
  20521. procedure setRXHALFIF(thebits : TBits_1); inline;
  20522. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20523. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20524. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20525. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20526. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20527. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20528. procedure setTXHALFIE(thebits : TBits_1); inline;
  20529. procedure setTXHALFIF(thebits : TBits_1); inline;
  20530. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20531. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20532. procedure setw(thebits : TBits_32); inline;
  20533. public
  20534. procedure clearRXFULLIE; inline;
  20535. procedure clearRXFULLIF; inline;
  20536. procedure clearRXHALFIE; inline;
  20537. procedure clearRXHALFIF; inline;
  20538. procedure clearRXNEMPTYIE; inline;
  20539. procedure clearRXNEMPTYIF; inline;
  20540. procedure clearRXOVFLIE; inline;
  20541. procedure clearRXOVFLIF; inline;
  20542. procedure clearTXEMPTYIE; inline;
  20543. procedure clearTXEMPTYIF; inline;
  20544. procedure clearTXHALFIE; inline;
  20545. procedure clearTXHALFIF; inline;
  20546. procedure clearTXNFULLIE; inline;
  20547. procedure clearTXNFULLIF; inline;
  20548. procedure setRXFULLIE; inline;
  20549. procedure setRXFULLIF; inline;
  20550. procedure setRXHALFIE; inline;
  20551. procedure setRXHALFIF; inline;
  20552. procedure setRXNEMPTYIE; inline;
  20553. procedure setRXNEMPTYIF; inline;
  20554. procedure setRXOVFLIE; inline;
  20555. procedure setRXOVFLIF; inline;
  20556. procedure setTXEMPTYIE; inline;
  20557. procedure setTXEMPTYIF; inline;
  20558. procedure setTXHALFIE; inline;
  20559. procedure setTXHALFIF; inline;
  20560. procedure setTXNFULLIE; inline;
  20561. procedure setTXNFULLIF; inline;
  20562. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20563. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20564. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20565. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20566. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20567. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20568. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20569. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20570. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20571. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20572. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20573. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20574. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20575. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20576. property w : TBits_32 read getw write setw;
  20577. end;
  20578. TCAN1_C1FIFOCI22 = record
  20579. private
  20580. function getCFIFOCI : TBits_5; inline;
  20581. function getw : TBits_32; inline;
  20582. procedure setCFIFOCI(thebits : TBits_5); inline;
  20583. procedure setw(thebits : TBits_32); inline;
  20584. public
  20585. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20586. property w : TBits_32 read getw write setw;
  20587. end;
  20588. TCAN1_C1FIFOCON23 = record
  20589. private
  20590. function getDONLY : TBits_1; inline;
  20591. function getFRESET : TBits_1; inline;
  20592. function getFSIZE : TBits_5; inline;
  20593. function getRTREN : TBits_1; inline;
  20594. function getTXABAT : TBits_1; inline;
  20595. function getTXEN : TBits_1; inline;
  20596. function getTXERR : TBits_1; inline;
  20597. function getTXLARB : TBits_1; inline;
  20598. function getTXPRI : TBits_2; inline;
  20599. function getTXREQ : TBits_1; inline;
  20600. function getUINC : TBits_1; inline;
  20601. function getw : TBits_32; inline;
  20602. procedure setDONLY(thebits : TBits_1); inline;
  20603. procedure setFRESET(thebits : TBits_1); inline;
  20604. procedure setFSIZE(thebits : TBits_5); inline;
  20605. procedure setRTREN(thebits : TBits_1); inline;
  20606. procedure setTXABAT(thebits : TBits_1); inline;
  20607. procedure setTXEN(thebits : TBits_1); inline;
  20608. procedure setTXERR(thebits : TBits_1); inline;
  20609. procedure setTXLARB(thebits : TBits_1); inline;
  20610. procedure setTXPRI(thebits : TBits_2); inline;
  20611. procedure setTXREQ(thebits : TBits_1); inline;
  20612. procedure setUINC(thebits : TBits_1); inline;
  20613. procedure setw(thebits : TBits_32); inline;
  20614. public
  20615. procedure clearDONLY; inline;
  20616. procedure clearFRESET; inline;
  20617. procedure clearRTREN; inline;
  20618. procedure clearTXABAT; inline;
  20619. procedure clearTXEN; inline;
  20620. procedure clearTXERR; inline;
  20621. procedure clearTXLARB; inline;
  20622. procedure clearTXREQ; inline;
  20623. procedure clearUINC; inline;
  20624. procedure setDONLY; inline;
  20625. procedure setFRESET; inline;
  20626. procedure setRTREN; inline;
  20627. procedure setTXABAT; inline;
  20628. procedure setTXEN; inline;
  20629. procedure setTXERR; inline;
  20630. procedure setTXLARB; inline;
  20631. procedure setTXREQ; inline;
  20632. procedure setUINC; inline;
  20633. property DONLY : TBits_1 read getDONLY write setDONLY;
  20634. property FRESET : TBits_1 read getFRESET write setFRESET;
  20635. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20636. property RTREN : TBits_1 read getRTREN write setRTREN;
  20637. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20638. property TXEN : TBits_1 read getTXEN write setTXEN;
  20639. property TXERR : TBits_1 read getTXERR write setTXERR;
  20640. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20641. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20642. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20643. property UINC : TBits_1 read getUINC write setUINC;
  20644. property w : TBits_32 read getw write setw;
  20645. end;
  20646. TCAN1_C1FIFOINT23 = record
  20647. private
  20648. function getRXFULLIE : TBits_1; inline;
  20649. function getRXFULLIF : TBits_1; inline;
  20650. function getRXHALFIE : TBits_1; inline;
  20651. function getRXHALFIF : TBits_1; inline;
  20652. function getRXNEMPTYIE : TBits_1; inline;
  20653. function getRXNEMPTYIF : TBits_1; inline;
  20654. function getRXOVFLIE : TBits_1; inline;
  20655. function getRXOVFLIF : TBits_1; inline;
  20656. function getTXEMPTYIE : TBits_1; inline;
  20657. function getTXEMPTYIF : TBits_1; inline;
  20658. function getTXHALFIE : TBits_1; inline;
  20659. function getTXHALFIF : TBits_1; inline;
  20660. function getTXNFULLIE : TBits_1; inline;
  20661. function getTXNFULLIF : TBits_1; inline;
  20662. function getw : TBits_32; inline;
  20663. procedure setRXFULLIE(thebits : TBits_1); inline;
  20664. procedure setRXFULLIF(thebits : TBits_1); inline;
  20665. procedure setRXHALFIE(thebits : TBits_1); inline;
  20666. procedure setRXHALFIF(thebits : TBits_1); inline;
  20667. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20668. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20669. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20670. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20671. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20672. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20673. procedure setTXHALFIE(thebits : TBits_1); inline;
  20674. procedure setTXHALFIF(thebits : TBits_1); inline;
  20675. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20676. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20677. procedure setw(thebits : TBits_32); inline;
  20678. public
  20679. procedure clearRXFULLIE; inline;
  20680. procedure clearRXFULLIF; inline;
  20681. procedure clearRXHALFIE; inline;
  20682. procedure clearRXHALFIF; inline;
  20683. procedure clearRXNEMPTYIE; inline;
  20684. procedure clearRXNEMPTYIF; inline;
  20685. procedure clearRXOVFLIE; inline;
  20686. procedure clearRXOVFLIF; inline;
  20687. procedure clearTXEMPTYIE; inline;
  20688. procedure clearTXEMPTYIF; inline;
  20689. procedure clearTXHALFIE; inline;
  20690. procedure clearTXHALFIF; inline;
  20691. procedure clearTXNFULLIE; inline;
  20692. procedure clearTXNFULLIF; inline;
  20693. procedure setRXFULLIE; inline;
  20694. procedure setRXFULLIF; inline;
  20695. procedure setRXHALFIE; inline;
  20696. procedure setRXHALFIF; inline;
  20697. procedure setRXNEMPTYIE; inline;
  20698. procedure setRXNEMPTYIF; inline;
  20699. procedure setRXOVFLIE; inline;
  20700. procedure setRXOVFLIF; inline;
  20701. procedure setTXEMPTYIE; inline;
  20702. procedure setTXEMPTYIF; inline;
  20703. procedure setTXHALFIE; inline;
  20704. procedure setTXHALFIF; inline;
  20705. procedure setTXNFULLIE; inline;
  20706. procedure setTXNFULLIF; inline;
  20707. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20708. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20709. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20710. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20711. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20712. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20713. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20714. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20715. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20716. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20717. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20718. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20719. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20720. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20721. property w : TBits_32 read getw write setw;
  20722. end;
  20723. TCAN1_C1FIFOCI23 = record
  20724. private
  20725. function getCFIFOCI : TBits_5; inline;
  20726. function getw : TBits_32; inline;
  20727. procedure setCFIFOCI(thebits : TBits_5); inline;
  20728. procedure setw(thebits : TBits_32); inline;
  20729. public
  20730. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20731. property w : TBits_32 read getw write setw;
  20732. end;
  20733. TCAN1_C1FIFOCON24 = record
  20734. private
  20735. function getDONLY : TBits_1; inline;
  20736. function getFRESET : TBits_1; inline;
  20737. function getFSIZE : TBits_5; inline;
  20738. function getRTREN : TBits_1; inline;
  20739. function getTXABAT : TBits_1; inline;
  20740. function getTXEN : TBits_1; inline;
  20741. function getTXERR : TBits_1; inline;
  20742. function getTXLARB : TBits_1; inline;
  20743. function getTXPRI : TBits_2; inline;
  20744. function getTXREQ : TBits_1; inline;
  20745. function getUINC : TBits_1; inline;
  20746. function getw : TBits_32; inline;
  20747. procedure setDONLY(thebits : TBits_1); inline;
  20748. procedure setFRESET(thebits : TBits_1); inline;
  20749. procedure setFSIZE(thebits : TBits_5); inline;
  20750. procedure setRTREN(thebits : TBits_1); inline;
  20751. procedure setTXABAT(thebits : TBits_1); inline;
  20752. procedure setTXEN(thebits : TBits_1); inline;
  20753. procedure setTXERR(thebits : TBits_1); inline;
  20754. procedure setTXLARB(thebits : TBits_1); inline;
  20755. procedure setTXPRI(thebits : TBits_2); inline;
  20756. procedure setTXREQ(thebits : TBits_1); inline;
  20757. procedure setUINC(thebits : TBits_1); inline;
  20758. procedure setw(thebits : TBits_32); inline;
  20759. public
  20760. procedure clearDONLY; inline;
  20761. procedure clearFRESET; inline;
  20762. procedure clearRTREN; inline;
  20763. procedure clearTXABAT; inline;
  20764. procedure clearTXEN; inline;
  20765. procedure clearTXERR; inline;
  20766. procedure clearTXLARB; inline;
  20767. procedure clearTXREQ; inline;
  20768. procedure clearUINC; inline;
  20769. procedure setDONLY; inline;
  20770. procedure setFRESET; inline;
  20771. procedure setRTREN; inline;
  20772. procedure setTXABAT; inline;
  20773. procedure setTXEN; inline;
  20774. procedure setTXERR; inline;
  20775. procedure setTXLARB; inline;
  20776. procedure setTXREQ; inline;
  20777. procedure setUINC; inline;
  20778. property DONLY : TBits_1 read getDONLY write setDONLY;
  20779. property FRESET : TBits_1 read getFRESET write setFRESET;
  20780. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20781. property RTREN : TBits_1 read getRTREN write setRTREN;
  20782. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20783. property TXEN : TBits_1 read getTXEN write setTXEN;
  20784. property TXERR : TBits_1 read getTXERR write setTXERR;
  20785. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20786. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20787. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20788. property UINC : TBits_1 read getUINC write setUINC;
  20789. property w : TBits_32 read getw write setw;
  20790. end;
  20791. TCAN1_C1FIFOINT24 = record
  20792. private
  20793. function getRXFULLIE : TBits_1; inline;
  20794. function getRXFULLIF : TBits_1; inline;
  20795. function getRXHALFIE : TBits_1; inline;
  20796. function getRXHALFIF : TBits_1; inline;
  20797. function getRXNEMPTYIE : TBits_1; inline;
  20798. function getRXNEMPTYIF : TBits_1; inline;
  20799. function getRXOVFLIE : TBits_1; inline;
  20800. function getRXOVFLIF : TBits_1; inline;
  20801. function getTXEMPTYIE : TBits_1; inline;
  20802. function getTXEMPTYIF : TBits_1; inline;
  20803. function getTXHALFIE : TBits_1; inline;
  20804. function getTXHALFIF : TBits_1; inline;
  20805. function getTXNFULLIE : TBits_1; inline;
  20806. function getTXNFULLIF : TBits_1; inline;
  20807. function getw : TBits_32; inline;
  20808. procedure setRXFULLIE(thebits : TBits_1); inline;
  20809. procedure setRXFULLIF(thebits : TBits_1); inline;
  20810. procedure setRXHALFIE(thebits : TBits_1); inline;
  20811. procedure setRXHALFIF(thebits : TBits_1); inline;
  20812. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20813. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20814. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20815. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20816. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20817. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20818. procedure setTXHALFIE(thebits : TBits_1); inline;
  20819. procedure setTXHALFIF(thebits : TBits_1); inline;
  20820. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20821. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20822. procedure setw(thebits : TBits_32); inline;
  20823. public
  20824. procedure clearRXFULLIE; inline;
  20825. procedure clearRXFULLIF; inline;
  20826. procedure clearRXHALFIE; inline;
  20827. procedure clearRXHALFIF; inline;
  20828. procedure clearRXNEMPTYIE; inline;
  20829. procedure clearRXNEMPTYIF; inline;
  20830. procedure clearRXOVFLIE; inline;
  20831. procedure clearRXOVFLIF; inline;
  20832. procedure clearTXEMPTYIE; inline;
  20833. procedure clearTXEMPTYIF; inline;
  20834. procedure clearTXHALFIE; inline;
  20835. procedure clearTXHALFIF; inline;
  20836. procedure clearTXNFULLIE; inline;
  20837. procedure clearTXNFULLIF; inline;
  20838. procedure setRXFULLIE; inline;
  20839. procedure setRXFULLIF; inline;
  20840. procedure setRXHALFIE; inline;
  20841. procedure setRXHALFIF; inline;
  20842. procedure setRXNEMPTYIE; inline;
  20843. procedure setRXNEMPTYIF; inline;
  20844. procedure setRXOVFLIE; inline;
  20845. procedure setRXOVFLIF; inline;
  20846. procedure setTXEMPTYIE; inline;
  20847. procedure setTXEMPTYIF; inline;
  20848. procedure setTXHALFIE; inline;
  20849. procedure setTXHALFIF; inline;
  20850. procedure setTXNFULLIE; inline;
  20851. procedure setTXNFULLIF; inline;
  20852. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20853. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20854. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  20855. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  20856. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  20857. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  20858. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  20859. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  20860. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  20861. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  20862. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  20863. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  20864. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  20865. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  20866. property w : TBits_32 read getw write setw;
  20867. end;
  20868. TCAN1_C1FIFOCI24 = record
  20869. private
  20870. function getCFIFOCI : TBits_5; inline;
  20871. function getw : TBits_32; inline;
  20872. procedure setCFIFOCI(thebits : TBits_5); inline;
  20873. procedure setw(thebits : TBits_32); inline;
  20874. public
  20875. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  20876. property w : TBits_32 read getw write setw;
  20877. end;
  20878. TCAN1_C1FIFOCON25 = record
  20879. private
  20880. function getDONLY : TBits_1; inline;
  20881. function getFRESET : TBits_1; inline;
  20882. function getFSIZE : TBits_5; inline;
  20883. function getRTREN : TBits_1; inline;
  20884. function getTXABAT : TBits_1; inline;
  20885. function getTXEN : TBits_1; inline;
  20886. function getTXERR : TBits_1; inline;
  20887. function getTXLARB : TBits_1; inline;
  20888. function getTXPRI : TBits_2; inline;
  20889. function getTXREQ : TBits_1; inline;
  20890. function getUINC : TBits_1; inline;
  20891. function getw : TBits_32; inline;
  20892. procedure setDONLY(thebits : TBits_1); inline;
  20893. procedure setFRESET(thebits : TBits_1); inline;
  20894. procedure setFSIZE(thebits : TBits_5); inline;
  20895. procedure setRTREN(thebits : TBits_1); inline;
  20896. procedure setTXABAT(thebits : TBits_1); inline;
  20897. procedure setTXEN(thebits : TBits_1); inline;
  20898. procedure setTXERR(thebits : TBits_1); inline;
  20899. procedure setTXLARB(thebits : TBits_1); inline;
  20900. procedure setTXPRI(thebits : TBits_2); inline;
  20901. procedure setTXREQ(thebits : TBits_1); inline;
  20902. procedure setUINC(thebits : TBits_1); inline;
  20903. procedure setw(thebits : TBits_32); inline;
  20904. public
  20905. procedure clearDONLY; inline;
  20906. procedure clearFRESET; inline;
  20907. procedure clearRTREN; inline;
  20908. procedure clearTXABAT; inline;
  20909. procedure clearTXEN; inline;
  20910. procedure clearTXERR; inline;
  20911. procedure clearTXLARB; inline;
  20912. procedure clearTXREQ; inline;
  20913. procedure clearUINC; inline;
  20914. procedure setDONLY; inline;
  20915. procedure setFRESET; inline;
  20916. procedure setRTREN; inline;
  20917. procedure setTXABAT; inline;
  20918. procedure setTXEN; inline;
  20919. procedure setTXERR; inline;
  20920. procedure setTXLARB; inline;
  20921. procedure setTXREQ; inline;
  20922. procedure setUINC; inline;
  20923. property DONLY : TBits_1 read getDONLY write setDONLY;
  20924. property FRESET : TBits_1 read getFRESET write setFRESET;
  20925. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  20926. property RTREN : TBits_1 read getRTREN write setRTREN;
  20927. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  20928. property TXEN : TBits_1 read getTXEN write setTXEN;
  20929. property TXERR : TBits_1 read getTXERR write setTXERR;
  20930. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  20931. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  20932. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  20933. property UINC : TBits_1 read getUINC write setUINC;
  20934. property w : TBits_32 read getw write setw;
  20935. end;
  20936. TCAN1_C1FIFOINT25 = record
  20937. private
  20938. function getRXFULLIE : TBits_1; inline;
  20939. function getRXFULLIF : TBits_1; inline;
  20940. function getRXHALFIE : TBits_1; inline;
  20941. function getRXHALFIF : TBits_1; inline;
  20942. function getRXNEMPTYIE : TBits_1; inline;
  20943. function getRXNEMPTYIF : TBits_1; inline;
  20944. function getRXOVFLIE : TBits_1; inline;
  20945. function getRXOVFLIF : TBits_1; inline;
  20946. function getTXEMPTYIE : TBits_1; inline;
  20947. function getTXEMPTYIF : TBits_1; inline;
  20948. function getTXHALFIE : TBits_1; inline;
  20949. function getTXHALFIF : TBits_1; inline;
  20950. function getTXNFULLIE : TBits_1; inline;
  20951. function getTXNFULLIF : TBits_1; inline;
  20952. function getw : TBits_32; inline;
  20953. procedure setRXFULLIE(thebits : TBits_1); inline;
  20954. procedure setRXFULLIF(thebits : TBits_1); inline;
  20955. procedure setRXHALFIE(thebits : TBits_1); inline;
  20956. procedure setRXHALFIF(thebits : TBits_1); inline;
  20957. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  20958. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  20959. procedure setRXOVFLIE(thebits : TBits_1); inline;
  20960. procedure setRXOVFLIF(thebits : TBits_1); inline;
  20961. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  20962. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  20963. procedure setTXHALFIE(thebits : TBits_1); inline;
  20964. procedure setTXHALFIF(thebits : TBits_1); inline;
  20965. procedure setTXNFULLIE(thebits : TBits_1); inline;
  20966. procedure setTXNFULLIF(thebits : TBits_1); inline;
  20967. procedure setw(thebits : TBits_32); inline;
  20968. public
  20969. procedure clearRXFULLIE; inline;
  20970. procedure clearRXFULLIF; inline;
  20971. procedure clearRXHALFIE; inline;
  20972. procedure clearRXHALFIF; inline;
  20973. procedure clearRXNEMPTYIE; inline;
  20974. procedure clearRXNEMPTYIF; inline;
  20975. procedure clearRXOVFLIE; inline;
  20976. procedure clearRXOVFLIF; inline;
  20977. procedure clearTXEMPTYIE; inline;
  20978. procedure clearTXEMPTYIF; inline;
  20979. procedure clearTXHALFIE; inline;
  20980. procedure clearTXHALFIF; inline;
  20981. procedure clearTXNFULLIE; inline;
  20982. procedure clearTXNFULLIF; inline;
  20983. procedure setRXFULLIE; inline;
  20984. procedure setRXFULLIF; inline;
  20985. procedure setRXHALFIE; inline;
  20986. procedure setRXHALFIF; inline;
  20987. procedure setRXNEMPTYIE; inline;
  20988. procedure setRXNEMPTYIF; inline;
  20989. procedure setRXOVFLIE; inline;
  20990. procedure setRXOVFLIF; inline;
  20991. procedure setTXEMPTYIE; inline;
  20992. procedure setTXEMPTYIF; inline;
  20993. procedure setTXHALFIE; inline;
  20994. procedure setTXHALFIF; inline;
  20995. procedure setTXNFULLIE; inline;
  20996. procedure setTXNFULLIF; inline;
  20997. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  20998. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  20999. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21000. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21001. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21002. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21003. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21004. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21005. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21006. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21007. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21008. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21009. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21010. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21011. property w : TBits_32 read getw write setw;
  21012. end;
  21013. TCAN1_C1FIFOCI25 = record
  21014. private
  21015. function getCFIFOCI : TBits_5; inline;
  21016. function getw : TBits_32; inline;
  21017. procedure setCFIFOCI(thebits : TBits_5); inline;
  21018. procedure setw(thebits : TBits_32); inline;
  21019. public
  21020. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21021. property w : TBits_32 read getw write setw;
  21022. end;
  21023. TCAN1_C1FIFOCON26 = record
  21024. private
  21025. function getDONLY : TBits_1; inline;
  21026. function getFRESET : TBits_1; inline;
  21027. function getFSIZE : TBits_5; inline;
  21028. function getRTREN : TBits_1; inline;
  21029. function getTXABAT : TBits_1; inline;
  21030. function getTXEN : TBits_1; inline;
  21031. function getTXERR : TBits_1; inline;
  21032. function getTXLARB : TBits_1; inline;
  21033. function getTXPRI : TBits_2; inline;
  21034. function getTXREQ : TBits_1; inline;
  21035. function getUINC : TBits_1; inline;
  21036. function getw : TBits_32; inline;
  21037. procedure setDONLY(thebits : TBits_1); inline;
  21038. procedure setFRESET(thebits : TBits_1); inline;
  21039. procedure setFSIZE(thebits : TBits_5); inline;
  21040. procedure setRTREN(thebits : TBits_1); inline;
  21041. procedure setTXABAT(thebits : TBits_1); inline;
  21042. procedure setTXEN(thebits : TBits_1); inline;
  21043. procedure setTXERR(thebits : TBits_1); inline;
  21044. procedure setTXLARB(thebits : TBits_1); inline;
  21045. procedure setTXPRI(thebits : TBits_2); inline;
  21046. procedure setTXREQ(thebits : TBits_1); inline;
  21047. procedure setUINC(thebits : TBits_1); inline;
  21048. procedure setw(thebits : TBits_32); inline;
  21049. public
  21050. procedure clearDONLY; inline;
  21051. procedure clearFRESET; inline;
  21052. procedure clearRTREN; inline;
  21053. procedure clearTXABAT; inline;
  21054. procedure clearTXEN; inline;
  21055. procedure clearTXERR; inline;
  21056. procedure clearTXLARB; inline;
  21057. procedure clearTXREQ; inline;
  21058. procedure clearUINC; inline;
  21059. procedure setDONLY; inline;
  21060. procedure setFRESET; inline;
  21061. procedure setRTREN; inline;
  21062. procedure setTXABAT; inline;
  21063. procedure setTXEN; inline;
  21064. procedure setTXERR; inline;
  21065. procedure setTXLARB; inline;
  21066. procedure setTXREQ; inline;
  21067. procedure setUINC; inline;
  21068. property DONLY : TBits_1 read getDONLY write setDONLY;
  21069. property FRESET : TBits_1 read getFRESET write setFRESET;
  21070. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21071. property RTREN : TBits_1 read getRTREN write setRTREN;
  21072. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21073. property TXEN : TBits_1 read getTXEN write setTXEN;
  21074. property TXERR : TBits_1 read getTXERR write setTXERR;
  21075. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21076. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21077. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21078. property UINC : TBits_1 read getUINC write setUINC;
  21079. property w : TBits_32 read getw write setw;
  21080. end;
  21081. TCAN1_C1FIFOINT26 = record
  21082. private
  21083. function getRXFULLIE : TBits_1; inline;
  21084. function getRXFULLIF : TBits_1; inline;
  21085. function getRXHALFIE : TBits_1; inline;
  21086. function getRXHALFIF : TBits_1; inline;
  21087. function getRXNEMPTYIE : TBits_1; inline;
  21088. function getRXNEMPTYIF : TBits_1; inline;
  21089. function getRXOVFLIE : TBits_1; inline;
  21090. function getRXOVFLIF : TBits_1; inline;
  21091. function getTXEMPTYIE : TBits_1; inline;
  21092. function getTXEMPTYIF : TBits_1; inline;
  21093. function getTXHALFIE : TBits_1; inline;
  21094. function getTXHALFIF : TBits_1; inline;
  21095. function getTXNFULLIE : TBits_1; inline;
  21096. function getTXNFULLIF : TBits_1; inline;
  21097. function getw : TBits_32; inline;
  21098. procedure setRXFULLIE(thebits : TBits_1); inline;
  21099. procedure setRXFULLIF(thebits : TBits_1); inline;
  21100. procedure setRXHALFIE(thebits : TBits_1); inline;
  21101. procedure setRXHALFIF(thebits : TBits_1); inline;
  21102. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21103. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21104. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21105. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21106. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21107. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21108. procedure setTXHALFIE(thebits : TBits_1); inline;
  21109. procedure setTXHALFIF(thebits : TBits_1); inline;
  21110. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21111. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21112. procedure setw(thebits : TBits_32); inline;
  21113. public
  21114. procedure clearRXFULLIE; inline;
  21115. procedure clearRXFULLIF; inline;
  21116. procedure clearRXHALFIE; inline;
  21117. procedure clearRXHALFIF; inline;
  21118. procedure clearRXNEMPTYIE; inline;
  21119. procedure clearRXNEMPTYIF; inline;
  21120. procedure clearRXOVFLIE; inline;
  21121. procedure clearRXOVFLIF; inline;
  21122. procedure clearTXEMPTYIE; inline;
  21123. procedure clearTXEMPTYIF; inline;
  21124. procedure clearTXHALFIE; inline;
  21125. procedure clearTXHALFIF; inline;
  21126. procedure clearTXNFULLIE; inline;
  21127. procedure clearTXNFULLIF; inline;
  21128. procedure setRXFULLIE; inline;
  21129. procedure setRXFULLIF; inline;
  21130. procedure setRXHALFIE; inline;
  21131. procedure setRXHALFIF; inline;
  21132. procedure setRXNEMPTYIE; inline;
  21133. procedure setRXNEMPTYIF; inline;
  21134. procedure setRXOVFLIE; inline;
  21135. procedure setRXOVFLIF; inline;
  21136. procedure setTXEMPTYIE; inline;
  21137. procedure setTXEMPTYIF; inline;
  21138. procedure setTXHALFIE; inline;
  21139. procedure setTXHALFIF; inline;
  21140. procedure setTXNFULLIE; inline;
  21141. procedure setTXNFULLIF; inline;
  21142. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21143. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21144. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21145. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21146. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21147. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21148. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21149. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21150. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21151. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21152. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21153. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21154. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21155. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21156. property w : TBits_32 read getw write setw;
  21157. end;
  21158. TCAN1_C1FIFOCI26 = record
  21159. private
  21160. function getCFIFOCI : TBits_5; inline;
  21161. function getw : TBits_32; inline;
  21162. procedure setCFIFOCI(thebits : TBits_5); inline;
  21163. procedure setw(thebits : TBits_32); inline;
  21164. public
  21165. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21166. property w : TBits_32 read getw write setw;
  21167. end;
  21168. TCAN1_C1FIFOCON27 = record
  21169. private
  21170. function getDONLY : TBits_1; inline;
  21171. function getFRESET : TBits_1; inline;
  21172. function getFSIZE : TBits_5; inline;
  21173. function getRTREN : TBits_1; inline;
  21174. function getTXABAT : TBits_1; inline;
  21175. function getTXEN : TBits_1; inline;
  21176. function getTXERR : TBits_1; inline;
  21177. function getTXLARB : TBits_1; inline;
  21178. function getTXPRI : TBits_2; inline;
  21179. function getTXREQ : TBits_1; inline;
  21180. function getUINC : TBits_1; inline;
  21181. function getw : TBits_32; inline;
  21182. procedure setDONLY(thebits : TBits_1); inline;
  21183. procedure setFRESET(thebits : TBits_1); inline;
  21184. procedure setFSIZE(thebits : TBits_5); inline;
  21185. procedure setRTREN(thebits : TBits_1); inline;
  21186. procedure setTXABAT(thebits : TBits_1); inline;
  21187. procedure setTXEN(thebits : TBits_1); inline;
  21188. procedure setTXERR(thebits : TBits_1); inline;
  21189. procedure setTXLARB(thebits : TBits_1); inline;
  21190. procedure setTXPRI(thebits : TBits_2); inline;
  21191. procedure setTXREQ(thebits : TBits_1); inline;
  21192. procedure setUINC(thebits : TBits_1); inline;
  21193. procedure setw(thebits : TBits_32); inline;
  21194. public
  21195. procedure clearDONLY; inline;
  21196. procedure clearFRESET; inline;
  21197. procedure clearRTREN; inline;
  21198. procedure clearTXABAT; inline;
  21199. procedure clearTXEN; inline;
  21200. procedure clearTXERR; inline;
  21201. procedure clearTXLARB; inline;
  21202. procedure clearTXREQ; inline;
  21203. procedure clearUINC; inline;
  21204. procedure setDONLY; inline;
  21205. procedure setFRESET; inline;
  21206. procedure setRTREN; inline;
  21207. procedure setTXABAT; inline;
  21208. procedure setTXEN; inline;
  21209. procedure setTXERR; inline;
  21210. procedure setTXLARB; inline;
  21211. procedure setTXREQ; inline;
  21212. procedure setUINC; inline;
  21213. property DONLY : TBits_1 read getDONLY write setDONLY;
  21214. property FRESET : TBits_1 read getFRESET write setFRESET;
  21215. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21216. property RTREN : TBits_1 read getRTREN write setRTREN;
  21217. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21218. property TXEN : TBits_1 read getTXEN write setTXEN;
  21219. property TXERR : TBits_1 read getTXERR write setTXERR;
  21220. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21221. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21222. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21223. property UINC : TBits_1 read getUINC write setUINC;
  21224. property w : TBits_32 read getw write setw;
  21225. end;
  21226. TCAN1_C1FIFOINT27 = record
  21227. private
  21228. function getRXFULLIE : TBits_1; inline;
  21229. function getRXFULLIF : TBits_1; inline;
  21230. function getRXHALFIE : TBits_1; inline;
  21231. function getRXHALFIF : TBits_1; inline;
  21232. function getRXNEMPTYIE : TBits_1; inline;
  21233. function getRXNEMPTYIF : TBits_1; inline;
  21234. function getRXOVFLIE : TBits_1; inline;
  21235. function getRXOVFLIF : TBits_1; inline;
  21236. function getTXEMPTYIE : TBits_1; inline;
  21237. function getTXEMPTYIF : TBits_1; inline;
  21238. function getTXHALFIE : TBits_1; inline;
  21239. function getTXHALFIF : TBits_1; inline;
  21240. function getTXNFULLIE : TBits_1; inline;
  21241. function getTXNFULLIF : TBits_1; inline;
  21242. function getw : TBits_32; inline;
  21243. procedure setRXFULLIE(thebits : TBits_1); inline;
  21244. procedure setRXFULLIF(thebits : TBits_1); inline;
  21245. procedure setRXHALFIE(thebits : TBits_1); inline;
  21246. procedure setRXHALFIF(thebits : TBits_1); inline;
  21247. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21248. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21249. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21250. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21251. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21252. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21253. procedure setTXHALFIE(thebits : TBits_1); inline;
  21254. procedure setTXHALFIF(thebits : TBits_1); inline;
  21255. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21256. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21257. procedure setw(thebits : TBits_32); inline;
  21258. public
  21259. procedure clearRXFULLIE; inline;
  21260. procedure clearRXFULLIF; inline;
  21261. procedure clearRXHALFIE; inline;
  21262. procedure clearRXHALFIF; inline;
  21263. procedure clearRXNEMPTYIE; inline;
  21264. procedure clearRXNEMPTYIF; inline;
  21265. procedure clearRXOVFLIE; inline;
  21266. procedure clearRXOVFLIF; inline;
  21267. procedure clearTXEMPTYIE; inline;
  21268. procedure clearTXEMPTYIF; inline;
  21269. procedure clearTXHALFIE; inline;
  21270. procedure clearTXHALFIF; inline;
  21271. procedure clearTXNFULLIE; inline;
  21272. procedure clearTXNFULLIF; inline;
  21273. procedure setRXFULLIE; inline;
  21274. procedure setRXFULLIF; inline;
  21275. procedure setRXHALFIE; inline;
  21276. procedure setRXHALFIF; inline;
  21277. procedure setRXNEMPTYIE; inline;
  21278. procedure setRXNEMPTYIF; inline;
  21279. procedure setRXOVFLIE; inline;
  21280. procedure setRXOVFLIF; inline;
  21281. procedure setTXEMPTYIE; inline;
  21282. procedure setTXEMPTYIF; inline;
  21283. procedure setTXHALFIE; inline;
  21284. procedure setTXHALFIF; inline;
  21285. procedure setTXNFULLIE; inline;
  21286. procedure setTXNFULLIF; inline;
  21287. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21288. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21289. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21290. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21291. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21292. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21293. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21294. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21295. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21296. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21297. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21298. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21299. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21300. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21301. property w : TBits_32 read getw write setw;
  21302. end;
  21303. TCAN1_C1FIFOCI27 = record
  21304. private
  21305. function getCFIFOCI : TBits_5; inline;
  21306. function getw : TBits_32; inline;
  21307. procedure setCFIFOCI(thebits : TBits_5); inline;
  21308. procedure setw(thebits : TBits_32); inline;
  21309. public
  21310. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21311. property w : TBits_32 read getw write setw;
  21312. end;
  21313. TCAN1_C1FIFOCON28 = record
  21314. private
  21315. function getDONLY : TBits_1; inline;
  21316. function getFRESET : TBits_1; inline;
  21317. function getFSIZE : TBits_5; inline;
  21318. function getRTREN : TBits_1; inline;
  21319. function getTXABAT : TBits_1; inline;
  21320. function getTXEN : TBits_1; inline;
  21321. function getTXERR : TBits_1; inline;
  21322. function getTXLARB : TBits_1; inline;
  21323. function getTXPRI : TBits_2; inline;
  21324. function getTXREQ : TBits_1; inline;
  21325. function getUINC : TBits_1; inline;
  21326. function getw : TBits_32; inline;
  21327. procedure setDONLY(thebits : TBits_1); inline;
  21328. procedure setFRESET(thebits : TBits_1); inline;
  21329. procedure setFSIZE(thebits : TBits_5); inline;
  21330. procedure setRTREN(thebits : TBits_1); inline;
  21331. procedure setTXABAT(thebits : TBits_1); inline;
  21332. procedure setTXEN(thebits : TBits_1); inline;
  21333. procedure setTXERR(thebits : TBits_1); inline;
  21334. procedure setTXLARB(thebits : TBits_1); inline;
  21335. procedure setTXPRI(thebits : TBits_2); inline;
  21336. procedure setTXREQ(thebits : TBits_1); inline;
  21337. procedure setUINC(thebits : TBits_1); inline;
  21338. procedure setw(thebits : TBits_32); inline;
  21339. public
  21340. procedure clearDONLY; inline;
  21341. procedure clearFRESET; inline;
  21342. procedure clearRTREN; inline;
  21343. procedure clearTXABAT; inline;
  21344. procedure clearTXEN; inline;
  21345. procedure clearTXERR; inline;
  21346. procedure clearTXLARB; inline;
  21347. procedure clearTXREQ; inline;
  21348. procedure clearUINC; inline;
  21349. procedure setDONLY; inline;
  21350. procedure setFRESET; inline;
  21351. procedure setRTREN; inline;
  21352. procedure setTXABAT; inline;
  21353. procedure setTXEN; inline;
  21354. procedure setTXERR; inline;
  21355. procedure setTXLARB; inline;
  21356. procedure setTXREQ; inline;
  21357. procedure setUINC; inline;
  21358. property DONLY : TBits_1 read getDONLY write setDONLY;
  21359. property FRESET : TBits_1 read getFRESET write setFRESET;
  21360. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21361. property RTREN : TBits_1 read getRTREN write setRTREN;
  21362. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21363. property TXEN : TBits_1 read getTXEN write setTXEN;
  21364. property TXERR : TBits_1 read getTXERR write setTXERR;
  21365. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21366. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21367. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21368. property UINC : TBits_1 read getUINC write setUINC;
  21369. property w : TBits_32 read getw write setw;
  21370. end;
  21371. TCAN1_C1FIFOINT28 = record
  21372. private
  21373. function getRXFULLIE : TBits_1; inline;
  21374. function getRXFULLIF : TBits_1; inline;
  21375. function getRXHALFIE : TBits_1; inline;
  21376. function getRXHALFIF : TBits_1; inline;
  21377. function getRXNEMPTYIE : TBits_1; inline;
  21378. function getRXNEMPTYIF : TBits_1; inline;
  21379. function getRXOVFLIE : TBits_1; inline;
  21380. function getRXOVFLIF : TBits_1; inline;
  21381. function getTXEMPTYIE : TBits_1; inline;
  21382. function getTXEMPTYIF : TBits_1; inline;
  21383. function getTXHALFIE : TBits_1; inline;
  21384. function getTXHALFIF : TBits_1; inline;
  21385. function getTXNFULLIE : TBits_1; inline;
  21386. function getTXNFULLIF : TBits_1; inline;
  21387. function getw : TBits_32; inline;
  21388. procedure setRXFULLIE(thebits : TBits_1); inline;
  21389. procedure setRXFULLIF(thebits : TBits_1); inline;
  21390. procedure setRXHALFIE(thebits : TBits_1); inline;
  21391. procedure setRXHALFIF(thebits : TBits_1); inline;
  21392. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21393. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21394. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21395. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21396. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21397. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21398. procedure setTXHALFIE(thebits : TBits_1); inline;
  21399. procedure setTXHALFIF(thebits : TBits_1); inline;
  21400. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21401. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21402. procedure setw(thebits : TBits_32); inline;
  21403. public
  21404. procedure clearRXFULLIE; inline;
  21405. procedure clearRXFULLIF; inline;
  21406. procedure clearRXHALFIE; inline;
  21407. procedure clearRXHALFIF; inline;
  21408. procedure clearRXNEMPTYIE; inline;
  21409. procedure clearRXNEMPTYIF; inline;
  21410. procedure clearRXOVFLIE; inline;
  21411. procedure clearRXOVFLIF; inline;
  21412. procedure clearTXEMPTYIE; inline;
  21413. procedure clearTXEMPTYIF; inline;
  21414. procedure clearTXHALFIE; inline;
  21415. procedure clearTXHALFIF; inline;
  21416. procedure clearTXNFULLIE; inline;
  21417. procedure clearTXNFULLIF; inline;
  21418. procedure setRXFULLIE; inline;
  21419. procedure setRXFULLIF; inline;
  21420. procedure setRXHALFIE; inline;
  21421. procedure setRXHALFIF; inline;
  21422. procedure setRXNEMPTYIE; inline;
  21423. procedure setRXNEMPTYIF; inline;
  21424. procedure setRXOVFLIE; inline;
  21425. procedure setRXOVFLIF; inline;
  21426. procedure setTXEMPTYIE; inline;
  21427. procedure setTXEMPTYIF; inline;
  21428. procedure setTXHALFIE; inline;
  21429. procedure setTXHALFIF; inline;
  21430. procedure setTXNFULLIE; inline;
  21431. procedure setTXNFULLIF; inline;
  21432. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21433. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21434. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21435. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21436. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21437. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21438. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21439. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21440. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21441. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21442. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21443. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21444. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21445. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21446. property w : TBits_32 read getw write setw;
  21447. end;
  21448. TCAN1_C1FIFOCI28 = record
  21449. private
  21450. function getCFIFOCI : TBits_5; inline;
  21451. function getw : TBits_32; inline;
  21452. procedure setCFIFOCI(thebits : TBits_5); inline;
  21453. procedure setw(thebits : TBits_32); inline;
  21454. public
  21455. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21456. property w : TBits_32 read getw write setw;
  21457. end;
  21458. TCAN1_C1FIFOCON29 = record
  21459. private
  21460. function getDONLY : TBits_1; inline;
  21461. function getFRESET : TBits_1; inline;
  21462. function getFSIZE : TBits_5; inline;
  21463. function getRTREN : TBits_1; inline;
  21464. function getTXABAT : TBits_1; inline;
  21465. function getTXEN : TBits_1; inline;
  21466. function getTXERR : TBits_1; inline;
  21467. function getTXLARB : TBits_1; inline;
  21468. function getTXPRI : TBits_2; inline;
  21469. function getTXREQ : TBits_1; inline;
  21470. function getUINC : TBits_1; inline;
  21471. function getw : TBits_32; inline;
  21472. procedure setDONLY(thebits : TBits_1); inline;
  21473. procedure setFRESET(thebits : TBits_1); inline;
  21474. procedure setFSIZE(thebits : TBits_5); inline;
  21475. procedure setRTREN(thebits : TBits_1); inline;
  21476. procedure setTXABAT(thebits : TBits_1); inline;
  21477. procedure setTXEN(thebits : TBits_1); inline;
  21478. procedure setTXERR(thebits : TBits_1); inline;
  21479. procedure setTXLARB(thebits : TBits_1); inline;
  21480. procedure setTXPRI(thebits : TBits_2); inline;
  21481. procedure setTXREQ(thebits : TBits_1); inline;
  21482. procedure setUINC(thebits : TBits_1); inline;
  21483. procedure setw(thebits : TBits_32); inline;
  21484. public
  21485. procedure clearDONLY; inline;
  21486. procedure clearFRESET; inline;
  21487. procedure clearRTREN; inline;
  21488. procedure clearTXABAT; inline;
  21489. procedure clearTXEN; inline;
  21490. procedure clearTXERR; inline;
  21491. procedure clearTXLARB; inline;
  21492. procedure clearTXREQ; inline;
  21493. procedure clearUINC; inline;
  21494. procedure setDONLY; inline;
  21495. procedure setFRESET; inline;
  21496. procedure setRTREN; inline;
  21497. procedure setTXABAT; inline;
  21498. procedure setTXEN; inline;
  21499. procedure setTXERR; inline;
  21500. procedure setTXLARB; inline;
  21501. procedure setTXREQ; inline;
  21502. procedure setUINC; inline;
  21503. property DONLY : TBits_1 read getDONLY write setDONLY;
  21504. property FRESET : TBits_1 read getFRESET write setFRESET;
  21505. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21506. property RTREN : TBits_1 read getRTREN write setRTREN;
  21507. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21508. property TXEN : TBits_1 read getTXEN write setTXEN;
  21509. property TXERR : TBits_1 read getTXERR write setTXERR;
  21510. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21511. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21512. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21513. property UINC : TBits_1 read getUINC write setUINC;
  21514. property w : TBits_32 read getw write setw;
  21515. end;
  21516. TCAN1_C1FIFOINT29 = record
  21517. private
  21518. function getRXFULLIE : TBits_1; inline;
  21519. function getRXFULLIF : TBits_1; inline;
  21520. function getRXHALFIE : TBits_1; inline;
  21521. function getRXHALFIF : TBits_1; inline;
  21522. function getRXNEMPTYIE : TBits_1; inline;
  21523. function getRXNEMPTYIF : TBits_1; inline;
  21524. function getRXOVFLIE : TBits_1; inline;
  21525. function getRXOVFLIF : TBits_1; inline;
  21526. function getTXEMPTYIE : TBits_1; inline;
  21527. function getTXEMPTYIF : TBits_1; inline;
  21528. function getTXHALFIE : TBits_1; inline;
  21529. function getTXHALFIF : TBits_1; inline;
  21530. function getTXNFULLIE : TBits_1; inline;
  21531. function getTXNFULLIF : TBits_1; inline;
  21532. function getw : TBits_32; inline;
  21533. procedure setRXFULLIE(thebits : TBits_1); inline;
  21534. procedure setRXFULLIF(thebits : TBits_1); inline;
  21535. procedure setRXHALFIE(thebits : TBits_1); inline;
  21536. procedure setRXHALFIF(thebits : TBits_1); inline;
  21537. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21538. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21539. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21540. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21541. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21542. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21543. procedure setTXHALFIE(thebits : TBits_1); inline;
  21544. procedure setTXHALFIF(thebits : TBits_1); inline;
  21545. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21546. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21547. procedure setw(thebits : TBits_32); inline;
  21548. public
  21549. procedure clearRXFULLIE; inline;
  21550. procedure clearRXFULLIF; inline;
  21551. procedure clearRXHALFIE; inline;
  21552. procedure clearRXHALFIF; inline;
  21553. procedure clearRXNEMPTYIE; inline;
  21554. procedure clearRXNEMPTYIF; inline;
  21555. procedure clearRXOVFLIE; inline;
  21556. procedure clearRXOVFLIF; inline;
  21557. procedure clearTXEMPTYIE; inline;
  21558. procedure clearTXEMPTYIF; inline;
  21559. procedure clearTXHALFIE; inline;
  21560. procedure clearTXHALFIF; inline;
  21561. procedure clearTXNFULLIE; inline;
  21562. procedure clearTXNFULLIF; inline;
  21563. procedure setRXFULLIE; inline;
  21564. procedure setRXFULLIF; inline;
  21565. procedure setRXHALFIE; inline;
  21566. procedure setRXHALFIF; inline;
  21567. procedure setRXNEMPTYIE; inline;
  21568. procedure setRXNEMPTYIF; inline;
  21569. procedure setRXOVFLIE; inline;
  21570. procedure setRXOVFLIF; inline;
  21571. procedure setTXEMPTYIE; inline;
  21572. procedure setTXEMPTYIF; inline;
  21573. procedure setTXHALFIE; inline;
  21574. procedure setTXHALFIF; inline;
  21575. procedure setTXNFULLIE; inline;
  21576. procedure setTXNFULLIF; inline;
  21577. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21578. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21579. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21580. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21581. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21582. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21583. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21584. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21585. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21586. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21587. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21588. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21589. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21590. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21591. property w : TBits_32 read getw write setw;
  21592. end;
  21593. TCAN1_C1FIFOCI29 = record
  21594. private
  21595. function getCFIFOCI : TBits_5; inline;
  21596. function getw : TBits_32; inline;
  21597. procedure setCFIFOCI(thebits : TBits_5); inline;
  21598. procedure setw(thebits : TBits_32); inline;
  21599. public
  21600. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21601. property w : TBits_32 read getw write setw;
  21602. end;
  21603. TCAN1_C1FIFOCON30 = record
  21604. private
  21605. function getDONLY : TBits_1; inline;
  21606. function getFRESET : TBits_1; inline;
  21607. function getFSIZE : TBits_5; inline;
  21608. function getRTREN : TBits_1; inline;
  21609. function getTXABAT : TBits_1; inline;
  21610. function getTXEN : TBits_1; inline;
  21611. function getTXERR : TBits_1; inline;
  21612. function getTXLARB : TBits_1; inline;
  21613. function getTXPRI : TBits_2; inline;
  21614. function getTXREQ : TBits_1; inline;
  21615. function getUINC : TBits_1; inline;
  21616. function getw : TBits_32; inline;
  21617. procedure setDONLY(thebits : TBits_1); inline;
  21618. procedure setFRESET(thebits : TBits_1); inline;
  21619. procedure setFSIZE(thebits : TBits_5); inline;
  21620. procedure setRTREN(thebits : TBits_1); inline;
  21621. procedure setTXABAT(thebits : TBits_1); inline;
  21622. procedure setTXEN(thebits : TBits_1); inline;
  21623. procedure setTXERR(thebits : TBits_1); inline;
  21624. procedure setTXLARB(thebits : TBits_1); inline;
  21625. procedure setTXPRI(thebits : TBits_2); inline;
  21626. procedure setTXREQ(thebits : TBits_1); inline;
  21627. procedure setUINC(thebits : TBits_1); inline;
  21628. procedure setw(thebits : TBits_32); inline;
  21629. public
  21630. procedure clearDONLY; inline;
  21631. procedure clearFRESET; inline;
  21632. procedure clearRTREN; inline;
  21633. procedure clearTXABAT; inline;
  21634. procedure clearTXEN; inline;
  21635. procedure clearTXERR; inline;
  21636. procedure clearTXLARB; inline;
  21637. procedure clearTXREQ; inline;
  21638. procedure clearUINC; inline;
  21639. procedure setDONLY; inline;
  21640. procedure setFRESET; inline;
  21641. procedure setRTREN; inline;
  21642. procedure setTXABAT; inline;
  21643. procedure setTXEN; inline;
  21644. procedure setTXERR; inline;
  21645. procedure setTXLARB; inline;
  21646. procedure setTXREQ; inline;
  21647. procedure setUINC; inline;
  21648. property DONLY : TBits_1 read getDONLY write setDONLY;
  21649. property FRESET : TBits_1 read getFRESET write setFRESET;
  21650. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21651. property RTREN : TBits_1 read getRTREN write setRTREN;
  21652. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21653. property TXEN : TBits_1 read getTXEN write setTXEN;
  21654. property TXERR : TBits_1 read getTXERR write setTXERR;
  21655. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21656. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21657. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21658. property UINC : TBits_1 read getUINC write setUINC;
  21659. property w : TBits_32 read getw write setw;
  21660. end;
  21661. TCAN1_C1FIFOINT30 = record
  21662. private
  21663. function getRXFULLIE : TBits_1; inline;
  21664. function getRXFULLIF : TBits_1; inline;
  21665. function getRXHALFIE : TBits_1; inline;
  21666. function getRXHALFIF : TBits_1; inline;
  21667. function getRXNEMPTYIE : TBits_1; inline;
  21668. function getRXNEMPTYIF : TBits_1; inline;
  21669. function getRXOVFLIE : TBits_1; inline;
  21670. function getRXOVFLIF : TBits_1; inline;
  21671. function getTXEMPTYIE : TBits_1; inline;
  21672. function getTXEMPTYIF : TBits_1; inline;
  21673. function getTXHALFIE : TBits_1; inline;
  21674. function getTXHALFIF : TBits_1; inline;
  21675. function getTXNFULLIE : TBits_1; inline;
  21676. function getTXNFULLIF : TBits_1; inline;
  21677. function getw : TBits_32; inline;
  21678. procedure setRXFULLIE(thebits : TBits_1); inline;
  21679. procedure setRXFULLIF(thebits : TBits_1); inline;
  21680. procedure setRXHALFIE(thebits : TBits_1); inline;
  21681. procedure setRXHALFIF(thebits : TBits_1); inline;
  21682. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21683. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21684. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21685. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21686. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21687. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21688. procedure setTXHALFIE(thebits : TBits_1); inline;
  21689. procedure setTXHALFIF(thebits : TBits_1); inline;
  21690. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21691. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21692. procedure setw(thebits : TBits_32); inline;
  21693. public
  21694. procedure clearRXFULLIE; inline;
  21695. procedure clearRXFULLIF; inline;
  21696. procedure clearRXHALFIE; inline;
  21697. procedure clearRXHALFIF; inline;
  21698. procedure clearRXNEMPTYIE; inline;
  21699. procedure clearRXNEMPTYIF; inline;
  21700. procedure clearRXOVFLIE; inline;
  21701. procedure clearRXOVFLIF; inline;
  21702. procedure clearTXEMPTYIE; inline;
  21703. procedure clearTXEMPTYIF; inline;
  21704. procedure clearTXHALFIE; inline;
  21705. procedure clearTXHALFIF; inline;
  21706. procedure clearTXNFULLIE; inline;
  21707. procedure clearTXNFULLIF; inline;
  21708. procedure setRXFULLIE; inline;
  21709. procedure setRXFULLIF; inline;
  21710. procedure setRXHALFIE; inline;
  21711. procedure setRXHALFIF; inline;
  21712. procedure setRXNEMPTYIE; inline;
  21713. procedure setRXNEMPTYIF; inline;
  21714. procedure setRXOVFLIE; inline;
  21715. procedure setRXOVFLIF; inline;
  21716. procedure setTXEMPTYIE; inline;
  21717. procedure setTXEMPTYIF; inline;
  21718. procedure setTXHALFIE; inline;
  21719. procedure setTXHALFIF; inline;
  21720. procedure setTXNFULLIE; inline;
  21721. procedure setTXNFULLIF; inline;
  21722. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21723. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21724. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21725. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21726. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21727. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21728. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21729. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21730. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21731. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21732. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21733. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21734. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21735. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21736. property w : TBits_32 read getw write setw;
  21737. end;
  21738. TCAN1_C1FIFOCI30 = record
  21739. private
  21740. function getCFIFOCI : TBits_5; inline;
  21741. function getw : TBits_32; inline;
  21742. procedure setCFIFOCI(thebits : TBits_5); inline;
  21743. procedure setw(thebits : TBits_32); inline;
  21744. public
  21745. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21746. property w : TBits_32 read getw write setw;
  21747. end;
  21748. TCAN1_C1FIFOCON31 = record
  21749. private
  21750. function getDONLY : TBits_1; inline;
  21751. function getFRESET : TBits_1; inline;
  21752. function getFSIZE : TBits_5; inline;
  21753. function getRTREN : TBits_1; inline;
  21754. function getTXABAT : TBits_1; inline;
  21755. function getTXEN : TBits_1; inline;
  21756. function getTXERR : TBits_1; inline;
  21757. function getTXLARB : TBits_1; inline;
  21758. function getTXPRI : TBits_2; inline;
  21759. function getTXREQ : TBits_1; inline;
  21760. function getUINC : TBits_1; inline;
  21761. function getw : TBits_32; inline;
  21762. procedure setDONLY(thebits : TBits_1); inline;
  21763. procedure setFRESET(thebits : TBits_1); inline;
  21764. procedure setFSIZE(thebits : TBits_5); inline;
  21765. procedure setRTREN(thebits : TBits_1); inline;
  21766. procedure setTXABAT(thebits : TBits_1); inline;
  21767. procedure setTXEN(thebits : TBits_1); inline;
  21768. procedure setTXERR(thebits : TBits_1); inline;
  21769. procedure setTXLARB(thebits : TBits_1); inline;
  21770. procedure setTXPRI(thebits : TBits_2); inline;
  21771. procedure setTXREQ(thebits : TBits_1); inline;
  21772. procedure setUINC(thebits : TBits_1); inline;
  21773. procedure setw(thebits : TBits_32); inline;
  21774. public
  21775. procedure clearDONLY; inline;
  21776. procedure clearFRESET; inline;
  21777. procedure clearRTREN; inline;
  21778. procedure clearTXABAT; inline;
  21779. procedure clearTXEN; inline;
  21780. procedure clearTXERR; inline;
  21781. procedure clearTXLARB; inline;
  21782. procedure clearTXREQ; inline;
  21783. procedure clearUINC; inline;
  21784. procedure setDONLY; inline;
  21785. procedure setFRESET; inline;
  21786. procedure setRTREN; inline;
  21787. procedure setTXABAT; inline;
  21788. procedure setTXEN; inline;
  21789. procedure setTXERR; inline;
  21790. procedure setTXLARB; inline;
  21791. procedure setTXREQ; inline;
  21792. procedure setUINC; inline;
  21793. property DONLY : TBits_1 read getDONLY write setDONLY;
  21794. property FRESET : TBits_1 read getFRESET write setFRESET;
  21795. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  21796. property RTREN : TBits_1 read getRTREN write setRTREN;
  21797. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  21798. property TXEN : TBits_1 read getTXEN write setTXEN;
  21799. property TXERR : TBits_1 read getTXERR write setTXERR;
  21800. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  21801. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  21802. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  21803. property UINC : TBits_1 read getUINC write setUINC;
  21804. property w : TBits_32 read getw write setw;
  21805. end;
  21806. TCAN1_C1FIFOINT31 = record
  21807. private
  21808. function getRXFULLIE : TBits_1; inline;
  21809. function getRXFULLIF : TBits_1; inline;
  21810. function getRXHALFIE : TBits_1; inline;
  21811. function getRXHALFIF : TBits_1; inline;
  21812. function getRXNEMPTYIE : TBits_1; inline;
  21813. function getRXNEMPTYIF : TBits_1; inline;
  21814. function getRXOVFLIE : TBits_1; inline;
  21815. function getRXOVFLIF : TBits_1; inline;
  21816. function getTXEMPTYIE : TBits_1; inline;
  21817. function getTXEMPTYIF : TBits_1; inline;
  21818. function getTXHALFIE : TBits_1; inline;
  21819. function getTXHALFIF : TBits_1; inline;
  21820. function getTXNFULLIE : TBits_1; inline;
  21821. function getTXNFULLIF : TBits_1; inline;
  21822. function getw : TBits_32; inline;
  21823. procedure setRXFULLIE(thebits : TBits_1); inline;
  21824. procedure setRXFULLIF(thebits : TBits_1); inline;
  21825. procedure setRXHALFIE(thebits : TBits_1); inline;
  21826. procedure setRXHALFIF(thebits : TBits_1); inline;
  21827. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  21828. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  21829. procedure setRXOVFLIE(thebits : TBits_1); inline;
  21830. procedure setRXOVFLIF(thebits : TBits_1); inline;
  21831. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  21832. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  21833. procedure setTXHALFIE(thebits : TBits_1); inline;
  21834. procedure setTXHALFIF(thebits : TBits_1); inline;
  21835. procedure setTXNFULLIE(thebits : TBits_1); inline;
  21836. procedure setTXNFULLIF(thebits : TBits_1); inline;
  21837. procedure setw(thebits : TBits_32); inline;
  21838. public
  21839. procedure clearRXFULLIE; inline;
  21840. procedure clearRXFULLIF; inline;
  21841. procedure clearRXHALFIE; inline;
  21842. procedure clearRXHALFIF; inline;
  21843. procedure clearRXNEMPTYIE; inline;
  21844. procedure clearRXNEMPTYIF; inline;
  21845. procedure clearRXOVFLIE; inline;
  21846. procedure clearRXOVFLIF; inline;
  21847. procedure clearTXEMPTYIE; inline;
  21848. procedure clearTXEMPTYIF; inline;
  21849. procedure clearTXHALFIE; inline;
  21850. procedure clearTXHALFIF; inline;
  21851. procedure clearTXNFULLIE; inline;
  21852. procedure clearTXNFULLIF; inline;
  21853. procedure setRXFULLIE; inline;
  21854. procedure setRXFULLIF; inline;
  21855. procedure setRXHALFIE; inline;
  21856. procedure setRXHALFIF; inline;
  21857. procedure setRXNEMPTYIE; inline;
  21858. procedure setRXNEMPTYIF; inline;
  21859. procedure setRXOVFLIE; inline;
  21860. procedure setRXOVFLIF; inline;
  21861. procedure setTXEMPTYIE; inline;
  21862. procedure setTXEMPTYIF; inline;
  21863. procedure setTXHALFIE; inline;
  21864. procedure setTXHALFIF; inline;
  21865. procedure setTXNFULLIE; inline;
  21866. procedure setTXNFULLIF; inline;
  21867. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  21868. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  21869. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  21870. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  21871. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  21872. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  21873. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  21874. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  21875. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  21876. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  21877. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  21878. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  21879. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  21880. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  21881. property w : TBits_32 read getw write setw;
  21882. end;
  21883. TCAN1_C1FIFOCI31 = record
  21884. private
  21885. function getCFIFOCI : TBits_5; inline;
  21886. function getw : TBits_32; inline;
  21887. procedure setCFIFOCI(thebits : TBits_5); inline;
  21888. procedure setw(thebits : TBits_32); inline;
  21889. public
  21890. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  21891. property w : TBits_32 read getw write setw;
  21892. end;
  21893. type
  21894. TCAN1Registers = record
  21895. C1CONbits : TCAN1_C1CON;
  21896. C1CON : longWord;
  21897. C1CONCLR : longWord;
  21898. C1CONSET : longWord;
  21899. C1CONINV : longWord;
  21900. C1CFGbits : TCAN1_C1CFG;
  21901. C1CFG : longWord;
  21902. C1CFGCLR : longWord;
  21903. C1CFGSET : longWord;
  21904. C1CFGINV : longWord;
  21905. C1INTbits : TCAN1_C1INT;
  21906. C1INT : longWord;
  21907. C1INTCLR : longWord;
  21908. C1INTSET : longWord;
  21909. C1INTINV : longWord;
  21910. C1VECbits : TCAN1_C1VEC;
  21911. C1VEC : longWord;
  21912. C1VECCLR : longWord;
  21913. C1VECSET : longWord;
  21914. C1VECINV : longWord;
  21915. C1TRECbits : TCAN1_C1TREC;
  21916. C1TREC : longWord;
  21917. C1TRECCLR : longWord;
  21918. C1TRECSET : longWord;
  21919. C1TRECINV : longWord;
  21920. C1FSTATbits : TCAN1_C1FSTAT;
  21921. C1FSTAT : longWord;
  21922. C1FSTATCLR : longWord;
  21923. C1FSTATSET : longWord;
  21924. C1FSTATINV : longWord;
  21925. C1RXOVFbits : TCAN1_C1RXOVF;
  21926. C1RXOVF : longWord;
  21927. C1RXOVFCLR : longWord;
  21928. C1RXOVFSET : longWord;
  21929. C1RXOVFINV : longWord;
  21930. C1TMRbits : TCAN1_C1TMR;
  21931. C1TMR : longWord;
  21932. C1TMRCLR : longWord;
  21933. C1TMRSET : longWord;
  21934. C1TMRINV : longWord;
  21935. C1RXM0bits : TCAN1_C1RXM0;
  21936. C1RXM0 : longWord;
  21937. C1RXM0CLR : longWord;
  21938. C1RXM0SET : longWord;
  21939. C1RXM0INV : longWord;
  21940. C1RXM1bits : TCAN1_C1RXM1;
  21941. C1RXM1 : longWord;
  21942. C1RXM1CLR : longWord;
  21943. C1RXM1SET : longWord;
  21944. C1RXM1INV : longWord;
  21945. C1RXM2bits : TCAN1_C1RXM2;
  21946. C1RXM2 : longWord;
  21947. C1RXM2CLR : longWord;
  21948. C1RXM2SET : longWord;
  21949. C1RXM2INV : longWord;
  21950. C1RXM3bits : TCAN1_C1RXM3;
  21951. C1RXM3 : longWord;
  21952. C1RXM3CLR : longWord;
  21953. C1RXM3SET : longWord;
  21954. C1RXM3INV : longWord;
  21955. C1FLTCON0bits : TCAN1_C1FLTCON0;
  21956. C1FLTCON0 : longWord;
  21957. C1FLTCON0CLR : longWord;
  21958. C1FLTCON0SET : longWord;
  21959. C1FLTCON0INV : longWord;
  21960. C1FLTCON1bits : TCAN1_C1FLTCON1;
  21961. C1FLTCON1 : longWord;
  21962. C1FLTCON1CLR : longWord;
  21963. C1FLTCON1SET : longWord;
  21964. C1FLTCON1INV : longWord;
  21965. C1FLTCON2bits : TCAN1_C1FLTCON2;
  21966. C1FLTCON2 : longWord;
  21967. C1FLTCON2CLR : longWord;
  21968. C1FLTCON2SET : longWord;
  21969. C1FLTCON2INV : longWord;
  21970. C1FLTCON3bits : TCAN1_C1FLTCON3;
  21971. C1FLTCON3 : longWord;
  21972. C1FLTCON3CLR : longWord;
  21973. C1FLTCON3SET : longWord;
  21974. C1FLTCON3INV : longWord;
  21975. C1FLTCON4bits : TCAN1_C1FLTCON4;
  21976. C1FLTCON4 : longWord;
  21977. C1FLTCON4CLR : longWord;
  21978. C1FLTCON4SET : longWord;
  21979. C1FLTCON4INV : longWord;
  21980. C1FLTCON5bits : TCAN1_C1FLTCON5;
  21981. C1FLTCON5 : longWord;
  21982. C1FLTCON5CLR : longWord;
  21983. C1FLTCON5SET : longWord;
  21984. C1FLTCON5INV : longWord;
  21985. C1FLTCON6bits : TCAN1_C1FLTCON6;
  21986. C1FLTCON6 : longWord;
  21987. C1FLTCON6CLR : longWord;
  21988. C1FLTCON6SET : longWord;
  21989. C1FLTCON6INV : longWord;
  21990. C1FLTCON7bits : TCAN1_C1FLTCON7;
  21991. C1FLTCON7 : longWord;
  21992. C1FLTCON7CLR : longWord;
  21993. C1FLTCON7SET : longWord;
  21994. C1FLTCON7INV : longWord;
  21995. C1RXF0bits : TCAN1_C1RXF0;
  21996. C1RXF0 : longWord;
  21997. C1RXF0CLR : longWord;
  21998. C1RXF0SET : longWord;
  21999. C1RXF0INV : longWord;
  22000. C1RXF1bits : TCAN1_C1RXF1;
  22001. C1RXF1 : longWord;
  22002. C1RXF1CLR : longWord;
  22003. C1RXF1SET : longWord;
  22004. C1RXF1INV : longWord;
  22005. C1RXF2bits : TCAN1_C1RXF2;
  22006. C1RXF2 : longWord;
  22007. C1RXF2CLR : longWord;
  22008. C1RXF2SET : longWord;
  22009. C1RXF2INV : longWord;
  22010. C1RXF3bits : TCAN1_C1RXF3;
  22011. C1RXF3 : longWord;
  22012. C1RXF3CLR : longWord;
  22013. C1RXF3SET : longWord;
  22014. C1RXF3INV : longWord;
  22015. C1RXF4bits : TCAN1_C1RXF4;
  22016. C1RXF4 : longWord;
  22017. C1RXF4CLR : longWord;
  22018. C1RXF4SET : longWord;
  22019. C1RXF4INV : longWord;
  22020. C1RXF5bits : TCAN1_C1RXF5;
  22021. C1RXF5 : longWord;
  22022. C1RXF5CLR : longWord;
  22023. C1RXF5SET : longWord;
  22024. C1RXF5INV : longWord;
  22025. C1RXF6bits : TCAN1_C1RXF6;
  22026. C1RXF6 : longWord;
  22027. C1RXF6CLR : longWord;
  22028. C1RXF6SET : longWord;
  22029. C1RXF6INV : longWord;
  22030. C1RXF7bits : TCAN1_C1RXF7;
  22031. C1RXF7 : longWord;
  22032. C1RXF7CLR : longWord;
  22033. C1RXF7SET : longWord;
  22034. C1RXF7INV : longWord;
  22035. C1RXF8bits : TCAN1_C1RXF8;
  22036. C1RXF8 : longWord;
  22037. C1RXF8CLR : longWord;
  22038. C1RXF8SET : longWord;
  22039. C1RXF8INV : longWord;
  22040. C1RXF9bits : TCAN1_C1RXF9;
  22041. C1RXF9 : longWord;
  22042. C1RXF9CLR : longWord;
  22043. C1RXF9SET : longWord;
  22044. C1RXF9INV : longWord;
  22045. C1RXF10bits : TCAN1_C1RXF10;
  22046. C1RXF10 : longWord;
  22047. C1RXF10CLR : longWord;
  22048. C1RXF10SET : longWord;
  22049. C1RXF10INV : longWord;
  22050. C1RXF11bits : TCAN1_C1RXF11;
  22051. C1RXF11 : longWord;
  22052. C1RXF11CLR : longWord;
  22053. C1RXF11SET : longWord;
  22054. C1RXF11INV : longWord;
  22055. C1RXF12bits : TCAN1_C1RXF12;
  22056. C1RXF12 : longWord;
  22057. C1RXF12CLR : longWord;
  22058. C1RXF12SET : longWord;
  22059. C1RXF12INV : longWord;
  22060. C1RXF13bits : TCAN1_C1RXF13;
  22061. C1RXF13 : longWord;
  22062. C1RXF13CLR : longWord;
  22063. C1RXF13SET : longWord;
  22064. C1RXF13INV : longWord;
  22065. C1RXF14bits : TCAN1_C1RXF14;
  22066. C1RXF14 : longWord;
  22067. C1RXF14CLR : longWord;
  22068. C1RXF14SET : longWord;
  22069. C1RXF14INV : longWord;
  22070. C1RXF15bits : TCAN1_C1RXF15;
  22071. C1RXF15 : longWord;
  22072. C1RXF15CLR : longWord;
  22073. C1RXF15SET : longWord;
  22074. C1RXF15INV : longWord;
  22075. C1RXF16bits : TCAN1_C1RXF16;
  22076. C1RXF16 : longWord;
  22077. C1RXF16CLR : longWord;
  22078. C1RXF16SET : longWord;
  22079. C1RXF16INV : longWord;
  22080. C1RXF17bits : TCAN1_C1RXF17;
  22081. C1RXF17 : longWord;
  22082. C1RXF17CLR : longWord;
  22083. C1RXF17SET : longWord;
  22084. C1RXF17INV : longWord;
  22085. C1RXF18bits : TCAN1_C1RXF18;
  22086. C1RXF18 : longWord;
  22087. C1RXF18CLR : longWord;
  22088. C1RXF18SET : longWord;
  22089. C1RXF18INV : longWord;
  22090. C1RXF19bits : TCAN1_C1RXF19;
  22091. C1RXF19 : longWord;
  22092. C1RXF19CLR : longWord;
  22093. C1RXF19SET : longWord;
  22094. C1RXF19INV : longWord;
  22095. C1RXF20bits : TCAN1_C1RXF20;
  22096. C1RXF20 : longWord;
  22097. C1RXF20CLR : longWord;
  22098. C1RXF20SET : longWord;
  22099. C1RXF20INV : longWord;
  22100. C1RXF21bits : TCAN1_C1RXF21;
  22101. C1RXF21 : longWord;
  22102. C1RXF21CLR : longWord;
  22103. C1RXF21SET : longWord;
  22104. C1RXF21INV : longWord;
  22105. C1RXF22bits : TCAN1_C1RXF22;
  22106. C1RXF22 : longWord;
  22107. C1RXF22CLR : longWord;
  22108. C1RXF22SET : longWord;
  22109. C1RXF22INV : longWord;
  22110. C1RXF23bits : TCAN1_C1RXF23;
  22111. C1RXF23 : longWord;
  22112. C1RXF23CLR : longWord;
  22113. C1RXF23SET : longWord;
  22114. C1RXF23INV : longWord;
  22115. C1RXF24bits : TCAN1_C1RXF24;
  22116. C1RXF24 : longWord;
  22117. C1RXF24CLR : longWord;
  22118. C1RXF24SET : longWord;
  22119. C1RXF24INV : longWord;
  22120. C1RXF25bits : TCAN1_C1RXF25;
  22121. C1RXF25 : longWord;
  22122. C1RXF25CLR : longWord;
  22123. C1RXF25SET : longWord;
  22124. C1RXF25INV : longWord;
  22125. C1RXF26bits : TCAN1_C1RXF26;
  22126. C1RXF26 : longWord;
  22127. C1RXF26CLR : longWord;
  22128. C1RXF26SET : longWord;
  22129. C1RXF26INV : longWord;
  22130. C1RXF27bits : TCAN1_C1RXF27;
  22131. C1RXF27 : longWord;
  22132. C1RXF27CLR : longWord;
  22133. C1RXF27SET : longWord;
  22134. C1RXF27INV : longWord;
  22135. C1RXF28bits : TCAN1_C1RXF28;
  22136. C1RXF28 : longWord;
  22137. C1RXF28CLR : longWord;
  22138. C1RXF28SET : longWord;
  22139. C1RXF28INV : longWord;
  22140. C1RXF29bits : TCAN1_C1RXF29;
  22141. C1RXF29 : longWord;
  22142. C1RXF29CLR : longWord;
  22143. C1RXF29SET : longWord;
  22144. C1RXF29INV : longWord;
  22145. C1RXF30bits : TCAN1_C1RXF30;
  22146. C1RXF30 : longWord;
  22147. C1RXF30CLR : longWord;
  22148. C1RXF30SET : longWord;
  22149. C1RXF30INV : longWord;
  22150. C1RXF31bits : TCAN1_C1RXF31;
  22151. C1RXF31 : longWord;
  22152. C1RXF31CLR : longWord;
  22153. C1RXF31SET : longWord;
  22154. C1RXF31INV : longWord;
  22155. C1FIFOBA : longWord;
  22156. C1FIFOBACLR : longWord;
  22157. C1FIFOBASET : longWord;
  22158. C1FIFOBAINV : longWord;
  22159. C1FIFOCON0bits : TCAN1_C1FIFOCON0;
  22160. C1FIFOCON0 : longWord;
  22161. C1FIFOCON0CLR : longWord;
  22162. C1FIFOCON0SET : longWord;
  22163. C1FIFOCON0INV : longWord;
  22164. C1FIFOINT0bits : TCAN1_C1FIFOINT0;
  22165. C1FIFOINT0 : longWord;
  22166. C1FIFOINT0CLR : longWord;
  22167. C1FIFOINT0SET : longWord;
  22168. C1FIFOINT0INV : longWord;
  22169. C1FIFOUA0 : longWord;
  22170. C1FIFOUA0CLR : longWord;
  22171. C1FIFOUA0SET : longWord;
  22172. C1FIFOUA0INV : longWord;
  22173. C1FIFOCI0bits : TCAN1_C1FIFOCI0;
  22174. C1FIFOCI0 : longWord;
  22175. C1FIFOCI0CLR : longWord;
  22176. C1FIFOCI0SET : longWord;
  22177. C1FIFOCI0INV : longWord;
  22178. C1FIFOCON1bits : TCAN1_C1FIFOCON1;
  22179. C1FIFOCON1 : longWord;
  22180. C1FIFOCON1CLR : longWord;
  22181. C1FIFOCON1SET : longWord;
  22182. C1FIFOCON1INV : longWord;
  22183. C1FIFOINT1bits : TCAN1_C1FIFOINT1;
  22184. C1FIFOINT1 : longWord;
  22185. C1FIFOINT1CLR : longWord;
  22186. C1FIFOINT1SET : longWord;
  22187. C1FIFOINT1INV : longWord;
  22188. C1FIFOUA1 : longWord;
  22189. C1FIFOUA1CLR : longWord;
  22190. C1FIFOUA1SET : longWord;
  22191. C1FIFOUA1INV : longWord;
  22192. C1FIFOCI1bits : TCAN1_C1FIFOCI1;
  22193. C1FIFOCI1 : longWord;
  22194. C1FIFOCI1CLR : longWord;
  22195. C1FIFOCI1SET : longWord;
  22196. C1FIFOCI1INV : longWord;
  22197. C1FIFOCON2bits : TCAN1_C1FIFOCON2;
  22198. C1FIFOCON2 : longWord;
  22199. C1FIFOCON2CLR : longWord;
  22200. C1FIFOCON2SET : longWord;
  22201. C1FIFOCON2INV : longWord;
  22202. C1FIFOINT2bits : TCAN1_C1FIFOINT2;
  22203. C1FIFOINT2 : longWord;
  22204. C1FIFOINT2CLR : longWord;
  22205. C1FIFOINT2SET : longWord;
  22206. C1FIFOINT2INV : longWord;
  22207. C1FIFOUA2 : longWord;
  22208. C1FIFOUA2CLR : longWord;
  22209. C1FIFOUA2SET : longWord;
  22210. C1FIFOUA2INV : longWord;
  22211. C1FIFOCI2bits : TCAN1_C1FIFOCI2;
  22212. C1FIFOCI2 : longWord;
  22213. C1FIFOCI2CLR : longWord;
  22214. C1FIFOCI2SET : longWord;
  22215. C1FIFOCI2INV : longWord;
  22216. C1FIFOCON3bits : TCAN1_C1FIFOCON3;
  22217. C1FIFOCON3 : longWord;
  22218. C1FIFOCON3CLR : longWord;
  22219. C1FIFOCON3SET : longWord;
  22220. C1FIFOCON3INV : longWord;
  22221. C1FIFOINT3bits : TCAN1_C1FIFOINT3;
  22222. C1FIFOINT3 : longWord;
  22223. C1FIFOINT3CLR : longWord;
  22224. C1FIFOINT3SET : longWord;
  22225. C1FIFOINT3INV : longWord;
  22226. C1FIFOUA3 : longWord;
  22227. C1FIFOUA3CLR : longWord;
  22228. C1FIFOUA3SET : longWord;
  22229. C1FIFOUA3INV : longWord;
  22230. C1FIFOCI3bits : TCAN1_C1FIFOCI3;
  22231. C1FIFOCI3 : longWord;
  22232. C1FIFOCI3CLR : longWord;
  22233. C1FIFOCI3SET : longWord;
  22234. C1FIFOCI3INV : longWord;
  22235. C1FIFOCON4bits : TCAN1_C1FIFOCON4;
  22236. C1FIFOCON4 : longWord;
  22237. C1FIFOCON4CLR : longWord;
  22238. C1FIFOCON4SET : longWord;
  22239. C1FIFOCON4INV : longWord;
  22240. C1FIFOINT4bits : TCAN1_C1FIFOINT4;
  22241. C1FIFOINT4 : longWord;
  22242. C1FIFOINT4CLR : longWord;
  22243. C1FIFOINT4SET : longWord;
  22244. C1FIFOINT4INV : longWord;
  22245. C1FIFOUA4 : longWord;
  22246. C1FIFOUA4CLR : longWord;
  22247. C1FIFOUA4SET : longWord;
  22248. C1FIFOUA4INV : longWord;
  22249. C1FIFOCI4bits : TCAN1_C1FIFOCI4;
  22250. C1FIFOCI4 : longWord;
  22251. C1FIFOCI4CLR : longWord;
  22252. C1FIFOCI4SET : longWord;
  22253. C1FIFOCI4INV : longWord;
  22254. C1FIFOCON5bits : TCAN1_C1FIFOCON5;
  22255. C1FIFOCON5 : longWord;
  22256. C1FIFOCON5CLR : longWord;
  22257. C1FIFOCON5SET : longWord;
  22258. C1FIFOCON5INV : longWord;
  22259. C1FIFOINT5bits : TCAN1_C1FIFOINT5;
  22260. C1FIFOINT5 : longWord;
  22261. C1FIFOINT5CLR : longWord;
  22262. C1FIFOINT5SET : longWord;
  22263. C1FIFOINT5INV : longWord;
  22264. C1FIFOUA5 : longWord;
  22265. C1FIFOUA5CLR : longWord;
  22266. C1FIFOUA5SET : longWord;
  22267. C1FIFOUA5INV : longWord;
  22268. C1FIFOCI5bits : TCAN1_C1FIFOCI5;
  22269. C1FIFOCI5 : longWord;
  22270. C1FIFOCI5CLR : longWord;
  22271. C1FIFOCI5SET : longWord;
  22272. C1FIFOCI5INV : longWord;
  22273. C1FIFOCON6bits : TCAN1_C1FIFOCON6;
  22274. C1FIFOCON6 : longWord;
  22275. C1FIFOCON6CLR : longWord;
  22276. C1FIFOCON6SET : longWord;
  22277. C1FIFOCON6INV : longWord;
  22278. C1FIFOINT6bits : TCAN1_C1FIFOINT6;
  22279. C1FIFOINT6 : longWord;
  22280. C1FIFOINT6CLR : longWord;
  22281. C1FIFOINT6SET : longWord;
  22282. C1FIFOINT6INV : longWord;
  22283. C1FIFOUA6 : longWord;
  22284. C1FIFOUA6CLR : longWord;
  22285. C1FIFOUA6SET : longWord;
  22286. C1FIFOUA6INV : longWord;
  22287. C1FIFOCI6bits : TCAN1_C1FIFOCI6;
  22288. C1FIFOCI6 : longWord;
  22289. C1FIFOCI6CLR : longWord;
  22290. C1FIFOCI6SET : longWord;
  22291. C1FIFOCI6INV : longWord;
  22292. C1FIFOCON7bits : TCAN1_C1FIFOCON7;
  22293. C1FIFOCON7 : longWord;
  22294. C1FIFOCON7CLR : longWord;
  22295. C1FIFOCON7SET : longWord;
  22296. C1FIFOCON7INV : longWord;
  22297. C1FIFOINT7bits : TCAN1_C1FIFOINT7;
  22298. C1FIFOINT7 : longWord;
  22299. C1FIFOINT7CLR : longWord;
  22300. C1FIFOINT7SET : longWord;
  22301. C1FIFOINT7INV : longWord;
  22302. C1FIFOUA7 : longWord;
  22303. C1FIFOUA7CLR : longWord;
  22304. C1FIFOUA7SET : longWord;
  22305. C1FIFOUA7INV : longWord;
  22306. C1FIFOCI7bits : TCAN1_C1FIFOCI7;
  22307. C1FIFOCI7 : longWord;
  22308. C1FIFOCI7CLR : longWord;
  22309. C1FIFOCI7SET : longWord;
  22310. C1FIFOCI7INV : longWord;
  22311. C1FIFOCON8bits : TCAN1_C1FIFOCON8;
  22312. C1FIFOCON8 : longWord;
  22313. C1FIFOCON8CLR : longWord;
  22314. C1FIFOCON8SET : longWord;
  22315. C1FIFOCON8INV : longWord;
  22316. C1FIFOINT8bits : TCAN1_C1FIFOINT8;
  22317. C1FIFOINT8 : longWord;
  22318. C1FIFOINT8CLR : longWord;
  22319. C1FIFOINT8SET : longWord;
  22320. C1FIFOINT8INV : longWord;
  22321. C1FIFOUA8 : longWord;
  22322. C1FIFOUA8CLR : longWord;
  22323. C1FIFOUA8SET : longWord;
  22324. C1FIFOUA8INV : longWord;
  22325. C1FIFOCI8bits : TCAN1_C1FIFOCI8;
  22326. C1FIFOCI8 : longWord;
  22327. C1FIFOCI8CLR : longWord;
  22328. C1FIFOCI8SET : longWord;
  22329. C1FIFOCI8INV : longWord;
  22330. C1FIFOCON9bits : TCAN1_C1FIFOCON9;
  22331. C1FIFOCON9 : longWord;
  22332. C1FIFOCON9CLR : longWord;
  22333. C1FIFOCON9SET : longWord;
  22334. C1FIFOCON9INV : longWord;
  22335. C1FIFOINT9bits : TCAN1_C1FIFOINT9;
  22336. C1FIFOINT9 : longWord;
  22337. C1FIFOINT9CLR : longWord;
  22338. C1FIFOINT9SET : longWord;
  22339. C1FIFOINT9INV : longWord;
  22340. C1FIFOUA9 : longWord;
  22341. C1FIFOUA9CLR : longWord;
  22342. C1FIFOUA9SET : longWord;
  22343. C1FIFOUA9INV : longWord;
  22344. C1FIFOCI9bits : TCAN1_C1FIFOCI9;
  22345. C1FIFOCI9 : longWord;
  22346. C1FIFOCI9CLR : longWord;
  22347. C1FIFOCI9SET : longWord;
  22348. C1FIFOCI9INV : longWord;
  22349. C1FIFOCON10bits : TCAN1_C1FIFOCON10;
  22350. C1FIFOCON10 : longWord;
  22351. C1FIFOCON10CLR : longWord;
  22352. C1FIFOCON10SET : longWord;
  22353. C1FIFOCON10INV : longWord;
  22354. C1FIFOINT10bits : TCAN1_C1FIFOINT10;
  22355. C1FIFOINT10 : longWord;
  22356. C1FIFOINT10CLR : longWord;
  22357. C1FIFOINT10SET : longWord;
  22358. C1FIFOINT10INV : longWord;
  22359. C1FIFOUA10 : longWord;
  22360. C1FIFOUA10CLR : longWord;
  22361. C1FIFOUA10SET : longWord;
  22362. C1FIFOUA10INV : longWord;
  22363. C1FIFOCI10bits : TCAN1_C1FIFOCI10;
  22364. C1FIFOCI10 : longWord;
  22365. C1FIFOCI10CLR : longWord;
  22366. C1FIFOCI10SET : longWord;
  22367. C1FIFOCI10INV : longWord;
  22368. C1FIFOCON11bits : TCAN1_C1FIFOCON11;
  22369. C1FIFOCON11 : longWord;
  22370. C1FIFOCON11CLR : longWord;
  22371. C1FIFOCON11SET : longWord;
  22372. C1FIFOCON11INV : longWord;
  22373. C1FIFOINT11bits : TCAN1_C1FIFOINT11;
  22374. C1FIFOINT11 : longWord;
  22375. C1FIFOINT11CLR : longWord;
  22376. C1FIFOINT11SET : longWord;
  22377. C1FIFOINT11INV : longWord;
  22378. C1FIFOUA11 : longWord;
  22379. C1FIFOUA11CLR : longWord;
  22380. C1FIFOUA11SET : longWord;
  22381. C1FIFOUA11INV : longWord;
  22382. C1FIFOCI11bits : TCAN1_C1FIFOCI11;
  22383. C1FIFOCI11 : longWord;
  22384. C1FIFOCI11CLR : longWord;
  22385. C1FIFOCI11SET : longWord;
  22386. C1FIFOCI11INV : longWord;
  22387. C1FIFOCON12bits : TCAN1_C1FIFOCON12;
  22388. C1FIFOCON12 : longWord;
  22389. C1FIFOCON12CLR : longWord;
  22390. C1FIFOCON12SET : longWord;
  22391. C1FIFOCON12INV : longWord;
  22392. C1FIFOINT12bits : TCAN1_C1FIFOINT12;
  22393. C1FIFOINT12 : longWord;
  22394. C1FIFOINT12CLR : longWord;
  22395. C1FIFOINT12SET : longWord;
  22396. C1FIFOINT12INV : longWord;
  22397. C1FIFOUA12 : longWord;
  22398. C1FIFOUA12CLR : longWord;
  22399. C1FIFOUA12SET : longWord;
  22400. C1FIFOUA12INV : longWord;
  22401. C1FIFOCI12bits : TCAN1_C1FIFOCI12;
  22402. C1FIFOCI12 : longWord;
  22403. C1FIFOCI12CLR : longWord;
  22404. C1FIFOCI12SET : longWord;
  22405. C1FIFOCI12INV : longWord;
  22406. C1FIFOCON13bits : TCAN1_C1FIFOCON13;
  22407. C1FIFOCON13 : longWord;
  22408. C1FIFOCON13CLR : longWord;
  22409. C1FIFOCON13SET : longWord;
  22410. C1FIFOCON13INV : longWord;
  22411. C1FIFOINT13bits : TCAN1_C1FIFOINT13;
  22412. C1FIFOINT13 : longWord;
  22413. C1FIFOINT13CLR : longWord;
  22414. C1FIFOINT13SET : longWord;
  22415. C1FIFOINT13INV : longWord;
  22416. C1FIFOUA13 : longWord;
  22417. C1FIFOUA13CLR : longWord;
  22418. C1FIFOUA13SET : longWord;
  22419. C1FIFOUA13INV : longWord;
  22420. C1FIFOCI13bits : TCAN1_C1FIFOCI13;
  22421. C1FIFOCI13 : longWord;
  22422. C1FIFOCI13CLR : longWord;
  22423. C1FIFOCI13SET : longWord;
  22424. C1FIFOCI13INV : longWord;
  22425. C1FIFOCON14bits : TCAN1_C1FIFOCON14;
  22426. C1FIFOCON14 : longWord;
  22427. C1FIFOCON14CLR : longWord;
  22428. C1FIFOCON14SET : longWord;
  22429. C1FIFOCON14INV : longWord;
  22430. C1FIFOINT14bits : TCAN1_C1FIFOINT14;
  22431. C1FIFOINT14 : longWord;
  22432. C1FIFOINT14CLR : longWord;
  22433. C1FIFOINT14SET : longWord;
  22434. C1FIFOINT14INV : longWord;
  22435. C1FIFOUA14 : longWord;
  22436. C1FIFOUA14CLR : longWord;
  22437. C1FIFOUA14SET : longWord;
  22438. C1FIFOUA14INV : longWord;
  22439. C1FIFOCI14bits : TCAN1_C1FIFOCI14;
  22440. C1FIFOCI14 : longWord;
  22441. C1FIFOCI14CLR : longWord;
  22442. C1FIFOCI14SET : longWord;
  22443. C1FIFOCI14INV : longWord;
  22444. C1FIFOCON15bits : TCAN1_C1FIFOCON15;
  22445. C1FIFOCON15 : longWord;
  22446. C1FIFOCON15CLR : longWord;
  22447. C1FIFOCON15SET : longWord;
  22448. C1FIFOCON15INV : longWord;
  22449. C1FIFOINT15bits : TCAN1_C1FIFOINT15;
  22450. C1FIFOINT15 : longWord;
  22451. C1FIFOINT15CLR : longWord;
  22452. C1FIFOINT15SET : longWord;
  22453. C1FIFOINT15INV : longWord;
  22454. C1FIFOUA15 : longWord;
  22455. C1FIFOUA15CLR : longWord;
  22456. C1FIFOUA15SET : longWord;
  22457. C1FIFOUA15INV : longWord;
  22458. C1FIFOCI15bits : TCAN1_C1FIFOCI15;
  22459. C1FIFOCI15 : longWord;
  22460. C1FIFOCI15CLR : longWord;
  22461. C1FIFOCI15SET : longWord;
  22462. C1FIFOCI15INV : longWord;
  22463. C1FIFOCON16bits : TCAN1_C1FIFOCON16;
  22464. C1FIFOCON16 : longWord;
  22465. C1FIFOCON16CLR : longWord;
  22466. C1FIFOCON16SET : longWord;
  22467. C1FIFOCON16INV : longWord;
  22468. C1FIFOINT16bits : TCAN1_C1FIFOINT16;
  22469. C1FIFOINT16 : longWord;
  22470. C1FIFOINT16CLR : longWord;
  22471. C1FIFOINT16SET : longWord;
  22472. C1FIFOINT16INV : longWord;
  22473. C1FIFOUA16 : longWord;
  22474. C1FIFOUA16CLR : longWord;
  22475. C1FIFOUA16SET : longWord;
  22476. C1FIFOUA16INV : longWord;
  22477. C1FIFOCI16bits : TCAN1_C1FIFOCI16;
  22478. C1FIFOCI16 : longWord;
  22479. C1FIFOCI16CLR : longWord;
  22480. C1FIFOCI16SET : longWord;
  22481. C1FIFOCI16INV : longWord;
  22482. C1FIFOCON17bits : TCAN1_C1FIFOCON17;
  22483. C1FIFOCON17 : longWord;
  22484. C1FIFOCON17CLR : longWord;
  22485. C1FIFOCON17SET : longWord;
  22486. C1FIFOCON17INV : longWord;
  22487. C1FIFOINT17bits : TCAN1_C1FIFOINT17;
  22488. C1FIFOINT17 : longWord;
  22489. C1FIFOINT17CLR : longWord;
  22490. C1FIFOINT17SET : longWord;
  22491. C1FIFOINT17INV : longWord;
  22492. C1FIFOUA17 : longWord;
  22493. C1FIFOUA17CLR : longWord;
  22494. C1FIFOUA17SET : longWord;
  22495. C1FIFOUA17INV : longWord;
  22496. C1FIFOCI17bits : TCAN1_C1FIFOCI17;
  22497. C1FIFOCI17 : longWord;
  22498. C1FIFOCI17CLR : longWord;
  22499. C1FIFOCI17SET : longWord;
  22500. C1FIFOCI17INV : longWord;
  22501. C1FIFOCON18bits : TCAN1_C1FIFOCON18;
  22502. C1FIFOCON18 : longWord;
  22503. C1FIFOCON18CLR : longWord;
  22504. C1FIFOCON18SET : longWord;
  22505. C1FIFOCON18INV : longWord;
  22506. C1FIFOINT18bits : TCAN1_C1FIFOINT18;
  22507. C1FIFOINT18 : longWord;
  22508. C1FIFOINT18CLR : longWord;
  22509. C1FIFOINT18SET : longWord;
  22510. C1FIFOINT18INV : longWord;
  22511. C1FIFOUA18 : longWord;
  22512. C1FIFOUA18CLR : longWord;
  22513. C1FIFOUA18SET : longWord;
  22514. C1FIFOUA18INV : longWord;
  22515. C1FIFOCI18bits : TCAN1_C1FIFOCI18;
  22516. C1FIFOCI18 : longWord;
  22517. C1FIFOCI18CLR : longWord;
  22518. C1FIFOCI18SET : longWord;
  22519. C1FIFOCI18INV : longWord;
  22520. C1FIFOCON19bits : TCAN1_C1FIFOCON19;
  22521. C1FIFOCON19 : longWord;
  22522. C1FIFOCON19CLR : longWord;
  22523. C1FIFOCON19SET : longWord;
  22524. C1FIFOCON19INV : longWord;
  22525. C1FIFOINT19bits : TCAN1_C1FIFOINT19;
  22526. C1FIFOINT19 : longWord;
  22527. C1FIFOINT19CLR : longWord;
  22528. C1FIFOINT19SET : longWord;
  22529. C1FIFOINT19INV : longWord;
  22530. C1FIFOUA19 : longWord;
  22531. C1FIFOUA19CLR : longWord;
  22532. C1FIFOUA19SET : longWord;
  22533. C1FIFOUA19INV : longWord;
  22534. C1FIFOCI19bits : TCAN1_C1FIFOCI19;
  22535. C1FIFOCI19 : longWord;
  22536. C1FIFOCI19CLR : longWord;
  22537. C1FIFOCI19SET : longWord;
  22538. C1FIFOCI19INV : longWord;
  22539. C1FIFOCON20bits : TCAN1_C1FIFOCON20;
  22540. C1FIFOCON20 : longWord;
  22541. C1FIFOCON20CLR : longWord;
  22542. C1FIFOCON20SET : longWord;
  22543. C1FIFOCON20INV : longWord;
  22544. C1FIFOINT20bits : TCAN1_C1FIFOINT20;
  22545. C1FIFOINT20 : longWord;
  22546. C1FIFOINT20CLR : longWord;
  22547. C1FIFOINT20SET : longWord;
  22548. C1FIFOINT20INV : longWord;
  22549. C1FIFOUA20 : longWord;
  22550. C1FIFOUA20CLR : longWord;
  22551. C1FIFOUA20SET : longWord;
  22552. C1FIFOUA20INV : longWord;
  22553. C1FIFOCI20bits : TCAN1_C1FIFOCI20;
  22554. C1FIFOCI20 : longWord;
  22555. C1FIFOCI20CLR : longWord;
  22556. C1FIFOCI20SET : longWord;
  22557. C1FIFOCI20INV : longWord;
  22558. C1FIFOCON21bits : TCAN1_C1FIFOCON21;
  22559. C1FIFOCON21 : longWord;
  22560. C1FIFOCON21CLR : longWord;
  22561. C1FIFOCON21SET : longWord;
  22562. C1FIFOCON21INV : longWord;
  22563. C1FIFOINT21bits : TCAN1_C1FIFOINT21;
  22564. C1FIFOINT21 : longWord;
  22565. C1FIFOINT21CLR : longWord;
  22566. C1FIFOINT21SET : longWord;
  22567. C1FIFOINT21INV : longWord;
  22568. C1FIFOUA21 : longWord;
  22569. C1FIFOUA21CLR : longWord;
  22570. C1FIFOUA21SET : longWord;
  22571. C1FIFOUA21INV : longWord;
  22572. C1FIFOCI21bits : TCAN1_C1FIFOCI21;
  22573. C1FIFOCI21 : longWord;
  22574. C1FIFOCI21CLR : longWord;
  22575. C1FIFOCI21SET : longWord;
  22576. C1FIFOCI21INV : longWord;
  22577. C1FIFOCON22bits : TCAN1_C1FIFOCON22;
  22578. C1FIFOCON22 : longWord;
  22579. C1FIFOCON22CLR : longWord;
  22580. C1FIFOCON22SET : longWord;
  22581. C1FIFOCON22INV : longWord;
  22582. C1FIFOINT22bits : TCAN1_C1FIFOINT22;
  22583. C1FIFOINT22 : longWord;
  22584. C1FIFOINT22CLR : longWord;
  22585. C1FIFOINT22SET : longWord;
  22586. C1FIFOINT22INV : longWord;
  22587. C1FIFOUA22 : longWord;
  22588. C1FIFOUA22CLR : longWord;
  22589. C1FIFOUA22SET : longWord;
  22590. C1FIFOUA22INV : longWord;
  22591. C1FIFOCI22bits : TCAN1_C1FIFOCI22;
  22592. C1FIFOCI22 : longWord;
  22593. C1FIFOCI22CLR : longWord;
  22594. C1FIFOCI22SET : longWord;
  22595. C1FIFOCI22INV : longWord;
  22596. C1FIFOCON23bits : TCAN1_C1FIFOCON23;
  22597. C1FIFOCON23 : longWord;
  22598. C1FIFOCON23CLR : longWord;
  22599. C1FIFOCON23SET : longWord;
  22600. C1FIFOCON23INV : longWord;
  22601. C1FIFOINT23bits : TCAN1_C1FIFOINT23;
  22602. C1FIFOINT23 : longWord;
  22603. C1FIFOINT23CLR : longWord;
  22604. C1FIFOINT23SET : longWord;
  22605. C1FIFOINT23INV : longWord;
  22606. C1FIFOUA23 : longWord;
  22607. C1FIFOUA23CLR : longWord;
  22608. C1FIFOUA23SET : longWord;
  22609. C1FIFOUA23INV : longWord;
  22610. C1FIFOCI23bits : TCAN1_C1FIFOCI23;
  22611. C1FIFOCI23 : longWord;
  22612. C1FIFOCI23CLR : longWord;
  22613. C1FIFOCI23SET : longWord;
  22614. C1FIFOCI23INV : longWord;
  22615. C1FIFOCON24bits : TCAN1_C1FIFOCON24;
  22616. C1FIFOCON24 : longWord;
  22617. C1FIFOCON24CLR : longWord;
  22618. C1FIFOCON24SET : longWord;
  22619. C1FIFOCON24INV : longWord;
  22620. C1FIFOINT24bits : TCAN1_C1FIFOINT24;
  22621. C1FIFOINT24 : longWord;
  22622. C1FIFOINT24CLR : longWord;
  22623. C1FIFOINT24SET : longWord;
  22624. C1FIFOINT24INV : longWord;
  22625. C1FIFOUA24 : longWord;
  22626. C1FIFOUA24CLR : longWord;
  22627. C1FIFOUA24SET : longWord;
  22628. C1FIFOUA24INV : longWord;
  22629. C1FIFOCI24bits : TCAN1_C1FIFOCI24;
  22630. C1FIFOCI24 : longWord;
  22631. C1FIFOCI24CLR : longWord;
  22632. C1FIFOCI24SET : longWord;
  22633. C1FIFOCI24INV : longWord;
  22634. C1FIFOCON25bits : TCAN1_C1FIFOCON25;
  22635. C1FIFOCON25 : longWord;
  22636. C1FIFOCON25CLR : longWord;
  22637. C1FIFOCON25SET : longWord;
  22638. C1FIFOCON25INV : longWord;
  22639. C1FIFOINT25bits : TCAN1_C1FIFOINT25;
  22640. C1FIFOINT25 : longWord;
  22641. C1FIFOINT25CLR : longWord;
  22642. C1FIFOINT25SET : longWord;
  22643. C1FIFOINT25INV : longWord;
  22644. C1FIFOUA25 : longWord;
  22645. C1FIFOUA25CLR : longWord;
  22646. C1FIFOUA25SET : longWord;
  22647. C1FIFOUA25INV : longWord;
  22648. C1FIFOCI25bits : TCAN1_C1FIFOCI25;
  22649. C1FIFOCI25 : longWord;
  22650. C1FIFOCI25CLR : longWord;
  22651. C1FIFOCI25SET : longWord;
  22652. C1FIFOCI25INV : longWord;
  22653. C1FIFOCON26bits : TCAN1_C1FIFOCON26;
  22654. C1FIFOCON26 : longWord;
  22655. C1FIFOCON26CLR : longWord;
  22656. C1FIFOCON26SET : longWord;
  22657. C1FIFOCON26INV : longWord;
  22658. C1FIFOINT26bits : TCAN1_C1FIFOINT26;
  22659. C1FIFOINT26 : longWord;
  22660. C1FIFOINT26CLR : longWord;
  22661. C1FIFOINT26SET : longWord;
  22662. C1FIFOINT26INV : longWord;
  22663. C1FIFOUA26 : longWord;
  22664. C1FIFOUA26CLR : longWord;
  22665. C1FIFOUA26SET : longWord;
  22666. C1FIFOUA26INV : longWord;
  22667. C1FIFOCI26bits : TCAN1_C1FIFOCI26;
  22668. C1FIFOCI26 : longWord;
  22669. C1FIFOCI26CLR : longWord;
  22670. C1FIFOCI26SET : longWord;
  22671. C1FIFOCI26INV : longWord;
  22672. C1FIFOCON27bits : TCAN1_C1FIFOCON27;
  22673. C1FIFOCON27 : longWord;
  22674. C1FIFOCON27CLR : longWord;
  22675. C1FIFOCON27SET : longWord;
  22676. C1FIFOCON27INV : longWord;
  22677. C1FIFOINT27bits : TCAN1_C1FIFOINT27;
  22678. C1FIFOINT27 : longWord;
  22679. C1FIFOINT27CLR : longWord;
  22680. C1FIFOINT27SET : longWord;
  22681. C1FIFOINT27INV : longWord;
  22682. C1FIFOUA27 : longWord;
  22683. C1FIFOUA27CLR : longWord;
  22684. C1FIFOUA27SET : longWord;
  22685. C1FIFOUA27INV : longWord;
  22686. C1FIFOCI27bits : TCAN1_C1FIFOCI27;
  22687. C1FIFOCI27 : longWord;
  22688. C1FIFOCI27CLR : longWord;
  22689. C1FIFOCI27SET : longWord;
  22690. C1FIFOCI27INV : longWord;
  22691. C1FIFOCON28bits : TCAN1_C1FIFOCON28;
  22692. C1FIFOCON28 : longWord;
  22693. C1FIFOCON28CLR : longWord;
  22694. C1FIFOCON28SET : longWord;
  22695. C1FIFOCON28INV : longWord;
  22696. C1FIFOINT28bits : TCAN1_C1FIFOINT28;
  22697. C1FIFOINT28 : longWord;
  22698. C1FIFOINT28CLR : longWord;
  22699. C1FIFOINT28SET : longWord;
  22700. C1FIFOINT28INV : longWord;
  22701. C1FIFOUA28 : longWord;
  22702. C1FIFOUA28CLR : longWord;
  22703. C1FIFOUA28SET : longWord;
  22704. C1FIFOUA28INV : longWord;
  22705. C1FIFOCI28bits : TCAN1_C1FIFOCI28;
  22706. C1FIFOCI28 : longWord;
  22707. C1FIFOCI28CLR : longWord;
  22708. C1FIFOCI28SET : longWord;
  22709. C1FIFOCI28INV : longWord;
  22710. C1FIFOCON29bits : TCAN1_C1FIFOCON29;
  22711. C1FIFOCON29 : longWord;
  22712. C1FIFOCON29CLR : longWord;
  22713. C1FIFOCON29SET : longWord;
  22714. C1FIFOCON29INV : longWord;
  22715. C1FIFOINT29bits : TCAN1_C1FIFOINT29;
  22716. C1FIFOINT29 : longWord;
  22717. C1FIFOINT29CLR : longWord;
  22718. C1FIFOINT29SET : longWord;
  22719. C1FIFOINT29INV : longWord;
  22720. C1FIFOUA29 : longWord;
  22721. C1FIFOUA29CLR : longWord;
  22722. C1FIFOUA29SET : longWord;
  22723. C1FIFOUA29INV : longWord;
  22724. C1FIFOCI29bits : TCAN1_C1FIFOCI29;
  22725. C1FIFOCI29 : longWord;
  22726. C1FIFOCI29CLR : longWord;
  22727. C1FIFOCI29SET : longWord;
  22728. C1FIFOCI29INV : longWord;
  22729. C1FIFOCON30bits : TCAN1_C1FIFOCON30;
  22730. C1FIFOCON30 : longWord;
  22731. C1FIFOCON30CLR : longWord;
  22732. C1FIFOCON30SET : longWord;
  22733. C1FIFOCON30INV : longWord;
  22734. C1FIFOINT30bits : TCAN1_C1FIFOINT30;
  22735. C1FIFOINT30 : longWord;
  22736. C1FIFOINT30CLR : longWord;
  22737. C1FIFOINT30SET : longWord;
  22738. C1FIFOINT30INV : longWord;
  22739. C1FIFOUA30 : longWord;
  22740. C1FIFOUA30CLR : longWord;
  22741. C1FIFOUA30SET : longWord;
  22742. C1FIFOUA30INV : longWord;
  22743. C1FIFOCI30bits : TCAN1_C1FIFOCI30;
  22744. C1FIFOCI30 : longWord;
  22745. C1FIFOCI30CLR : longWord;
  22746. C1FIFOCI30SET : longWord;
  22747. C1FIFOCI30INV : longWord;
  22748. C1FIFOCON31bits : TCAN1_C1FIFOCON31;
  22749. C1FIFOCON31 : longWord;
  22750. C1FIFOCON31CLR : longWord;
  22751. C1FIFOCON31SET : longWord;
  22752. C1FIFOCON31INV : longWord;
  22753. C1FIFOINT31bits : TCAN1_C1FIFOINT31;
  22754. C1FIFOINT31 : longWord;
  22755. C1FIFOINT31CLR : longWord;
  22756. C1FIFOINT31SET : longWord;
  22757. C1FIFOINT31INV : longWord;
  22758. C1FIFOUA31 : longWord;
  22759. C1FIFOUA31CLR : longWord;
  22760. C1FIFOUA31SET : longWord;
  22761. C1FIFOUA31INV : longWord;
  22762. C1FIFOCI31bits : TCAN1_C1FIFOCI31;
  22763. C1FIFOCI31 : longWord;
  22764. C1FIFOCI31CLR : longWord;
  22765. C1FIFOCI31SET : longWord;
  22766. C1FIFOCI31INV : longWord;
  22767. end;
  22768. TCAN2_C2CON = record
  22769. private
  22770. function getABAT : TBits_1; inline;
  22771. function getCANBUSY : TBits_1; inline;
  22772. function getCANCAP : TBits_1; inline;
  22773. function getDNCNT : TBits_5; inline;
  22774. function getON : TBits_1; inline;
  22775. function getOPMOD : TBits_3; inline;
  22776. function getREQOP : TBits_3; inline;
  22777. function getSIDL : TBits_1; inline;
  22778. function getw : TBits_32; inline;
  22779. procedure setABAT(thebits : TBits_1); inline;
  22780. procedure setCANBUSY(thebits : TBits_1); inline;
  22781. procedure setCANCAP(thebits : TBits_1); inline;
  22782. procedure setDNCNT(thebits : TBits_5); inline;
  22783. procedure setON(thebits : TBits_1); inline;
  22784. procedure setOPMOD(thebits : TBits_3); inline;
  22785. procedure setREQOP(thebits : TBits_3); inline;
  22786. procedure setSIDL(thebits : TBits_1); inline;
  22787. procedure setw(thebits : TBits_32); inline;
  22788. public
  22789. procedure clearABAT; inline;
  22790. procedure clearCANBUSY; inline;
  22791. procedure clearCANCAP; inline;
  22792. procedure clearON; inline;
  22793. procedure clearSIDL; inline;
  22794. procedure setABAT; inline;
  22795. procedure setCANBUSY; inline;
  22796. procedure setCANCAP; inline;
  22797. procedure setON; inline;
  22798. procedure setSIDL; inline;
  22799. property ABAT : TBits_1 read getABAT write setABAT;
  22800. property CANBUSY : TBits_1 read getCANBUSY write setCANBUSY;
  22801. property CANCAP : TBits_1 read getCANCAP write setCANCAP;
  22802. property DNCNT : TBits_5 read getDNCNT write setDNCNT;
  22803. property ON : TBits_1 read getON write setON;
  22804. property OPMOD : TBits_3 read getOPMOD write setOPMOD;
  22805. property REQOP : TBits_3 read getREQOP write setREQOP;
  22806. property SIDL : TBits_1 read getSIDL write setSIDL;
  22807. property w : TBits_32 read getw write setw;
  22808. end;
  22809. TCAN2_C2CFG = record
  22810. private
  22811. function getBRP : TBits_6; inline;
  22812. function getPRSEG : TBits_3; inline;
  22813. function getSAM : TBits_1; inline;
  22814. function getSEG1PH : TBits_3; inline;
  22815. function getSEG2PH : TBits_3; inline;
  22816. function getSEG2PHTS : TBits_1; inline;
  22817. function getSJW : TBits_2; inline;
  22818. function getWAKFIL : TBits_1; inline;
  22819. function getw : TBits_32; inline;
  22820. procedure setBRP(thebits : TBits_6); inline;
  22821. procedure setPRSEG(thebits : TBits_3); inline;
  22822. procedure setSAM(thebits : TBits_1); inline;
  22823. procedure setSEG1PH(thebits : TBits_3); inline;
  22824. procedure setSEG2PH(thebits : TBits_3); inline;
  22825. procedure setSEG2PHTS(thebits : TBits_1); inline;
  22826. procedure setSJW(thebits : TBits_2); inline;
  22827. procedure setWAKFIL(thebits : TBits_1); inline;
  22828. procedure setw(thebits : TBits_32); inline;
  22829. public
  22830. procedure clearSAM; inline;
  22831. procedure clearSEG2PHTS; inline;
  22832. procedure clearWAKFIL; inline;
  22833. procedure setSAM; inline;
  22834. procedure setSEG2PHTS; inline;
  22835. procedure setWAKFIL; inline;
  22836. property BRP : TBits_6 read getBRP write setBRP;
  22837. property PRSEG : TBits_3 read getPRSEG write setPRSEG;
  22838. property SAM : TBits_1 read getSAM write setSAM;
  22839. property SEG1PH : TBits_3 read getSEG1PH write setSEG1PH;
  22840. property SEG2PH : TBits_3 read getSEG2PH write setSEG2PH;
  22841. property SEG2PHTS : TBits_1 read getSEG2PHTS write setSEG2PHTS;
  22842. property SJW : TBits_2 read getSJW write setSJW;
  22843. property WAKFIL : TBits_1 read getWAKFIL write setWAKFIL;
  22844. property w : TBits_32 read getw write setw;
  22845. end;
  22846. TCAN2_C2INT = record
  22847. private
  22848. function getCERRIE : TBits_1; inline;
  22849. function getCERRIF : TBits_1; inline;
  22850. function getCTMRIE : TBits_1; inline;
  22851. function getCTMRIF : TBits_1; inline;
  22852. function getIVRIE : TBits_1; inline;
  22853. function getIVRIF : TBits_1; inline;
  22854. function getMODIE : TBits_1; inline;
  22855. function getMODIF : TBits_1; inline;
  22856. function getRBIE : TBits_1; inline;
  22857. function getRBIF : TBits_1; inline;
  22858. function getRBOVIE : TBits_1; inline;
  22859. function getRBOVIF : TBits_1; inline;
  22860. function getSERRIE : TBits_1; inline;
  22861. function getSERRIF : TBits_1; inline;
  22862. function getTBIE : TBits_1; inline;
  22863. function getTBIF : TBits_1; inline;
  22864. function getWAKIE : TBits_1; inline;
  22865. function getWAKIF : TBits_1; inline;
  22866. function getw : TBits_32; inline;
  22867. procedure setCERRIE(thebits : TBits_1); inline;
  22868. procedure setCERRIF(thebits : TBits_1); inline;
  22869. procedure setCTMRIE(thebits : TBits_1); inline;
  22870. procedure setCTMRIF(thebits : TBits_1); inline;
  22871. procedure setIVRIE(thebits : TBits_1); inline;
  22872. procedure setIVRIF(thebits : TBits_1); inline;
  22873. procedure setMODIE(thebits : TBits_1); inline;
  22874. procedure setMODIF(thebits : TBits_1); inline;
  22875. procedure setRBIE(thebits : TBits_1); inline;
  22876. procedure setRBIF(thebits : TBits_1); inline;
  22877. procedure setRBOVIE(thebits : TBits_1); inline;
  22878. procedure setRBOVIF(thebits : TBits_1); inline;
  22879. procedure setSERRIE(thebits : TBits_1); inline;
  22880. procedure setSERRIF(thebits : TBits_1); inline;
  22881. procedure setTBIE(thebits : TBits_1); inline;
  22882. procedure setTBIF(thebits : TBits_1); inline;
  22883. procedure setWAKIE(thebits : TBits_1); inline;
  22884. procedure setWAKIF(thebits : TBits_1); inline;
  22885. procedure setw(thebits : TBits_32); inline;
  22886. public
  22887. procedure clearCERRIE; inline;
  22888. procedure clearCERRIF; inline;
  22889. procedure clearCTMRIE; inline;
  22890. procedure clearCTMRIF; inline;
  22891. procedure clearIVRIE; inline;
  22892. procedure clearIVRIF; inline;
  22893. procedure clearMODIE; inline;
  22894. procedure clearMODIF; inline;
  22895. procedure clearRBIE; inline;
  22896. procedure clearRBIF; inline;
  22897. procedure clearRBOVIE; inline;
  22898. procedure clearRBOVIF; inline;
  22899. procedure clearSERRIE; inline;
  22900. procedure clearSERRIF; inline;
  22901. procedure clearTBIE; inline;
  22902. procedure clearTBIF; inline;
  22903. procedure clearWAKIE; inline;
  22904. procedure clearWAKIF; inline;
  22905. procedure setCERRIE; inline;
  22906. procedure setCERRIF; inline;
  22907. procedure setCTMRIE; inline;
  22908. procedure setCTMRIF; inline;
  22909. procedure setIVRIE; inline;
  22910. procedure setIVRIF; inline;
  22911. procedure setMODIE; inline;
  22912. procedure setMODIF; inline;
  22913. procedure setRBIE; inline;
  22914. procedure setRBIF; inline;
  22915. procedure setRBOVIE; inline;
  22916. procedure setRBOVIF; inline;
  22917. procedure setSERRIE; inline;
  22918. procedure setSERRIF; inline;
  22919. procedure setTBIE; inline;
  22920. procedure setTBIF; inline;
  22921. procedure setWAKIE; inline;
  22922. procedure setWAKIF; inline;
  22923. property CERRIE : TBits_1 read getCERRIE write setCERRIE;
  22924. property CERRIF : TBits_1 read getCERRIF write setCERRIF;
  22925. property CTMRIE : TBits_1 read getCTMRIE write setCTMRIE;
  22926. property CTMRIF : TBits_1 read getCTMRIF write setCTMRIF;
  22927. property IVRIE : TBits_1 read getIVRIE write setIVRIE;
  22928. property IVRIF : TBits_1 read getIVRIF write setIVRIF;
  22929. property MODIE : TBits_1 read getMODIE write setMODIE;
  22930. property MODIF : TBits_1 read getMODIF write setMODIF;
  22931. property RBIE : TBits_1 read getRBIE write setRBIE;
  22932. property RBIF : TBits_1 read getRBIF write setRBIF;
  22933. property RBOVIE : TBits_1 read getRBOVIE write setRBOVIE;
  22934. property RBOVIF : TBits_1 read getRBOVIF write setRBOVIF;
  22935. property SERRIE : TBits_1 read getSERRIE write setSERRIE;
  22936. property SERRIF : TBits_1 read getSERRIF write setSERRIF;
  22937. property TBIE : TBits_1 read getTBIE write setTBIE;
  22938. property TBIF : TBits_1 read getTBIF write setTBIF;
  22939. property WAKIE : TBits_1 read getWAKIE write setWAKIE;
  22940. property WAKIF : TBits_1 read getWAKIF write setWAKIF;
  22941. property w : TBits_32 read getw write setw;
  22942. end;
  22943. TCAN2_C2VEC = record
  22944. private
  22945. function getFILHIT : TBits_5; inline;
  22946. function getICODE : TBits_7; inline;
  22947. function getw : TBits_32; inline;
  22948. procedure setFILHIT(thebits : TBits_5); inline;
  22949. procedure setICODE(thebits : TBits_7); inline;
  22950. procedure setw(thebits : TBits_32); inline;
  22951. public
  22952. property FILHIT : TBits_5 read getFILHIT write setFILHIT;
  22953. property ICODE : TBits_7 read getICODE write setICODE;
  22954. property w : TBits_32 read getw write setw;
  22955. end;
  22956. TCAN2_C2TREC = record
  22957. private
  22958. function getEWARN : TBits_1; inline;
  22959. function getRERRCNT : TBits_8; inline;
  22960. function getRXBP : TBits_1; inline;
  22961. function getRXWARN : TBits_1; inline;
  22962. function getTERRCNT : TBits_8; inline;
  22963. function getTXBO : TBits_1; inline;
  22964. function getTXBP : TBits_1; inline;
  22965. function getTXWARN : TBits_1; inline;
  22966. function getw : TBits_32; inline;
  22967. procedure setEWARN(thebits : TBits_1); inline;
  22968. procedure setRERRCNT(thebits : TBits_8); inline;
  22969. procedure setRXBP(thebits : TBits_1); inline;
  22970. procedure setRXWARN(thebits : TBits_1); inline;
  22971. procedure setTERRCNT(thebits : TBits_8); inline;
  22972. procedure setTXBO(thebits : TBits_1); inline;
  22973. procedure setTXBP(thebits : TBits_1); inline;
  22974. procedure setTXWARN(thebits : TBits_1); inline;
  22975. procedure setw(thebits : TBits_32); inline;
  22976. public
  22977. procedure clearEWARN; inline;
  22978. procedure clearRXBP; inline;
  22979. procedure clearRXWARN; inline;
  22980. procedure clearTXBO; inline;
  22981. procedure clearTXBP; inline;
  22982. procedure clearTXWARN; inline;
  22983. procedure setEWARN; inline;
  22984. procedure setRXBP; inline;
  22985. procedure setRXWARN; inline;
  22986. procedure setTXBO; inline;
  22987. procedure setTXBP; inline;
  22988. procedure setTXWARN; inline;
  22989. property EWARN : TBits_1 read getEWARN write setEWARN;
  22990. property RERRCNT : TBits_8 read getRERRCNT write setRERRCNT;
  22991. property RXBP : TBits_1 read getRXBP write setRXBP;
  22992. property RXWARN : TBits_1 read getRXWARN write setRXWARN;
  22993. property TERRCNT : TBits_8 read getTERRCNT write setTERRCNT;
  22994. property TXBO : TBits_1 read getTXBO write setTXBO;
  22995. property TXBP : TBits_1 read getTXBP write setTXBP;
  22996. property TXWARN : TBits_1 read getTXWARN write setTXWARN;
  22997. property w : TBits_32 read getw write setw;
  22998. end;
  22999. TCAN2_C2FSTAT = record
  23000. private
  23001. function getFIFOIP : TBits_32; inline;
  23002. function getFIFOIP0 : TBits_1; inline;
  23003. function getFIFOIP1 : TBits_1; inline;
  23004. function getFIFOIP10 : TBits_1; inline;
  23005. function getFIFOIP11 : TBits_1; inline;
  23006. function getFIFOIP12 : TBits_1; inline;
  23007. function getFIFOIP13 : TBits_1; inline;
  23008. function getFIFOIP14 : TBits_1; inline;
  23009. function getFIFOIP15 : TBits_1; inline;
  23010. function getFIFOIP16 : TBits_1; inline;
  23011. function getFIFOIP17 : TBits_1; inline;
  23012. function getFIFOIP18 : TBits_1; inline;
  23013. function getFIFOIP19 : TBits_1; inline;
  23014. function getFIFOIP2 : TBits_1; inline;
  23015. function getFIFOIP20 : TBits_1; inline;
  23016. function getFIFOIP21 : TBits_1; inline;
  23017. function getFIFOIP22 : TBits_1; inline;
  23018. function getFIFOIP23 : TBits_1; inline;
  23019. function getFIFOIP24 : TBits_1; inline;
  23020. function getFIFOIP25 : TBits_1; inline;
  23021. function getFIFOIP26 : TBits_1; inline;
  23022. function getFIFOIP27 : TBits_1; inline;
  23023. function getFIFOIP28 : TBits_1; inline;
  23024. function getFIFOIP29 : TBits_1; inline;
  23025. function getFIFOIP3 : TBits_1; inline;
  23026. function getFIFOIP30 : TBits_1; inline;
  23027. function getFIFOIP31 : TBits_1; inline;
  23028. function getFIFOIP4 : TBits_1; inline;
  23029. function getFIFOIP5 : TBits_1; inline;
  23030. function getFIFOIP6 : TBits_1; inline;
  23031. function getFIFOIP7 : TBits_1; inline;
  23032. function getFIFOIP8 : TBits_1; inline;
  23033. function getFIFOIP9 : TBits_1; inline;
  23034. function getw : TBits_32; inline;
  23035. procedure setFIFOIP(thebits : TBits_32); inline;
  23036. procedure setFIFOIP0(thebits : TBits_1); inline;
  23037. procedure setFIFOIP1(thebits : TBits_1); inline;
  23038. procedure setFIFOIP10(thebits : TBits_1); inline;
  23039. procedure setFIFOIP11(thebits : TBits_1); inline;
  23040. procedure setFIFOIP12(thebits : TBits_1); inline;
  23041. procedure setFIFOIP13(thebits : TBits_1); inline;
  23042. procedure setFIFOIP14(thebits : TBits_1); inline;
  23043. procedure setFIFOIP15(thebits : TBits_1); inline;
  23044. procedure setFIFOIP16(thebits : TBits_1); inline;
  23045. procedure setFIFOIP17(thebits : TBits_1); inline;
  23046. procedure setFIFOIP18(thebits : TBits_1); inline;
  23047. procedure setFIFOIP19(thebits : TBits_1); inline;
  23048. procedure setFIFOIP2(thebits : TBits_1); inline;
  23049. procedure setFIFOIP20(thebits : TBits_1); inline;
  23050. procedure setFIFOIP21(thebits : TBits_1); inline;
  23051. procedure setFIFOIP22(thebits : TBits_1); inline;
  23052. procedure setFIFOIP23(thebits : TBits_1); inline;
  23053. procedure setFIFOIP24(thebits : TBits_1); inline;
  23054. procedure setFIFOIP25(thebits : TBits_1); inline;
  23055. procedure setFIFOIP26(thebits : TBits_1); inline;
  23056. procedure setFIFOIP27(thebits : TBits_1); inline;
  23057. procedure setFIFOIP28(thebits : TBits_1); inline;
  23058. procedure setFIFOIP29(thebits : TBits_1); inline;
  23059. procedure setFIFOIP3(thebits : TBits_1); inline;
  23060. procedure setFIFOIP30(thebits : TBits_1); inline;
  23061. procedure setFIFOIP31(thebits : TBits_1); inline;
  23062. procedure setFIFOIP4(thebits : TBits_1); inline;
  23063. procedure setFIFOIP5(thebits : TBits_1); inline;
  23064. procedure setFIFOIP6(thebits : TBits_1); inline;
  23065. procedure setFIFOIP7(thebits : TBits_1); inline;
  23066. procedure setFIFOIP8(thebits : TBits_1); inline;
  23067. procedure setFIFOIP9(thebits : TBits_1); inline;
  23068. procedure setw(thebits : TBits_32); inline;
  23069. public
  23070. procedure clearFIFOIP0; inline;
  23071. procedure clearFIFOIP10; inline;
  23072. procedure clearFIFOIP11; inline;
  23073. procedure clearFIFOIP12; inline;
  23074. procedure clearFIFOIP13; inline;
  23075. procedure clearFIFOIP14; inline;
  23076. procedure clearFIFOIP15; inline;
  23077. procedure clearFIFOIP16; inline;
  23078. procedure clearFIFOIP17; inline;
  23079. procedure clearFIFOIP18; inline;
  23080. procedure clearFIFOIP19; inline;
  23081. procedure clearFIFOIP1; inline;
  23082. procedure clearFIFOIP20; inline;
  23083. procedure clearFIFOIP21; inline;
  23084. procedure clearFIFOIP22; inline;
  23085. procedure clearFIFOIP23; inline;
  23086. procedure clearFIFOIP24; inline;
  23087. procedure clearFIFOIP25; inline;
  23088. procedure clearFIFOIP26; inline;
  23089. procedure clearFIFOIP27; inline;
  23090. procedure clearFIFOIP28; inline;
  23091. procedure clearFIFOIP29; inline;
  23092. procedure clearFIFOIP2; inline;
  23093. procedure clearFIFOIP30; inline;
  23094. procedure clearFIFOIP31; inline;
  23095. procedure clearFIFOIP3; inline;
  23096. procedure clearFIFOIP4; inline;
  23097. procedure clearFIFOIP5; inline;
  23098. procedure clearFIFOIP6; inline;
  23099. procedure clearFIFOIP7; inline;
  23100. procedure clearFIFOIP8; inline;
  23101. procedure clearFIFOIP9; inline;
  23102. procedure setFIFOIP0; inline;
  23103. procedure setFIFOIP10; inline;
  23104. procedure setFIFOIP11; inline;
  23105. procedure setFIFOIP12; inline;
  23106. procedure setFIFOIP13; inline;
  23107. procedure setFIFOIP14; inline;
  23108. procedure setFIFOIP15; inline;
  23109. procedure setFIFOIP16; inline;
  23110. procedure setFIFOIP17; inline;
  23111. procedure setFIFOIP18; inline;
  23112. procedure setFIFOIP19; inline;
  23113. procedure setFIFOIP1; inline;
  23114. procedure setFIFOIP20; inline;
  23115. procedure setFIFOIP21; inline;
  23116. procedure setFIFOIP22; inline;
  23117. procedure setFIFOIP23; inline;
  23118. procedure setFIFOIP24; inline;
  23119. procedure setFIFOIP25; inline;
  23120. procedure setFIFOIP26; inline;
  23121. procedure setFIFOIP27; inline;
  23122. procedure setFIFOIP28; inline;
  23123. procedure setFIFOIP29; inline;
  23124. procedure setFIFOIP2; inline;
  23125. procedure setFIFOIP30; inline;
  23126. procedure setFIFOIP31; inline;
  23127. procedure setFIFOIP3; inline;
  23128. procedure setFIFOIP4; inline;
  23129. procedure setFIFOIP5; inline;
  23130. procedure setFIFOIP6; inline;
  23131. procedure setFIFOIP7; inline;
  23132. procedure setFIFOIP8; inline;
  23133. procedure setFIFOIP9; inline;
  23134. property FIFOIP : TBits_32 read getFIFOIP write setFIFOIP;
  23135. property FIFOIP0 : TBits_1 read getFIFOIP0 write setFIFOIP0;
  23136. property FIFOIP1 : TBits_1 read getFIFOIP1 write setFIFOIP1;
  23137. property FIFOIP10 : TBits_1 read getFIFOIP10 write setFIFOIP10;
  23138. property FIFOIP11 : TBits_1 read getFIFOIP11 write setFIFOIP11;
  23139. property FIFOIP12 : TBits_1 read getFIFOIP12 write setFIFOIP12;
  23140. property FIFOIP13 : TBits_1 read getFIFOIP13 write setFIFOIP13;
  23141. property FIFOIP14 : TBits_1 read getFIFOIP14 write setFIFOIP14;
  23142. property FIFOIP15 : TBits_1 read getFIFOIP15 write setFIFOIP15;
  23143. property FIFOIP16 : TBits_1 read getFIFOIP16 write setFIFOIP16;
  23144. property FIFOIP17 : TBits_1 read getFIFOIP17 write setFIFOIP17;
  23145. property FIFOIP18 : TBits_1 read getFIFOIP18 write setFIFOIP18;
  23146. property FIFOIP19 : TBits_1 read getFIFOIP19 write setFIFOIP19;
  23147. property FIFOIP2 : TBits_1 read getFIFOIP2 write setFIFOIP2;
  23148. property FIFOIP20 : TBits_1 read getFIFOIP20 write setFIFOIP20;
  23149. property FIFOIP21 : TBits_1 read getFIFOIP21 write setFIFOIP21;
  23150. property FIFOIP22 : TBits_1 read getFIFOIP22 write setFIFOIP22;
  23151. property FIFOIP23 : TBits_1 read getFIFOIP23 write setFIFOIP23;
  23152. property FIFOIP24 : TBits_1 read getFIFOIP24 write setFIFOIP24;
  23153. property FIFOIP25 : TBits_1 read getFIFOIP25 write setFIFOIP25;
  23154. property FIFOIP26 : TBits_1 read getFIFOIP26 write setFIFOIP26;
  23155. property FIFOIP27 : TBits_1 read getFIFOIP27 write setFIFOIP27;
  23156. property FIFOIP28 : TBits_1 read getFIFOIP28 write setFIFOIP28;
  23157. property FIFOIP29 : TBits_1 read getFIFOIP29 write setFIFOIP29;
  23158. property FIFOIP3 : TBits_1 read getFIFOIP3 write setFIFOIP3;
  23159. property FIFOIP30 : TBits_1 read getFIFOIP30 write setFIFOIP30;
  23160. property FIFOIP31 : TBits_1 read getFIFOIP31 write setFIFOIP31;
  23161. property FIFOIP4 : TBits_1 read getFIFOIP4 write setFIFOIP4;
  23162. property FIFOIP5 : TBits_1 read getFIFOIP5 write setFIFOIP5;
  23163. property FIFOIP6 : TBits_1 read getFIFOIP6 write setFIFOIP6;
  23164. property FIFOIP7 : TBits_1 read getFIFOIP7 write setFIFOIP7;
  23165. property FIFOIP8 : TBits_1 read getFIFOIP8 write setFIFOIP8;
  23166. property FIFOIP9 : TBits_1 read getFIFOIP9 write setFIFOIP9;
  23167. property w : TBits_32 read getw write setw;
  23168. end;
  23169. TCAN2_C2RXOVF = record
  23170. private
  23171. function getRXOVF : TBits_32; inline;
  23172. function getRXOVF0 : TBits_1; inline;
  23173. function getRXOVF1 : TBits_1; inline;
  23174. function getRXOVF10 : TBits_1; inline;
  23175. function getRXOVF11 : TBits_1; inline;
  23176. function getRXOVF12 : TBits_1; inline;
  23177. function getRXOVF13 : TBits_1; inline;
  23178. function getRXOVF14 : TBits_1; inline;
  23179. function getRXOVF15 : TBits_1; inline;
  23180. function getRXOVF16 : TBits_1; inline;
  23181. function getRXOVF17 : TBits_1; inline;
  23182. function getRXOVF18 : TBits_1; inline;
  23183. function getRXOVF19 : TBits_1; inline;
  23184. function getRXOVF2 : TBits_1; inline;
  23185. function getRXOVF20 : TBits_1; inline;
  23186. function getRXOVF21 : TBits_1; inline;
  23187. function getRXOVF22 : TBits_1; inline;
  23188. function getRXOVF23 : TBits_1; inline;
  23189. function getRXOVF24 : TBits_1; inline;
  23190. function getRXOVF25 : TBits_1; inline;
  23191. function getRXOVF26 : TBits_1; inline;
  23192. function getRXOVF27 : TBits_1; inline;
  23193. function getRXOVF28 : TBits_1; inline;
  23194. function getRXOVF29 : TBits_1; inline;
  23195. function getRXOVF3 : TBits_1; inline;
  23196. function getRXOVF30 : TBits_1; inline;
  23197. function getRXOVF31 : TBits_1; inline;
  23198. function getRXOVF4 : TBits_1; inline;
  23199. function getRXOVF5 : TBits_1; inline;
  23200. function getRXOVF6 : TBits_1; inline;
  23201. function getRXOVF7 : TBits_1; inline;
  23202. function getRXOVF8 : TBits_1; inline;
  23203. function getRXOVF9 : TBits_1; inline;
  23204. function getw : TBits_32; inline;
  23205. procedure setRXOVF(thebits : TBits_32); inline;
  23206. procedure setRXOVF0(thebits : TBits_1); inline;
  23207. procedure setRXOVF1(thebits : TBits_1); inline;
  23208. procedure setRXOVF10(thebits : TBits_1); inline;
  23209. procedure setRXOVF11(thebits : TBits_1); inline;
  23210. procedure setRXOVF12(thebits : TBits_1); inline;
  23211. procedure setRXOVF13(thebits : TBits_1); inline;
  23212. procedure setRXOVF14(thebits : TBits_1); inline;
  23213. procedure setRXOVF15(thebits : TBits_1); inline;
  23214. procedure setRXOVF16(thebits : TBits_1); inline;
  23215. procedure setRXOVF17(thebits : TBits_1); inline;
  23216. procedure setRXOVF18(thebits : TBits_1); inline;
  23217. procedure setRXOVF19(thebits : TBits_1); inline;
  23218. procedure setRXOVF2(thebits : TBits_1); inline;
  23219. procedure setRXOVF20(thebits : TBits_1); inline;
  23220. procedure setRXOVF21(thebits : TBits_1); inline;
  23221. procedure setRXOVF22(thebits : TBits_1); inline;
  23222. procedure setRXOVF23(thebits : TBits_1); inline;
  23223. procedure setRXOVF24(thebits : TBits_1); inline;
  23224. procedure setRXOVF25(thebits : TBits_1); inline;
  23225. procedure setRXOVF26(thebits : TBits_1); inline;
  23226. procedure setRXOVF27(thebits : TBits_1); inline;
  23227. procedure setRXOVF28(thebits : TBits_1); inline;
  23228. procedure setRXOVF29(thebits : TBits_1); inline;
  23229. procedure setRXOVF3(thebits : TBits_1); inline;
  23230. procedure setRXOVF30(thebits : TBits_1); inline;
  23231. procedure setRXOVF31(thebits : TBits_1); inline;
  23232. procedure setRXOVF4(thebits : TBits_1); inline;
  23233. procedure setRXOVF5(thebits : TBits_1); inline;
  23234. procedure setRXOVF6(thebits : TBits_1); inline;
  23235. procedure setRXOVF7(thebits : TBits_1); inline;
  23236. procedure setRXOVF8(thebits : TBits_1); inline;
  23237. procedure setRXOVF9(thebits : TBits_1); inline;
  23238. procedure setw(thebits : TBits_32); inline;
  23239. public
  23240. procedure clearRXOVF0; inline;
  23241. procedure clearRXOVF10; inline;
  23242. procedure clearRXOVF11; inline;
  23243. procedure clearRXOVF12; inline;
  23244. procedure clearRXOVF13; inline;
  23245. procedure clearRXOVF14; inline;
  23246. procedure clearRXOVF15; inline;
  23247. procedure clearRXOVF16; inline;
  23248. procedure clearRXOVF17; inline;
  23249. procedure clearRXOVF18; inline;
  23250. procedure clearRXOVF19; inline;
  23251. procedure clearRXOVF1; inline;
  23252. procedure clearRXOVF20; inline;
  23253. procedure clearRXOVF21; inline;
  23254. procedure clearRXOVF22; inline;
  23255. procedure clearRXOVF23; inline;
  23256. procedure clearRXOVF24; inline;
  23257. procedure clearRXOVF25; inline;
  23258. procedure clearRXOVF26; inline;
  23259. procedure clearRXOVF27; inline;
  23260. procedure clearRXOVF28; inline;
  23261. procedure clearRXOVF29; inline;
  23262. procedure clearRXOVF2; inline;
  23263. procedure clearRXOVF30; inline;
  23264. procedure clearRXOVF31; inline;
  23265. procedure clearRXOVF3; inline;
  23266. procedure clearRXOVF4; inline;
  23267. procedure clearRXOVF5; inline;
  23268. procedure clearRXOVF6; inline;
  23269. procedure clearRXOVF7; inline;
  23270. procedure clearRXOVF8; inline;
  23271. procedure clearRXOVF9; inline;
  23272. procedure setRXOVF0; inline;
  23273. procedure setRXOVF10; inline;
  23274. procedure setRXOVF11; inline;
  23275. procedure setRXOVF12; inline;
  23276. procedure setRXOVF13; inline;
  23277. procedure setRXOVF14; inline;
  23278. procedure setRXOVF15; inline;
  23279. procedure setRXOVF16; inline;
  23280. procedure setRXOVF17; inline;
  23281. procedure setRXOVF18; inline;
  23282. procedure setRXOVF19; inline;
  23283. procedure setRXOVF1; inline;
  23284. procedure setRXOVF20; inline;
  23285. procedure setRXOVF21; inline;
  23286. procedure setRXOVF22; inline;
  23287. procedure setRXOVF23; inline;
  23288. procedure setRXOVF24; inline;
  23289. procedure setRXOVF25; inline;
  23290. procedure setRXOVF26; inline;
  23291. procedure setRXOVF27; inline;
  23292. procedure setRXOVF28; inline;
  23293. procedure setRXOVF29; inline;
  23294. procedure setRXOVF2; inline;
  23295. procedure setRXOVF30; inline;
  23296. procedure setRXOVF31; inline;
  23297. procedure setRXOVF3; inline;
  23298. procedure setRXOVF4; inline;
  23299. procedure setRXOVF5; inline;
  23300. procedure setRXOVF6; inline;
  23301. procedure setRXOVF7; inline;
  23302. procedure setRXOVF8; inline;
  23303. procedure setRXOVF9; inline;
  23304. property RXOVF : TBits_32 read getRXOVF write setRXOVF;
  23305. property RXOVF0 : TBits_1 read getRXOVF0 write setRXOVF0;
  23306. property RXOVF1 : TBits_1 read getRXOVF1 write setRXOVF1;
  23307. property RXOVF10 : TBits_1 read getRXOVF10 write setRXOVF10;
  23308. property RXOVF11 : TBits_1 read getRXOVF11 write setRXOVF11;
  23309. property RXOVF12 : TBits_1 read getRXOVF12 write setRXOVF12;
  23310. property RXOVF13 : TBits_1 read getRXOVF13 write setRXOVF13;
  23311. property RXOVF14 : TBits_1 read getRXOVF14 write setRXOVF14;
  23312. property RXOVF15 : TBits_1 read getRXOVF15 write setRXOVF15;
  23313. property RXOVF16 : TBits_1 read getRXOVF16 write setRXOVF16;
  23314. property RXOVF17 : TBits_1 read getRXOVF17 write setRXOVF17;
  23315. property RXOVF18 : TBits_1 read getRXOVF18 write setRXOVF18;
  23316. property RXOVF19 : TBits_1 read getRXOVF19 write setRXOVF19;
  23317. property RXOVF2 : TBits_1 read getRXOVF2 write setRXOVF2;
  23318. property RXOVF20 : TBits_1 read getRXOVF20 write setRXOVF20;
  23319. property RXOVF21 : TBits_1 read getRXOVF21 write setRXOVF21;
  23320. property RXOVF22 : TBits_1 read getRXOVF22 write setRXOVF22;
  23321. property RXOVF23 : TBits_1 read getRXOVF23 write setRXOVF23;
  23322. property RXOVF24 : TBits_1 read getRXOVF24 write setRXOVF24;
  23323. property RXOVF25 : TBits_1 read getRXOVF25 write setRXOVF25;
  23324. property RXOVF26 : TBits_1 read getRXOVF26 write setRXOVF26;
  23325. property RXOVF27 : TBits_1 read getRXOVF27 write setRXOVF27;
  23326. property RXOVF28 : TBits_1 read getRXOVF28 write setRXOVF28;
  23327. property RXOVF29 : TBits_1 read getRXOVF29 write setRXOVF29;
  23328. property RXOVF3 : TBits_1 read getRXOVF3 write setRXOVF3;
  23329. property RXOVF30 : TBits_1 read getRXOVF30 write setRXOVF30;
  23330. property RXOVF31 : TBits_1 read getRXOVF31 write setRXOVF31;
  23331. property RXOVF4 : TBits_1 read getRXOVF4 write setRXOVF4;
  23332. property RXOVF5 : TBits_1 read getRXOVF5 write setRXOVF5;
  23333. property RXOVF6 : TBits_1 read getRXOVF6 write setRXOVF6;
  23334. property RXOVF7 : TBits_1 read getRXOVF7 write setRXOVF7;
  23335. property RXOVF8 : TBits_1 read getRXOVF8 write setRXOVF8;
  23336. property RXOVF9 : TBits_1 read getRXOVF9 write setRXOVF9;
  23337. property w : TBits_32 read getw write setw;
  23338. end;
  23339. TCAN2_C2TMR = record
  23340. private
  23341. function getCANTS : TBits_16; inline;
  23342. function getCANTSPRE : TBits_16; inline;
  23343. function getw : TBits_32; inline;
  23344. procedure setCANTS(thebits : TBits_16); inline;
  23345. procedure setCANTSPRE(thebits : TBits_16); inline;
  23346. procedure setw(thebits : TBits_32); inline;
  23347. public
  23348. property CANTS : TBits_16 read getCANTS write setCANTS;
  23349. property CANTSPRE : TBits_16 read getCANTSPRE write setCANTSPRE;
  23350. property w : TBits_32 read getw write setw;
  23351. end;
  23352. TCAN2_C2RXM0 = record
  23353. private
  23354. function getEID : TBits_18; inline;
  23355. function getMIDE : TBits_1; inline;
  23356. function getSID : TBits_11; inline;
  23357. function getw : TBits_32; inline;
  23358. procedure setEID(thebits : TBits_18); inline;
  23359. procedure setMIDE(thebits : TBits_1); inline;
  23360. procedure setSID(thebits : TBits_11); inline;
  23361. procedure setw(thebits : TBits_32); inline;
  23362. public
  23363. procedure clearMIDE; inline;
  23364. procedure setMIDE; inline;
  23365. property EID : TBits_18 read getEID write setEID;
  23366. property MIDE : TBits_1 read getMIDE write setMIDE;
  23367. property SID : TBits_11 read getSID write setSID;
  23368. property w : TBits_32 read getw write setw;
  23369. end;
  23370. TCAN2_C2RXM1 = record
  23371. private
  23372. function getEID : TBits_18; inline;
  23373. function getMIDE : TBits_1; inline;
  23374. function getSID : TBits_11; inline;
  23375. function getw : TBits_32; inline;
  23376. procedure setEID(thebits : TBits_18); inline;
  23377. procedure setMIDE(thebits : TBits_1); inline;
  23378. procedure setSID(thebits : TBits_11); inline;
  23379. procedure setw(thebits : TBits_32); inline;
  23380. public
  23381. procedure clearMIDE; inline;
  23382. procedure setMIDE; inline;
  23383. property EID : TBits_18 read getEID write setEID;
  23384. property MIDE : TBits_1 read getMIDE write setMIDE;
  23385. property SID : TBits_11 read getSID write setSID;
  23386. property w : TBits_32 read getw write setw;
  23387. end;
  23388. TCAN2_C2RXM2 = record
  23389. private
  23390. function getEID : TBits_18; inline;
  23391. function getMIDE : TBits_1; inline;
  23392. function getSID : TBits_11; inline;
  23393. function getw : TBits_32; inline;
  23394. procedure setEID(thebits : TBits_18); inline;
  23395. procedure setMIDE(thebits : TBits_1); inline;
  23396. procedure setSID(thebits : TBits_11); inline;
  23397. procedure setw(thebits : TBits_32); inline;
  23398. public
  23399. procedure clearMIDE; inline;
  23400. procedure setMIDE; inline;
  23401. property EID : TBits_18 read getEID write setEID;
  23402. property MIDE : TBits_1 read getMIDE write setMIDE;
  23403. property SID : TBits_11 read getSID write setSID;
  23404. property w : TBits_32 read getw write setw;
  23405. end;
  23406. TCAN2_C2RXM3 = record
  23407. private
  23408. function getEID : TBits_18; inline;
  23409. function getMIDE : TBits_1; inline;
  23410. function getSID : TBits_11; inline;
  23411. function getw : TBits_32; inline;
  23412. procedure setEID(thebits : TBits_18); inline;
  23413. procedure setMIDE(thebits : TBits_1); inline;
  23414. procedure setSID(thebits : TBits_11); inline;
  23415. procedure setw(thebits : TBits_32); inline;
  23416. public
  23417. procedure clearMIDE; inline;
  23418. procedure setMIDE; inline;
  23419. property EID : TBits_18 read getEID write setEID;
  23420. property MIDE : TBits_1 read getMIDE write setMIDE;
  23421. property SID : TBits_11 read getSID write setSID;
  23422. property w : TBits_32 read getw write setw;
  23423. end;
  23424. TCAN2_C2FLTCON0 = record
  23425. private
  23426. function getFLTEN0 : TBits_1; inline;
  23427. function getFLTEN1 : TBits_1; inline;
  23428. function getFLTEN2 : TBits_1; inline;
  23429. function getFLTEN3 : TBits_1; inline;
  23430. function getFSEL0 : TBits_5; inline;
  23431. function getFSEL1 : TBits_5; inline;
  23432. function getFSEL2 : TBits_5; inline;
  23433. function getFSEL3 : TBits_5; inline;
  23434. function getMSEL0 : TBits_2; inline;
  23435. function getMSEL1 : TBits_2; inline;
  23436. function getMSEL2 : TBits_2; inline;
  23437. function getMSEL3 : TBits_2; inline;
  23438. function getw : TBits_32; inline;
  23439. procedure setFLTEN0(thebits : TBits_1); inline;
  23440. procedure setFLTEN1(thebits : TBits_1); inline;
  23441. procedure setFLTEN2(thebits : TBits_1); inline;
  23442. procedure setFLTEN3(thebits : TBits_1); inline;
  23443. procedure setFSEL0(thebits : TBits_5); inline;
  23444. procedure setFSEL1(thebits : TBits_5); inline;
  23445. procedure setFSEL2(thebits : TBits_5); inline;
  23446. procedure setFSEL3(thebits : TBits_5); inline;
  23447. procedure setMSEL0(thebits : TBits_2); inline;
  23448. procedure setMSEL1(thebits : TBits_2); inline;
  23449. procedure setMSEL2(thebits : TBits_2); inline;
  23450. procedure setMSEL3(thebits : TBits_2); inline;
  23451. procedure setw(thebits : TBits_32); inline;
  23452. public
  23453. procedure clearFLTEN0; inline;
  23454. procedure clearFLTEN1; inline;
  23455. procedure clearFLTEN2; inline;
  23456. procedure clearFLTEN3; inline;
  23457. procedure setFLTEN0; inline;
  23458. procedure setFLTEN1; inline;
  23459. procedure setFLTEN2; inline;
  23460. procedure setFLTEN3; inline;
  23461. property FLTEN0 : TBits_1 read getFLTEN0 write setFLTEN0;
  23462. property FLTEN1 : TBits_1 read getFLTEN1 write setFLTEN1;
  23463. property FLTEN2 : TBits_1 read getFLTEN2 write setFLTEN2;
  23464. property FLTEN3 : TBits_1 read getFLTEN3 write setFLTEN3;
  23465. property FSEL0 : TBits_5 read getFSEL0 write setFSEL0;
  23466. property FSEL1 : TBits_5 read getFSEL1 write setFSEL1;
  23467. property FSEL2 : TBits_5 read getFSEL2 write setFSEL2;
  23468. property FSEL3 : TBits_5 read getFSEL3 write setFSEL3;
  23469. property MSEL0 : TBits_2 read getMSEL0 write setMSEL0;
  23470. property MSEL1 : TBits_2 read getMSEL1 write setMSEL1;
  23471. property MSEL2 : TBits_2 read getMSEL2 write setMSEL2;
  23472. property MSEL3 : TBits_2 read getMSEL3 write setMSEL3;
  23473. property w : TBits_32 read getw write setw;
  23474. end;
  23475. TCAN2_C2FLTCON1 = record
  23476. private
  23477. function getFLTEN4 : TBits_1; inline;
  23478. function getFLTEN5 : TBits_1; inline;
  23479. function getFLTEN6 : TBits_1; inline;
  23480. function getFLTEN7 : TBits_1; inline;
  23481. function getFSEL4 : TBits_5; inline;
  23482. function getFSEL5 : TBits_5; inline;
  23483. function getFSEL6 : TBits_5; inline;
  23484. function getFSEL7 : TBits_5; inline;
  23485. function getMSEL4 : TBits_2; inline;
  23486. function getMSEL5 : TBits_2; inline;
  23487. function getMSEL6 : TBits_2; inline;
  23488. function getMSEL7 : TBits_2; inline;
  23489. function getw : TBits_32; inline;
  23490. procedure setFLTEN4(thebits : TBits_1); inline;
  23491. procedure setFLTEN5(thebits : TBits_1); inline;
  23492. procedure setFLTEN6(thebits : TBits_1); inline;
  23493. procedure setFLTEN7(thebits : TBits_1); inline;
  23494. procedure setFSEL4(thebits : TBits_5); inline;
  23495. procedure setFSEL5(thebits : TBits_5); inline;
  23496. procedure setFSEL6(thebits : TBits_5); inline;
  23497. procedure setFSEL7(thebits : TBits_5); inline;
  23498. procedure setMSEL4(thebits : TBits_2); inline;
  23499. procedure setMSEL5(thebits : TBits_2); inline;
  23500. procedure setMSEL6(thebits : TBits_2); inline;
  23501. procedure setMSEL7(thebits : TBits_2); inline;
  23502. procedure setw(thebits : TBits_32); inline;
  23503. public
  23504. procedure clearFLTEN4; inline;
  23505. procedure clearFLTEN5; inline;
  23506. procedure clearFLTEN6; inline;
  23507. procedure clearFLTEN7; inline;
  23508. procedure setFLTEN4; inline;
  23509. procedure setFLTEN5; inline;
  23510. procedure setFLTEN6; inline;
  23511. procedure setFLTEN7; inline;
  23512. property FLTEN4 : TBits_1 read getFLTEN4 write setFLTEN4;
  23513. property FLTEN5 : TBits_1 read getFLTEN5 write setFLTEN5;
  23514. property FLTEN6 : TBits_1 read getFLTEN6 write setFLTEN6;
  23515. property FLTEN7 : TBits_1 read getFLTEN7 write setFLTEN7;
  23516. property FSEL4 : TBits_5 read getFSEL4 write setFSEL4;
  23517. property FSEL5 : TBits_5 read getFSEL5 write setFSEL5;
  23518. property FSEL6 : TBits_5 read getFSEL6 write setFSEL6;
  23519. property FSEL7 : TBits_5 read getFSEL7 write setFSEL7;
  23520. property MSEL4 : TBits_2 read getMSEL4 write setMSEL4;
  23521. property MSEL5 : TBits_2 read getMSEL5 write setMSEL5;
  23522. property MSEL6 : TBits_2 read getMSEL6 write setMSEL6;
  23523. property MSEL7 : TBits_2 read getMSEL7 write setMSEL7;
  23524. property w : TBits_32 read getw write setw;
  23525. end;
  23526. TCAN2_C2FLTCON2 = record
  23527. private
  23528. function getFLTEN10 : TBits_1; inline;
  23529. function getFLTEN11 : TBits_1; inline;
  23530. function getFLTEN8 : TBits_1; inline;
  23531. function getFLTEN9 : TBits_1; inline;
  23532. function getFSEL10 : TBits_5; inline;
  23533. function getFSEL11 : TBits_5; inline;
  23534. function getFSEL8 : TBits_5; inline;
  23535. function getFSEL9 : TBits_5; inline;
  23536. function getMSEL10 : TBits_2; inline;
  23537. function getMSEL11 : TBits_2; inline;
  23538. function getMSEL8 : TBits_2; inline;
  23539. function getMSEL9 : TBits_2; inline;
  23540. function getw : TBits_32; inline;
  23541. procedure setFLTEN10(thebits : TBits_1); inline;
  23542. procedure setFLTEN11(thebits : TBits_1); inline;
  23543. procedure setFLTEN8(thebits : TBits_1); inline;
  23544. procedure setFLTEN9(thebits : TBits_1); inline;
  23545. procedure setFSEL10(thebits : TBits_5); inline;
  23546. procedure setFSEL11(thebits : TBits_5); inline;
  23547. procedure setFSEL8(thebits : TBits_5); inline;
  23548. procedure setFSEL9(thebits : TBits_5); inline;
  23549. procedure setMSEL10(thebits : TBits_2); inline;
  23550. procedure setMSEL11(thebits : TBits_2); inline;
  23551. procedure setMSEL8(thebits : TBits_2); inline;
  23552. procedure setMSEL9(thebits : TBits_2); inline;
  23553. procedure setw(thebits : TBits_32); inline;
  23554. public
  23555. procedure clearFLTEN10; inline;
  23556. procedure clearFLTEN11; inline;
  23557. procedure clearFLTEN8; inline;
  23558. procedure clearFLTEN9; inline;
  23559. procedure setFLTEN10; inline;
  23560. procedure setFLTEN11; inline;
  23561. procedure setFLTEN8; inline;
  23562. procedure setFLTEN9; inline;
  23563. property FLTEN10 : TBits_1 read getFLTEN10 write setFLTEN10;
  23564. property FLTEN11 : TBits_1 read getFLTEN11 write setFLTEN11;
  23565. property FLTEN8 : TBits_1 read getFLTEN8 write setFLTEN8;
  23566. property FLTEN9 : TBits_1 read getFLTEN9 write setFLTEN9;
  23567. property FSEL10 : TBits_5 read getFSEL10 write setFSEL10;
  23568. property FSEL11 : TBits_5 read getFSEL11 write setFSEL11;
  23569. property FSEL8 : TBits_5 read getFSEL8 write setFSEL8;
  23570. property FSEL9 : TBits_5 read getFSEL9 write setFSEL9;
  23571. property MSEL10 : TBits_2 read getMSEL10 write setMSEL10;
  23572. property MSEL11 : TBits_2 read getMSEL11 write setMSEL11;
  23573. property MSEL8 : TBits_2 read getMSEL8 write setMSEL8;
  23574. property MSEL9 : TBits_2 read getMSEL9 write setMSEL9;
  23575. property w : TBits_32 read getw write setw;
  23576. end;
  23577. TCAN2_C2FLTCON3 = record
  23578. private
  23579. function getFLTEN12 : TBits_1; inline;
  23580. function getFLTEN13 : TBits_1; inline;
  23581. function getFLTEN14 : TBits_1; inline;
  23582. function getFLTEN15 : TBits_1; inline;
  23583. function getFSEL12 : TBits_5; inline;
  23584. function getFSEL13 : TBits_5; inline;
  23585. function getFSEL14 : TBits_5; inline;
  23586. function getFSEL15 : TBits_5; inline;
  23587. function getMSEL12 : TBits_2; inline;
  23588. function getMSEL13 : TBits_2; inline;
  23589. function getMSEL14 : TBits_2; inline;
  23590. function getMSEL15 : TBits_2; inline;
  23591. function getw : TBits_32; inline;
  23592. procedure setFLTEN12(thebits : TBits_1); inline;
  23593. procedure setFLTEN13(thebits : TBits_1); inline;
  23594. procedure setFLTEN14(thebits : TBits_1); inline;
  23595. procedure setFLTEN15(thebits : TBits_1); inline;
  23596. procedure setFSEL12(thebits : TBits_5); inline;
  23597. procedure setFSEL13(thebits : TBits_5); inline;
  23598. procedure setFSEL14(thebits : TBits_5); inline;
  23599. procedure setFSEL15(thebits : TBits_5); inline;
  23600. procedure setMSEL12(thebits : TBits_2); inline;
  23601. procedure setMSEL13(thebits : TBits_2); inline;
  23602. procedure setMSEL14(thebits : TBits_2); inline;
  23603. procedure setMSEL15(thebits : TBits_2); inline;
  23604. procedure setw(thebits : TBits_32); inline;
  23605. public
  23606. procedure clearFLTEN12; inline;
  23607. procedure clearFLTEN13; inline;
  23608. procedure clearFLTEN14; inline;
  23609. procedure clearFLTEN15; inline;
  23610. procedure setFLTEN12; inline;
  23611. procedure setFLTEN13; inline;
  23612. procedure setFLTEN14; inline;
  23613. procedure setFLTEN15; inline;
  23614. property FLTEN12 : TBits_1 read getFLTEN12 write setFLTEN12;
  23615. property FLTEN13 : TBits_1 read getFLTEN13 write setFLTEN13;
  23616. property FLTEN14 : TBits_1 read getFLTEN14 write setFLTEN14;
  23617. property FLTEN15 : TBits_1 read getFLTEN15 write setFLTEN15;
  23618. property FSEL12 : TBits_5 read getFSEL12 write setFSEL12;
  23619. property FSEL13 : TBits_5 read getFSEL13 write setFSEL13;
  23620. property FSEL14 : TBits_5 read getFSEL14 write setFSEL14;
  23621. property FSEL15 : TBits_5 read getFSEL15 write setFSEL15;
  23622. property MSEL12 : TBits_2 read getMSEL12 write setMSEL12;
  23623. property MSEL13 : TBits_2 read getMSEL13 write setMSEL13;
  23624. property MSEL14 : TBits_2 read getMSEL14 write setMSEL14;
  23625. property MSEL15 : TBits_2 read getMSEL15 write setMSEL15;
  23626. property w : TBits_32 read getw write setw;
  23627. end;
  23628. TCAN2_C2FLTCON4 = record
  23629. private
  23630. function getFLTEN16 : TBits_1; inline;
  23631. function getFLTEN17 : TBits_1; inline;
  23632. function getFLTEN18 : TBits_1; inline;
  23633. function getFLTEN19 : TBits_1; inline;
  23634. function getFSEL16 : TBits_5; inline;
  23635. function getFSEL17 : TBits_5; inline;
  23636. function getFSEL18 : TBits_5; inline;
  23637. function getFSEL19 : TBits_5; inline;
  23638. function getMSEL16 : TBits_2; inline;
  23639. function getMSEL17 : TBits_2; inline;
  23640. function getMSEL18 : TBits_2; inline;
  23641. function getMSEL19 : TBits_2; inline;
  23642. function getw : TBits_32; inline;
  23643. procedure setFLTEN16(thebits : TBits_1); inline;
  23644. procedure setFLTEN17(thebits : TBits_1); inline;
  23645. procedure setFLTEN18(thebits : TBits_1); inline;
  23646. procedure setFLTEN19(thebits : TBits_1); inline;
  23647. procedure setFSEL16(thebits : TBits_5); inline;
  23648. procedure setFSEL17(thebits : TBits_5); inline;
  23649. procedure setFSEL18(thebits : TBits_5); inline;
  23650. procedure setFSEL19(thebits : TBits_5); inline;
  23651. procedure setMSEL16(thebits : TBits_2); inline;
  23652. procedure setMSEL17(thebits : TBits_2); inline;
  23653. procedure setMSEL18(thebits : TBits_2); inline;
  23654. procedure setMSEL19(thebits : TBits_2); inline;
  23655. procedure setw(thebits : TBits_32); inline;
  23656. public
  23657. procedure clearFLTEN16; inline;
  23658. procedure clearFLTEN17; inline;
  23659. procedure clearFLTEN18; inline;
  23660. procedure clearFLTEN19; inline;
  23661. procedure setFLTEN16; inline;
  23662. procedure setFLTEN17; inline;
  23663. procedure setFLTEN18; inline;
  23664. procedure setFLTEN19; inline;
  23665. property FLTEN16 : TBits_1 read getFLTEN16 write setFLTEN16;
  23666. property FLTEN17 : TBits_1 read getFLTEN17 write setFLTEN17;
  23667. property FLTEN18 : TBits_1 read getFLTEN18 write setFLTEN18;
  23668. property FLTEN19 : TBits_1 read getFLTEN19 write setFLTEN19;
  23669. property FSEL16 : TBits_5 read getFSEL16 write setFSEL16;
  23670. property FSEL17 : TBits_5 read getFSEL17 write setFSEL17;
  23671. property FSEL18 : TBits_5 read getFSEL18 write setFSEL18;
  23672. property FSEL19 : TBits_5 read getFSEL19 write setFSEL19;
  23673. property MSEL16 : TBits_2 read getMSEL16 write setMSEL16;
  23674. property MSEL17 : TBits_2 read getMSEL17 write setMSEL17;
  23675. property MSEL18 : TBits_2 read getMSEL18 write setMSEL18;
  23676. property MSEL19 : TBits_2 read getMSEL19 write setMSEL19;
  23677. property w : TBits_32 read getw write setw;
  23678. end;
  23679. TCAN2_C2FLTCON5 = record
  23680. private
  23681. function getFLTEN20 : TBits_1; inline;
  23682. function getFLTEN21 : TBits_1; inline;
  23683. function getFLTEN22 : TBits_1; inline;
  23684. function getFLTEN23 : TBits_1; inline;
  23685. function getFSEL20 : TBits_5; inline;
  23686. function getFSEL21 : TBits_5; inline;
  23687. function getFSEL22 : TBits_5; inline;
  23688. function getFSEL23 : TBits_5; inline;
  23689. function getMSEL20 : TBits_2; inline;
  23690. function getMSEL21 : TBits_2; inline;
  23691. function getMSEL22 : TBits_2; inline;
  23692. function getMSEL23 : TBits_2; inline;
  23693. function getw : TBits_32; inline;
  23694. procedure setFLTEN20(thebits : TBits_1); inline;
  23695. procedure setFLTEN21(thebits : TBits_1); inline;
  23696. procedure setFLTEN22(thebits : TBits_1); inline;
  23697. procedure setFLTEN23(thebits : TBits_1); inline;
  23698. procedure setFSEL20(thebits : TBits_5); inline;
  23699. procedure setFSEL21(thebits : TBits_5); inline;
  23700. procedure setFSEL22(thebits : TBits_5); inline;
  23701. procedure setFSEL23(thebits : TBits_5); inline;
  23702. procedure setMSEL20(thebits : TBits_2); inline;
  23703. procedure setMSEL21(thebits : TBits_2); inline;
  23704. procedure setMSEL22(thebits : TBits_2); inline;
  23705. procedure setMSEL23(thebits : TBits_2); inline;
  23706. procedure setw(thebits : TBits_32); inline;
  23707. public
  23708. procedure clearFLTEN20; inline;
  23709. procedure clearFLTEN21; inline;
  23710. procedure clearFLTEN22; inline;
  23711. procedure clearFLTEN23; inline;
  23712. procedure setFLTEN20; inline;
  23713. procedure setFLTEN21; inline;
  23714. procedure setFLTEN22; inline;
  23715. procedure setFLTEN23; inline;
  23716. property FLTEN20 : TBits_1 read getFLTEN20 write setFLTEN20;
  23717. property FLTEN21 : TBits_1 read getFLTEN21 write setFLTEN21;
  23718. property FLTEN22 : TBits_1 read getFLTEN22 write setFLTEN22;
  23719. property FLTEN23 : TBits_1 read getFLTEN23 write setFLTEN23;
  23720. property FSEL20 : TBits_5 read getFSEL20 write setFSEL20;
  23721. property FSEL21 : TBits_5 read getFSEL21 write setFSEL21;
  23722. property FSEL22 : TBits_5 read getFSEL22 write setFSEL22;
  23723. property FSEL23 : TBits_5 read getFSEL23 write setFSEL23;
  23724. property MSEL20 : TBits_2 read getMSEL20 write setMSEL20;
  23725. property MSEL21 : TBits_2 read getMSEL21 write setMSEL21;
  23726. property MSEL22 : TBits_2 read getMSEL22 write setMSEL22;
  23727. property MSEL23 : TBits_2 read getMSEL23 write setMSEL23;
  23728. property w : TBits_32 read getw write setw;
  23729. end;
  23730. TCAN2_C2FLTCON6 = record
  23731. private
  23732. function getFLTEN24 : TBits_1; inline;
  23733. function getFLTEN25 : TBits_1; inline;
  23734. function getFLTEN26 : TBits_1; inline;
  23735. function getFLTEN27 : TBits_1; inline;
  23736. function getFSEL24 : TBits_5; inline;
  23737. function getFSEL25 : TBits_5; inline;
  23738. function getFSEL26 : TBits_5; inline;
  23739. function getFSEL27 : TBits_5; inline;
  23740. function getMSEL24 : TBits_2; inline;
  23741. function getMSEL25 : TBits_2; inline;
  23742. function getMSEL26 : TBits_2; inline;
  23743. function getMSEL27 : TBits_2; inline;
  23744. function getw : TBits_32; inline;
  23745. procedure setFLTEN24(thebits : TBits_1); inline;
  23746. procedure setFLTEN25(thebits : TBits_1); inline;
  23747. procedure setFLTEN26(thebits : TBits_1); inline;
  23748. procedure setFLTEN27(thebits : TBits_1); inline;
  23749. procedure setFSEL24(thebits : TBits_5); inline;
  23750. procedure setFSEL25(thebits : TBits_5); inline;
  23751. procedure setFSEL26(thebits : TBits_5); inline;
  23752. procedure setFSEL27(thebits : TBits_5); inline;
  23753. procedure setMSEL24(thebits : TBits_2); inline;
  23754. procedure setMSEL25(thebits : TBits_2); inline;
  23755. procedure setMSEL26(thebits : TBits_2); inline;
  23756. procedure setMSEL27(thebits : TBits_2); inline;
  23757. procedure setw(thebits : TBits_32); inline;
  23758. public
  23759. procedure clearFLTEN24; inline;
  23760. procedure clearFLTEN25; inline;
  23761. procedure clearFLTEN26; inline;
  23762. procedure clearFLTEN27; inline;
  23763. procedure setFLTEN24; inline;
  23764. procedure setFLTEN25; inline;
  23765. procedure setFLTEN26; inline;
  23766. procedure setFLTEN27; inline;
  23767. property FLTEN24 : TBits_1 read getFLTEN24 write setFLTEN24;
  23768. property FLTEN25 : TBits_1 read getFLTEN25 write setFLTEN25;
  23769. property FLTEN26 : TBits_1 read getFLTEN26 write setFLTEN26;
  23770. property FLTEN27 : TBits_1 read getFLTEN27 write setFLTEN27;
  23771. property FSEL24 : TBits_5 read getFSEL24 write setFSEL24;
  23772. property FSEL25 : TBits_5 read getFSEL25 write setFSEL25;
  23773. property FSEL26 : TBits_5 read getFSEL26 write setFSEL26;
  23774. property FSEL27 : TBits_5 read getFSEL27 write setFSEL27;
  23775. property MSEL24 : TBits_2 read getMSEL24 write setMSEL24;
  23776. property MSEL25 : TBits_2 read getMSEL25 write setMSEL25;
  23777. property MSEL26 : TBits_2 read getMSEL26 write setMSEL26;
  23778. property MSEL27 : TBits_2 read getMSEL27 write setMSEL27;
  23779. property w : TBits_32 read getw write setw;
  23780. end;
  23781. TCAN2_C2FLTCON7 = record
  23782. private
  23783. function getFLTEN28 : TBits_1; inline;
  23784. function getFLTEN29 : TBits_1; inline;
  23785. function getFLTEN30 : TBits_1; inline;
  23786. function getFLTEN31 : TBits_1; inline;
  23787. function getFSEL28 : TBits_5; inline;
  23788. function getFSEL29 : TBits_5; inline;
  23789. function getFSEL30 : TBits_5; inline;
  23790. function getFSEL31 : TBits_5; inline;
  23791. function getMSEL28 : TBits_2; inline;
  23792. function getMSEL29 : TBits_2; inline;
  23793. function getMSEL30 : TBits_2; inline;
  23794. function getMSEL31 : TBits_2; inline;
  23795. function getw : TBits_32; inline;
  23796. procedure setFLTEN28(thebits : TBits_1); inline;
  23797. procedure setFLTEN29(thebits : TBits_1); inline;
  23798. procedure setFLTEN30(thebits : TBits_1); inline;
  23799. procedure setFLTEN31(thebits : TBits_1); inline;
  23800. procedure setFSEL28(thebits : TBits_5); inline;
  23801. procedure setFSEL29(thebits : TBits_5); inline;
  23802. procedure setFSEL30(thebits : TBits_5); inline;
  23803. procedure setFSEL31(thebits : TBits_5); inline;
  23804. procedure setMSEL28(thebits : TBits_2); inline;
  23805. procedure setMSEL29(thebits : TBits_2); inline;
  23806. procedure setMSEL30(thebits : TBits_2); inline;
  23807. procedure setMSEL31(thebits : TBits_2); inline;
  23808. procedure setw(thebits : TBits_32); inline;
  23809. public
  23810. procedure clearFLTEN28; inline;
  23811. procedure clearFLTEN29; inline;
  23812. procedure clearFLTEN30; inline;
  23813. procedure clearFLTEN31; inline;
  23814. procedure setFLTEN28; inline;
  23815. procedure setFLTEN29; inline;
  23816. procedure setFLTEN30; inline;
  23817. procedure setFLTEN31; inline;
  23818. property FLTEN28 : TBits_1 read getFLTEN28 write setFLTEN28;
  23819. property FLTEN29 : TBits_1 read getFLTEN29 write setFLTEN29;
  23820. property FLTEN30 : TBits_1 read getFLTEN30 write setFLTEN30;
  23821. property FLTEN31 : TBits_1 read getFLTEN31 write setFLTEN31;
  23822. property FSEL28 : TBits_5 read getFSEL28 write setFSEL28;
  23823. property FSEL29 : TBits_5 read getFSEL29 write setFSEL29;
  23824. property FSEL30 : TBits_5 read getFSEL30 write setFSEL30;
  23825. property FSEL31 : TBits_5 read getFSEL31 write setFSEL31;
  23826. property MSEL28 : TBits_2 read getMSEL28 write setMSEL28;
  23827. property MSEL29 : TBits_2 read getMSEL29 write setMSEL29;
  23828. property MSEL30 : TBits_2 read getMSEL30 write setMSEL30;
  23829. property MSEL31 : TBits_2 read getMSEL31 write setMSEL31;
  23830. property w : TBits_32 read getw write setw;
  23831. end;
  23832. TCAN2_C2RXF0 = record
  23833. private
  23834. function getEID : TBits_18; inline;
  23835. function getEXID : TBits_1; inline;
  23836. function getSID : TBits_11; inline;
  23837. function getw : TBits_32; inline;
  23838. procedure setEID(thebits : TBits_18); inline;
  23839. procedure setEXID(thebits : TBits_1); inline;
  23840. procedure setSID(thebits : TBits_11); inline;
  23841. procedure setw(thebits : TBits_32); inline;
  23842. public
  23843. procedure clearEXID; inline;
  23844. procedure setEXID; inline;
  23845. property EID : TBits_18 read getEID write setEID;
  23846. property EXID : TBits_1 read getEXID write setEXID;
  23847. property SID : TBits_11 read getSID write setSID;
  23848. property w : TBits_32 read getw write setw;
  23849. end;
  23850. TCAN2_C2RXF1 = record
  23851. private
  23852. function getEID : TBits_18; inline;
  23853. function getEXID : TBits_1; inline;
  23854. function getSID : TBits_11; inline;
  23855. function getw : TBits_32; inline;
  23856. procedure setEID(thebits : TBits_18); inline;
  23857. procedure setEXID(thebits : TBits_1); inline;
  23858. procedure setSID(thebits : TBits_11); inline;
  23859. procedure setw(thebits : TBits_32); inline;
  23860. public
  23861. procedure clearEXID; inline;
  23862. procedure setEXID; inline;
  23863. property EID : TBits_18 read getEID write setEID;
  23864. property EXID : TBits_1 read getEXID write setEXID;
  23865. property SID : TBits_11 read getSID write setSID;
  23866. property w : TBits_32 read getw write setw;
  23867. end;
  23868. TCAN2_C2RXF2 = record
  23869. private
  23870. function getEID : TBits_18; inline;
  23871. function getEXID : TBits_1; inline;
  23872. function getSID : TBits_11; inline;
  23873. function getw : TBits_32; inline;
  23874. procedure setEID(thebits : TBits_18); inline;
  23875. procedure setEXID(thebits : TBits_1); inline;
  23876. procedure setSID(thebits : TBits_11); inline;
  23877. procedure setw(thebits : TBits_32); inline;
  23878. public
  23879. procedure clearEXID; inline;
  23880. procedure setEXID; inline;
  23881. property EID : TBits_18 read getEID write setEID;
  23882. property EXID : TBits_1 read getEXID write setEXID;
  23883. property SID : TBits_11 read getSID write setSID;
  23884. property w : TBits_32 read getw write setw;
  23885. end;
  23886. TCAN2_C2RXF3 = record
  23887. private
  23888. function getEID : TBits_18; inline;
  23889. function getEXID : TBits_1; inline;
  23890. function getSID : TBits_11; inline;
  23891. function getw : TBits_32; inline;
  23892. procedure setEID(thebits : TBits_18); inline;
  23893. procedure setEXID(thebits : TBits_1); inline;
  23894. procedure setSID(thebits : TBits_11); inline;
  23895. procedure setw(thebits : TBits_32); inline;
  23896. public
  23897. procedure clearEXID; inline;
  23898. procedure setEXID; inline;
  23899. property EID : TBits_18 read getEID write setEID;
  23900. property EXID : TBits_1 read getEXID write setEXID;
  23901. property SID : TBits_11 read getSID write setSID;
  23902. property w : TBits_32 read getw write setw;
  23903. end;
  23904. TCAN2_C2RXF4 = record
  23905. private
  23906. function getEID : TBits_18; inline;
  23907. function getEXID : TBits_1; inline;
  23908. function getSID : TBits_11; inline;
  23909. function getw : TBits_32; inline;
  23910. procedure setEID(thebits : TBits_18); inline;
  23911. procedure setEXID(thebits : TBits_1); inline;
  23912. procedure setSID(thebits : TBits_11); inline;
  23913. procedure setw(thebits : TBits_32); inline;
  23914. public
  23915. procedure clearEXID; inline;
  23916. procedure setEXID; inline;
  23917. property EID : TBits_18 read getEID write setEID;
  23918. property EXID : TBits_1 read getEXID write setEXID;
  23919. property SID : TBits_11 read getSID write setSID;
  23920. property w : TBits_32 read getw write setw;
  23921. end;
  23922. TCAN2_C2RXF5 = record
  23923. private
  23924. function getEID : TBits_18; inline;
  23925. function getEXID : TBits_1; inline;
  23926. function getSID : TBits_11; inline;
  23927. function getw : TBits_32; inline;
  23928. procedure setEID(thebits : TBits_18); inline;
  23929. procedure setEXID(thebits : TBits_1); inline;
  23930. procedure setSID(thebits : TBits_11); inline;
  23931. procedure setw(thebits : TBits_32); inline;
  23932. public
  23933. procedure clearEXID; inline;
  23934. procedure setEXID; inline;
  23935. property EID : TBits_18 read getEID write setEID;
  23936. property EXID : TBits_1 read getEXID write setEXID;
  23937. property SID : TBits_11 read getSID write setSID;
  23938. property w : TBits_32 read getw write setw;
  23939. end;
  23940. TCAN2_C2RXF6 = record
  23941. private
  23942. function getEID : TBits_18; inline;
  23943. function getEXID : TBits_1; inline;
  23944. function getSID : TBits_11; inline;
  23945. function getw : TBits_32; inline;
  23946. procedure setEID(thebits : TBits_18); inline;
  23947. procedure setEXID(thebits : TBits_1); inline;
  23948. procedure setSID(thebits : TBits_11); inline;
  23949. procedure setw(thebits : TBits_32); inline;
  23950. public
  23951. procedure clearEXID; inline;
  23952. procedure setEXID; inline;
  23953. property EID : TBits_18 read getEID write setEID;
  23954. property EXID : TBits_1 read getEXID write setEXID;
  23955. property SID : TBits_11 read getSID write setSID;
  23956. property w : TBits_32 read getw write setw;
  23957. end;
  23958. TCAN2_C2RXF7 = record
  23959. private
  23960. function getEID : TBits_18; inline;
  23961. function getEXID : TBits_1; inline;
  23962. function getSID : TBits_11; inline;
  23963. function getw : TBits_32; inline;
  23964. procedure setEID(thebits : TBits_18); inline;
  23965. procedure setEXID(thebits : TBits_1); inline;
  23966. procedure setSID(thebits : TBits_11); inline;
  23967. procedure setw(thebits : TBits_32); inline;
  23968. public
  23969. procedure clearEXID; inline;
  23970. procedure setEXID; inline;
  23971. property EID : TBits_18 read getEID write setEID;
  23972. property EXID : TBits_1 read getEXID write setEXID;
  23973. property SID : TBits_11 read getSID write setSID;
  23974. property w : TBits_32 read getw write setw;
  23975. end;
  23976. TCAN2_C2RXF8 = record
  23977. private
  23978. function getEID : TBits_18; inline;
  23979. function getEXID : TBits_1; inline;
  23980. function getSID : TBits_11; inline;
  23981. function getw : TBits_32; inline;
  23982. procedure setEID(thebits : TBits_18); inline;
  23983. procedure setEXID(thebits : TBits_1); inline;
  23984. procedure setSID(thebits : TBits_11); inline;
  23985. procedure setw(thebits : TBits_32); inline;
  23986. public
  23987. procedure clearEXID; inline;
  23988. procedure setEXID; inline;
  23989. property EID : TBits_18 read getEID write setEID;
  23990. property EXID : TBits_1 read getEXID write setEXID;
  23991. property SID : TBits_11 read getSID write setSID;
  23992. property w : TBits_32 read getw write setw;
  23993. end;
  23994. TCAN2_C2RXF9 = record
  23995. private
  23996. function getEID : TBits_18; inline;
  23997. function getEXID : TBits_1; inline;
  23998. function getSID : TBits_11; inline;
  23999. function getw : TBits_32; inline;
  24000. procedure setEID(thebits : TBits_18); inline;
  24001. procedure setEXID(thebits : TBits_1); inline;
  24002. procedure setSID(thebits : TBits_11); inline;
  24003. procedure setw(thebits : TBits_32); inline;
  24004. public
  24005. procedure clearEXID; inline;
  24006. procedure setEXID; inline;
  24007. property EID : TBits_18 read getEID write setEID;
  24008. property EXID : TBits_1 read getEXID write setEXID;
  24009. property SID : TBits_11 read getSID write setSID;
  24010. property w : TBits_32 read getw write setw;
  24011. end;
  24012. TCAN2_C2RXF10 = record
  24013. private
  24014. function getEID : TBits_18; inline;
  24015. function getEXID : TBits_1; inline;
  24016. function getSID : TBits_11; inline;
  24017. function getw : TBits_32; inline;
  24018. procedure setEID(thebits : TBits_18); inline;
  24019. procedure setEXID(thebits : TBits_1); inline;
  24020. procedure setSID(thebits : TBits_11); inline;
  24021. procedure setw(thebits : TBits_32); inline;
  24022. public
  24023. procedure clearEXID; inline;
  24024. procedure setEXID; inline;
  24025. property EID : TBits_18 read getEID write setEID;
  24026. property EXID : TBits_1 read getEXID write setEXID;
  24027. property SID : TBits_11 read getSID write setSID;
  24028. property w : TBits_32 read getw write setw;
  24029. end;
  24030. TCAN2_C2RXF11 = record
  24031. private
  24032. function getEID : TBits_18; inline;
  24033. function getEXID : TBits_1; inline;
  24034. function getSID : TBits_11; inline;
  24035. function getw : TBits_32; inline;
  24036. procedure setEID(thebits : TBits_18); inline;
  24037. procedure setEXID(thebits : TBits_1); inline;
  24038. procedure setSID(thebits : TBits_11); inline;
  24039. procedure setw(thebits : TBits_32); inline;
  24040. public
  24041. procedure clearEXID; inline;
  24042. procedure setEXID; inline;
  24043. property EID : TBits_18 read getEID write setEID;
  24044. property EXID : TBits_1 read getEXID write setEXID;
  24045. property SID : TBits_11 read getSID write setSID;
  24046. property w : TBits_32 read getw write setw;
  24047. end;
  24048. TCAN2_C2RXF12 = record
  24049. private
  24050. function getEID : TBits_18; inline;
  24051. function getEXID : TBits_1; inline;
  24052. function getSID : TBits_11; inline;
  24053. function getw : TBits_32; inline;
  24054. procedure setEID(thebits : TBits_18); inline;
  24055. procedure setEXID(thebits : TBits_1); inline;
  24056. procedure setSID(thebits : TBits_11); inline;
  24057. procedure setw(thebits : TBits_32); inline;
  24058. public
  24059. procedure clearEXID; inline;
  24060. procedure setEXID; inline;
  24061. property EID : TBits_18 read getEID write setEID;
  24062. property EXID : TBits_1 read getEXID write setEXID;
  24063. property SID : TBits_11 read getSID write setSID;
  24064. property w : TBits_32 read getw write setw;
  24065. end;
  24066. TCAN2_C2RXF13 = record
  24067. private
  24068. function getEID : TBits_18; inline;
  24069. function getEXID : TBits_1; inline;
  24070. function getSID : TBits_11; inline;
  24071. function getw : TBits_32; inline;
  24072. procedure setEID(thebits : TBits_18); inline;
  24073. procedure setEXID(thebits : TBits_1); inline;
  24074. procedure setSID(thebits : TBits_11); inline;
  24075. procedure setw(thebits : TBits_32); inline;
  24076. public
  24077. procedure clearEXID; inline;
  24078. procedure setEXID; inline;
  24079. property EID : TBits_18 read getEID write setEID;
  24080. property EXID : TBits_1 read getEXID write setEXID;
  24081. property SID : TBits_11 read getSID write setSID;
  24082. property w : TBits_32 read getw write setw;
  24083. end;
  24084. TCAN2_C2RXF14 = record
  24085. private
  24086. function getEID : TBits_18; inline;
  24087. function getEXID : TBits_1; inline;
  24088. function getSID : TBits_11; inline;
  24089. function getw : TBits_32; inline;
  24090. procedure setEID(thebits : TBits_18); inline;
  24091. procedure setEXID(thebits : TBits_1); inline;
  24092. procedure setSID(thebits : TBits_11); inline;
  24093. procedure setw(thebits : TBits_32); inline;
  24094. public
  24095. procedure clearEXID; inline;
  24096. procedure setEXID; inline;
  24097. property EID : TBits_18 read getEID write setEID;
  24098. property EXID : TBits_1 read getEXID write setEXID;
  24099. property SID : TBits_11 read getSID write setSID;
  24100. property w : TBits_32 read getw write setw;
  24101. end;
  24102. TCAN2_C2RXF15 = record
  24103. private
  24104. function getEID : TBits_18; inline;
  24105. function getEXID : TBits_1; inline;
  24106. function getSID : TBits_11; inline;
  24107. function getw : TBits_32; inline;
  24108. procedure setEID(thebits : TBits_18); inline;
  24109. procedure setEXID(thebits : TBits_1); inline;
  24110. procedure setSID(thebits : TBits_11); inline;
  24111. procedure setw(thebits : TBits_32); inline;
  24112. public
  24113. procedure clearEXID; inline;
  24114. procedure setEXID; inline;
  24115. property EID : TBits_18 read getEID write setEID;
  24116. property EXID : TBits_1 read getEXID write setEXID;
  24117. property SID : TBits_11 read getSID write setSID;
  24118. property w : TBits_32 read getw write setw;
  24119. end;
  24120. TCAN2_C2RXF16 = record
  24121. private
  24122. function getEID : TBits_18; inline;
  24123. function getEXID : TBits_1; inline;
  24124. function getSID : TBits_11; inline;
  24125. function getw : TBits_32; inline;
  24126. procedure setEID(thebits : TBits_18); inline;
  24127. procedure setEXID(thebits : TBits_1); inline;
  24128. procedure setSID(thebits : TBits_11); inline;
  24129. procedure setw(thebits : TBits_32); inline;
  24130. public
  24131. procedure clearEXID; inline;
  24132. procedure setEXID; inline;
  24133. property EID : TBits_18 read getEID write setEID;
  24134. property EXID : TBits_1 read getEXID write setEXID;
  24135. property SID : TBits_11 read getSID write setSID;
  24136. property w : TBits_32 read getw write setw;
  24137. end;
  24138. TCAN2_C2RXF17 = record
  24139. private
  24140. function getEID : TBits_18; inline;
  24141. function getEXID : TBits_1; inline;
  24142. function getSID : TBits_11; inline;
  24143. function getw : TBits_32; inline;
  24144. procedure setEID(thebits : TBits_18); inline;
  24145. procedure setEXID(thebits : TBits_1); inline;
  24146. procedure setSID(thebits : TBits_11); inline;
  24147. procedure setw(thebits : TBits_32); inline;
  24148. public
  24149. procedure clearEXID; inline;
  24150. procedure setEXID; inline;
  24151. property EID : TBits_18 read getEID write setEID;
  24152. property EXID : TBits_1 read getEXID write setEXID;
  24153. property SID : TBits_11 read getSID write setSID;
  24154. property w : TBits_32 read getw write setw;
  24155. end;
  24156. TCAN2_C2RXF18 = record
  24157. private
  24158. function getEID : TBits_18; inline;
  24159. function getEXID : TBits_1; inline;
  24160. function getSID : TBits_11; inline;
  24161. function getw : TBits_32; inline;
  24162. procedure setEID(thebits : TBits_18); inline;
  24163. procedure setEXID(thebits : TBits_1); inline;
  24164. procedure setSID(thebits : TBits_11); inline;
  24165. procedure setw(thebits : TBits_32); inline;
  24166. public
  24167. procedure clearEXID; inline;
  24168. procedure setEXID; inline;
  24169. property EID : TBits_18 read getEID write setEID;
  24170. property EXID : TBits_1 read getEXID write setEXID;
  24171. property SID : TBits_11 read getSID write setSID;
  24172. property w : TBits_32 read getw write setw;
  24173. end;
  24174. TCAN2_C2RXF19 = record
  24175. private
  24176. function getEID : TBits_18; inline;
  24177. function getEXID : TBits_1; inline;
  24178. function getSID : TBits_11; inline;
  24179. function getw : TBits_32; inline;
  24180. procedure setEID(thebits : TBits_18); inline;
  24181. procedure setEXID(thebits : TBits_1); inline;
  24182. procedure setSID(thebits : TBits_11); inline;
  24183. procedure setw(thebits : TBits_32); inline;
  24184. public
  24185. procedure clearEXID; inline;
  24186. procedure setEXID; inline;
  24187. property EID : TBits_18 read getEID write setEID;
  24188. property EXID : TBits_1 read getEXID write setEXID;
  24189. property SID : TBits_11 read getSID write setSID;
  24190. property w : TBits_32 read getw write setw;
  24191. end;
  24192. TCAN2_C2RXF20 = record
  24193. private
  24194. function getEID : TBits_18; inline;
  24195. function getEXID : TBits_1; inline;
  24196. function getSID : TBits_11; inline;
  24197. function getw : TBits_32; inline;
  24198. procedure setEID(thebits : TBits_18); inline;
  24199. procedure setEXID(thebits : TBits_1); inline;
  24200. procedure setSID(thebits : TBits_11); inline;
  24201. procedure setw(thebits : TBits_32); inline;
  24202. public
  24203. procedure clearEXID; inline;
  24204. procedure setEXID; inline;
  24205. property EID : TBits_18 read getEID write setEID;
  24206. property EXID : TBits_1 read getEXID write setEXID;
  24207. property SID : TBits_11 read getSID write setSID;
  24208. property w : TBits_32 read getw write setw;
  24209. end;
  24210. TCAN2_C2RXF21 = record
  24211. private
  24212. function getEID : TBits_18; inline;
  24213. function getEXID : TBits_1; inline;
  24214. function getSID : TBits_11; inline;
  24215. function getw : TBits_32; inline;
  24216. procedure setEID(thebits : TBits_18); inline;
  24217. procedure setEXID(thebits : TBits_1); inline;
  24218. procedure setSID(thebits : TBits_11); inline;
  24219. procedure setw(thebits : TBits_32); inline;
  24220. public
  24221. procedure clearEXID; inline;
  24222. procedure setEXID; inline;
  24223. property EID : TBits_18 read getEID write setEID;
  24224. property EXID : TBits_1 read getEXID write setEXID;
  24225. property SID : TBits_11 read getSID write setSID;
  24226. property w : TBits_32 read getw write setw;
  24227. end;
  24228. TCAN2_C2RXF22 = record
  24229. private
  24230. function getEID : TBits_18; inline;
  24231. function getEXID : TBits_1; inline;
  24232. function getSID : TBits_11; inline;
  24233. function getw : TBits_32; inline;
  24234. procedure setEID(thebits : TBits_18); inline;
  24235. procedure setEXID(thebits : TBits_1); inline;
  24236. procedure setSID(thebits : TBits_11); inline;
  24237. procedure setw(thebits : TBits_32); inline;
  24238. public
  24239. procedure clearEXID; inline;
  24240. procedure setEXID; inline;
  24241. property EID : TBits_18 read getEID write setEID;
  24242. property EXID : TBits_1 read getEXID write setEXID;
  24243. property SID : TBits_11 read getSID write setSID;
  24244. property w : TBits_32 read getw write setw;
  24245. end;
  24246. TCAN2_C2RXF23 = record
  24247. private
  24248. function getEID : TBits_18; inline;
  24249. function getEXID : TBits_1; inline;
  24250. function getSID : TBits_11; inline;
  24251. function getw : TBits_32; inline;
  24252. procedure setEID(thebits : TBits_18); inline;
  24253. procedure setEXID(thebits : TBits_1); inline;
  24254. procedure setSID(thebits : TBits_11); inline;
  24255. procedure setw(thebits : TBits_32); inline;
  24256. public
  24257. procedure clearEXID; inline;
  24258. procedure setEXID; inline;
  24259. property EID : TBits_18 read getEID write setEID;
  24260. property EXID : TBits_1 read getEXID write setEXID;
  24261. property SID : TBits_11 read getSID write setSID;
  24262. property w : TBits_32 read getw write setw;
  24263. end;
  24264. TCAN2_C2RXF24 = record
  24265. private
  24266. function getEID : TBits_18; inline;
  24267. function getEXID : TBits_1; inline;
  24268. function getSID : TBits_11; inline;
  24269. function getw : TBits_32; inline;
  24270. procedure setEID(thebits : TBits_18); inline;
  24271. procedure setEXID(thebits : TBits_1); inline;
  24272. procedure setSID(thebits : TBits_11); inline;
  24273. procedure setw(thebits : TBits_32); inline;
  24274. public
  24275. procedure clearEXID; inline;
  24276. procedure setEXID; inline;
  24277. property EID : TBits_18 read getEID write setEID;
  24278. property EXID : TBits_1 read getEXID write setEXID;
  24279. property SID : TBits_11 read getSID write setSID;
  24280. property w : TBits_32 read getw write setw;
  24281. end;
  24282. TCAN2_C2RXF25 = record
  24283. private
  24284. function getEID : TBits_18; inline;
  24285. function getEXID : TBits_1; inline;
  24286. function getSID : TBits_11; inline;
  24287. function getw : TBits_32; inline;
  24288. procedure setEID(thebits : TBits_18); inline;
  24289. procedure setEXID(thebits : TBits_1); inline;
  24290. procedure setSID(thebits : TBits_11); inline;
  24291. procedure setw(thebits : TBits_32); inline;
  24292. public
  24293. procedure clearEXID; inline;
  24294. procedure setEXID; inline;
  24295. property EID : TBits_18 read getEID write setEID;
  24296. property EXID : TBits_1 read getEXID write setEXID;
  24297. property SID : TBits_11 read getSID write setSID;
  24298. property w : TBits_32 read getw write setw;
  24299. end;
  24300. TCAN2_C2RXF26 = record
  24301. private
  24302. function getEID : TBits_18; inline;
  24303. function getEXID : TBits_1; inline;
  24304. function getSID : TBits_11; inline;
  24305. function getw : TBits_32; inline;
  24306. procedure setEID(thebits : TBits_18); inline;
  24307. procedure setEXID(thebits : TBits_1); inline;
  24308. procedure setSID(thebits : TBits_11); inline;
  24309. procedure setw(thebits : TBits_32); inline;
  24310. public
  24311. procedure clearEXID; inline;
  24312. procedure setEXID; inline;
  24313. property EID : TBits_18 read getEID write setEID;
  24314. property EXID : TBits_1 read getEXID write setEXID;
  24315. property SID : TBits_11 read getSID write setSID;
  24316. property w : TBits_32 read getw write setw;
  24317. end;
  24318. TCAN2_C2RXF27 = record
  24319. private
  24320. function getEID : TBits_18; inline;
  24321. function getEXID : TBits_1; inline;
  24322. function getSID : TBits_11; inline;
  24323. function getw : TBits_32; inline;
  24324. procedure setEID(thebits : TBits_18); inline;
  24325. procedure setEXID(thebits : TBits_1); inline;
  24326. procedure setSID(thebits : TBits_11); inline;
  24327. procedure setw(thebits : TBits_32); inline;
  24328. public
  24329. procedure clearEXID; inline;
  24330. procedure setEXID; inline;
  24331. property EID : TBits_18 read getEID write setEID;
  24332. property EXID : TBits_1 read getEXID write setEXID;
  24333. property SID : TBits_11 read getSID write setSID;
  24334. property w : TBits_32 read getw write setw;
  24335. end;
  24336. TCAN2_C2RXF28 = record
  24337. private
  24338. function getEID : TBits_18; inline;
  24339. function getEXID : TBits_1; inline;
  24340. function getSID : TBits_11; inline;
  24341. function getw : TBits_32; inline;
  24342. procedure setEID(thebits : TBits_18); inline;
  24343. procedure setEXID(thebits : TBits_1); inline;
  24344. procedure setSID(thebits : TBits_11); inline;
  24345. procedure setw(thebits : TBits_32); inline;
  24346. public
  24347. procedure clearEXID; inline;
  24348. procedure setEXID; inline;
  24349. property EID : TBits_18 read getEID write setEID;
  24350. property EXID : TBits_1 read getEXID write setEXID;
  24351. property SID : TBits_11 read getSID write setSID;
  24352. property w : TBits_32 read getw write setw;
  24353. end;
  24354. TCAN2_C2RXF29 = record
  24355. private
  24356. function getEID : TBits_18; inline;
  24357. function getEXID : TBits_1; inline;
  24358. function getSID : TBits_11; inline;
  24359. function getw : TBits_32; inline;
  24360. procedure setEID(thebits : TBits_18); inline;
  24361. procedure setEXID(thebits : TBits_1); inline;
  24362. procedure setSID(thebits : TBits_11); inline;
  24363. procedure setw(thebits : TBits_32); inline;
  24364. public
  24365. procedure clearEXID; inline;
  24366. procedure setEXID; inline;
  24367. property EID : TBits_18 read getEID write setEID;
  24368. property EXID : TBits_1 read getEXID write setEXID;
  24369. property SID : TBits_11 read getSID write setSID;
  24370. property w : TBits_32 read getw write setw;
  24371. end;
  24372. TCAN2_C2RXF30 = record
  24373. private
  24374. function getEID : TBits_18; inline;
  24375. function getEXID : TBits_1; inline;
  24376. function getSID : TBits_11; inline;
  24377. function getw : TBits_32; inline;
  24378. procedure setEID(thebits : TBits_18); inline;
  24379. procedure setEXID(thebits : TBits_1); inline;
  24380. procedure setSID(thebits : TBits_11); inline;
  24381. procedure setw(thebits : TBits_32); inline;
  24382. public
  24383. procedure clearEXID; inline;
  24384. procedure setEXID; inline;
  24385. property EID : TBits_18 read getEID write setEID;
  24386. property EXID : TBits_1 read getEXID write setEXID;
  24387. property SID : TBits_11 read getSID write setSID;
  24388. property w : TBits_32 read getw write setw;
  24389. end;
  24390. TCAN2_C2RXF31 = record
  24391. private
  24392. function getEID : TBits_18; inline;
  24393. function getEXID : TBits_1; inline;
  24394. function getSID : TBits_11; inline;
  24395. function getw : TBits_32; inline;
  24396. procedure setEID(thebits : TBits_18); inline;
  24397. procedure setEXID(thebits : TBits_1); inline;
  24398. procedure setSID(thebits : TBits_11); inline;
  24399. procedure setw(thebits : TBits_32); inline;
  24400. public
  24401. procedure clearEXID; inline;
  24402. procedure setEXID; inline;
  24403. property EID : TBits_18 read getEID write setEID;
  24404. property EXID : TBits_1 read getEXID write setEXID;
  24405. property SID : TBits_11 read getSID write setSID;
  24406. property w : TBits_32 read getw write setw;
  24407. end;
  24408. TCAN2_C2FIFOCON0 = record
  24409. private
  24410. function getDONLY : TBits_1; inline;
  24411. function getFRESET : TBits_1; inline;
  24412. function getFSIZE : TBits_5; inline;
  24413. function getRTREN : TBits_1; inline;
  24414. function getTXABAT : TBits_1; inline;
  24415. function getTXEN : TBits_1; inline;
  24416. function getTXERR : TBits_1; inline;
  24417. function getTXLARB : TBits_1; inline;
  24418. function getTXPRI : TBits_2; inline;
  24419. function getTXREQ : TBits_1; inline;
  24420. function getUINC : TBits_1; inline;
  24421. function getw : TBits_32; inline;
  24422. procedure setDONLY(thebits : TBits_1); inline;
  24423. procedure setFRESET(thebits : TBits_1); inline;
  24424. procedure setFSIZE(thebits : TBits_5); inline;
  24425. procedure setRTREN(thebits : TBits_1); inline;
  24426. procedure setTXABAT(thebits : TBits_1); inline;
  24427. procedure setTXEN(thebits : TBits_1); inline;
  24428. procedure setTXERR(thebits : TBits_1); inline;
  24429. procedure setTXLARB(thebits : TBits_1); inline;
  24430. procedure setTXPRI(thebits : TBits_2); inline;
  24431. procedure setTXREQ(thebits : TBits_1); inline;
  24432. procedure setUINC(thebits : TBits_1); inline;
  24433. procedure setw(thebits : TBits_32); inline;
  24434. public
  24435. procedure clearDONLY; inline;
  24436. procedure clearFRESET; inline;
  24437. procedure clearRTREN; inline;
  24438. procedure clearTXABAT; inline;
  24439. procedure clearTXEN; inline;
  24440. procedure clearTXERR; inline;
  24441. procedure clearTXLARB; inline;
  24442. procedure clearTXREQ; inline;
  24443. procedure clearUINC; inline;
  24444. procedure setDONLY; inline;
  24445. procedure setFRESET; inline;
  24446. procedure setRTREN; inline;
  24447. procedure setTXABAT; inline;
  24448. procedure setTXEN; inline;
  24449. procedure setTXERR; inline;
  24450. procedure setTXLARB; inline;
  24451. procedure setTXREQ; inline;
  24452. procedure setUINC; inline;
  24453. property DONLY : TBits_1 read getDONLY write setDONLY;
  24454. property FRESET : TBits_1 read getFRESET write setFRESET;
  24455. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  24456. property RTREN : TBits_1 read getRTREN write setRTREN;
  24457. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  24458. property TXEN : TBits_1 read getTXEN write setTXEN;
  24459. property TXERR : TBits_1 read getTXERR write setTXERR;
  24460. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  24461. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  24462. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  24463. property UINC : TBits_1 read getUINC write setUINC;
  24464. property w : TBits_32 read getw write setw;
  24465. end;
  24466. TCAN2_C2FIFOINT0 = record
  24467. private
  24468. function getRXFULLIE : TBits_1; inline;
  24469. function getRXFULLIF : TBits_1; inline;
  24470. function getRXHALFIE : TBits_1; inline;
  24471. function getRXHALFIF : TBits_1; inline;
  24472. function getRXNEMPTYIE : TBits_1; inline;
  24473. function getRXNEMPTYIF : TBits_1; inline;
  24474. function getRXOVFLIE : TBits_1; inline;
  24475. function getRXOVFLIF : TBits_1; inline;
  24476. function getTXEMPTYIE : TBits_1; inline;
  24477. function getTXEMPTYIF : TBits_1; inline;
  24478. function getTXHALFIE : TBits_1; inline;
  24479. function getTXHALFIF : TBits_1; inline;
  24480. function getTXNFULLIE : TBits_1; inline;
  24481. function getTXNFULLIF : TBits_1; inline;
  24482. function getw : TBits_32; inline;
  24483. procedure setRXFULLIE(thebits : TBits_1); inline;
  24484. procedure setRXFULLIF(thebits : TBits_1); inline;
  24485. procedure setRXHALFIE(thebits : TBits_1); inline;
  24486. procedure setRXHALFIF(thebits : TBits_1); inline;
  24487. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  24488. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  24489. procedure setRXOVFLIE(thebits : TBits_1); inline;
  24490. procedure setRXOVFLIF(thebits : TBits_1); inline;
  24491. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  24492. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  24493. procedure setTXHALFIE(thebits : TBits_1); inline;
  24494. procedure setTXHALFIF(thebits : TBits_1); inline;
  24495. procedure setTXNFULLIE(thebits : TBits_1); inline;
  24496. procedure setTXNFULLIF(thebits : TBits_1); inline;
  24497. procedure setw(thebits : TBits_32); inline;
  24498. public
  24499. procedure clearRXFULLIE; inline;
  24500. procedure clearRXFULLIF; inline;
  24501. procedure clearRXHALFIE; inline;
  24502. procedure clearRXHALFIF; inline;
  24503. procedure clearRXNEMPTYIE; inline;
  24504. procedure clearRXNEMPTYIF; inline;
  24505. procedure clearRXOVFLIE; inline;
  24506. procedure clearRXOVFLIF; inline;
  24507. procedure clearTXEMPTYIE; inline;
  24508. procedure clearTXEMPTYIF; inline;
  24509. procedure clearTXHALFIE; inline;
  24510. procedure clearTXHALFIF; inline;
  24511. procedure clearTXNFULLIE; inline;
  24512. procedure clearTXNFULLIF; inline;
  24513. procedure setRXFULLIE; inline;
  24514. procedure setRXFULLIF; inline;
  24515. procedure setRXHALFIE; inline;
  24516. procedure setRXHALFIF; inline;
  24517. procedure setRXNEMPTYIE; inline;
  24518. procedure setRXNEMPTYIF; inline;
  24519. procedure setRXOVFLIE; inline;
  24520. procedure setRXOVFLIF; inline;
  24521. procedure setTXEMPTYIE; inline;
  24522. procedure setTXEMPTYIF; inline;
  24523. procedure setTXHALFIE; inline;
  24524. procedure setTXHALFIF; inline;
  24525. procedure setTXNFULLIE; inline;
  24526. procedure setTXNFULLIF; inline;
  24527. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  24528. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  24529. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  24530. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  24531. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  24532. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  24533. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  24534. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  24535. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  24536. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  24537. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  24538. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  24539. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  24540. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  24541. property w : TBits_32 read getw write setw;
  24542. end;
  24543. TCAN2_C2FIFOCI0 = record
  24544. private
  24545. function getCFIFOCI : TBits_5; inline;
  24546. function getw : TBits_32; inline;
  24547. procedure setCFIFOCI(thebits : TBits_5); inline;
  24548. procedure setw(thebits : TBits_32); inline;
  24549. public
  24550. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  24551. property w : TBits_32 read getw write setw;
  24552. end;
  24553. TCAN2_C2FIFOCON1 = record
  24554. private
  24555. function getDONLY : TBits_1; inline;
  24556. function getFRESET : TBits_1; inline;
  24557. function getFSIZE : TBits_5; inline;
  24558. function getRTREN : TBits_1; inline;
  24559. function getTXABAT : TBits_1; inline;
  24560. function getTXEN : TBits_1; inline;
  24561. function getTXERR : TBits_1; inline;
  24562. function getTXLARB : TBits_1; inline;
  24563. function getTXPRI : TBits_2; inline;
  24564. function getTXREQ : TBits_1; inline;
  24565. function getUINC : TBits_1; inline;
  24566. function getw : TBits_32; inline;
  24567. procedure setDONLY(thebits : TBits_1); inline;
  24568. procedure setFRESET(thebits : TBits_1); inline;
  24569. procedure setFSIZE(thebits : TBits_5); inline;
  24570. procedure setRTREN(thebits : TBits_1); inline;
  24571. procedure setTXABAT(thebits : TBits_1); inline;
  24572. procedure setTXEN(thebits : TBits_1); inline;
  24573. procedure setTXERR(thebits : TBits_1); inline;
  24574. procedure setTXLARB(thebits : TBits_1); inline;
  24575. procedure setTXPRI(thebits : TBits_2); inline;
  24576. procedure setTXREQ(thebits : TBits_1); inline;
  24577. procedure setUINC(thebits : TBits_1); inline;
  24578. procedure setw(thebits : TBits_32); inline;
  24579. public
  24580. procedure clearDONLY; inline;
  24581. procedure clearFRESET; inline;
  24582. procedure clearRTREN; inline;
  24583. procedure clearTXABAT; inline;
  24584. procedure clearTXEN; inline;
  24585. procedure clearTXERR; inline;
  24586. procedure clearTXLARB; inline;
  24587. procedure clearTXREQ; inline;
  24588. procedure clearUINC; inline;
  24589. procedure setDONLY; inline;
  24590. procedure setFRESET; inline;
  24591. procedure setRTREN; inline;
  24592. procedure setTXABAT; inline;
  24593. procedure setTXEN; inline;
  24594. procedure setTXERR; inline;
  24595. procedure setTXLARB; inline;
  24596. procedure setTXREQ; inline;
  24597. procedure setUINC; inline;
  24598. property DONLY : TBits_1 read getDONLY write setDONLY;
  24599. property FRESET : TBits_1 read getFRESET write setFRESET;
  24600. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  24601. property RTREN : TBits_1 read getRTREN write setRTREN;
  24602. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  24603. property TXEN : TBits_1 read getTXEN write setTXEN;
  24604. property TXERR : TBits_1 read getTXERR write setTXERR;
  24605. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  24606. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  24607. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  24608. property UINC : TBits_1 read getUINC write setUINC;
  24609. property w : TBits_32 read getw write setw;
  24610. end;
  24611. TCAN2_C2FIFOINT1 = record
  24612. private
  24613. function getRXFULLIE : TBits_1; inline;
  24614. function getRXFULLIF : TBits_1; inline;
  24615. function getRXHALFIE : TBits_1; inline;
  24616. function getRXHALFIF : TBits_1; inline;
  24617. function getRXNEMPTYIE : TBits_1; inline;
  24618. function getRXNEMPTYIF : TBits_1; inline;
  24619. function getRXOVFLIE : TBits_1; inline;
  24620. function getRXOVFLIF : TBits_1; inline;
  24621. function getTXEMPTYIE : TBits_1; inline;
  24622. function getTXEMPTYIF : TBits_1; inline;
  24623. function getTXHALFIE : TBits_1; inline;
  24624. function getTXHALFIF : TBits_1; inline;
  24625. function getTXNFULLIE : TBits_1; inline;
  24626. function getTXNFULLIF : TBits_1; inline;
  24627. function getw : TBits_32; inline;
  24628. procedure setRXFULLIE(thebits : TBits_1); inline;
  24629. procedure setRXFULLIF(thebits : TBits_1); inline;
  24630. procedure setRXHALFIE(thebits : TBits_1); inline;
  24631. procedure setRXHALFIF(thebits : TBits_1); inline;
  24632. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  24633. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  24634. procedure setRXOVFLIE(thebits : TBits_1); inline;
  24635. procedure setRXOVFLIF(thebits : TBits_1); inline;
  24636. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  24637. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  24638. procedure setTXHALFIE(thebits : TBits_1); inline;
  24639. procedure setTXHALFIF(thebits : TBits_1); inline;
  24640. procedure setTXNFULLIE(thebits : TBits_1); inline;
  24641. procedure setTXNFULLIF(thebits : TBits_1); inline;
  24642. procedure setw(thebits : TBits_32); inline;
  24643. public
  24644. procedure clearRXFULLIE; inline;
  24645. procedure clearRXFULLIF; inline;
  24646. procedure clearRXHALFIE; inline;
  24647. procedure clearRXHALFIF; inline;
  24648. procedure clearRXNEMPTYIE; inline;
  24649. procedure clearRXNEMPTYIF; inline;
  24650. procedure clearRXOVFLIE; inline;
  24651. procedure clearRXOVFLIF; inline;
  24652. procedure clearTXEMPTYIE; inline;
  24653. procedure clearTXEMPTYIF; inline;
  24654. procedure clearTXHALFIE; inline;
  24655. procedure clearTXHALFIF; inline;
  24656. procedure clearTXNFULLIE; inline;
  24657. procedure clearTXNFULLIF; inline;
  24658. procedure setRXFULLIE; inline;
  24659. procedure setRXFULLIF; inline;
  24660. procedure setRXHALFIE; inline;
  24661. procedure setRXHALFIF; inline;
  24662. procedure setRXNEMPTYIE; inline;
  24663. procedure setRXNEMPTYIF; inline;
  24664. procedure setRXOVFLIE; inline;
  24665. procedure setRXOVFLIF; inline;
  24666. procedure setTXEMPTYIE; inline;
  24667. procedure setTXEMPTYIF; inline;
  24668. procedure setTXHALFIE; inline;
  24669. procedure setTXHALFIF; inline;
  24670. procedure setTXNFULLIE; inline;
  24671. procedure setTXNFULLIF; inline;
  24672. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  24673. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  24674. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  24675. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  24676. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  24677. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  24678. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  24679. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  24680. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  24681. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  24682. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  24683. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  24684. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  24685. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  24686. property w : TBits_32 read getw write setw;
  24687. end;
  24688. TCAN2_C2FIFOCI1 = record
  24689. private
  24690. function getCFIFOCI : TBits_5; inline;
  24691. function getw : TBits_32; inline;
  24692. procedure setCFIFOCI(thebits : TBits_5); inline;
  24693. procedure setw(thebits : TBits_32); inline;
  24694. public
  24695. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  24696. property w : TBits_32 read getw write setw;
  24697. end;
  24698. TCAN2_C2FIFOCON2 = record
  24699. private
  24700. function getDONLY : TBits_1; inline;
  24701. function getFRESET : TBits_1; inline;
  24702. function getFSIZE : TBits_5; inline;
  24703. function getRTREN : TBits_1; inline;
  24704. function getTXABAT : TBits_1; inline;
  24705. function getTXEN : TBits_1; inline;
  24706. function getTXERR : TBits_1; inline;
  24707. function getTXLARB : TBits_1; inline;
  24708. function getTXPRI : TBits_2; inline;
  24709. function getTXREQ : TBits_1; inline;
  24710. function getUINC : TBits_1; inline;
  24711. function getw : TBits_32; inline;
  24712. procedure setDONLY(thebits : TBits_1); inline;
  24713. procedure setFRESET(thebits : TBits_1); inline;
  24714. procedure setFSIZE(thebits : TBits_5); inline;
  24715. procedure setRTREN(thebits : TBits_1); inline;
  24716. procedure setTXABAT(thebits : TBits_1); inline;
  24717. procedure setTXEN(thebits : TBits_1); inline;
  24718. procedure setTXERR(thebits : TBits_1); inline;
  24719. procedure setTXLARB(thebits : TBits_1); inline;
  24720. procedure setTXPRI(thebits : TBits_2); inline;
  24721. procedure setTXREQ(thebits : TBits_1); inline;
  24722. procedure setUINC(thebits : TBits_1); inline;
  24723. procedure setw(thebits : TBits_32); inline;
  24724. public
  24725. procedure clearDONLY; inline;
  24726. procedure clearFRESET; inline;
  24727. procedure clearRTREN; inline;
  24728. procedure clearTXABAT; inline;
  24729. procedure clearTXEN; inline;
  24730. procedure clearTXERR; inline;
  24731. procedure clearTXLARB; inline;
  24732. procedure clearTXREQ; inline;
  24733. procedure clearUINC; inline;
  24734. procedure setDONLY; inline;
  24735. procedure setFRESET; inline;
  24736. procedure setRTREN; inline;
  24737. procedure setTXABAT; inline;
  24738. procedure setTXEN; inline;
  24739. procedure setTXERR; inline;
  24740. procedure setTXLARB; inline;
  24741. procedure setTXREQ; inline;
  24742. procedure setUINC; inline;
  24743. property DONLY : TBits_1 read getDONLY write setDONLY;
  24744. property FRESET : TBits_1 read getFRESET write setFRESET;
  24745. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  24746. property RTREN : TBits_1 read getRTREN write setRTREN;
  24747. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  24748. property TXEN : TBits_1 read getTXEN write setTXEN;
  24749. property TXERR : TBits_1 read getTXERR write setTXERR;
  24750. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  24751. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  24752. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  24753. property UINC : TBits_1 read getUINC write setUINC;
  24754. property w : TBits_32 read getw write setw;
  24755. end;
  24756. TCAN2_C2FIFOINT2 = record
  24757. private
  24758. function getRXFULLIE : TBits_1; inline;
  24759. function getRXFULLIF : TBits_1; inline;
  24760. function getRXHALFIE : TBits_1; inline;
  24761. function getRXHALFIF : TBits_1; inline;
  24762. function getRXNEMPTYIE : TBits_1; inline;
  24763. function getRXNEMPTYIF : TBits_1; inline;
  24764. function getRXOVFLIE : TBits_1; inline;
  24765. function getRXOVFLIF : TBits_1; inline;
  24766. function getTXEMPTYIE : TBits_1; inline;
  24767. function getTXEMPTYIF : TBits_1; inline;
  24768. function getTXHALFIE : TBits_1; inline;
  24769. function getTXHALFIF : TBits_1; inline;
  24770. function getTXNFULLIE : TBits_1; inline;
  24771. function getTXNFULLIF : TBits_1; inline;
  24772. function getw : TBits_32; inline;
  24773. procedure setRXFULLIE(thebits : TBits_1); inline;
  24774. procedure setRXFULLIF(thebits : TBits_1); inline;
  24775. procedure setRXHALFIE(thebits : TBits_1); inline;
  24776. procedure setRXHALFIF(thebits : TBits_1); inline;
  24777. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  24778. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  24779. procedure setRXOVFLIE(thebits : TBits_1); inline;
  24780. procedure setRXOVFLIF(thebits : TBits_1); inline;
  24781. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  24782. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  24783. procedure setTXHALFIE(thebits : TBits_1); inline;
  24784. procedure setTXHALFIF(thebits : TBits_1); inline;
  24785. procedure setTXNFULLIE(thebits : TBits_1); inline;
  24786. procedure setTXNFULLIF(thebits : TBits_1); inline;
  24787. procedure setw(thebits : TBits_32); inline;
  24788. public
  24789. procedure clearRXFULLIE; inline;
  24790. procedure clearRXFULLIF; inline;
  24791. procedure clearRXHALFIE; inline;
  24792. procedure clearRXHALFIF; inline;
  24793. procedure clearRXNEMPTYIE; inline;
  24794. procedure clearRXNEMPTYIF; inline;
  24795. procedure clearRXOVFLIE; inline;
  24796. procedure clearRXOVFLIF; inline;
  24797. procedure clearTXEMPTYIE; inline;
  24798. procedure clearTXEMPTYIF; inline;
  24799. procedure clearTXHALFIE; inline;
  24800. procedure clearTXHALFIF; inline;
  24801. procedure clearTXNFULLIE; inline;
  24802. procedure clearTXNFULLIF; inline;
  24803. procedure setRXFULLIE; inline;
  24804. procedure setRXFULLIF; inline;
  24805. procedure setRXHALFIE; inline;
  24806. procedure setRXHALFIF; inline;
  24807. procedure setRXNEMPTYIE; inline;
  24808. procedure setRXNEMPTYIF; inline;
  24809. procedure setRXOVFLIE; inline;
  24810. procedure setRXOVFLIF; inline;
  24811. procedure setTXEMPTYIE; inline;
  24812. procedure setTXEMPTYIF; inline;
  24813. procedure setTXHALFIE; inline;
  24814. procedure setTXHALFIF; inline;
  24815. procedure setTXNFULLIE; inline;
  24816. procedure setTXNFULLIF; inline;
  24817. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  24818. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  24819. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  24820. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  24821. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  24822. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  24823. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  24824. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  24825. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  24826. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  24827. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  24828. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  24829. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  24830. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  24831. property w : TBits_32 read getw write setw;
  24832. end;
  24833. TCAN2_C2FIFOCI2 = record
  24834. private
  24835. function getCFIFOCI : TBits_5; inline;
  24836. function getw : TBits_32; inline;
  24837. procedure setCFIFOCI(thebits : TBits_5); inline;
  24838. procedure setw(thebits : TBits_32); inline;
  24839. public
  24840. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  24841. property w : TBits_32 read getw write setw;
  24842. end;
  24843. TCAN2_C2FIFOCON3 = record
  24844. private
  24845. function getDONLY : TBits_1; inline;
  24846. function getFRESET : TBits_1; inline;
  24847. function getFSIZE : TBits_5; inline;
  24848. function getRTREN : TBits_1; inline;
  24849. function getTXABAT : TBits_1; inline;
  24850. function getTXEN : TBits_1; inline;
  24851. function getTXERR : TBits_1; inline;
  24852. function getTXLARB : TBits_1; inline;
  24853. function getTXPRI : TBits_2; inline;
  24854. function getTXREQ : TBits_1; inline;
  24855. function getUINC : TBits_1; inline;
  24856. function getw : TBits_32; inline;
  24857. procedure setDONLY(thebits : TBits_1); inline;
  24858. procedure setFRESET(thebits : TBits_1); inline;
  24859. procedure setFSIZE(thebits : TBits_5); inline;
  24860. procedure setRTREN(thebits : TBits_1); inline;
  24861. procedure setTXABAT(thebits : TBits_1); inline;
  24862. procedure setTXEN(thebits : TBits_1); inline;
  24863. procedure setTXERR(thebits : TBits_1); inline;
  24864. procedure setTXLARB(thebits : TBits_1); inline;
  24865. procedure setTXPRI(thebits : TBits_2); inline;
  24866. procedure setTXREQ(thebits : TBits_1); inline;
  24867. procedure setUINC(thebits : TBits_1); inline;
  24868. procedure setw(thebits : TBits_32); inline;
  24869. public
  24870. procedure clearDONLY; inline;
  24871. procedure clearFRESET; inline;
  24872. procedure clearRTREN; inline;
  24873. procedure clearTXABAT; inline;
  24874. procedure clearTXEN; inline;
  24875. procedure clearTXERR; inline;
  24876. procedure clearTXLARB; inline;
  24877. procedure clearTXREQ; inline;
  24878. procedure clearUINC; inline;
  24879. procedure setDONLY; inline;
  24880. procedure setFRESET; inline;
  24881. procedure setRTREN; inline;
  24882. procedure setTXABAT; inline;
  24883. procedure setTXEN; inline;
  24884. procedure setTXERR; inline;
  24885. procedure setTXLARB; inline;
  24886. procedure setTXREQ; inline;
  24887. procedure setUINC; inline;
  24888. property DONLY : TBits_1 read getDONLY write setDONLY;
  24889. property FRESET : TBits_1 read getFRESET write setFRESET;
  24890. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  24891. property RTREN : TBits_1 read getRTREN write setRTREN;
  24892. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  24893. property TXEN : TBits_1 read getTXEN write setTXEN;
  24894. property TXERR : TBits_1 read getTXERR write setTXERR;
  24895. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  24896. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  24897. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  24898. property UINC : TBits_1 read getUINC write setUINC;
  24899. property w : TBits_32 read getw write setw;
  24900. end;
  24901. TCAN2_C2FIFOINT3 = record
  24902. private
  24903. function getRXFULLIE : TBits_1; inline;
  24904. function getRXFULLIF : TBits_1; inline;
  24905. function getRXHALFIE : TBits_1; inline;
  24906. function getRXHALFIF : TBits_1; inline;
  24907. function getRXNEMPTYIE : TBits_1; inline;
  24908. function getRXNEMPTYIF : TBits_1; inline;
  24909. function getRXOVFLIE : TBits_1; inline;
  24910. function getRXOVFLIF : TBits_1; inline;
  24911. function getTXEMPTYIE : TBits_1; inline;
  24912. function getTXEMPTYIF : TBits_1; inline;
  24913. function getTXHALFIE : TBits_1; inline;
  24914. function getTXHALFIF : TBits_1; inline;
  24915. function getTXNFULLIE : TBits_1; inline;
  24916. function getTXNFULLIF : TBits_1; inline;
  24917. function getw : TBits_32; inline;
  24918. procedure setRXFULLIE(thebits : TBits_1); inline;
  24919. procedure setRXFULLIF(thebits : TBits_1); inline;
  24920. procedure setRXHALFIE(thebits : TBits_1); inline;
  24921. procedure setRXHALFIF(thebits : TBits_1); inline;
  24922. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  24923. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  24924. procedure setRXOVFLIE(thebits : TBits_1); inline;
  24925. procedure setRXOVFLIF(thebits : TBits_1); inline;
  24926. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  24927. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  24928. procedure setTXHALFIE(thebits : TBits_1); inline;
  24929. procedure setTXHALFIF(thebits : TBits_1); inline;
  24930. procedure setTXNFULLIE(thebits : TBits_1); inline;
  24931. procedure setTXNFULLIF(thebits : TBits_1); inline;
  24932. procedure setw(thebits : TBits_32); inline;
  24933. public
  24934. procedure clearRXFULLIE; inline;
  24935. procedure clearRXFULLIF; inline;
  24936. procedure clearRXHALFIE; inline;
  24937. procedure clearRXHALFIF; inline;
  24938. procedure clearRXNEMPTYIE; inline;
  24939. procedure clearRXNEMPTYIF; inline;
  24940. procedure clearRXOVFLIE; inline;
  24941. procedure clearRXOVFLIF; inline;
  24942. procedure clearTXEMPTYIE; inline;
  24943. procedure clearTXEMPTYIF; inline;
  24944. procedure clearTXHALFIE; inline;
  24945. procedure clearTXHALFIF; inline;
  24946. procedure clearTXNFULLIE; inline;
  24947. procedure clearTXNFULLIF; inline;
  24948. procedure setRXFULLIE; inline;
  24949. procedure setRXFULLIF; inline;
  24950. procedure setRXHALFIE; inline;
  24951. procedure setRXHALFIF; inline;
  24952. procedure setRXNEMPTYIE; inline;
  24953. procedure setRXNEMPTYIF; inline;
  24954. procedure setRXOVFLIE; inline;
  24955. procedure setRXOVFLIF; inline;
  24956. procedure setTXEMPTYIE; inline;
  24957. procedure setTXEMPTYIF; inline;
  24958. procedure setTXHALFIE; inline;
  24959. procedure setTXHALFIF; inline;
  24960. procedure setTXNFULLIE; inline;
  24961. procedure setTXNFULLIF; inline;
  24962. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  24963. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  24964. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  24965. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  24966. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  24967. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  24968. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  24969. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  24970. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  24971. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  24972. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  24973. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  24974. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  24975. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  24976. property w : TBits_32 read getw write setw;
  24977. end;
  24978. TCAN2_C2FIFOCI3 = record
  24979. private
  24980. function getCFIFOCI : TBits_5; inline;
  24981. function getw : TBits_32; inline;
  24982. procedure setCFIFOCI(thebits : TBits_5); inline;
  24983. procedure setw(thebits : TBits_32); inline;
  24984. public
  24985. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  24986. property w : TBits_32 read getw write setw;
  24987. end;
  24988. TCAN2_C2FIFOCON4 = record
  24989. private
  24990. function getDONLY : TBits_1; inline;
  24991. function getFRESET : TBits_1; inline;
  24992. function getFSIZE : TBits_5; inline;
  24993. function getRTREN : TBits_1; inline;
  24994. function getTXABAT : TBits_1; inline;
  24995. function getTXEN : TBits_1; inline;
  24996. function getTXERR : TBits_1; inline;
  24997. function getTXLARB : TBits_1; inline;
  24998. function getTXPRI : TBits_2; inline;
  24999. function getTXREQ : TBits_1; inline;
  25000. function getUINC : TBits_1; inline;
  25001. function getw : TBits_32; inline;
  25002. procedure setDONLY(thebits : TBits_1); inline;
  25003. procedure setFRESET(thebits : TBits_1); inline;
  25004. procedure setFSIZE(thebits : TBits_5); inline;
  25005. procedure setRTREN(thebits : TBits_1); inline;
  25006. procedure setTXABAT(thebits : TBits_1); inline;
  25007. procedure setTXEN(thebits : TBits_1); inline;
  25008. procedure setTXERR(thebits : TBits_1); inline;
  25009. procedure setTXLARB(thebits : TBits_1); inline;
  25010. procedure setTXPRI(thebits : TBits_2); inline;
  25011. procedure setTXREQ(thebits : TBits_1); inline;
  25012. procedure setUINC(thebits : TBits_1); inline;
  25013. procedure setw(thebits : TBits_32); inline;
  25014. public
  25015. procedure clearDONLY; inline;
  25016. procedure clearFRESET; inline;
  25017. procedure clearRTREN; inline;
  25018. procedure clearTXABAT; inline;
  25019. procedure clearTXEN; inline;
  25020. procedure clearTXERR; inline;
  25021. procedure clearTXLARB; inline;
  25022. procedure clearTXREQ; inline;
  25023. procedure clearUINC; inline;
  25024. procedure setDONLY; inline;
  25025. procedure setFRESET; inline;
  25026. procedure setRTREN; inline;
  25027. procedure setTXABAT; inline;
  25028. procedure setTXEN; inline;
  25029. procedure setTXERR; inline;
  25030. procedure setTXLARB; inline;
  25031. procedure setTXREQ; inline;
  25032. procedure setUINC; inline;
  25033. property DONLY : TBits_1 read getDONLY write setDONLY;
  25034. property FRESET : TBits_1 read getFRESET write setFRESET;
  25035. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25036. property RTREN : TBits_1 read getRTREN write setRTREN;
  25037. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25038. property TXEN : TBits_1 read getTXEN write setTXEN;
  25039. property TXERR : TBits_1 read getTXERR write setTXERR;
  25040. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25041. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25042. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25043. property UINC : TBits_1 read getUINC write setUINC;
  25044. property w : TBits_32 read getw write setw;
  25045. end;
  25046. TCAN2_C2FIFOINT4 = record
  25047. private
  25048. function getRXFULLIE : TBits_1; inline;
  25049. function getRXFULLIF : TBits_1; inline;
  25050. function getRXHALFIE : TBits_1; inline;
  25051. function getRXHALFIF : TBits_1; inline;
  25052. function getRXNEMPTYIE : TBits_1; inline;
  25053. function getRXNEMPTYIF : TBits_1; inline;
  25054. function getRXOVFLIE : TBits_1; inline;
  25055. function getRXOVFLIF : TBits_1; inline;
  25056. function getTXEMPTYIE : TBits_1; inline;
  25057. function getTXEMPTYIF : TBits_1; inline;
  25058. function getTXHALFIE : TBits_1; inline;
  25059. function getTXHALFIF : TBits_1; inline;
  25060. function getTXNFULLIE : TBits_1; inline;
  25061. function getTXNFULLIF : TBits_1; inline;
  25062. function getw : TBits_32; inline;
  25063. procedure setRXFULLIE(thebits : TBits_1); inline;
  25064. procedure setRXFULLIF(thebits : TBits_1); inline;
  25065. procedure setRXHALFIE(thebits : TBits_1); inline;
  25066. procedure setRXHALFIF(thebits : TBits_1); inline;
  25067. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25068. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25069. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25070. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25071. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25072. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25073. procedure setTXHALFIE(thebits : TBits_1); inline;
  25074. procedure setTXHALFIF(thebits : TBits_1); inline;
  25075. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25076. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25077. procedure setw(thebits : TBits_32); inline;
  25078. public
  25079. procedure clearRXFULLIE; inline;
  25080. procedure clearRXFULLIF; inline;
  25081. procedure clearRXHALFIE; inline;
  25082. procedure clearRXHALFIF; inline;
  25083. procedure clearRXNEMPTYIE; inline;
  25084. procedure clearRXNEMPTYIF; inline;
  25085. procedure clearRXOVFLIE; inline;
  25086. procedure clearRXOVFLIF; inline;
  25087. procedure clearTXEMPTYIE; inline;
  25088. procedure clearTXEMPTYIF; inline;
  25089. procedure clearTXHALFIE; inline;
  25090. procedure clearTXHALFIF; inline;
  25091. procedure clearTXNFULLIE; inline;
  25092. procedure clearTXNFULLIF; inline;
  25093. procedure setRXFULLIE; inline;
  25094. procedure setRXFULLIF; inline;
  25095. procedure setRXHALFIE; inline;
  25096. procedure setRXHALFIF; inline;
  25097. procedure setRXNEMPTYIE; inline;
  25098. procedure setRXNEMPTYIF; inline;
  25099. procedure setRXOVFLIE; inline;
  25100. procedure setRXOVFLIF; inline;
  25101. procedure setTXEMPTYIE; inline;
  25102. procedure setTXEMPTYIF; inline;
  25103. procedure setTXHALFIE; inline;
  25104. procedure setTXHALFIF; inline;
  25105. procedure setTXNFULLIE; inline;
  25106. procedure setTXNFULLIF; inline;
  25107. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25108. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25109. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25110. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25111. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25112. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25113. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25114. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25115. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25116. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25117. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25118. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25119. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25120. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25121. property w : TBits_32 read getw write setw;
  25122. end;
  25123. TCAN2_C2FIFOCI4 = record
  25124. private
  25125. function getCFIFOCI : TBits_5; inline;
  25126. function getw : TBits_32; inline;
  25127. procedure setCFIFOCI(thebits : TBits_5); inline;
  25128. procedure setw(thebits : TBits_32); inline;
  25129. public
  25130. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25131. property w : TBits_32 read getw write setw;
  25132. end;
  25133. TCAN2_C2FIFOCON5 = record
  25134. private
  25135. function getDONLY : TBits_1; inline;
  25136. function getFRESET : TBits_1; inline;
  25137. function getFSIZE : TBits_5; inline;
  25138. function getRTREN : TBits_1; inline;
  25139. function getTXABAT : TBits_1; inline;
  25140. function getTXEN : TBits_1; inline;
  25141. function getTXERR : TBits_1; inline;
  25142. function getTXLARB : TBits_1; inline;
  25143. function getTXPRI : TBits_2; inline;
  25144. function getTXREQ : TBits_1; inline;
  25145. function getUINC : TBits_1; inline;
  25146. function getw : TBits_32; inline;
  25147. procedure setDONLY(thebits : TBits_1); inline;
  25148. procedure setFRESET(thebits : TBits_1); inline;
  25149. procedure setFSIZE(thebits : TBits_5); inline;
  25150. procedure setRTREN(thebits : TBits_1); inline;
  25151. procedure setTXABAT(thebits : TBits_1); inline;
  25152. procedure setTXEN(thebits : TBits_1); inline;
  25153. procedure setTXERR(thebits : TBits_1); inline;
  25154. procedure setTXLARB(thebits : TBits_1); inline;
  25155. procedure setTXPRI(thebits : TBits_2); inline;
  25156. procedure setTXREQ(thebits : TBits_1); inline;
  25157. procedure setUINC(thebits : TBits_1); inline;
  25158. procedure setw(thebits : TBits_32); inline;
  25159. public
  25160. procedure clearDONLY; inline;
  25161. procedure clearFRESET; inline;
  25162. procedure clearRTREN; inline;
  25163. procedure clearTXABAT; inline;
  25164. procedure clearTXEN; inline;
  25165. procedure clearTXERR; inline;
  25166. procedure clearTXLARB; inline;
  25167. procedure clearTXREQ; inline;
  25168. procedure clearUINC; inline;
  25169. procedure setDONLY; inline;
  25170. procedure setFRESET; inline;
  25171. procedure setRTREN; inline;
  25172. procedure setTXABAT; inline;
  25173. procedure setTXEN; inline;
  25174. procedure setTXERR; inline;
  25175. procedure setTXLARB; inline;
  25176. procedure setTXREQ; inline;
  25177. procedure setUINC; inline;
  25178. property DONLY : TBits_1 read getDONLY write setDONLY;
  25179. property FRESET : TBits_1 read getFRESET write setFRESET;
  25180. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25181. property RTREN : TBits_1 read getRTREN write setRTREN;
  25182. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25183. property TXEN : TBits_1 read getTXEN write setTXEN;
  25184. property TXERR : TBits_1 read getTXERR write setTXERR;
  25185. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25186. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25187. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25188. property UINC : TBits_1 read getUINC write setUINC;
  25189. property w : TBits_32 read getw write setw;
  25190. end;
  25191. TCAN2_C2FIFOINT5 = record
  25192. private
  25193. function getRXFULLIE : TBits_1; inline;
  25194. function getRXFULLIF : TBits_1; inline;
  25195. function getRXHALFIE : TBits_1; inline;
  25196. function getRXHALFIF : TBits_1; inline;
  25197. function getRXNEMPTYIE : TBits_1; inline;
  25198. function getRXNEMPTYIF : TBits_1; inline;
  25199. function getRXOVFLIE : TBits_1; inline;
  25200. function getRXOVFLIF : TBits_1; inline;
  25201. function getTXEMPTYIE : TBits_1; inline;
  25202. function getTXEMPTYIF : TBits_1; inline;
  25203. function getTXHALFIE : TBits_1; inline;
  25204. function getTXHALFIF : TBits_1; inline;
  25205. function getTXNFULLIE : TBits_1; inline;
  25206. function getTXNFULLIF : TBits_1; inline;
  25207. function getw : TBits_32; inline;
  25208. procedure setRXFULLIE(thebits : TBits_1); inline;
  25209. procedure setRXFULLIF(thebits : TBits_1); inline;
  25210. procedure setRXHALFIE(thebits : TBits_1); inline;
  25211. procedure setRXHALFIF(thebits : TBits_1); inline;
  25212. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25213. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25214. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25215. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25216. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25217. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25218. procedure setTXHALFIE(thebits : TBits_1); inline;
  25219. procedure setTXHALFIF(thebits : TBits_1); inline;
  25220. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25221. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25222. procedure setw(thebits : TBits_32); inline;
  25223. public
  25224. procedure clearRXFULLIE; inline;
  25225. procedure clearRXFULLIF; inline;
  25226. procedure clearRXHALFIE; inline;
  25227. procedure clearRXHALFIF; inline;
  25228. procedure clearRXNEMPTYIE; inline;
  25229. procedure clearRXNEMPTYIF; inline;
  25230. procedure clearRXOVFLIE; inline;
  25231. procedure clearRXOVFLIF; inline;
  25232. procedure clearTXEMPTYIE; inline;
  25233. procedure clearTXEMPTYIF; inline;
  25234. procedure clearTXHALFIE; inline;
  25235. procedure clearTXHALFIF; inline;
  25236. procedure clearTXNFULLIE; inline;
  25237. procedure clearTXNFULLIF; inline;
  25238. procedure setRXFULLIE; inline;
  25239. procedure setRXFULLIF; inline;
  25240. procedure setRXHALFIE; inline;
  25241. procedure setRXHALFIF; inline;
  25242. procedure setRXNEMPTYIE; inline;
  25243. procedure setRXNEMPTYIF; inline;
  25244. procedure setRXOVFLIE; inline;
  25245. procedure setRXOVFLIF; inline;
  25246. procedure setTXEMPTYIE; inline;
  25247. procedure setTXEMPTYIF; inline;
  25248. procedure setTXHALFIE; inline;
  25249. procedure setTXHALFIF; inline;
  25250. procedure setTXNFULLIE; inline;
  25251. procedure setTXNFULLIF; inline;
  25252. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25253. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25254. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25255. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25256. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25257. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25258. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25259. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25260. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25261. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25262. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25263. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25264. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25265. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25266. property w : TBits_32 read getw write setw;
  25267. end;
  25268. TCAN2_C2FIFOCI5 = record
  25269. private
  25270. function getCFIFOCI : TBits_5; inline;
  25271. function getw : TBits_32; inline;
  25272. procedure setCFIFOCI(thebits : TBits_5); inline;
  25273. procedure setw(thebits : TBits_32); inline;
  25274. public
  25275. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25276. property w : TBits_32 read getw write setw;
  25277. end;
  25278. TCAN2_C2FIFOCON6 = record
  25279. private
  25280. function getDONLY : TBits_1; inline;
  25281. function getFRESET : TBits_1; inline;
  25282. function getFSIZE : TBits_5; inline;
  25283. function getRTREN : TBits_1; inline;
  25284. function getTXABAT : TBits_1; inline;
  25285. function getTXEN : TBits_1; inline;
  25286. function getTXERR : TBits_1; inline;
  25287. function getTXLARB : TBits_1; inline;
  25288. function getTXPRI : TBits_2; inline;
  25289. function getTXREQ : TBits_1; inline;
  25290. function getUINC : TBits_1; inline;
  25291. function getw : TBits_32; inline;
  25292. procedure setDONLY(thebits : TBits_1); inline;
  25293. procedure setFRESET(thebits : TBits_1); inline;
  25294. procedure setFSIZE(thebits : TBits_5); inline;
  25295. procedure setRTREN(thebits : TBits_1); inline;
  25296. procedure setTXABAT(thebits : TBits_1); inline;
  25297. procedure setTXEN(thebits : TBits_1); inline;
  25298. procedure setTXERR(thebits : TBits_1); inline;
  25299. procedure setTXLARB(thebits : TBits_1); inline;
  25300. procedure setTXPRI(thebits : TBits_2); inline;
  25301. procedure setTXREQ(thebits : TBits_1); inline;
  25302. procedure setUINC(thebits : TBits_1); inline;
  25303. procedure setw(thebits : TBits_32); inline;
  25304. public
  25305. procedure clearDONLY; inline;
  25306. procedure clearFRESET; inline;
  25307. procedure clearRTREN; inline;
  25308. procedure clearTXABAT; inline;
  25309. procedure clearTXEN; inline;
  25310. procedure clearTXERR; inline;
  25311. procedure clearTXLARB; inline;
  25312. procedure clearTXREQ; inline;
  25313. procedure clearUINC; inline;
  25314. procedure setDONLY; inline;
  25315. procedure setFRESET; inline;
  25316. procedure setRTREN; inline;
  25317. procedure setTXABAT; inline;
  25318. procedure setTXEN; inline;
  25319. procedure setTXERR; inline;
  25320. procedure setTXLARB; inline;
  25321. procedure setTXREQ; inline;
  25322. procedure setUINC; inline;
  25323. property DONLY : TBits_1 read getDONLY write setDONLY;
  25324. property FRESET : TBits_1 read getFRESET write setFRESET;
  25325. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25326. property RTREN : TBits_1 read getRTREN write setRTREN;
  25327. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25328. property TXEN : TBits_1 read getTXEN write setTXEN;
  25329. property TXERR : TBits_1 read getTXERR write setTXERR;
  25330. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25331. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25332. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25333. property UINC : TBits_1 read getUINC write setUINC;
  25334. property w : TBits_32 read getw write setw;
  25335. end;
  25336. TCAN2_C2FIFOINT6 = record
  25337. private
  25338. function getRXFULLIE : TBits_1; inline;
  25339. function getRXFULLIF : TBits_1; inline;
  25340. function getRXHALFIE : TBits_1; inline;
  25341. function getRXHALFIF : TBits_1; inline;
  25342. function getRXNEMPTYIE : TBits_1; inline;
  25343. function getRXNEMPTYIF : TBits_1; inline;
  25344. function getRXOVFLIE : TBits_1; inline;
  25345. function getRXOVFLIF : TBits_1; inline;
  25346. function getTXEMPTYIE : TBits_1; inline;
  25347. function getTXEMPTYIF : TBits_1; inline;
  25348. function getTXHALFIE : TBits_1; inline;
  25349. function getTXHALFIF : TBits_1; inline;
  25350. function getTXNFULLIE : TBits_1; inline;
  25351. function getTXNFULLIF : TBits_1; inline;
  25352. function getw : TBits_32; inline;
  25353. procedure setRXFULLIE(thebits : TBits_1); inline;
  25354. procedure setRXFULLIF(thebits : TBits_1); inline;
  25355. procedure setRXHALFIE(thebits : TBits_1); inline;
  25356. procedure setRXHALFIF(thebits : TBits_1); inline;
  25357. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25358. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25359. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25360. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25361. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25362. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25363. procedure setTXHALFIE(thebits : TBits_1); inline;
  25364. procedure setTXHALFIF(thebits : TBits_1); inline;
  25365. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25366. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25367. procedure setw(thebits : TBits_32); inline;
  25368. public
  25369. procedure clearRXFULLIE; inline;
  25370. procedure clearRXFULLIF; inline;
  25371. procedure clearRXHALFIE; inline;
  25372. procedure clearRXHALFIF; inline;
  25373. procedure clearRXNEMPTYIE; inline;
  25374. procedure clearRXNEMPTYIF; inline;
  25375. procedure clearRXOVFLIE; inline;
  25376. procedure clearRXOVFLIF; inline;
  25377. procedure clearTXEMPTYIE; inline;
  25378. procedure clearTXEMPTYIF; inline;
  25379. procedure clearTXHALFIE; inline;
  25380. procedure clearTXHALFIF; inline;
  25381. procedure clearTXNFULLIE; inline;
  25382. procedure clearTXNFULLIF; inline;
  25383. procedure setRXFULLIE; inline;
  25384. procedure setRXFULLIF; inline;
  25385. procedure setRXHALFIE; inline;
  25386. procedure setRXHALFIF; inline;
  25387. procedure setRXNEMPTYIE; inline;
  25388. procedure setRXNEMPTYIF; inline;
  25389. procedure setRXOVFLIE; inline;
  25390. procedure setRXOVFLIF; inline;
  25391. procedure setTXEMPTYIE; inline;
  25392. procedure setTXEMPTYIF; inline;
  25393. procedure setTXHALFIE; inline;
  25394. procedure setTXHALFIF; inline;
  25395. procedure setTXNFULLIE; inline;
  25396. procedure setTXNFULLIF; inline;
  25397. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25398. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25399. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25400. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25401. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25402. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25403. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25404. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25405. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25406. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25407. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25408. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25409. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25410. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25411. property w : TBits_32 read getw write setw;
  25412. end;
  25413. TCAN2_C2FIFOCI6 = record
  25414. private
  25415. function getCFIFOCI : TBits_5; inline;
  25416. function getw : TBits_32; inline;
  25417. procedure setCFIFOCI(thebits : TBits_5); inline;
  25418. procedure setw(thebits : TBits_32); inline;
  25419. public
  25420. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25421. property w : TBits_32 read getw write setw;
  25422. end;
  25423. TCAN2_C2FIFOCON7 = record
  25424. private
  25425. function getDONLY : TBits_1; inline;
  25426. function getFRESET : TBits_1; inline;
  25427. function getFSIZE : TBits_5; inline;
  25428. function getRTREN : TBits_1; inline;
  25429. function getTXABAT : TBits_1; inline;
  25430. function getTXEN : TBits_1; inline;
  25431. function getTXERR : TBits_1; inline;
  25432. function getTXLARB : TBits_1; inline;
  25433. function getTXPRI : TBits_2; inline;
  25434. function getTXREQ : TBits_1; inline;
  25435. function getUINC : TBits_1; inline;
  25436. function getw : TBits_32; inline;
  25437. procedure setDONLY(thebits : TBits_1); inline;
  25438. procedure setFRESET(thebits : TBits_1); inline;
  25439. procedure setFSIZE(thebits : TBits_5); inline;
  25440. procedure setRTREN(thebits : TBits_1); inline;
  25441. procedure setTXABAT(thebits : TBits_1); inline;
  25442. procedure setTXEN(thebits : TBits_1); inline;
  25443. procedure setTXERR(thebits : TBits_1); inline;
  25444. procedure setTXLARB(thebits : TBits_1); inline;
  25445. procedure setTXPRI(thebits : TBits_2); inline;
  25446. procedure setTXREQ(thebits : TBits_1); inline;
  25447. procedure setUINC(thebits : TBits_1); inline;
  25448. procedure setw(thebits : TBits_32); inline;
  25449. public
  25450. procedure clearDONLY; inline;
  25451. procedure clearFRESET; inline;
  25452. procedure clearRTREN; inline;
  25453. procedure clearTXABAT; inline;
  25454. procedure clearTXEN; inline;
  25455. procedure clearTXERR; inline;
  25456. procedure clearTXLARB; inline;
  25457. procedure clearTXREQ; inline;
  25458. procedure clearUINC; inline;
  25459. procedure setDONLY; inline;
  25460. procedure setFRESET; inline;
  25461. procedure setRTREN; inline;
  25462. procedure setTXABAT; inline;
  25463. procedure setTXEN; inline;
  25464. procedure setTXERR; inline;
  25465. procedure setTXLARB; inline;
  25466. procedure setTXREQ; inline;
  25467. procedure setUINC; inline;
  25468. property DONLY : TBits_1 read getDONLY write setDONLY;
  25469. property FRESET : TBits_1 read getFRESET write setFRESET;
  25470. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25471. property RTREN : TBits_1 read getRTREN write setRTREN;
  25472. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25473. property TXEN : TBits_1 read getTXEN write setTXEN;
  25474. property TXERR : TBits_1 read getTXERR write setTXERR;
  25475. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25476. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25477. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25478. property UINC : TBits_1 read getUINC write setUINC;
  25479. property w : TBits_32 read getw write setw;
  25480. end;
  25481. TCAN2_C2FIFOINT7 = record
  25482. private
  25483. function getRXFULLIE : TBits_1; inline;
  25484. function getRXFULLIF : TBits_1; inline;
  25485. function getRXHALFIE : TBits_1; inline;
  25486. function getRXHALFIF : TBits_1; inline;
  25487. function getRXNEMPTYIE : TBits_1; inline;
  25488. function getRXNEMPTYIF : TBits_1; inline;
  25489. function getRXOVFLIE : TBits_1; inline;
  25490. function getRXOVFLIF : TBits_1; inline;
  25491. function getTXEMPTYIE : TBits_1; inline;
  25492. function getTXEMPTYIF : TBits_1; inline;
  25493. function getTXHALFIE : TBits_1; inline;
  25494. function getTXHALFIF : TBits_1; inline;
  25495. function getTXNFULLIE : TBits_1; inline;
  25496. function getTXNFULLIF : TBits_1; inline;
  25497. function getw : TBits_32; inline;
  25498. procedure setRXFULLIE(thebits : TBits_1); inline;
  25499. procedure setRXFULLIF(thebits : TBits_1); inline;
  25500. procedure setRXHALFIE(thebits : TBits_1); inline;
  25501. procedure setRXHALFIF(thebits : TBits_1); inline;
  25502. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25503. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25504. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25505. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25506. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25507. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25508. procedure setTXHALFIE(thebits : TBits_1); inline;
  25509. procedure setTXHALFIF(thebits : TBits_1); inline;
  25510. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25511. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25512. procedure setw(thebits : TBits_32); inline;
  25513. public
  25514. procedure clearRXFULLIE; inline;
  25515. procedure clearRXFULLIF; inline;
  25516. procedure clearRXHALFIE; inline;
  25517. procedure clearRXHALFIF; inline;
  25518. procedure clearRXNEMPTYIE; inline;
  25519. procedure clearRXNEMPTYIF; inline;
  25520. procedure clearRXOVFLIE; inline;
  25521. procedure clearRXOVFLIF; inline;
  25522. procedure clearTXEMPTYIE; inline;
  25523. procedure clearTXEMPTYIF; inline;
  25524. procedure clearTXHALFIE; inline;
  25525. procedure clearTXHALFIF; inline;
  25526. procedure clearTXNFULLIE; inline;
  25527. procedure clearTXNFULLIF; inline;
  25528. procedure setRXFULLIE; inline;
  25529. procedure setRXFULLIF; inline;
  25530. procedure setRXHALFIE; inline;
  25531. procedure setRXHALFIF; inline;
  25532. procedure setRXNEMPTYIE; inline;
  25533. procedure setRXNEMPTYIF; inline;
  25534. procedure setRXOVFLIE; inline;
  25535. procedure setRXOVFLIF; inline;
  25536. procedure setTXEMPTYIE; inline;
  25537. procedure setTXEMPTYIF; inline;
  25538. procedure setTXHALFIE; inline;
  25539. procedure setTXHALFIF; inline;
  25540. procedure setTXNFULLIE; inline;
  25541. procedure setTXNFULLIF; inline;
  25542. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25543. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25544. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25545. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25546. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25547. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25548. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25549. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25550. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25551. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25552. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25553. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25554. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25555. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25556. property w : TBits_32 read getw write setw;
  25557. end;
  25558. TCAN2_C2FIFOCI7 = record
  25559. private
  25560. function getCFIFOCI : TBits_5; inline;
  25561. function getw : TBits_32; inline;
  25562. procedure setCFIFOCI(thebits : TBits_5); inline;
  25563. procedure setw(thebits : TBits_32); inline;
  25564. public
  25565. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25566. property w : TBits_32 read getw write setw;
  25567. end;
  25568. TCAN2_C2FIFOCON8 = record
  25569. private
  25570. function getDONLY : TBits_1; inline;
  25571. function getFRESET : TBits_1; inline;
  25572. function getFSIZE : TBits_5; inline;
  25573. function getRTREN : TBits_1; inline;
  25574. function getTXABAT : TBits_1; inline;
  25575. function getTXEN : TBits_1; inline;
  25576. function getTXERR : TBits_1; inline;
  25577. function getTXLARB : TBits_1; inline;
  25578. function getTXPRI : TBits_2; inline;
  25579. function getTXREQ : TBits_1; inline;
  25580. function getUINC : TBits_1; inline;
  25581. function getw : TBits_32; inline;
  25582. procedure setDONLY(thebits : TBits_1); inline;
  25583. procedure setFRESET(thebits : TBits_1); inline;
  25584. procedure setFSIZE(thebits : TBits_5); inline;
  25585. procedure setRTREN(thebits : TBits_1); inline;
  25586. procedure setTXABAT(thebits : TBits_1); inline;
  25587. procedure setTXEN(thebits : TBits_1); inline;
  25588. procedure setTXERR(thebits : TBits_1); inline;
  25589. procedure setTXLARB(thebits : TBits_1); inline;
  25590. procedure setTXPRI(thebits : TBits_2); inline;
  25591. procedure setTXREQ(thebits : TBits_1); inline;
  25592. procedure setUINC(thebits : TBits_1); inline;
  25593. procedure setw(thebits : TBits_32); inline;
  25594. public
  25595. procedure clearDONLY; inline;
  25596. procedure clearFRESET; inline;
  25597. procedure clearRTREN; inline;
  25598. procedure clearTXABAT; inline;
  25599. procedure clearTXEN; inline;
  25600. procedure clearTXERR; inline;
  25601. procedure clearTXLARB; inline;
  25602. procedure clearTXREQ; inline;
  25603. procedure clearUINC; inline;
  25604. procedure setDONLY; inline;
  25605. procedure setFRESET; inline;
  25606. procedure setRTREN; inline;
  25607. procedure setTXABAT; inline;
  25608. procedure setTXEN; inline;
  25609. procedure setTXERR; inline;
  25610. procedure setTXLARB; inline;
  25611. procedure setTXREQ; inline;
  25612. procedure setUINC; inline;
  25613. property DONLY : TBits_1 read getDONLY write setDONLY;
  25614. property FRESET : TBits_1 read getFRESET write setFRESET;
  25615. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25616. property RTREN : TBits_1 read getRTREN write setRTREN;
  25617. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25618. property TXEN : TBits_1 read getTXEN write setTXEN;
  25619. property TXERR : TBits_1 read getTXERR write setTXERR;
  25620. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25621. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25622. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25623. property UINC : TBits_1 read getUINC write setUINC;
  25624. property w : TBits_32 read getw write setw;
  25625. end;
  25626. TCAN2_C2FIFOINT8 = record
  25627. private
  25628. function getRXFULLIE : TBits_1; inline;
  25629. function getRXFULLIF : TBits_1; inline;
  25630. function getRXHALFIE : TBits_1; inline;
  25631. function getRXHALFIF : TBits_1; inline;
  25632. function getRXNEMPTYIE : TBits_1; inline;
  25633. function getRXNEMPTYIF : TBits_1; inline;
  25634. function getRXOVFLIE : TBits_1; inline;
  25635. function getRXOVFLIF : TBits_1; inline;
  25636. function getTXEMPTYIE : TBits_1; inline;
  25637. function getTXEMPTYIF : TBits_1; inline;
  25638. function getTXHALFIE : TBits_1; inline;
  25639. function getTXHALFIF : TBits_1; inline;
  25640. function getTXNFULLIE : TBits_1; inline;
  25641. function getTXNFULLIF : TBits_1; inline;
  25642. function getw : TBits_32; inline;
  25643. procedure setRXFULLIE(thebits : TBits_1); inline;
  25644. procedure setRXFULLIF(thebits : TBits_1); inline;
  25645. procedure setRXHALFIE(thebits : TBits_1); inline;
  25646. procedure setRXHALFIF(thebits : TBits_1); inline;
  25647. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25648. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25649. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25650. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25651. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25652. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25653. procedure setTXHALFIE(thebits : TBits_1); inline;
  25654. procedure setTXHALFIF(thebits : TBits_1); inline;
  25655. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25656. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25657. procedure setw(thebits : TBits_32); inline;
  25658. public
  25659. procedure clearRXFULLIE; inline;
  25660. procedure clearRXFULLIF; inline;
  25661. procedure clearRXHALFIE; inline;
  25662. procedure clearRXHALFIF; inline;
  25663. procedure clearRXNEMPTYIE; inline;
  25664. procedure clearRXNEMPTYIF; inline;
  25665. procedure clearRXOVFLIE; inline;
  25666. procedure clearRXOVFLIF; inline;
  25667. procedure clearTXEMPTYIE; inline;
  25668. procedure clearTXEMPTYIF; inline;
  25669. procedure clearTXHALFIE; inline;
  25670. procedure clearTXHALFIF; inline;
  25671. procedure clearTXNFULLIE; inline;
  25672. procedure clearTXNFULLIF; inline;
  25673. procedure setRXFULLIE; inline;
  25674. procedure setRXFULLIF; inline;
  25675. procedure setRXHALFIE; inline;
  25676. procedure setRXHALFIF; inline;
  25677. procedure setRXNEMPTYIE; inline;
  25678. procedure setRXNEMPTYIF; inline;
  25679. procedure setRXOVFLIE; inline;
  25680. procedure setRXOVFLIF; inline;
  25681. procedure setTXEMPTYIE; inline;
  25682. procedure setTXEMPTYIF; inline;
  25683. procedure setTXHALFIE; inline;
  25684. procedure setTXHALFIF; inline;
  25685. procedure setTXNFULLIE; inline;
  25686. procedure setTXNFULLIF; inline;
  25687. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25688. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25689. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25690. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25691. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25692. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25693. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25694. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25695. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25696. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25697. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25698. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25699. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25700. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25701. property w : TBits_32 read getw write setw;
  25702. end;
  25703. TCAN2_C2FIFOCI8 = record
  25704. private
  25705. function getCFIFOCI : TBits_5; inline;
  25706. function getw : TBits_32; inline;
  25707. procedure setCFIFOCI(thebits : TBits_5); inline;
  25708. procedure setw(thebits : TBits_32); inline;
  25709. public
  25710. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25711. property w : TBits_32 read getw write setw;
  25712. end;
  25713. TCAN2_C2FIFOCON9 = record
  25714. private
  25715. function getDONLY : TBits_1; inline;
  25716. function getFRESET : TBits_1; inline;
  25717. function getFSIZE : TBits_5; inline;
  25718. function getRTREN : TBits_1; inline;
  25719. function getTXABAT : TBits_1; inline;
  25720. function getTXEN : TBits_1; inline;
  25721. function getTXERR : TBits_1; inline;
  25722. function getTXLARB : TBits_1; inline;
  25723. function getTXPRI : TBits_2; inline;
  25724. function getTXREQ : TBits_1; inline;
  25725. function getUINC : TBits_1; inline;
  25726. function getw : TBits_32; inline;
  25727. procedure setDONLY(thebits : TBits_1); inline;
  25728. procedure setFRESET(thebits : TBits_1); inline;
  25729. procedure setFSIZE(thebits : TBits_5); inline;
  25730. procedure setRTREN(thebits : TBits_1); inline;
  25731. procedure setTXABAT(thebits : TBits_1); inline;
  25732. procedure setTXEN(thebits : TBits_1); inline;
  25733. procedure setTXERR(thebits : TBits_1); inline;
  25734. procedure setTXLARB(thebits : TBits_1); inline;
  25735. procedure setTXPRI(thebits : TBits_2); inline;
  25736. procedure setTXREQ(thebits : TBits_1); inline;
  25737. procedure setUINC(thebits : TBits_1); inline;
  25738. procedure setw(thebits : TBits_32); inline;
  25739. public
  25740. procedure clearDONLY; inline;
  25741. procedure clearFRESET; inline;
  25742. procedure clearRTREN; inline;
  25743. procedure clearTXABAT; inline;
  25744. procedure clearTXEN; inline;
  25745. procedure clearTXERR; inline;
  25746. procedure clearTXLARB; inline;
  25747. procedure clearTXREQ; inline;
  25748. procedure clearUINC; inline;
  25749. procedure setDONLY; inline;
  25750. procedure setFRESET; inline;
  25751. procedure setRTREN; inline;
  25752. procedure setTXABAT; inline;
  25753. procedure setTXEN; inline;
  25754. procedure setTXERR; inline;
  25755. procedure setTXLARB; inline;
  25756. procedure setTXREQ; inline;
  25757. procedure setUINC; inline;
  25758. property DONLY : TBits_1 read getDONLY write setDONLY;
  25759. property FRESET : TBits_1 read getFRESET write setFRESET;
  25760. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25761. property RTREN : TBits_1 read getRTREN write setRTREN;
  25762. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25763. property TXEN : TBits_1 read getTXEN write setTXEN;
  25764. property TXERR : TBits_1 read getTXERR write setTXERR;
  25765. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25766. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25767. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25768. property UINC : TBits_1 read getUINC write setUINC;
  25769. property w : TBits_32 read getw write setw;
  25770. end;
  25771. TCAN2_C2FIFOINT9 = record
  25772. private
  25773. function getRXFULLIE : TBits_1; inline;
  25774. function getRXFULLIF : TBits_1; inline;
  25775. function getRXHALFIE : TBits_1; inline;
  25776. function getRXHALFIF : TBits_1; inline;
  25777. function getRXNEMPTYIE : TBits_1; inline;
  25778. function getRXNEMPTYIF : TBits_1; inline;
  25779. function getRXOVFLIE : TBits_1; inline;
  25780. function getRXOVFLIF : TBits_1; inline;
  25781. function getTXEMPTYIE : TBits_1; inline;
  25782. function getTXEMPTYIF : TBits_1; inline;
  25783. function getTXHALFIE : TBits_1; inline;
  25784. function getTXHALFIF : TBits_1; inline;
  25785. function getTXNFULLIE : TBits_1; inline;
  25786. function getTXNFULLIF : TBits_1; inline;
  25787. function getw : TBits_32; inline;
  25788. procedure setRXFULLIE(thebits : TBits_1); inline;
  25789. procedure setRXFULLIF(thebits : TBits_1); inline;
  25790. procedure setRXHALFIE(thebits : TBits_1); inline;
  25791. procedure setRXHALFIF(thebits : TBits_1); inline;
  25792. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25793. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25794. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25795. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25796. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25797. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25798. procedure setTXHALFIE(thebits : TBits_1); inline;
  25799. procedure setTXHALFIF(thebits : TBits_1); inline;
  25800. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25801. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25802. procedure setw(thebits : TBits_32); inline;
  25803. public
  25804. procedure clearRXFULLIE; inline;
  25805. procedure clearRXFULLIF; inline;
  25806. procedure clearRXHALFIE; inline;
  25807. procedure clearRXHALFIF; inline;
  25808. procedure clearRXNEMPTYIE; inline;
  25809. procedure clearRXNEMPTYIF; inline;
  25810. procedure clearRXOVFLIE; inline;
  25811. procedure clearRXOVFLIF; inline;
  25812. procedure clearTXEMPTYIE; inline;
  25813. procedure clearTXEMPTYIF; inline;
  25814. procedure clearTXHALFIE; inline;
  25815. procedure clearTXHALFIF; inline;
  25816. procedure clearTXNFULLIE; inline;
  25817. procedure clearTXNFULLIF; inline;
  25818. procedure setRXFULLIE; inline;
  25819. procedure setRXFULLIF; inline;
  25820. procedure setRXHALFIE; inline;
  25821. procedure setRXHALFIF; inline;
  25822. procedure setRXNEMPTYIE; inline;
  25823. procedure setRXNEMPTYIF; inline;
  25824. procedure setRXOVFLIE; inline;
  25825. procedure setRXOVFLIF; inline;
  25826. procedure setTXEMPTYIE; inline;
  25827. procedure setTXEMPTYIF; inline;
  25828. procedure setTXHALFIE; inline;
  25829. procedure setTXHALFIF; inline;
  25830. procedure setTXNFULLIE; inline;
  25831. procedure setTXNFULLIF; inline;
  25832. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25833. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25834. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25835. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25836. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25837. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25838. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25839. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25840. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25841. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25842. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25843. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25844. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25845. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25846. property w : TBits_32 read getw write setw;
  25847. end;
  25848. TCAN2_C2FIFOCI9 = record
  25849. private
  25850. function getCFIFOCI : TBits_5; inline;
  25851. function getw : TBits_32; inline;
  25852. procedure setCFIFOCI(thebits : TBits_5); inline;
  25853. procedure setw(thebits : TBits_32); inline;
  25854. public
  25855. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  25856. property w : TBits_32 read getw write setw;
  25857. end;
  25858. TCAN2_C2FIFOCON10 = record
  25859. private
  25860. function getDONLY : TBits_1; inline;
  25861. function getFRESET : TBits_1; inline;
  25862. function getFSIZE : TBits_5; inline;
  25863. function getRTREN : TBits_1; inline;
  25864. function getTXABAT : TBits_1; inline;
  25865. function getTXEN : TBits_1; inline;
  25866. function getTXERR : TBits_1; inline;
  25867. function getTXLARB : TBits_1; inline;
  25868. function getTXPRI : TBits_2; inline;
  25869. function getTXREQ : TBits_1; inline;
  25870. function getUINC : TBits_1; inline;
  25871. function getw : TBits_32; inline;
  25872. procedure setDONLY(thebits : TBits_1); inline;
  25873. procedure setFRESET(thebits : TBits_1); inline;
  25874. procedure setFSIZE(thebits : TBits_5); inline;
  25875. procedure setRTREN(thebits : TBits_1); inline;
  25876. procedure setTXABAT(thebits : TBits_1); inline;
  25877. procedure setTXEN(thebits : TBits_1); inline;
  25878. procedure setTXERR(thebits : TBits_1); inline;
  25879. procedure setTXLARB(thebits : TBits_1); inline;
  25880. procedure setTXPRI(thebits : TBits_2); inline;
  25881. procedure setTXREQ(thebits : TBits_1); inline;
  25882. procedure setUINC(thebits : TBits_1); inline;
  25883. procedure setw(thebits : TBits_32); inline;
  25884. public
  25885. procedure clearDONLY; inline;
  25886. procedure clearFRESET; inline;
  25887. procedure clearRTREN; inline;
  25888. procedure clearTXABAT; inline;
  25889. procedure clearTXEN; inline;
  25890. procedure clearTXERR; inline;
  25891. procedure clearTXLARB; inline;
  25892. procedure clearTXREQ; inline;
  25893. procedure clearUINC; inline;
  25894. procedure setDONLY; inline;
  25895. procedure setFRESET; inline;
  25896. procedure setRTREN; inline;
  25897. procedure setTXABAT; inline;
  25898. procedure setTXEN; inline;
  25899. procedure setTXERR; inline;
  25900. procedure setTXLARB; inline;
  25901. procedure setTXREQ; inline;
  25902. procedure setUINC; inline;
  25903. property DONLY : TBits_1 read getDONLY write setDONLY;
  25904. property FRESET : TBits_1 read getFRESET write setFRESET;
  25905. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  25906. property RTREN : TBits_1 read getRTREN write setRTREN;
  25907. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  25908. property TXEN : TBits_1 read getTXEN write setTXEN;
  25909. property TXERR : TBits_1 read getTXERR write setTXERR;
  25910. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  25911. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  25912. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  25913. property UINC : TBits_1 read getUINC write setUINC;
  25914. property w : TBits_32 read getw write setw;
  25915. end;
  25916. TCAN2_C2FIFOINT10 = record
  25917. private
  25918. function getRXFULLIE : TBits_1; inline;
  25919. function getRXFULLIF : TBits_1; inline;
  25920. function getRXHALFIE : TBits_1; inline;
  25921. function getRXHALFIF : TBits_1; inline;
  25922. function getRXNEMPTYIE : TBits_1; inline;
  25923. function getRXNEMPTYIF : TBits_1; inline;
  25924. function getRXOVFLIE : TBits_1; inline;
  25925. function getRXOVFLIF : TBits_1; inline;
  25926. function getTXEMPTYIE : TBits_1; inline;
  25927. function getTXEMPTYIF : TBits_1; inline;
  25928. function getTXHALFIE : TBits_1; inline;
  25929. function getTXHALFIF : TBits_1; inline;
  25930. function getTXNFULLIE : TBits_1; inline;
  25931. function getTXNFULLIF : TBits_1; inline;
  25932. function getw : TBits_32; inline;
  25933. procedure setRXFULLIE(thebits : TBits_1); inline;
  25934. procedure setRXFULLIF(thebits : TBits_1); inline;
  25935. procedure setRXHALFIE(thebits : TBits_1); inline;
  25936. procedure setRXHALFIF(thebits : TBits_1); inline;
  25937. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  25938. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  25939. procedure setRXOVFLIE(thebits : TBits_1); inline;
  25940. procedure setRXOVFLIF(thebits : TBits_1); inline;
  25941. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  25942. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  25943. procedure setTXHALFIE(thebits : TBits_1); inline;
  25944. procedure setTXHALFIF(thebits : TBits_1); inline;
  25945. procedure setTXNFULLIE(thebits : TBits_1); inline;
  25946. procedure setTXNFULLIF(thebits : TBits_1); inline;
  25947. procedure setw(thebits : TBits_32); inline;
  25948. public
  25949. procedure clearRXFULLIE; inline;
  25950. procedure clearRXFULLIF; inline;
  25951. procedure clearRXHALFIE; inline;
  25952. procedure clearRXHALFIF; inline;
  25953. procedure clearRXNEMPTYIE; inline;
  25954. procedure clearRXNEMPTYIF; inline;
  25955. procedure clearRXOVFLIE; inline;
  25956. procedure clearRXOVFLIF; inline;
  25957. procedure clearTXEMPTYIE; inline;
  25958. procedure clearTXEMPTYIF; inline;
  25959. procedure clearTXHALFIE; inline;
  25960. procedure clearTXHALFIF; inline;
  25961. procedure clearTXNFULLIE; inline;
  25962. procedure clearTXNFULLIF; inline;
  25963. procedure setRXFULLIE; inline;
  25964. procedure setRXFULLIF; inline;
  25965. procedure setRXHALFIE; inline;
  25966. procedure setRXHALFIF; inline;
  25967. procedure setRXNEMPTYIE; inline;
  25968. procedure setRXNEMPTYIF; inline;
  25969. procedure setRXOVFLIE; inline;
  25970. procedure setRXOVFLIF; inline;
  25971. procedure setTXEMPTYIE; inline;
  25972. procedure setTXEMPTYIF; inline;
  25973. procedure setTXHALFIE; inline;
  25974. procedure setTXHALFIF; inline;
  25975. procedure setTXNFULLIE; inline;
  25976. procedure setTXNFULLIF; inline;
  25977. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  25978. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  25979. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  25980. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  25981. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  25982. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  25983. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  25984. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  25985. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  25986. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  25987. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  25988. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  25989. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  25990. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  25991. property w : TBits_32 read getw write setw;
  25992. end;
  25993. TCAN2_C2FIFOCI10 = record
  25994. private
  25995. function getCFIFOCI : TBits_5; inline;
  25996. function getw : TBits_32; inline;
  25997. procedure setCFIFOCI(thebits : TBits_5); inline;
  25998. procedure setw(thebits : TBits_32); inline;
  25999. public
  26000. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26001. property w : TBits_32 read getw write setw;
  26002. end;
  26003. TCAN2_C2FIFOCON11 = record
  26004. private
  26005. function getDONLY : TBits_1; inline;
  26006. function getFRESET : TBits_1; inline;
  26007. function getFSIZE : TBits_5; inline;
  26008. function getRTREN : TBits_1; inline;
  26009. function getTXABAT : TBits_1; inline;
  26010. function getTXEN : TBits_1; inline;
  26011. function getTXERR : TBits_1; inline;
  26012. function getTXLARB : TBits_1; inline;
  26013. function getTXPRI : TBits_2; inline;
  26014. function getTXREQ : TBits_1; inline;
  26015. function getUINC : TBits_1; inline;
  26016. function getw : TBits_32; inline;
  26017. procedure setDONLY(thebits : TBits_1); inline;
  26018. procedure setFRESET(thebits : TBits_1); inline;
  26019. procedure setFSIZE(thebits : TBits_5); inline;
  26020. procedure setRTREN(thebits : TBits_1); inline;
  26021. procedure setTXABAT(thebits : TBits_1); inline;
  26022. procedure setTXEN(thebits : TBits_1); inline;
  26023. procedure setTXERR(thebits : TBits_1); inline;
  26024. procedure setTXLARB(thebits : TBits_1); inline;
  26025. procedure setTXPRI(thebits : TBits_2); inline;
  26026. procedure setTXREQ(thebits : TBits_1); inline;
  26027. procedure setUINC(thebits : TBits_1); inline;
  26028. procedure setw(thebits : TBits_32); inline;
  26029. public
  26030. procedure clearDONLY; inline;
  26031. procedure clearFRESET; inline;
  26032. procedure clearRTREN; inline;
  26033. procedure clearTXABAT; inline;
  26034. procedure clearTXEN; inline;
  26035. procedure clearTXERR; inline;
  26036. procedure clearTXLARB; inline;
  26037. procedure clearTXREQ; inline;
  26038. procedure clearUINC; inline;
  26039. procedure setDONLY; inline;
  26040. procedure setFRESET; inline;
  26041. procedure setRTREN; inline;
  26042. procedure setTXABAT; inline;
  26043. procedure setTXEN; inline;
  26044. procedure setTXERR; inline;
  26045. procedure setTXLARB; inline;
  26046. procedure setTXREQ; inline;
  26047. procedure setUINC; inline;
  26048. property DONLY : TBits_1 read getDONLY write setDONLY;
  26049. property FRESET : TBits_1 read getFRESET write setFRESET;
  26050. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26051. property RTREN : TBits_1 read getRTREN write setRTREN;
  26052. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26053. property TXEN : TBits_1 read getTXEN write setTXEN;
  26054. property TXERR : TBits_1 read getTXERR write setTXERR;
  26055. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26056. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26057. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26058. property UINC : TBits_1 read getUINC write setUINC;
  26059. property w : TBits_32 read getw write setw;
  26060. end;
  26061. TCAN2_C2FIFOINT11 = record
  26062. private
  26063. function getRXFULLIE : TBits_1; inline;
  26064. function getRXFULLIF : TBits_1; inline;
  26065. function getRXHALFIE : TBits_1; inline;
  26066. function getRXHALFIF : TBits_1; inline;
  26067. function getRXNEMPTYIE : TBits_1; inline;
  26068. function getRXNEMPTYIF : TBits_1; inline;
  26069. function getRXOVFLIE : TBits_1; inline;
  26070. function getRXOVFLIF : TBits_1; inline;
  26071. function getTXEMPTYIE : TBits_1; inline;
  26072. function getTXEMPTYIF : TBits_1; inline;
  26073. function getTXHALFIE : TBits_1; inline;
  26074. function getTXHALFIF : TBits_1; inline;
  26075. function getTXNFULLIE : TBits_1; inline;
  26076. function getTXNFULLIF : TBits_1; inline;
  26077. function getw : TBits_32; inline;
  26078. procedure setRXFULLIE(thebits : TBits_1); inline;
  26079. procedure setRXFULLIF(thebits : TBits_1); inline;
  26080. procedure setRXHALFIE(thebits : TBits_1); inline;
  26081. procedure setRXHALFIF(thebits : TBits_1); inline;
  26082. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26083. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26084. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26085. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26086. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26087. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26088. procedure setTXHALFIE(thebits : TBits_1); inline;
  26089. procedure setTXHALFIF(thebits : TBits_1); inline;
  26090. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26091. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26092. procedure setw(thebits : TBits_32); inline;
  26093. public
  26094. procedure clearRXFULLIE; inline;
  26095. procedure clearRXFULLIF; inline;
  26096. procedure clearRXHALFIE; inline;
  26097. procedure clearRXHALFIF; inline;
  26098. procedure clearRXNEMPTYIE; inline;
  26099. procedure clearRXNEMPTYIF; inline;
  26100. procedure clearRXOVFLIE; inline;
  26101. procedure clearRXOVFLIF; inline;
  26102. procedure clearTXEMPTYIE; inline;
  26103. procedure clearTXEMPTYIF; inline;
  26104. procedure clearTXHALFIE; inline;
  26105. procedure clearTXHALFIF; inline;
  26106. procedure clearTXNFULLIE; inline;
  26107. procedure clearTXNFULLIF; inline;
  26108. procedure setRXFULLIE; inline;
  26109. procedure setRXFULLIF; inline;
  26110. procedure setRXHALFIE; inline;
  26111. procedure setRXHALFIF; inline;
  26112. procedure setRXNEMPTYIE; inline;
  26113. procedure setRXNEMPTYIF; inline;
  26114. procedure setRXOVFLIE; inline;
  26115. procedure setRXOVFLIF; inline;
  26116. procedure setTXEMPTYIE; inline;
  26117. procedure setTXEMPTYIF; inline;
  26118. procedure setTXHALFIE; inline;
  26119. procedure setTXHALFIF; inline;
  26120. procedure setTXNFULLIE; inline;
  26121. procedure setTXNFULLIF; inline;
  26122. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26123. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26124. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26125. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26126. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26127. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26128. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26129. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26130. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26131. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26132. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26133. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26134. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26135. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26136. property w : TBits_32 read getw write setw;
  26137. end;
  26138. TCAN2_C2FIFOCI11 = record
  26139. private
  26140. function getCFIFOCI : TBits_5; inline;
  26141. function getw : TBits_32; inline;
  26142. procedure setCFIFOCI(thebits : TBits_5); inline;
  26143. procedure setw(thebits : TBits_32); inline;
  26144. public
  26145. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26146. property w : TBits_32 read getw write setw;
  26147. end;
  26148. TCAN2_C2FIFOCON12 = record
  26149. private
  26150. function getDONLY : TBits_1; inline;
  26151. function getFRESET : TBits_1; inline;
  26152. function getFSIZE : TBits_5; inline;
  26153. function getRTREN : TBits_1; inline;
  26154. function getTXABAT : TBits_1; inline;
  26155. function getTXEN : TBits_1; inline;
  26156. function getTXERR : TBits_1; inline;
  26157. function getTXLARB : TBits_1; inline;
  26158. function getTXPRI : TBits_2; inline;
  26159. function getTXREQ : TBits_1; inline;
  26160. function getUINC : TBits_1; inline;
  26161. function getw : TBits_32; inline;
  26162. procedure setDONLY(thebits : TBits_1); inline;
  26163. procedure setFRESET(thebits : TBits_1); inline;
  26164. procedure setFSIZE(thebits : TBits_5); inline;
  26165. procedure setRTREN(thebits : TBits_1); inline;
  26166. procedure setTXABAT(thebits : TBits_1); inline;
  26167. procedure setTXEN(thebits : TBits_1); inline;
  26168. procedure setTXERR(thebits : TBits_1); inline;
  26169. procedure setTXLARB(thebits : TBits_1); inline;
  26170. procedure setTXPRI(thebits : TBits_2); inline;
  26171. procedure setTXREQ(thebits : TBits_1); inline;
  26172. procedure setUINC(thebits : TBits_1); inline;
  26173. procedure setw(thebits : TBits_32); inline;
  26174. public
  26175. procedure clearDONLY; inline;
  26176. procedure clearFRESET; inline;
  26177. procedure clearRTREN; inline;
  26178. procedure clearTXABAT; inline;
  26179. procedure clearTXEN; inline;
  26180. procedure clearTXERR; inline;
  26181. procedure clearTXLARB; inline;
  26182. procedure clearTXREQ; inline;
  26183. procedure clearUINC; inline;
  26184. procedure setDONLY; inline;
  26185. procedure setFRESET; inline;
  26186. procedure setRTREN; inline;
  26187. procedure setTXABAT; inline;
  26188. procedure setTXEN; inline;
  26189. procedure setTXERR; inline;
  26190. procedure setTXLARB; inline;
  26191. procedure setTXREQ; inline;
  26192. procedure setUINC; inline;
  26193. property DONLY : TBits_1 read getDONLY write setDONLY;
  26194. property FRESET : TBits_1 read getFRESET write setFRESET;
  26195. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26196. property RTREN : TBits_1 read getRTREN write setRTREN;
  26197. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26198. property TXEN : TBits_1 read getTXEN write setTXEN;
  26199. property TXERR : TBits_1 read getTXERR write setTXERR;
  26200. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26201. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26202. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26203. property UINC : TBits_1 read getUINC write setUINC;
  26204. property w : TBits_32 read getw write setw;
  26205. end;
  26206. TCAN2_C2FIFOINT12 = record
  26207. private
  26208. function getRXFULLIE : TBits_1; inline;
  26209. function getRXFULLIF : TBits_1; inline;
  26210. function getRXHALFIE : TBits_1; inline;
  26211. function getRXHALFIF : TBits_1; inline;
  26212. function getRXNEMPTYIE : TBits_1; inline;
  26213. function getRXNEMPTYIF : TBits_1; inline;
  26214. function getRXOVFLIE : TBits_1; inline;
  26215. function getRXOVFLIF : TBits_1; inline;
  26216. function getTXEMPTYIE : TBits_1; inline;
  26217. function getTXEMPTYIF : TBits_1; inline;
  26218. function getTXHALFIE : TBits_1; inline;
  26219. function getTXHALFIF : TBits_1; inline;
  26220. function getTXNFULLIE : TBits_1; inline;
  26221. function getTXNFULLIF : TBits_1; inline;
  26222. function getw : TBits_32; inline;
  26223. procedure setRXFULLIE(thebits : TBits_1); inline;
  26224. procedure setRXFULLIF(thebits : TBits_1); inline;
  26225. procedure setRXHALFIE(thebits : TBits_1); inline;
  26226. procedure setRXHALFIF(thebits : TBits_1); inline;
  26227. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26228. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26229. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26230. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26231. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26232. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26233. procedure setTXHALFIE(thebits : TBits_1); inline;
  26234. procedure setTXHALFIF(thebits : TBits_1); inline;
  26235. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26236. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26237. procedure setw(thebits : TBits_32); inline;
  26238. public
  26239. procedure clearRXFULLIE; inline;
  26240. procedure clearRXFULLIF; inline;
  26241. procedure clearRXHALFIE; inline;
  26242. procedure clearRXHALFIF; inline;
  26243. procedure clearRXNEMPTYIE; inline;
  26244. procedure clearRXNEMPTYIF; inline;
  26245. procedure clearRXOVFLIE; inline;
  26246. procedure clearRXOVFLIF; inline;
  26247. procedure clearTXEMPTYIE; inline;
  26248. procedure clearTXEMPTYIF; inline;
  26249. procedure clearTXHALFIE; inline;
  26250. procedure clearTXHALFIF; inline;
  26251. procedure clearTXNFULLIE; inline;
  26252. procedure clearTXNFULLIF; inline;
  26253. procedure setRXFULLIE; inline;
  26254. procedure setRXFULLIF; inline;
  26255. procedure setRXHALFIE; inline;
  26256. procedure setRXHALFIF; inline;
  26257. procedure setRXNEMPTYIE; inline;
  26258. procedure setRXNEMPTYIF; inline;
  26259. procedure setRXOVFLIE; inline;
  26260. procedure setRXOVFLIF; inline;
  26261. procedure setTXEMPTYIE; inline;
  26262. procedure setTXEMPTYIF; inline;
  26263. procedure setTXHALFIE; inline;
  26264. procedure setTXHALFIF; inline;
  26265. procedure setTXNFULLIE; inline;
  26266. procedure setTXNFULLIF; inline;
  26267. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26268. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26269. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26270. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26271. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26272. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26273. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26274. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26275. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26276. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26277. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26278. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26279. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26280. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26281. property w : TBits_32 read getw write setw;
  26282. end;
  26283. TCAN2_C2FIFOCI12 = record
  26284. private
  26285. function getCFIFOCI : TBits_5; inline;
  26286. function getw : TBits_32; inline;
  26287. procedure setCFIFOCI(thebits : TBits_5); inline;
  26288. procedure setw(thebits : TBits_32); inline;
  26289. public
  26290. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26291. property w : TBits_32 read getw write setw;
  26292. end;
  26293. TCAN2_C2FIFOCON13 = record
  26294. private
  26295. function getDONLY : TBits_1; inline;
  26296. function getFRESET : TBits_1; inline;
  26297. function getFSIZE : TBits_5; inline;
  26298. function getRTREN : TBits_1; inline;
  26299. function getTXABAT : TBits_1; inline;
  26300. function getTXEN : TBits_1; inline;
  26301. function getTXERR : TBits_1; inline;
  26302. function getTXLARB : TBits_1; inline;
  26303. function getTXPRI : TBits_2; inline;
  26304. function getTXREQ : TBits_1; inline;
  26305. function getUINC : TBits_1; inline;
  26306. function getw : TBits_32; inline;
  26307. procedure setDONLY(thebits : TBits_1); inline;
  26308. procedure setFRESET(thebits : TBits_1); inline;
  26309. procedure setFSIZE(thebits : TBits_5); inline;
  26310. procedure setRTREN(thebits : TBits_1); inline;
  26311. procedure setTXABAT(thebits : TBits_1); inline;
  26312. procedure setTXEN(thebits : TBits_1); inline;
  26313. procedure setTXERR(thebits : TBits_1); inline;
  26314. procedure setTXLARB(thebits : TBits_1); inline;
  26315. procedure setTXPRI(thebits : TBits_2); inline;
  26316. procedure setTXREQ(thebits : TBits_1); inline;
  26317. procedure setUINC(thebits : TBits_1); inline;
  26318. procedure setw(thebits : TBits_32); inline;
  26319. public
  26320. procedure clearDONLY; inline;
  26321. procedure clearFRESET; inline;
  26322. procedure clearRTREN; inline;
  26323. procedure clearTXABAT; inline;
  26324. procedure clearTXEN; inline;
  26325. procedure clearTXERR; inline;
  26326. procedure clearTXLARB; inline;
  26327. procedure clearTXREQ; inline;
  26328. procedure clearUINC; inline;
  26329. procedure setDONLY; inline;
  26330. procedure setFRESET; inline;
  26331. procedure setRTREN; inline;
  26332. procedure setTXABAT; inline;
  26333. procedure setTXEN; inline;
  26334. procedure setTXERR; inline;
  26335. procedure setTXLARB; inline;
  26336. procedure setTXREQ; inline;
  26337. procedure setUINC; inline;
  26338. property DONLY : TBits_1 read getDONLY write setDONLY;
  26339. property FRESET : TBits_1 read getFRESET write setFRESET;
  26340. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26341. property RTREN : TBits_1 read getRTREN write setRTREN;
  26342. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26343. property TXEN : TBits_1 read getTXEN write setTXEN;
  26344. property TXERR : TBits_1 read getTXERR write setTXERR;
  26345. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26346. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26347. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26348. property UINC : TBits_1 read getUINC write setUINC;
  26349. property w : TBits_32 read getw write setw;
  26350. end;
  26351. TCAN2_C2FIFOINT13 = record
  26352. private
  26353. function getRXFULLIE : TBits_1; inline;
  26354. function getRXFULLIF : TBits_1; inline;
  26355. function getRXHALFIE : TBits_1; inline;
  26356. function getRXHALFIF : TBits_1; inline;
  26357. function getRXNEMPTYIE : TBits_1; inline;
  26358. function getRXNEMPTYIF : TBits_1; inline;
  26359. function getRXOVFLIE : TBits_1; inline;
  26360. function getRXOVFLIF : TBits_1; inline;
  26361. function getTXEMPTYIE : TBits_1; inline;
  26362. function getTXEMPTYIF : TBits_1; inline;
  26363. function getTXHALFIE : TBits_1; inline;
  26364. function getTXHALFIF : TBits_1; inline;
  26365. function getTXNFULLIE : TBits_1; inline;
  26366. function getTXNFULLIF : TBits_1; inline;
  26367. function getw : TBits_32; inline;
  26368. procedure setRXFULLIE(thebits : TBits_1); inline;
  26369. procedure setRXFULLIF(thebits : TBits_1); inline;
  26370. procedure setRXHALFIE(thebits : TBits_1); inline;
  26371. procedure setRXHALFIF(thebits : TBits_1); inline;
  26372. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26373. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26374. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26375. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26376. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26377. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26378. procedure setTXHALFIE(thebits : TBits_1); inline;
  26379. procedure setTXHALFIF(thebits : TBits_1); inline;
  26380. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26381. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26382. procedure setw(thebits : TBits_32); inline;
  26383. public
  26384. procedure clearRXFULLIE; inline;
  26385. procedure clearRXFULLIF; inline;
  26386. procedure clearRXHALFIE; inline;
  26387. procedure clearRXHALFIF; inline;
  26388. procedure clearRXNEMPTYIE; inline;
  26389. procedure clearRXNEMPTYIF; inline;
  26390. procedure clearRXOVFLIE; inline;
  26391. procedure clearRXOVFLIF; inline;
  26392. procedure clearTXEMPTYIE; inline;
  26393. procedure clearTXEMPTYIF; inline;
  26394. procedure clearTXHALFIE; inline;
  26395. procedure clearTXHALFIF; inline;
  26396. procedure clearTXNFULLIE; inline;
  26397. procedure clearTXNFULLIF; inline;
  26398. procedure setRXFULLIE; inline;
  26399. procedure setRXFULLIF; inline;
  26400. procedure setRXHALFIE; inline;
  26401. procedure setRXHALFIF; inline;
  26402. procedure setRXNEMPTYIE; inline;
  26403. procedure setRXNEMPTYIF; inline;
  26404. procedure setRXOVFLIE; inline;
  26405. procedure setRXOVFLIF; inline;
  26406. procedure setTXEMPTYIE; inline;
  26407. procedure setTXEMPTYIF; inline;
  26408. procedure setTXHALFIE; inline;
  26409. procedure setTXHALFIF; inline;
  26410. procedure setTXNFULLIE; inline;
  26411. procedure setTXNFULLIF; inline;
  26412. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26413. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26414. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26415. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26416. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26417. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26418. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26419. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26420. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26421. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26422. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26423. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26424. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26425. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26426. property w : TBits_32 read getw write setw;
  26427. end;
  26428. TCAN2_C2FIFOCI13 = record
  26429. private
  26430. function getCFIFOCI : TBits_5; inline;
  26431. function getw : TBits_32; inline;
  26432. procedure setCFIFOCI(thebits : TBits_5); inline;
  26433. procedure setw(thebits : TBits_32); inline;
  26434. public
  26435. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26436. property w : TBits_32 read getw write setw;
  26437. end;
  26438. TCAN2_C2FIFOCON14 = record
  26439. private
  26440. function getDONLY : TBits_1; inline;
  26441. function getFRESET : TBits_1; inline;
  26442. function getFSIZE : TBits_5; inline;
  26443. function getRTREN : TBits_1; inline;
  26444. function getTXABAT : TBits_1; inline;
  26445. function getTXEN : TBits_1; inline;
  26446. function getTXERR : TBits_1; inline;
  26447. function getTXLARB : TBits_1; inline;
  26448. function getTXPRI : TBits_2; inline;
  26449. function getTXREQ : TBits_1; inline;
  26450. function getUINC : TBits_1; inline;
  26451. function getw : TBits_32; inline;
  26452. procedure setDONLY(thebits : TBits_1); inline;
  26453. procedure setFRESET(thebits : TBits_1); inline;
  26454. procedure setFSIZE(thebits : TBits_5); inline;
  26455. procedure setRTREN(thebits : TBits_1); inline;
  26456. procedure setTXABAT(thebits : TBits_1); inline;
  26457. procedure setTXEN(thebits : TBits_1); inline;
  26458. procedure setTXERR(thebits : TBits_1); inline;
  26459. procedure setTXLARB(thebits : TBits_1); inline;
  26460. procedure setTXPRI(thebits : TBits_2); inline;
  26461. procedure setTXREQ(thebits : TBits_1); inline;
  26462. procedure setUINC(thebits : TBits_1); inline;
  26463. procedure setw(thebits : TBits_32); inline;
  26464. public
  26465. procedure clearDONLY; inline;
  26466. procedure clearFRESET; inline;
  26467. procedure clearRTREN; inline;
  26468. procedure clearTXABAT; inline;
  26469. procedure clearTXEN; inline;
  26470. procedure clearTXERR; inline;
  26471. procedure clearTXLARB; inline;
  26472. procedure clearTXREQ; inline;
  26473. procedure clearUINC; inline;
  26474. procedure setDONLY; inline;
  26475. procedure setFRESET; inline;
  26476. procedure setRTREN; inline;
  26477. procedure setTXABAT; inline;
  26478. procedure setTXEN; inline;
  26479. procedure setTXERR; inline;
  26480. procedure setTXLARB; inline;
  26481. procedure setTXREQ; inline;
  26482. procedure setUINC; inline;
  26483. property DONLY : TBits_1 read getDONLY write setDONLY;
  26484. property FRESET : TBits_1 read getFRESET write setFRESET;
  26485. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26486. property RTREN : TBits_1 read getRTREN write setRTREN;
  26487. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26488. property TXEN : TBits_1 read getTXEN write setTXEN;
  26489. property TXERR : TBits_1 read getTXERR write setTXERR;
  26490. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26491. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26492. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26493. property UINC : TBits_1 read getUINC write setUINC;
  26494. property w : TBits_32 read getw write setw;
  26495. end;
  26496. TCAN2_C2FIFOINT14 = record
  26497. private
  26498. function getRXFULLIE : TBits_1; inline;
  26499. function getRXFULLIF : TBits_1; inline;
  26500. function getRXHALFIE : TBits_1; inline;
  26501. function getRXHALFIF : TBits_1; inline;
  26502. function getRXNEMPTYIE : TBits_1; inline;
  26503. function getRXNEMPTYIF : TBits_1; inline;
  26504. function getRXOVFLIE : TBits_1; inline;
  26505. function getRXOVFLIF : TBits_1; inline;
  26506. function getTXEMPTYIE : TBits_1; inline;
  26507. function getTXEMPTYIF : TBits_1; inline;
  26508. function getTXHALFIE : TBits_1; inline;
  26509. function getTXHALFIF : TBits_1; inline;
  26510. function getTXNFULLIE : TBits_1; inline;
  26511. function getTXNFULLIF : TBits_1; inline;
  26512. function getw : TBits_32; inline;
  26513. procedure setRXFULLIE(thebits : TBits_1); inline;
  26514. procedure setRXFULLIF(thebits : TBits_1); inline;
  26515. procedure setRXHALFIE(thebits : TBits_1); inline;
  26516. procedure setRXHALFIF(thebits : TBits_1); inline;
  26517. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26518. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26519. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26520. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26521. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26522. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26523. procedure setTXHALFIE(thebits : TBits_1); inline;
  26524. procedure setTXHALFIF(thebits : TBits_1); inline;
  26525. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26526. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26527. procedure setw(thebits : TBits_32); inline;
  26528. public
  26529. procedure clearRXFULLIE; inline;
  26530. procedure clearRXFULLIF; inline;
  26531. procedure clearRXHALFIE; inline;
  26532. procedure clearRXHALFIF; inline;
  26533. procedure clearRXNEMPTYIE; inline;
  26534. procedure clearRXNEMPTYIF; inline;
  26535. procedure clearRXOVFLIE; inline;
  26536. procedure clearRXOVFLIF; inline;
  26537. procedure clearTXEMPTYIE; inline;
  26538. procedure clearTXEMPTYIF; inline;
  26539. procedure clearTXHALFIE; inline;
  26540. procedure clearTXHALFIF; inline;
  26541. procedure clearTXNFULLIE; inline;
  26542. procedure clearTXNFULLIF; inline;
  26543. procedure setRXFULLIE; inline;
  26544. procedure setRXFULLIF; inline;
  26545. procedure setRXHALFIE; inline;
  26546. procedure setRXHALFIF; inline;
  26547. procedure setRXNEMPTYIE; inline;
  26548. procedure setRXNEMPTYIF; inline;
  26549. procedure setRXOVFLIE; inline;
  26550. procedure setRXOVFLIF; inline;
  26551. procedure setTXEMPTYIE; inline;
  26552. procedure setTXEMPTYIF; inline;
  26553. procedure setTXHALFIE; inline;
  26554. procedure setTXHALFIF; inline;
  26555. procedure setTXNFULLIE; inline;
  26556. procedure setTXNFULLIF; inline;
  26557. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26558. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26559. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26560. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26561. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26562. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26563. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26564. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26565. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26566. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26567. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26568. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26569. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26570. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26571. property w : TBits_32 read getw write setw;
  26572. end;
  26573. TCAN2_C2FIFOCI14 = record
  26574. private
  26575. function getCFIFOCI : TBits_5; inline;
  26576. function getw : TBits_32; inline;
  26577. procedure setCFIFOCI(thebits : TBits_5); inline;
  26578. procedure setw(thebits : TBits_32); inline;
  26579. public
  26580. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26581. property w : TBits_32 read getw write setw;
  26582. end;
  26583. TCAN2_C2FIFOCON15 = record
  26584. private
  26585. function getDONLY : TBits_1; inline;
  26586. function getFRESET : TBits_1; inline;
  26587. function getFSIZE : TBits_5; inline;
  26588. function getRTREN : TBits_1; inline;
  26589. function getTXABAT : TBits_1; inline;
  26590. function getTXEN : TBits_1; inline;
  26591. function getTXERR : TBits_1; inline;
  26592. function getTXLARB : TBits_1; inline;
  26593. function getTXPRI : TBits_2; inline;
  26594. function getTXREQ : TBits_1; inline;
  26595. function getUINC : TBits_1; inline;
  26596. function getw : TBits_32; inline;
  26597. procedure setDONLY(thebits : TBits_1); inline;
  26598. procedure setFRESET(thebits : TBits_1); inline;
  26599. procedure setFSIZE(thebits : TBits_5); inline;
  26600. procedure setRTREN(thebits : TBits_1); inline;
  26601. procedure setTXABAT(thebits : TBits_1); inline;
  26602. procedure setTXEN(thebits : TBits_1); inline;
  26603. procedure setTXERR(thebits : TBits_1); inline;
  26604. procedure setTXLARB(thebits : TBits_1); inline;
  26605. procedure setTXPRI(thebits : TBits_2); inline;
  26606. procedure setTXREQ(thebits : TBits_1); inline;
  26607. procedure setUINC(thebits : TBits_1); inline;
  26608. procedure setw(thebits : TBits_32); inline;
  26609. public
  26610. procedure clearDONLY; inline;
  26611. procedure clearFRESET; inline;
  26612. procedure clearRTREN; inline;
  26613. procedure clearTXABAT; inline;
  26614. procedure clearTXEN; inline;
  26615. procedure clearTXERR; inline;
  26616. procedure clearTXLARB; inline;
  26617. procedure clearTXREQ; inline;
  26618. procedure clearUINC; inline;
  26619. procedure setDONLY; inline;
  26620. procedure setFRESET; inline;
  26621. procedure setRTREN; inline;
  26622. procedure setTXABAT; inline;
  26623. procedure setTXEN; inline;
  26624. procedure setTXERR; inline;
  26625. procedure setTXLARB; inline;
  26626. procedure setTXREQ; inline;
  26627. procedure setUINC; inline;
  26628. property DONLY : TBits_1 read getDONLY write setDONLY;
  26629. property FRESET : TBits_1 read getFRESET write setFRESET;
  26630. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26631. property RTREN : TBits_1 read getRTREN write setRTREN;
  26632. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26633. property TXEN : TBits_1 read getTXEN write setTXEN;
  26634. property TXERR : TBits_1 read getTXERR write setTXERR;
  26635. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26636. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26637. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26638. property UINC : TBits_1 read getUINC write setUINC;
  26639. property w : TBits_32 read getw write setw;
  26640. end;
  26641. TCAN2_C2FIFOINT15 = record
  26642. private
  26643. function getRXFULLIE : TBits_1; inline;
  26644. function getRXFULLIF : TBits_1; inline;
  26645. function getRXHALFIE : TBits_1; inline;
  26646. function getRXHALFIF : TBits_1; inline;
  26647. function getRXNEMPTYIE : TBits_1; inline;
  26648. function getRXNEMPTYIF : TBits_1; inline;
  26649. function getRXOVFLIE : TBits_1; inline;
  26650. function getRXOVFLIF : TBits_1; inline;
  26651. function getTXEMPTYIE : TBits_1; inline;
  26652. function getTXEMPTYIF : TBits_1; inline;
  26653. function getTXHALFIE : TBits_1; inline;
  26654. function getTXHALFIF : TBits_1; inline;
  26655. function getTXNFULLIE : TBits_1; inline;
  26656. function getTXNFULLIF : TBits_1; inline;
  26657. function getw : TBits_32; inline;
  26658. procedure setRXFULLIE(thebits : TBits_1); inline;
  26659. procedure setRXFULLIF(thebits : TBits_1); inline;
  26660. procedure setRXHALFIE(thebits : TBits_1); inline;
  26661. procedure setRXHALFIF(thebits : TBits_1); inline;
  26662. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26663. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26664. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26665. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26666. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26667. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26668. procedure setTXHALFIE(thebits : TBits_1); inline;
  26669. procedure setTXHALFIF(thebits : TBits_1); inline;
  26670. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26671. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26672. procedure setw(thebits : TBits_32); inline;
  26673. public
  26674. procedure clearRXFULLIE; inline;
  26675. procedure clearRXFULLIF; inline;
  26676. procedure clearRXHALFIE; inline;
  26677. procedure clearRXHALFIF; inline;
  26678. procedure clearRXNEMPTYIE; inline;
  26679. procedure clearRXNEMPTYIF; inline;
  26680. procedure clearRXOVFLIE; inline;
  26681. procedure clearRXOVFLIF; inline;
  26682. procedure clearTXEMPTYIE; inline;
  26683. procedure clearTXEMPTYIF; inline;
  26684. procedure clearTXHALFIE; inline;
  26685. procedure clearTXHALFIF; inline;
  26686. procedure clearTXNFULLIE; inline;
  26687. procedure clearTXNFULLIF; inline;
  26688. procedure setRXFULLIE; inline;
  26689. procedure setRXFULLIF; inline;
  26690. procedure setRXHALFIE; inline;
  26691. procedure setRXHALFIF; inline;
  26692. procedure setRXNEMPTYIE; inline;
  26693. procedure setRXNEMPTYIF; inline;
  26694. procedure setRXOVFLIE; inline;
  26695. procedure setRXOVFLIF; inline;
  26696. procedure setTXEMPTYIE; inline;
  26697. procedure setTXEMPTYIF; inline;
  26698. procedure setTXHALFIE; inline;
  26699. procedure setTXHALFIF; inline;
  26700. procedure setTXNFULLIE; inline;
  26701. procedure setTXNFULLIF; inline;
  26702. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26703. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26704. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26705. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26706. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26707. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26708. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26709. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26710. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26711. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26712. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26713. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26714. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26715. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26716. property w : TBits_32 read getw write setw;
  26717. end;
  26718. TCAN2_C2FIFOCI15 = record
  26719. private
  26720. function getCFIFOCI : TBits_5; inline;
  26721. function getw : TBits_32; inline;
  26722. procedure setCFIFOCI(thebits : TBits_5); inline;
  26723. procedure setw(thebits : TBits_32); inline;
  26724. public
  26725. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26726. property w : TBits_32 read getw write setw;
  26727. end;
  26728. TCAN2_C2FIFOCON16 = record
  26729. private
  26730. function getDONLY : TBits_1; inline;
  26731. function getFRESET : TBits_1; inline;
  26732. function getFSIZE : TBits_5; inline;
  26733. function getRTREN : TBits_1; inline;
  26734. function getTXABAT : TBits_1; inline;
  26735. function getTXEN : TBits_1; inline;
  26736. function getTXERR : TBits_1; inline;
  26737. function getTXLARB : TBits_1; inline;
  26738. function getTXPRI : TBits_2; inline;
  26739. function getTXREQ : TBits_1; inline;
  26740. function getUINC : TBits_1; inline;
  26741. function getw : TBits_32; inline;
  26742. procedure setDONLY(thebits : TBits_1); inline;
  26743. procedure setFRESET(thebits : TBits_1); inline;
  26744. procedure setFSIZE(thebits : TBits_5); inline;
  26745. procedure setRTREN(thebits : TBits_1); inline;
  26746. procedure setTXABAT(thebits : TBits_1); inline;
  26747. procedure setTXEN(thebits : TBits_1); inline;
  26748. procedure setTXERR(thebits : TBits_1); inline;
  26749. procedure setTXLARB(thebits : TBits_1); inline;
  26750. procedure setTXPRI(thebits : TBits_2); inline;
  26751. procedure setTXREQ(thebits : TBits_1); inline;
  26752. procedure setUINC(thebits : TBits_1); inline;
  26753. procedure setw(thebits : TBits_32); inline;
  26754. public
  26755. procedure clearDONLY; inline;
  26756. procedure clearFRESET; inline;
  26757. procedure clearRTREN; inline;
  26758. procedure clearTXABAT; inline;
  26759. procedure clearTXEN; inline;
  26760. procedure clearTXERR; inline;
  26761. procedure clearTXLARB; inline;
  26762. procedure clearTXREQ; inline;
  26763. procedure clearUINC; inline;
  26764. procedure setDONLY; inline;
  26765. procedure setFRESET; inline;
  26766. procedure setRTREN; inline;
  26767. procedure setTXABAT; inline;
  26768. procedure setTXEN; inline;
  26769. procedure setTXERR; inline;
  26770. procedure setTXLARB; inline;
  26771. procedure setTXREQ; inline;
  26772. procedure setUINC; inline;
  26773. property DONLY : TBits_1 read getDONLY write setDONLY;
  26774. property FRESET : TBits_1 read getFRESET write setFRESET;
  26775. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26776. property RTREN : TBits_1 read getRTREN write setRTREN;
  26777. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26778. property TXEN : TBits_1 read getTXEN write setTXEN;
  26779. property TXERR : TBits_1 read getTXERR write setTXERR;
  26780. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26781. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26782. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26783. property UINC : TBits_1 read getUINC write setUINC;
  26784. property w : TBits_32 read getw write setw;
  26785. end;
  26786. TCAN2_C2FIFOINT16 = record
  26787. private
  26788. function getRXFULLIE : TBits_1; inline;
  26789. function getRXFULLIF : TBits_1; inline;
  26790. function getRXHALFIE : TBits_1; inline;
  26791. function getRXHALFIF : TBits_1; inline;
  26792. function getRXNEMPTYIE : TBits_1; inline;
  26793. function getRXNEMPTYIF : TBits_1; inline;
  26794. function getRXOVFLIE : TBits_1; inline;
  26795. function getRXOVFLIF : TBits_1; inline;
  26796. function getTXEMPTYIE : TBits_1; inline;
  26797. function getTXEMPTYIF : TBits_1; inline;
  26798. function getTXHALFIE : TBits_1; inline;
  26799. function getTXHALFIF : TBits_1; inline;
  26800. function getTXNFULLIE : TBits_1; inline;
  26801. function getTXNFULLIF : TBits_1; inline;
  26802. function getw : TBits_32; inline;
  26803. procedure setRXFULLIE(thebits : TBits_1); inline;
  26804. procedure setRXFULLIF(thebits : TBits_1); inline;
  26805. procedure setRXHALFIE(thebits : TBits_1); inline;
  26806. procedure setRXHALFIF(thebits : TBits_1); inline;
  26807. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26808. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26809. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26810. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26811. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26812. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26813. procedure setTXHALFIE(thebits : TBits_1); inline;
  26814. procedure setTXHALFIF(thebits : TBits_1); inline;
  26815. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26816. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26817. procedure setw(thebits : TBits_32); inline;
  26818. public
  26819. procedure clearRXFULLIE; inline;
  26820. procedure clearRXFULLIF; inline;
  26821. procedure clearRXHALFIE; inline;
  26822. procedure clearRXHALFIF; inline;
  26823. procedure clearRXNEMPTYIE; inline;
  26824. procedure clearRXNEMPTYIF; inline;
  26825. procedure clearRXOVFLIE; inline;
  26826. procedure clearRXOVFLIF; inline;
  26827. procedure clearTXEMPTYIE; inline;
  26828. procedure clearTXEMPTYIF; inline;
  26829. procedure clearTXHALFIE; inline;
  26830. procedure clearTXHALFIF; inline;
  26831. procedure clearTXNFULLIE; inline;
  26832. procedure clearTXNFULLIF; inline;
  26833. procedure setRXFULLIE; inline;
  26834. procedure setRXFULLIF; inline;
  26835. procedure setRXHALFIE; inline;
  26836. procedure setRXHALFIF; inline;
  26837. procedure setRXNEMPTYIE; inline;
  26838. procedure setRXNEMPTYIF; inline;
  26839. procedure setRXOVFLIE; inline;
  26840. procedure setRXOVFLIF; inline;
  26841. procedure setTXEMPTYIE; inline;
  26842. procedure setTXEMPTYIF; inline;
  26843. procedure setTXHALFIE; inline;
  26844. procedure setTXHALFIF; inline;
  26845. procedure setTXNFULLIE; inline;
  26846. procedure setTXNFULLIF; inline;
  26847. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26848. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26849. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26850. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26851. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26852. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26853. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26854. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  26855. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  26856. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  26857. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  26858. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  26859. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  26860. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  26861. property w : TBits_32 read getw write setw;
  26862. end;
  26863. TCAN2_C2FIFOCI16 = record
  26864. private
  26865. function getCFIFOCI : TBits_5; inline;
  26866. function getw : TBits_32; inline;
  26867. procedure setCFIFOCI(thebits : TBits_5); inline;
  26868. procedure setw(thebits : TBits_32); inline;
  26869. public
  26870. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  26871. property w : TBits_32 read getw write setw;
  26872. end;
  26873. TCAN2_C2FIFOCON17 = record
  26874. private
  26875. function getDONLY : TBits_1; inline;
  26876. function getFRESET : TBits_1; inline;
  26877. function getFSIZE : TBits_5; inline;
  26878. function getRTREN : TBits_1; inline;
  26879. function getTXABAT : TBits_1; inline;
  26880. function getTXEN : TBits_1; inline;
  26881. function getTXERR : TBits_1; inline;
  26882. function getTXLARB : TBits_1; inline;
  26883. function getTXPRI : TBits_2; inline;
  26884. function getTXREQ : TBits_1; inline;
  26885. function getUINC : TBits_1; inline;
  26886. function getw : TBits_32; inline;
  26887. procedure setDONLY(thebits : TBits_1); inline;
  26888. procedure setFRESET(thebits : TBits_1); inline;
  26889. procedure setFSIZE(thebits : TBits_5); inline;
  26890. procedure setRTREN(thebits : TBits_1); inline;
  26891. procedure setTXABAT(thebits : TBits_1); inline;
  26892. procedure setTXEN(thebits : TBits_1); inline;
  26893. procedure setTXERR(thebits : TBits_1); inline;
  26894. procedure setTXLARB(thebits : TBits_1); inline;
  26895. procedure setTXPRI(thebits : TBits_2); inline;
  26896. procedure setTXREQ(thebits : TBits_1); inline;
  26897. procedure setUINC(thebits : TBits_1); inline;
  26898. procedure setw(thebits : TBits_32); inline;
  26899. public
  26900. procedure clearDONLY; inline;
  26901. procedure clearFRESET; inline;
  26902. procedure clearRTREN; inline;
  26903. procedure clearTXABAT; inline;
  26904. procedure clearTXEN; inline;
  26905. procedure clearTXERR; inline;
  26906. procedure clearTXLARB; inline;
  26907. procedure clearTXREQ; inline;
  26908. procedure clearUINC; inline;
  26909. procedure setDONLY; inline;
  26910. procedure setFRESET; inline;
  26911. procedure setRTREN; inline;
  26912. procedure setTXABAT; inline;
  26913. procedure setTXEN; inline;
  26914. procedure setTXERR; inline;
  26915. procedure setTXLARB; inline;
  26916. procedure setTXREQ; inline;
  26917. procedure setUINC; inline;
  26918. property DONLY : TBits_1 read getDONLY write setDONLY;
  26919. property FRESET : TBits_1 read getFRESET write setFRESET;
  26920. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  26921. property RTREN : TBits_1 read getRTREN write setRTREN;
  26922. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  26923. property TXEN : TBits_1 read getTXEN write setTXEN;
  26924. property TXERR : TBits_1 read getTXERR write setTXERR;
  26925. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  26926. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  26927. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  26928. property UINC : TBits_1 read getUINC write setUINC;
  26929. property w : TBits_32 read getw write setw;
  26930. end;
  26931. TCAN2_C2FIFOINT17 = record
  26932. private
  26933. function getRXFULLIE : TBits_1; inline;
  26934. function getRXFULLIF : TBits_1; inline;
  26935. function getRXHALFIE : TBits_1; inline;
  26936. function getRXHALFIF : TBits_1; inline;
  26937. function getRXNEMPTYIE : TBits_1; inline;
  26938. function getRXNEMPTYIF : TBits_1; inline;
  26939. function getRXOVFLIE : TBits_1; inline;
  26940. function getRXOVFLIF : TBits_1; inline;
  26941. function getTXEMPTYIE : TBits_1; inline;
  26942. function getTXEMPTYIF : TBits_1; inline;
  26943. function getTXHALFIE : TBits_1; inline;
  26944. function getTXHALFIF : TBits_1; inline;
  26945. function getTXNFULLIE : TBits_1; inline;
  26946. function getTXNFULLIF : TBits_1; inline;
  26947. function getw : TBits_32; inline;
  26948. procedure setRXFULLIE(thebits : TBits_1); inline;
  26949. procedure setRXFULLIF(thebits : TBits_1); inline;
  26950. procedure setRXHALFIE(thebits : TBits_1); inline;
  26951. procedure setRXHALFIF(thebits : TBits_1); inline;
  26952. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  26953. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  26954. procedure setRXOVFLIE(thebits : TBits_1); inline;
  26955. procedure setRXOVFLIF(thebits : TBits_1); inline;
  26956. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  26957. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  26958. procedure setTXHALFIE(thebits : TBits_1); inline;
  26959. procedure setTXHALFIF(thebits : TBits_1); inline;
  26960. procedure setTXNFULLIE(thebits : TBits_1); inline;
  26961. procedure setTXNFULLIF(thebits : TBits_1); inline;
  26962. procedure setw(thebits : TBits_32); inline;
  26963. public
  26964. procedure clearRXFULLIE; inline;
  26965. procedure clearRXFULLIF; inline;
  26966. procedure clearRXHALFIE; inline;
  26967. procedure clearRXHALFIF; inline;
  26968. procedure clearRXNEMPTYIE; inline;
  26969. procedure clearRXNEMPTYIF; inline;
  26970. procedure clearRXOVFLIE; inline;
  26971. procedure clearRXOVFLIF; inline;
  26972. procedure clearTXEMPTYIE; inline;
  26973. procedure clearTXEMPTYIF; inline;
  26974. procedure clearTXHALFIE; inline;
  26975. procedure clearTXHALFIF; inline;
  26976. procedure clearTXNFULLIE; inline;
  26977. procedure clearTXNFULLIF; inline;
  26978. procedure setRXFULLIE; inline;
  26979. procedure setRXFULLIF; inline;
  26980. procedure setRXHALFIE; inline;
  26981. procedure setRXHALFIF; inline;
  26982. procedure setRXNEMPTYIE; inline;
  26983. procedure setRXNEMPTYIF; inline;
  26984. procedure setRXOVFLIE; inline;
  26985. procedure setRXOVFLIF; inline;
  26986. procedure setTXEMPTYIE; inline;
  26987. procedure setTXEMPTYIF; inline;
  26988. procedure setTXHALFIE; inline;
  26989. procedure setTXHALFIF; inline;
  26990. procedure setTXNFULLIE; inline;
  26991. procedure setTXNFULLIF; inline;
  26992. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  26993. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  26994. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  26995. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  26996. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  26997. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  26998. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  26999. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27000. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27001. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27002. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27003. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27004. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27005. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27006. property w : TBits_32 read getw write setw;
  27007. end;
  27008. TCAN2_C2FIFOCI17 = record
  27009. private
  27010. function getCFIFOCI : TBits_5; inline;
  27011. function getw : TBits_32; inline;
  27012. procedure setCFIFOCI(thebits : TBits_5); inline;
  27013. procedure setw(thebits : TBits_32); inline;
  27014. public
  27015. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27016. property w : TBits_32 read getw write setw;
  27017. end;
  27018. TCAN2_C2FIFOCON18 = record
  27019. private
  27020. function getDONLY : TBits_1; inline;
  27021. function getFRESET : TBits_1; inline;
  27022. function getFSIZE : TBits_5; inline;
  27023. function getRTREN : TBits_1; inline;
  27024. function getTXABAT : TBits_1; inline;
  27025. function getTXEN : TBits_1; inline;
  27026. function getTXERR : TBits_1; inline;
  27027. function getTXLARB : TBits_1; inline;
  27028. function getTXPRI : TBits_2; inline;
  27029. function getTXREQ : TBits_1; inline;
  27030. function getUINC : TBits_1; inline;
  27031. function getw : TBits_32; inline;
  27032. procedure setDONLY(thebits : TBits_1); inline;
  27033. procedure setFRESET(thebits : TBits_1); inline;
  27034. procedure setFSIZE(thebits : TBits_5); inline;
  27035. procedure setRTREN(thebits : TBits_1); inline;
  27036. procedure setTXABAT(thebits : TBits_1); inline;
  27037. procedure setTXEN(thebits : TBits_1); inline;
  27038. procedure setTXERR(thebits : TBits_1); inline;
  27039. procedure setTXLARB(thebits : TBits_1); inline;
  27040. procedure setTXPRI(thebits : TBits_2); inline;
  27041. procedure setTXREQ(thebits : TBits_1); inline;
  27042. procedure setUINC(thebits : TBits_1); inline;
  27043. procedure setw(thebits : TBits_32); inline;
  27044. public
  27045. procedure clearDONLY; inline;
  27046. procedure clearFRESET; inline;
  27047. procedure clearRTREN; inline;
  27048. procedure clearTXABAT; inline;
  27049. procedure clearTXEN; inline;
  27050. procedure clearTXERR; inline;
  27051. procedure clearTXLARB; inline;
  27052. procedure clearTXREQ; inline;
  27053. procedure clearUINC; inline;
  27054. procedure setDONLY; inline;
  27055. procedure setFRESET; inline;
  27056. procedure setRTREN; inline;
  27057. procedure setTXABAT; inline;
  27058. procedure setTXEN; inline;
  27059. procedure setTXERR; inline;
  27060. procedure setTXLARB; inline;
  27061. procedure setTXREQ; inline;
  27062. procedure setUINC; inline;
  27063. property DONLY : TBits_1 read getDONLY write setDONLY;
  27064. property FRESET : TBits_1 read getFRESET write setFRESET;
  27065. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27066. property RTREN : TBits_1 read getRTREN write setRTREN;
  27067. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27068. property TXEN : TBits_1 read getTXEN write setTXEN;
  27069. property TXERR : TBits_1 read getTXERR write setTXERR;
  27070. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27071. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27072. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27073. property UINC : TBits_1 read getUINC write setUINC;
  27074. property w : TBits_32 read getw write setw;
  27075. end;
  27076. TCAN2_C2FIFOINT18 = record
  27077. private
  27078. function getRXFULLIE : TBits_1; inline;
  27079. function getRXFULLIF : TBits_1; inline;
  27080. function getRXHALFIE : TBits_1; inline;
  27081. function getRXHALFIF : TBits_1; inline;
  27082. function getRXNEMPTYIE : TBits_1; inline;
  27083. function getRXNEMPTYIF : TBits_1; inline;
  27084. function getRXOVFLIE : TBits_1; inline;
  27085. function getRXOVFLIF : TBits_1; inline;
  27086. function getTXEMPTYIE : TBits_1; inline;
  27087. function getTXEMPTYIF : TBits_1; inline;
  27088. function getTXHALFIE : TBits_1; inline;
  27089. function getTXHALFIF : TBits_1; inline;
  27090. function getTXNFULLIE : TBits_1; inline;
  27091. function getTXNFULLIF : TBits_1; inline;
  27092. function getw : TBits_32; inline;
  27093. procedure setRXFULLIE(thebits : TBits_1); inline;
  27094. procedure setRXFULLIF(thebits : TBits_1); inline;
  27095. procedure setRXHALFIE(thebits : TBits_1); inline;
  27096. procedure setRXHALFIF(thebits : TBits_1); inline;
  27097. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27098. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27099. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27100. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27101. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27102. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27103. procedure setTXHALFIE(thebits : TBits_1); inline;
  27104. procedure setTXHALFIF(thebits : TBits_1); inline;
  27105. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27106. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27107. procedure setw(thebits : TBits_32); inline;
  27108. public
  27109. procedure clearRXFULLIE; inline;
  27110. procedure clearRXFULLIF; inline;
  27111. procedure clearRXHALFIE; inline;
  27112. procedure clearRXHALFIF; inline;
  27113. procedure clearRXNEMPTYIE; inline;
  27114. procedure clearRXNEMPTYIF; inline;
  27115. procedure clearRXOVFLIE; inline;
  27116. procedure clearRXOVFLIF; inline;
  27117. procedure clearTXEMPTYIE; inline;
  27118. procedure clearTXEMPTYIF; inline;
  27119. procedure clearTXHALFIE; inline;
  27120. procedure clearTXHALFIF; inline;
  27121. procedure clearTXNFULLIE; inline;
  27122. procedure clearTXNFULLIF; inline;
  27123. procedure setRXFULLIE; inline;
  27124. procedure setRXFULLIF; inline;
  27125. procedure setRXHALFIE; inline;
  27126. procedure setRXHALFIF; inline;
  27127. procedure setRXNEMPTYIE; inline;
  27128. procedure setRXNEMPTYIF; inline;
  27129. procedure setRXOVFLIE; inline;
  27130. procedure setRXOVFLIF; inline;
  27131. procedure setTXEMPTYIE; inline;
  27132. procedure setTXEMPTYIF; inline;
  27133. procedure setTXHALFIE; inline;
  27134. procedure setTXHALFIF; inline;
  27135. procedure setTXNFULLIE; inline;
  27136. procedure setTXNFULLIF; inline;
  27137. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27138. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27139. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27140. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27141. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27142. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27143. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27144. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27145. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27146. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27147. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27148. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27149. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27150. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27151. property w : TBits_32 read getw write setw;
  27152. end;
  27153. TCAN2_C2FIFOCI18 = record
  27154. private
  27155. function getCFIFOCI : TBits_5; inline;
  27156. function getw : TBits_32; inline;
  27157. procedure setCFIFOCI(thebits : TBits_5); inline;
  27158. procedure setw(thebits : TBits_32); inline;
  27159. public
  27160. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27161. property w : TBits_32 read getw write setw;
  27162. end;
  27163. TCAN2_C2FIFOCON19 = record
  27164. private
  27165. function getDONLY : TBits_1; inline;
  27166. function getFRESET : TBits_1; inline;
  27167. function getFSIZE : TBits_5; inline;
  27168. function getRTREN : TBits_1; inline;
  27169. function getTXABAT : TBits_1; inline;
  27170. function getTXEN : TBits_1; inline;
  27171. function getTXERR : TBits_1; inline;
  27172. function getTXLARB : TBits_1; inline;
  27173. function getTXPRI : TBits_2; inline;
  27174. function getTXREQ : TBits_1; inline;
  27175. function getUINC : TBits_1; inline;
  27176. function getw : TBits_32; inline;
  27177. procedure setDONLY(thebits : TBits_1); inline;
  27178. procedure setFRESET(thebits : TBits_1); inline;
  27179. procedure setFSIZE(thebits : TBits_5); inline;
  27180. procedure setRTREN(thebits : TBits_1); inline;
  27181. procedure setTXABAT(thebits : TBits_1); inline;
  27182. procedure setTXEN(thebits : TBits_1); inline;
  27183. procedure setTXERR(thebits : TBits_1); inline;
  27184. procedure setTXLARB(thebits : TBits_1); inline;
  27185. procedure setTXPRI(thebits : TBits_2); inline;
  27186. procedure setTXREQ(thebits : TBits_1); inline;
  27187. procedure setUINC(thebits : TBits_1); inline;
  27188. procedure setw(thebits : TBits_32); inline;
  27189. public
  27190. procedure clearDONLY; inline;
  27191. procedure clearFRESET; inline;
  27192. procedure clearRTREN; inline;
  27193. procedure clearTXABAT; inline;
  27194. procedure clearTXEN; inline;
  27195. procedure clearTXERR; inline;
  27196. procedure clearTXLARB; inline;
  27197. procedure clearTXREQ; inline;
  27198. procedure clearUINC; inline;
  27199. procedure setDONLY; inline;
  27200. procedure setFRESET; inline;
  27201. procedure setRTREN; inline;
  27202. procedure setTXABAT; inline;
  27203. procedure setTXEN; inline;
  27204. procedure setTXERR; inline;
  27205. procedure setTXLARB; inline;
  27206. procedure setTXREQ; inline;
  27207. procedure setUINC; inline;
  27208. property DONLY : TBits_1 read getDONLY write setDONLY;
  27209. property FRESET : TBits_1 read getFRESET write setFRESET;
  27210. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27211. property RTREN : TBits_1 read getRTREN write setRTREN;
  27212. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27213. property TXEN : TBits_1 read getTXEN write setTXEN;
  27214. property TXERR : TBits_1 read getTXERR write setTXERR;
  27215. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27216. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27217. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27218. property UINC : TBits_1 read getUINC write setUINC;
  27219. property w : TBits_32 read getw write setw;
  27220. end;
  27221. TCAN2_C2FIFOINT19 = record
  27222. private
  27223. function getRXFULLIE : TBits_1; inline;
  27224. function getRXFULLIF : TBits_1; inline;
  27225. function getRXHALFIE : TBits_1; inline;
  27226. function getRXHALFIF : TBits_1; inline;
  27227. function getRXNEMPTYIE : TBits_1; inline;
  27228. function getRXNEMPTYIF : TBits_1; inline;
  27229. function getRXOVFLIE : TBits_1; inline;
  27230. function getRXOVFLIF : TBits_1; inline;
  27231. function getTXEMPTYIE : TBits_1; inline;
  27232. function getTXEMPTYIF : TBits_1; inline;
  27233. function getTXHALFIE : TBits_1; inline;
  27234. function getTXHALFIF : TBits_1; inline;
  27235. function getTXNFULLIE : TBits_1; inline;
  27236. function getTXNFULLIF : TBits_1; inline;
  27237. function getw : TBits_32; inline;
  27238. procedure setRXFULLIE(thebits : TBits_1); inline;
  27239. procedure setRXFULLIF(thebits : TBits_1); inline;
  27240. procedure setRXHALFIE(thebits : TBits_1); inline;
  27241. procedure setRXHALFIF(thebits : TBits_1); inline;
  27242. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27243. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27244. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27245. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27246. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27247. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27248. procedure setTXHALFIE(thebits : TBits_1); inline;
  27249. procedure setTXHALFIF(thebits : TBits_1); inline;
  27250. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27251. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27252. procedure setw(thebits : TBits_32); inline;
  27253. public
  27254. procedure clearRXFULLIE; inline;
  27255. procedure clearRXFULLIF; inline;
  27256. procedure clearRXHALFIE; inline;
  27257. procedure clearRXHALFIF; inline;
  27258. procedure clearRXNEMPTYIE; inline;
  27259. procedure clearRXNEMPTYIF; inline;
  27260. procedure clearRXOVFLIE; inline;
  27261. procedure clearRXOVFLIF; inline;
  27262. procedure clearTXEMPTYIE; inline;
  27263. procedure clearTXEMPTYIF; inline;
  27264. procedure clearTXHALFIE; inline;
  27265. procedure clearTXHALFIF; inline;
  27266. procedure clearTXNFULLIE; inline;
  27267. procedure clearTXNFULLIF; inline;
  27268. procedure setRXFULLIE; inline;
  27269. procedure setRXFULLIF; inline;
  27270. procedure setRXHALFIE; inline;
  27271. procedure setRXHALFIF; inline;
  27272. procedure setRXNEMPTYIE; inline;
  27273. procedure setRXNEMPTYIF; inline;
  27274. procedure setRXOVFLIE; inline;
  27275. procedure setRXOVFLIF; inline;
  27276. procedure setTXEMPTYIE; inline;
  27277. procedure setTXEMPTYIF; inline;
  27278. procedure setTXHALFIE; inline;
  27279. procedure setTXHALFIF; inline;
  27280. procedure setTXNFULLIE; inline;
  27281. procedure setTXNFULLIF; inline;
  27282. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27283. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27284. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27285. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27286. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27287. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27288. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27289. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27290. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27291. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27292. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27293. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27294. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27295. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27296. property w : TBits_32 read getw write setw;
  27297. end;
  27298. TCAN2_C2FIFOCI19 = record
  27299. private
  27300. function getCFIFOCI : TBits_5; inline;
  27301. function getw : TBits_32; inline;
  27302. procedure setCFIFOCI(thebits : TBits_5); inline;
  27303. procedure setw(thebits : TBits_32); inline;
  27304. public
  27305. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27306. property w : TBits_32 read getw write setw;
  27307. end;
  27308. TCAN2_C2FIFOCON20 = record
  27309. private
  27310. function getDONLY : TBits_1; inline;
  27311. function getFRESET : TBits_1; inline;
  27312. function getFSIZE : TBits_5; inline;
  27313. function getRTREN : TBits_1; inline;
  27314. function getTXABAT : TBits_1; inline;
  27315. function getTXEN : TBits_1; inline;
  27316. function getTXERR : TBits_1; inline;
  27317. function getTXLARB : TBits_1; inline;
  27318. function getTXPRI : TBits_2; inline;
  27319. function getTXREQ : TBits_1; inline;
  27320. function getUINC : TBits_1; inline;
  27321. function getw : TBits_32; inline;
  27322. procedure setDONLY(thebits : TBits_1); inline;
  27323. procedure setFRESET(thebits : TBits_1); inline;
  27324. procedure setFSIZE(thebits : TBits_5); inline;
  27325. procedure setRTREN(thebits : TBits_1); inline;
  27326. procedure setTXABAT(thebits : TBits_1); inline;
  27327. procedure setTXEN(thebits : TBits_1); inline;
  27328. procedure setTXERR(thebits : TBits_1); inline;
  27329. procedure setTXLARB(thebits : TBits_1); inline;
  27330. procedure setTXPRI(thebits : TBits_2); inline;
  27331. procedure setTXREQ(thebits : TBits_1); inline;
  27332. procedure setUINC(thebits : TBits_1); inline;
  27333. procedure setw(thebits : TBits_32); inline;
  27334. public
  27335. procedure clearDONLY; inline;
  27336. procedure clearFRESET; inline;
  27337. procedure clearRTREN; inline;
  27338. procedure clearTXABAT; inline;
  27339. procedure clearTXEN; inline;
  27340. procedure clearTXERR; inline;
  27341. procedure clearTXLARB; inline;
  27342. procedure clearTXREQ; inline;
  27343. procedure clearUINC; inline;
  27344. procedure setDONLY; inline;
  27345. procedure setFRESET; inline;
  27346. procedure setRTREN; inline;
  27347. procedure setTXABAT; inline;
  27348. procedure setTXEN; inline;
  27349. procedure setTXERR; inline;
  27350. procedure setTXLARB; inline;
  27351. procedure setTXREQ; inline;
  27352. procedure setUINC; inline;
  27353. property DONLY : TBits_1 read getDONLY write setDONLY;
  27354. property FRESET : TBits_1 read getFRESET write setFRESET;
  27355. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27356. property RTREN : TBits_1 read getRTREN write setRTREN;
  27357. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27358. property TXEN : TBits_1 read getTXEN write setTXEN;
  27359. property TXERR : TBits_1 read getTXERR write setTXERR;
  27360. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27361. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27362. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27363. property UINC : TBits_1 read getUINC write setUINC;
  27364. property w : TBits_32 read getw write setw;
  27365. end;
  27366. TCAN2_C2FIFOINT20 = record
  27367. private
  27368. function getRXFULLIE : TBits_1; inline;
  27369. function getRXFULLIF : TBits_1; inline;
  27370. function getRXHALFIE : TBits_1; inline;
  27371. function getRXHALFIF : TBits_1; inline;
  27372. function getRXNEMPTYIE : TBits_1; inline;
  27373. function getRXNEMPTYIF : TBits_1; inline;
  27374. function getRXOVFLIE : TBits_1; inline;
  27375. function getRXOVFLIF : TBits_1; inline;
  27376. function getTXEMPTYIE : TBits_1; inline;
  27377. function getTXEMPTYIF : TBits_1; inline;
  27378. function getTXHALFIE : TBits_1; inline;
  27379. function getTXHALFIF : TBits_1; inline;
  27380. function getTXNFULLIE : TBits_1; inline;
  27381. function getTXNFULLIF : TBits_1; inline;
  27382. function getw : TBits_32; inline;
  27383. procedure setRXFULLIE(thebits : TBits_1); inline;
  27384. procedure setRXFULLIF(thebits : TBits_1); inline;
  27385. procedure setRXHALFIE(thebits : TBits_1); inline;
  27386. procedure setRXHALFIF(thebits : TBits_1); inline;
  27387. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27388. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27389. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27390. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27391. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27392. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27393. procedure setTXHALFIE(thebits : TBits_1); inline;
  27394. procedure setTXHALFIF(thebits : TBits_1); inline;
  27395. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27396. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27397. procedure setw(thebits : TBits_32); inline;
  27398. public
  27399. procedure clearRXFULLIE; inline;
  27400. procedure clearRXFULLIF; inline;
  27401. procedure clearRXHALFIE; inline;
  27402. procedure clearRXHALFIF; inline;
  27403. procedure clearRXNEMPTYIE; inline;
  27404. procedure clearRXNEMPTYIF; inline;
  27405. procedure clearRXOVFLIE; inline;
  27406. procedure clearRXOVFLIF; inline;
  27407. procedure clearTXEMPTYIE; inline;
  27408. procedure clearTXEMPTYIF; inline;
  27409. procedure clearTXHALFIE; inline;
  27410. procedure clearTXHALFIF; inline;
  27411. procedure clearTXNFULLIE; inline;
  27412. procedure clearTXNFULLIF; inline;
  27413. procedure setRXFULLIE; inline;
  27414. procedure setRXFULLIF; inline;
  27415. procedure setRXHALFIE; inline;
  27416. procedure setRXHALFIF; inline;
  27417. procedure setRXNEMPTYIE; inline;
  27418. procedure setRXNEMPTYIF; inline;
  27419. procedure setRXOVFLIE; inline;
  27420. procedure setRXOVFLIF; inline;
  27421. procedure setTXEMPTYIE; inline;
  27422. procedure setTXEMPTYIF; inline;
  27423. procedure setTXHALFIE; inline;
  27424. procedure setTXHALFIF; inline;
  27425. procedure setTXNFULLIE; inline;
  27426. procedure setTXNFULLIF; inline;
  27427. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27428. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27429. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27430. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27431. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27432. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27433. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27434. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27435. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27436. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27437. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27438. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27439. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27440. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27441. property w : TBits_32 read getw write setw;
  27442. end;
  27443. TCAN2_C2FIFOCI20 = record
  27444. private
  27445. function getCFIFOCI : TBits_5; inline;
  27446. function getw : TBits_32; inline;
  27447. procedure setCFIFOCI(thebits : TBits_5); inline;
  27448. procedure setw(thebits : TBits_32); inline;
  27449. public
  27450. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27451. property w : TBits_32 read getw write setw;
  27452. end;
  27453. TCAN2_C2FIFOCON21 = record
  27454. private
  27455. function getDONLY : TBits_1; inline;
  27456. function getFRESET : TBits_1; inline;
  27457. function getFSIZE : TBits_5; inline;
  27458. function getRTREN : TBits_1; inline;
  27459. function getTXABAT : TBits_1; inline;
  27460. function getTXEN : TBits_1; inline;
  27461. function getTXERR : TBits_1; inline;
  27462. function getTXLARB : TBits_1; inline;
  27463. function getTXPRI : TBits_2; inline;
  27464. function getTXREQ : TBits_1; inline;
  27465. function getUINC : TBits_1; inline;
  27466. function getw : TBits_32; inline;
  27467. procedure setDONLY(thebits : TBits_1); inline;
  27468. procedure setFRESET(thebits : TBits_1); inline;
  27469. procedure setFSIZE(thebits : TBits_5); inline;
  27470. procedure setRTREN(thebits : TBits_1); inline;
  27471. procedure setTXABAT(thebits : TBits_1); inline;
  27472. procedure setTXEN(thebits : TBits_1); inline;
  27473. procedure setTXERR(thebits : TBits_1); inline;
  27474. procedure setTXLARB(thebits : TBits_1); inline;
  27475. procedure setTXPRI(thebits : TBits_2); inline;
  27476. procedure setTXREQ(thebits : TBits_1); inline;
  27477. procedure setUINC(thebits : TBits_1); inline;
  27478. procedure setw(thebits : TBits_32); inline;
  27479. public
  27480. procedure clearDONLY; inline;
  27481. procedure clearFRESET; inline;
  27482. procedure clearRTREN; inline;
  27483. procedure clearTXABAT; inline;
  27484. procedure clearTXEN; inline;
  27485. procedure clearTXERR; inline;
  27486. procedure clearTXLARB; inline;
  27487. procedure clearTXREQ; inline;
  27488. procedure clearUINC; inline;
  27489. procedure setDONLY; inline;
  27490. procedure setFRESET; inline;
  27491. procedure setRTREN; inline;
  27492. procedure setTXABAT; inline;
  27493. procedure setTXEN; inline;
  27494. procedure setTXERR; inline;
  27495. procedure setTXLARB; inline;
  27496. procedure setTXREQ; inline;
  27497. procedure setUINC; inline;
  27498. property DONLY : TBits_1 read getDONLY write setDONLY;
  27499. property FRESET : TBits_1 read getFRESET write setFRESET;
  27500. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27501. property RTREN : TBits_1 read getRTREN write setRTREN;
  27502. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27503. property TXEN : TBits_1 read getTXEN write setTXEN;
  27504. property TXERR : TBits_1 read getTXERR write setTXERR;
  27505. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27506. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27507. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27508. property UINC : TBits_1 read getUINC write setUINC;
  27509. property w : TBits_32 read getw write setw;
  27510. end;
  27511. TCAN2_C2FIFOINT21 = record
  27512. private
  27513. function getRXFULLIE : TBits_1; inline;
  27514. function getRXFULLIF : TBits_1; inline;
  27515. function getRXHALFIE : TBits_1; inline;
  27516. function getRXHALFIF : TBits_1; inline;
  27517. function getRXNEMPTYIE : TBits_1; inline;
  27518. function getRXNEMPTYIF : TBits_1; inline;
  27519. function getRXOVFLIE : TBits_1; inline;
  27520. function getRXOVFLIF : TBits_1; inline;
  27521. function getTXEMPTYIE : TBits_1; inline;
  27522. function getTXEMPTYIF : TBits_1; inline;
  27523. function getTXHALFIE : TBits_1; inline;
  27524. function getTXHALFIF : TBits_1; inline;
  27525. function getTXNFULLIE : TBits_1; inline;
  27526. function getTXNFULLIF : TBits_1; inline;
  27527. function getw : TBits_32; inline;
  27528. procedure setRXFULLIE(thebits : TBits_1); inline;
  27529. procedure setRXFULLIF(thebits : TBits_1); inline;
  27530. procedure setRXHALFIE(thebits : TBits_1); inline;
  27531. procedure setRXHALFIF(thebits : TBits_1); inline;
  27532. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27533. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27534. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27535. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27536. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27537. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27538. procedure setTXHALFIE(thebits : TBits_1); inline;
  27539. procedure setTXHALFIF(thebits : TBits_1); inline;
  27540. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27541. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27542. procedure setw(thebits : TBits_32); inline;
  27543. public
  27544. procedure clearRXFULLIE; inline;
  27545. procedure clearRXFULLIF; inline;
  27546. procedure clearRXHALFIE; inline;
  27547. procedure clearRXHALFIF; inline;
  27548. procedure clearRXNEMPTYIE; inline;
  27549. procedure clearRXNEMPTYIF; inline;
  27550. procedure clearRXOVFLIE; inline;
  27551. procedure clearRXOVFLIF; inline;
  27552. procedure clearTXEMPTYIE; inline;
  27553. procedure clearTXEMPTYIF; inline;
  27554. procedure clearTXHALFIE; inline;
  27555. procedure clearTXHALFIF; inline;
  27556. procedure clearTXNFULLIE; inline;
  27557. procedure clearTXNFULLIF; inline;
  27558. procedure setRXFULLIE; inline;
  27559. procedure setRXFULLIF; inline;
  27560. procedure setRXHALFIE; inline;
  27561. procedure setRXHALFIF; inline;
  27562. procedure setRXNEMPTYIE; inline;
  27563. procedure setRXNEMPTYIF; inline;
  27564. procedure setRXOVFLIE; inline;
  27565. procedure setRXOVFLIF; inline;
  27566. procedure setTXEMPTYIE; inline;
  27567. procedure setTXEMPTYIF; inline;
  27568. procedure setTXHALFIE; inline;
  27569. procedure setTXHALFIF; inline;
  27570. procedure setTXNFULLIE; inline;
  27571. procedure setTXNFULLIF; inline;
  27572. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27573. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27574. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27575. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27576. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27577. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27578. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27579. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27580. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27581. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27582. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27583. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27584. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27585. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27586. property w : TBits_32 read getw write setw;
  27587. end;
  27588. TCAN2_C2FIFOCI21 = record
  27589. private
  27590. function getCFIFOCI : TBits_5; inline;
  27591. function getw : TBits_32; inline;
  27592. procedure setCFIFOCI(thebits : TBits_5); inline;
  27593. procedure setw(thebits : TBits_32); inline;
  27594. public
  27595. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27596. property w : TBits_32 read getw write setw;
  27597. end;
  27598. TCAN2_C2FIFOCON22 = record
  27599. private
  27600. function getDONLY : TBits_1; inline;
  27601. function getFRESET : TBits_1; inline;
  27602. function getFSIZE : TBits_5; inline;
  27603. function getRTREN : TBits_1; inline;
  27604. function getTXABAT : TBits_1; inline;
  27605. function getTXEN : TBits_1; inline;
  27606. function getTXERR : TBits_1; inline;
  27607. function getTXLARB : TBits_1; inline;
  27608. function getTXPRI : TBits_2; inline;
  27609. function getTXREQ : TBits_1; inline;
  27610. function getUINC : TBits_1; inline;
  27611. function getw : TBits_32; inline;
  27612. procedure setDONLY(thebits : TBits_1); inline;
  27613. procedure setFRESET(thebits : TBits_1); inline;
  27614. procedure setFSIZE(thebits : TBits_5); inline;
  27615. procedure setRTREN(thebits : TBits_1); inline;
  27616. procedure setTXABAT(thebits : TBits_1); inline;
  27617. procedure setTXEN(thebits : TBits_1); inline;
  27618. procedure setTXERR(thebits : TBits_1); inline;
  27619. procedure setTXLARB(thebits : TBits_1); inline;
  27620. procedure setTXPRI(thebits : TBits_2); inline;
  27621. procedure setTXREQ(thebits : TBits_1); inline;
  27622. procedure setUINC(thebits : TBits_1); inline;
  27623. procedure setw(thebits : TBits_32); inline;
  27624. public
  27625. procedure clearDONLY; inline;
  27626. procedure clearFRESET; inline;
  27627. procedure clearRTREN; inline;
  27628. procedure clearTXABAT; inline;
  27629. procedure clearTXEN; inline;
  27630. procedure clearTXERR; inline;
  27631. procedure clearTXLARB; inline;
  27632. procedure clearTXREQ; inline;
  27633. procedure clearUINC; inline;
  27634. procedure setDONLY; inline;
  27635. procedure setFRESET; inline;
  27636. procedure setRTREN; inline;
  27637. procedure setTXABAT; inline;
  27638. procedure setTXEN; inline;
  27639. procedure setTXERR; inline;
  27640. procedure setTXLARB; inline;
  27641. procedure setTXREQ; inline;
  27642. procedure setUINC; inline;
  27643. property DONLY : TBits_1 read getDONLY write setDONLY;
  27644. property FRESET : TBits_1 read getFRESET write setFRESET;
  27645. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27646. property RTREN : TBits_1 read getRTREN write setRTREN;
  27647. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27648. property TXEN : TBits_1 read getTXEN write setTXEN;
  27649. property TXERR : TBits_1 read getTXERR write setTXERR;
  27650. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27651. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27652. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27653. property UINC : TBits_1 read getUINC write setUINC;
  27654. property w : TBits_32 read getw write setw;
  27655. end;
  27656. TCAN2_C2FIFOINT22 = record
  27657. private
  27658. function getRXFULLIE : TBits_1; inline;
  27659. function getRXFULLIF : TBits_1; inline;
  27660. function getRXHALFIE : TBits_1; inline;
  27661. function getRXHALFIF : TBits_1; inline;
  27662. function getRXNEMPTYIE : TBits_1; inline;
  27663. function getRXNEMPTYIF : TBits_1; inline;
  27664. function getRXOVFLIE : TBits_1; inline;
  27665. function getRXOVFLIF : TBits_1; inline;
  27666. function getTXEMPTYIE : TBits_1; inline;
  27667. function getTXEMPTYIF : TBits_1; inline;
  27668. function getTXHALFIE : TBits_1; inline;
  27669. function getTXHALFIF : TBits_1; inline;
  27670. function getTXNFULLIE : TBits_1; inline;
  27671. function getTXNFULLIF : TBits_1; inline;
  27672. function getw : TBits_32; inline;
  27673. procedure setRXFULLIE(thebits : TBits_1); inline;
  27674. procedure setRXFULLIF(thebits : TBits_1); inline;
  27675. procedure setRXHALFIE(thebits : TBits_1); inline;
  27676. procedure setRXHALFIF(thebits : TBits_1); inline;
  27677. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27678. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27679. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27680. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27681. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27682. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27683. procedure setTXHALFIE(thebits : TBits_1); inline;
  27684. procedure setTXHALFIF(thebits : TBits_1); inline;
  27685. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27686. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27687. procedure setw(thebits : TBits_32); inline;
  27688. public
  27689. procedure clearRXFULLIE; inline;
  27690. procedure clearRXFULLIF; inline;
  27691. procedure clearRXHALFIE; inline;
  27692. procedure clearRXHALFIF; inline;
  27693. procedure clearRXNEMPTYIE; inline;
  27694. procedure clearRXNEMPTYIF; inline;
  27695. procedure clearRXOVFLIE; inline;
  27696. procedure clearRXOVFLIF; inline;
  27697. procedure clearTXEMPTYIE; inline;
  27698. procedure clearTXEMPTYIF; inline;
  27699. procedure clearTXHALFIE; inline;
  27700. procedure clearTXHALFIF; inline;
  27701. procedure clearTXNFULLIE; inline;
  27702. procedure clearTXNFULLIF; inline;
  27703. procedure setRXFULLIE; inline;
  27704. procedure setRXFULLIF; inline;
  27705. procedure setRXHALFIE; inline;
  27706. procedure setRXHALFIF; inline;
  27707. procedure setRXNEMPTYIE; inline;
  27708. procedure setRXNEMPTYIF; inline;
  27709. procedure setRXOVFLIE; inline;
  27710. procedure setRXOVFLIF; inline;
  27711. procedure setTXEMPTYIE; inline;
  27712. procedure setTXEMPTYIF; inline;
  27713. procedure setTXHALFIE; inline;
  27714. procedure setTXHALFIF; inline;
  27715. procedure setTXNFULLIE; inline;
  27716. procedure setTXNFULLIF; inline;
  27717. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27718. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27719. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27720. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27721. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27722. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27723. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27724. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27725. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27726. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27727. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27728. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27729. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27730. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27731. property w : TBits_32 read getw write setw;
  27732. end;
  27733. TCAN2_C2FIFOCI22 = record
  27734. private
  27735. function getCFIFOCI : TBits_5; inline;
  27736. function getw : TBits_32; inline;
  27737. procedure setCFIFOCI(thebits : TBits_5); inline;
  27738. procedure setw(thebits : TBits_32); inline;
  27739. public
  27740. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27741. property w : TBits_32 read getw write setw;
  27742. end;
  27743. TCAN2_C2FIFOCON23 = record
  27744. private
  27745. function getDONLY : TBits_1; inline;
  27746. function getFRESET : TBits_1; inline;
  27747. function getFSIZE : TBits_5; inline;
  27748. function getRTREN : TBits_1; inline;
  27749. function getTXABAT : TBits_1; inline;
  27750. function getTXEN : TBits_1; inline;
  27751. function getTXERR : TBits_1; inline;
  27752. function getTXLARB : TBits_1; inline;
  27753. function getTXPRI : TBits_2; inline;
  27754. function getTXREQ : TBits_1; inline;
  27755. function getUINC : TBits_1; inline;
  27756. function getw : TBits_32; inline;
  27757. procedure setDONLY(thebits : TBits_1); inline;
  27758. procedure setFRESET(thebits : TBits_1); inline;
  27759. procedure setFSIZE(thebits : TBits_5); inline;
  27760. procedure setRTREN(thebits : TBits_1); inline;
  27761. procedure setTXABAT(thebits : TBits_1); inline;
  27762. procedure setTXEN(thebits : TBits_1); inline;
  27763. procedure setTXERR(thebits : TBits_1); inline;
  27764. procedure setTXLARB(thebits : TBits_1); inline;
  27765. procedure setTXPRI(thebits : TBits_2); inline;
  27766. procedure setTXREQ(thebits : TBits_1); inline;
  27767. procedure setUINC(thebits : TBits_1); inline;
  27768. procedure setw(thebits : TBits_32); inline;
  27769. public
  27770. procedure clearDONLY; inline;
  27771. procedure clearFRESET; inline;
  27772. procedure clearRTREN; inline;
  27773. procedure clearTXABAT; inline;
  27774. procedure clearTXEN; inline;
  27775. procedure clearTXERR; inline;
  27776. procedure clearTXLARB; inline;
  27777. procedure clearTXREQ; inline;
  27778. procedure clearUINC; inline;
  27779. procedure setDONLY; inline;
  27780. procedure setFRESET; inline;
  27781. procedure setRTREN; inline;
  27782. procedure setTXABAT; inline;
  27783. procedure setTXEN; inline;
  27784. procedure setTXERR; inline;
  27785. procedure setTXLARB; inline;
  27786. procedure setTXREQ; inline;
  27787. procedure setUINC; inline;
  27788. property DONLY : TBits_1 read getDONLY write setDONLY;
  27789. property FRESET : TBits_1 read getFRESET write setFRESET;
  27790. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27791. property RTREN : TBits_1 read getRTREN write setRTREN;
  27792. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27793. property TXEN : TBits_1 read getTXEN write setTXEN;
  27794. property TXERR : TBits_1 read getTXERR write setTXERR;
  27795. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27796. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27797. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27798. property UINC : TBits_1 read getUINC write setUINC;
  27799. property w : TBits_32 read getw write setw;
  27800. end;
  27801. TCAN2_C2FIFOINT23 = record
  27802. private
  27803. function getRXFULLIE : TBits_1; inline;
  27804. function getRXFULLIF : TBits_1; inline;
  27805. function getRXHALFIE : TBits_1; inline;
  27806. function getRXHALFIF : TBits_1; inline;
  27807. function getRXNEMPTYIE : TBits_1; inline;
  27808. function getRXNEMPTYIF : TBits_1; inline;
  27809. function getRXOVFLIE : TBits_1; inline;
  27810. function getRXOVFLIF : TBits_1; inline;
  27811. function getTXEMPTYIE : TBits_1; inline;
  27812. function getTXEMPTYIF : TBits_1; inline;
  27813. function getTXHALFIE : TBits_1; inline;
  27814. function getTXHALFIF : TBits_1; inline;
  27815. function getTXNFULLIE : TBits_1; inline;
  27816. function getTXNFULLIF : TBits_1; inline;
  27817. function getw : TBits_32; inline;
  27818. procedure setRXFULLIE(thebits : TBits_1); inline;
  27819. procedure setRXFULLIF(thebits : TBits_1); inline;
  27820. procedure setRXHALFIE(thebits : TBits_1); inline;
  27821. procedure setRXHALFIF(thebits : TBits_1); inline;
  27822. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27823. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27824. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27825. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27826. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27827. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27828. procedure setTXHALFIE(thebits : TBits_1); inline;
  27829. procedure setTXHALFIF(thebits : TBits_1); inline;
  27830. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27831. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27832. procedure setw(thebits : TBits_32); inline;
  27833. public
  27834. procedure clearRXFULLIE; inline;
  27835. procedure clearRXFULLIF; inline;
  27836. procedure clearRXHALFIE; inline;
  27837. procedure clearRXHALFIF; inline;
  27838. procedure clearRXNEMPTYIE; inline;
  27839. procedure clearRXNEMPTYIF; inline;
  27840. procedure clearRXOVFLIE; inline;
  27841. procedure clearRXOVFLIF; inline;
  27842. procedure clearTXEMPTYIE; inline;
  27843. procedure clearTXEMPTYIF; inline;
  27844. procedure clearTXHALFIE; inline;
  27845. procedure clearTXHALFIF; inline;
  27846. procedure clearTXNFULLIE; inline;
  27847. procedure clearTXNFULLIF; inline;
  27848. procedure setRXFULLIE; inline;
  27849. procedure setRXFULLIF; inline;
  27850. procedure setRXHALFIE; inline;
  27851. procedure setRXHALFIF; inline;
  27852. procedure setRXNEMPTYIE; inline;
  27853. procedure setRXNEMPTYIF; inline;
  27854. procedure setRXOVFLIE; inline;
  27855. procedure setRXOVFLIF; inline;
  27856. procedure setTXEMPTYIE; inline;
  27857. procedure setTXEMPTYIF; inline;
  27858. procedure setTXHALFIE; inline;
  27859. procedure setTXHALFIF; inline;
  27860. procedure setTXNFULLIE; inline;
  27861. procedure setTXNFULLIF; inline;
  27862. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  27863. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  27864. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  27865. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  27866. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  27867. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  27868. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  27869. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  27870. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  27871. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  27872. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  27873. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  27874. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  27875. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  27876. property w : TBits_32 read getw write setw;
  27877. end;
  27878. TCAN2_C2FIFOCI23 = record
  27879. private
  27880. function getCFIFOCI : TBits_5; inline;
  27881. function getw : TBits_32; inline;
  27882. procedure setCFIFOCI(thebits : TBits_5); inline;
  27883. procedure setw(thebits : TBits_32); inline;
  27884. public
  27885. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  27886. property w : TBits_32 read getw write setw;
  27887. end;
  27888. TCAN2_C2FIFOCON24 = record
  27889. private
  27890. function getDONLY : TBits_1; inline;
  27891. function getFRESET : TBits_1; inline;
  27892. function getFSIZE : TBits_5; inline;
  27893. function getRTREN : TBits_1; inline;
  27894. function getTXABAT : TBits_1; inline;
  27895. function getTXEN : TBits_1; inline;
  27896. function getTXERR : TBits_1; inline;
  27897. function getTXLARB : TBits_1; inline;
  27898. function getTXPRI : TBits_2; inline;
  27899. function getTXREQ : TBits_1; inline;
  27900. function getUINC : TBits_1; inline;
  27901. function getw : TBits_32; inline;
  27902. procedure setDONLY(thebits : TBits_1); inline;
  27903. procedure setFRESET(thebits : TBits_1); inline;
  27904. procedure setFSIZE(thebits : TBits_5); inline;
  27905. procedure setRTREN(thebits : TBits_1); inline;
  27906. procedure setTXABAT(thebits : TBits_1); inline;
  27907. procedure setTXEN(thebits : TBits_1); inline;
  27908. procedure setTXERR(thebits : TBits_1); inline;
  27909. procedure setTXLARB(thebits : TBits_1); inline;
  27910. procedure setTXPRI(thebits : TBits_2); inline;
  27911. procedure setTXREQ(thebits : TBits_1); inline;
  27912. procedure setUINC(thebits : TBits_1); inline;
  27913. procedure setw(thebits : TBits_32); inline;
  27914. public
  27915. procedure clearDONLY; inline;
  27916. procedure clearFRESET; inline;
  27917. procedure clearRTREN; inline;
  27918. procedure clearTXABAT; inline;
  27919. procedure clearTXEN; inline;
  27920. procedure clearTXERR; inline;
  27921. procedure clearTXLARB; inline;
  27922. procedure clearTXREQ; inline;
  27923. procedure clearUINC; inline;
  27924. procedure setDONLY; inline;
  27925. procedure setFRESET; inline;
  27926. procedure setRTREN; inline;
  27927. procedure setTXABAT; inline;
  27928. procedure setTXEN; inline;
  27929. procedure setTXERR; inline;
  27930. procedure setTXLARB; inline;
  27931. procedure setTXREQ; inline;
  27932. procedure setUINC; inline;
  27933. property DONLY : TBits_1 read getDONLY write setDONLY;
  27934. property FRESET : TBits_1 read getFRESET write setFRESET;
  27935. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  27936. property RTREN : TBits_1 read getRTREN write setRTREN;
  27937. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  27938. property TXEN : TBits_1 read getTXEN write setTXEN;
  27939. property TXERR : TBits_1 read getTXERR write setTXERR;
  27940. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  27941. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  27942. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  27943. property UINC : TBits_1 read getUINC write setUINC;
  27944. property w : TBits_32 read getw write setw;
  27945. end;
  27946. TCAN2_C2FIFOINT24 = record
  27947. private
  27948. function getRXFULLIE : TBits_1; inline;
  27949. function getRXFULLIF : TBits_1; inline;
  27950. function getRXHALFIE : TBits_1; inline;
  27951. function getRXHALFIF : TBits_1; inline;
  27952. function getRXNEMPTYIE : TBits_1; inline;
  27953. function getRXNEMPTYIF : TBits_1; inline;
  27954. function getRXOVFLIE : TBits_1; inline;
  27955. function getRXOVFLIF : TBits_1; inline;
  27956. function getTXEMPTYIE : TBits_1; inline;
  27957. function getTXEMPTYIF : TBits_1; inline;
  27958. function getTXHALFIE : TBits_1; inline;
  27959. function getTXHALFIF : TBits_1; inline;
  27960. function getTXNFULLIE : TBits_1; inline;
  27961. function getTXNFULLIF : TBits_1; inline;
  27962. function getw : TBits_32; inline;
  27963. procedure setRXFULLIE(thebits : TBits_1); inline;
  27964. procedure setRXFULLIF(thebits : TBits_1); inline;
  27965. procedure setRXHALFIE(thebits : TBits_1); inline;
  27966. procedure setRXHALFIF(thebits : TBits_1); inline;
  27967. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  27968. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  27969. procedure setRXOVFLIE(thebits : TBits_1); inline;
  27970. procedure setRXOVFLIF(thebits : TBits_1); inline;
  27971. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  27972. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  27973. procedure setTXHALFIE(thebits : TBits_1); inline;
  27974. procedure setTXHALFIF(thebits : TBits_1); inline;
  27975. procedure setTXNFULLIE(thebits : TBits_1); inline;
  27976. procedure setTXNFULLIF(thebits : TBits_1); inline;
  27977. procedure setw(thebits : TBits_32); inline;
  27978. public
  27979. procedure clearRXFULLIE; inline;
  27980. procedure clearRXFULLIF; inline;
  27981. procedure clearRXHALFIE; inline;
  27982. procedure clearRXHALFIF; inline;
  27983. procedure clearRXNEMPTYIE; inline;
  27984. procedure clearRXNEMPTYIF; inline;
  27985. procedure clearRXOVFLIE; inline;
  27986. procedure clearRXOVFLIF; inline;
  27987. procedure clearTXEMPTYIE; inline;
  27988. procedure clearTXEMPTYIF; inline;
  27989. procedure clearTXHALFIE; inline;
  27990. procedure clearTXHALFIF; inline;
  27991. procedure clearTXNFULLIE; inline;
  27992. procedure clearTXNFULLIF; inline;
  27993. procedure setRXFULLIE; inline;
  27994. procedure setRXFULLIF; inline;
  27995. procedure setRXHALFIE; inline;
  27996. procedure setRXHALFIF; inline;
  27997. procedure setRXNEMPTYIE; inline;
  27998. procedure setRXNEMPTYIF; inline;
  27999. procedure setRXOVFLIE; inline;
  28000. procedure setRXOVFLIF; inline;
  28001. procedure setTXEMPTYIE; inline;
  28002. procedure setTXEMPTYIF; inline;
  28003. procedure setTXHALFIE; inline;
  28004. procedure setTXHALFIF; inline;
  28005. procedure setTXNFULLIE; inline;
  28006. procedure setTXNFULLIF; inline;
  28007. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28008. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28009. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28010. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28011. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28012. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28013. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28014. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28015. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28016. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28017. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28018. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28019. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28020. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28021. property w : TBits_32 read getw write setw;
  28022. end;
  28023. TCAN2_C2FIFOCI24 = record
  28024. private
  28025. function getCFIFOCI : TBits_5; inline;
  28026. function getw : TBits_32; inline;
  28027. procedure setCFIFOCI(thebits : TBits_5); inline;
  28028. procedure setw(thebits : TBits_32); inline;
  28029. public
  28030. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28031. property w : TBits_32 read getw write setw;
  28032. end;
  28033. TCAN2_C2FIFOCON25 = record
  28034. private
  28035. function getDONLY : TBits_1; inline;
  28036. function getFRESET : TBits_1; inline;
  28037. function getFSIZE : TBits_5; inline;
  28038. function getRTREN : TBits_1; inline;
  28039. function getTXABAT : TBits_1; inline;
  28040. function getTXEN : TBits_1; inline;
  28041. function getTXERR : TBits_1; inline;
  28042. function getTXLARB : TBits_1; inline;
  28043. function getTXPRI : TBits_2; inline;
  28044. function getTXREQ : TBits_1; inline;
  28045. function getUINC : TBits_1; inline;
  28046. function getw : TBits_32; inline;
  28047. procedure setDONLY(thebits : TBits_1); inline;
  28048. procedure setFRESET(thebits : TBits_1); inline;
  28049. procedure setFSIZE(thebits : TBits_5); inline;
  28050. procedure setRTREN(thebits : TBits_1); inline;
  28051. procedure setTXABAT(thebits : TBits_1); inline;
  28052. procedure setTXEN(thebits : TBits_1); inline;
  28053. procedure setTXERR(thebits : TBits_1); inline;
  28054. procedure setTXLARB(thebits : TBits_1); inline;
  28055. procedure setTXPRI(thebits : TBits_2); inline;
  28056. procedure setTXREQ(thebits : TBits_1); inline;
  28057. procedure setUINC(thebits : TBits_1); inline;
  28058. procedure setw(thebits : TBits_32); inline;
  28059. public
  28060. procedure clearDONLY; inline;
  28061. procedure clearFRESET; inline;
  28062. procedure clearRTREN; inline;
  28063. procedure clearTXABAT; inline;
  28064. procedure clearTXEN; inline;
  28065. procedure clearTXERR; inline;
  28066. procedure clearTXLARB; inline;
  28067. procedure clearTXREQ; inline;
  28068. procedure clearUINC; inline;
  28069. procedure setDONLY; inline;
  28070. procedure setFRESET; inline;
  28071. procedure setRTREN; inline;
  28072. procedure setTXABAT; inline;
  28073. procedure setTXEN; inline;
  28074. procedure setTXERR; inline;
  28075. procedure setTXLARB; inline;
  28076. procedure setTXREQ; inline;
  28077. procedure setUINC; inline;
  28078. property DONLY : TBits_1 read getDONLY write setDONLY;
  28079. property FRESET : TBits_1 read getFRESET write setFRESET;
  28080. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28081. property RTREN : TBits_1 read getRTREN write setRTREN;
  28082. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28083. property TXEN : TBits_1 read getTXEN write setTXEN;
  28084. property TXERR : TBits_1 read getTXERR write setTXERR;
  28085. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28086. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28087. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28088. property UINC : TBits_1 read getUINC write setUINC;
  28089. property w : TBits_32 read getw write setw;
  28090. end;
  28091. TCAN2_C2FIFOINT25 = record
  28092. private
  28093. function getRXFULLIE : TBits_1; inline;
  28094. function getRXFULLIF : TBits_1; inline;
  28095. function getRXHALFIE : TBits_1; inline;
  28096. function getRXHALFIF : TBits_1; inline;
  28097. function getRXNEMPTYIE : TBits_1; inline;
  28098. function getRXNEMPTYIF : TBits_1; inline;
  28099. function getRXOVFLIE : TBits_1; inline;
  28100. function getRXOVFLIF : TBits_1; inline;
  28101. function getTXEMPTYIE : TBits_1; inline;
  28102. function getTXEMPTYIF : TBits_1; inline;
  28103. function getTXHALFIE : TBits_1; inline;
  28104. function getTXHALFIF : TBits_1; inline;
  28105. function getTXNFULLIE : TBits_1; inline;
  28106. function getTXNFULLIF : TBits_1; inline;
  28107. function getw : TBits_32; inline;
  28108. procedure setRXFULLIE(thebits : TBits_1); inline;
  28109. procedure setRXFULLIF(thebits : TBits_1); inline;
  28110. procedure setRXHALFIE(thebits : TBits_1); inline;
  28111. procedure setRXHALFIF(thebits : TBits_1); inline;
  28112. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28113. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28114. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28115. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28116. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28117. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28118. procedure setTXHALFIE(thebits : TBits_1); inline;
  28119. procedure setTXHALFIF(thebits : TBits_1); inline;
  28120. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28121. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28122. procedure setw(thebits : TBits_32); inline;
  28123. public
  28124. procedure clearRXFULLIE; inline;
  28125. procedure clearRXFULLIF; inline;
  28126. procedure clearRXHALFIE; inline;
  28127. procedure clearRXHALFIF; inline;
  28128. procedure clearRXNEMPTYIE; inline;
  28129. procedure clearRXNEMPTYIF; inline;
  28130. procedure clearRXOVFLIE; inline;
  28131. procedure clearRXOVFLIF; inline;
  28132. procedure clearTXEMPTYIE; inline;
  28133. procedure clearTXEMPTYIF; inline;
  28134. procedure clearTXHALFIE; inline;
  28135. procedure clearTXHALFIF; inline;
  28136. procedure clearTXNFULLIE; inline;
  28137. procedure clearTXNFULLIF; inline;
  28138. procedure setRXFULLIE; inline;
  28139. procedure setRXFULLIF; inline;
  28140. procedure setRXHALFIE; inline;
  28141. procedure setRXHALFIF; inline;
  28142. procedure setRXNEMPTYIE; inline;
  28143. procedure setRXNEMPTYIF; inline;
  28144. procedure setRXOVFLIE; inline;
  28145. procedure setRXOVFLIF; inline;
  28146. procedure setTXEMPTYIE; inline;
  28147. procedure setTXEMPTYIF; inline;
  28148. procedure setTXHALFIE; inline;
  28149. procedure setTXHALFIF; inline;
  28150. procedure setTXNFULLIE; inline;
  28151. procedure setTXNFULLIF; inline;
  28152. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28153. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28154. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28155. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28156. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28157. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28158. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28159. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28160. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28161. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28162. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28163. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28164. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28165. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28166. property w : TBits_32 read getw write setw;
  28167. end;
  28168. TCAN2_C2FIFOCI25 = record
  28169. private
  28170. function getCFIFOCI : TBits_5; inline;
  28171. function getw : TBits_32; inline;
  28172. procedure setCFIFOCI(thebits : TBits_5); inline;
  28173. procedure setw(thebits : TBits_32); inline;
  28174. public
  28175. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28176. property w : TBits_32 read getw write setw;
  28177. end;
  28178. TCAN2_C2FIFOCON26 = record
  28179. private
  28180. function getDONLY : TBits_1; inline;
  28181. function getFRESET : TBits_1; inline;
  28182. function getFSIZE : TBits_5; inline;
  28183. function getRTREN : TBits_1; inline;
  28184. function getTXABAT : TBits_1; inline;
  28185. function getTXEN : TBits_1; inline;
  28186. function getTXERR : TBits_1; inline;
  28187. function getTXLARB : TBits_1; inline;
  28188. function getTXPRI : TBits_2; inline;
  28189. function getTXREQ : TBits_1; inline;
  28190. function getUINC : TBits_1; inline;
  28191. function getw : TBits_32; inline;
  28192. procedure setDONLY(thebits : TBits_1); inline;
  28193. procedure setFRESET(thebits : TBits_1); inline;
  28194. procedure setFSIZE(thebits : TBits_5); inline;
  28195. procedure setRTREN(thebits : TBits_1); inline;
  28196. procedure setTXABAT(thebits : TBits_1); inline;
  28197. procedure setTXEN(thebits : TBits_1); inline;
  28198. procedure setTXERR(thebits : TBits_1); inline;
  28199. procedure setTXLARB(thebits : TBits_1); inline;
  28200. procedure setTXPRI(thebits : TBits_2); inline;
  28201. procedure setTXREQ(thebits : TBits_1); inline;
  28202. procedure setUINC(thebits : TBits_1); inline;
  28203. procedure setw(thebits : TBits_32); inline;
  28204. public
  28205. procedure clearDONLY; inline;
  28206. procedure clearFRESET; inline;
  28207. procedure clearRTREN; inline;
  28208. procedure clearTXABAT; inline;
  28209. procedure clearTXEN; inline;
  28210. procedure clearTXERR; inline;
  28211. procedure clearTXLARB; inline;
  28212. procedure clearTXREQ; inline;
  28213. procedure clearUINC; inline;
  28214. procedure setDONLY; inline;
  28215. procedure setFRESET; inline;
  28216. procedure setRTREN; inline;
  28217. procedure setTXABAT; inline;
  28218. procedure setTXEN; inline;
  28219. procedure setTXERR; inline;
  28220. procedure setTXLARB; inline;
  28221. procedure setTXREQ; inline;
  28222. procedure setUINC; inline;
  28223. property DONLY : TBits_1 read getDONLY write setDONLY;
  28224. property FRESET : TBits_1 read getFRESET write setFRESET;
  28225. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28226. property RTREN : TBits_1 read getRTREN write setRTREN;
  28227. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28228. property TXEN : TBits_1 read getTXEN write setTXEN;
  28229. property TXERR : TBits_1 read getTXERR write setTXERR;
  28230. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28231. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28232. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28233. property UINC : TBits_1 read getUINC write setUINC;
  28234. property w : TBits_32 read getw write setw;
  28235. end;
  28236. TCAN2_C2FIFOINT26 = record
  28237. private
  28238. function getRXFULLIE : TBits_1; inline;
  28239. function getRXFULLIF : TBits_1; inline;
  28240. function getRXHALFIE : TBits_1; inline;
  28241. function getRXHALFIF : TBits_1; inline;
  28242. function getRXNEMPTYIE : TBits_1; inline;
  28243. function getRXNEMPTYIF : TBits_1; inline;
  28244. function getRXOVFLIE : TBits_1; inline;
  28245. function getRXOVFLIF : TBits_1; inline;
  28246. function getTXEMPTYIE : TBits_1; inline;
  28247. function getTXEMPTYIF : TBits_1; inline;
  28248. function getTXHALFIE : TBits_1; inline;
  28249. function getTXHALFIF : TBits_1; inline;
  28250. function getTXNFULLIE : TBits_1; inline;
  28251. function getTXNFULLIF : TBits_1; inline;
  28252. function getw : TBits_32; inline;
  28253. procedure setRXFULLIE(thebits : TBits_1); inline;
  28254. procedure setRXFULLIF(thebits : TBits_1); inline;
  28255. procedure setRXHALFIE(thebits : TBits_1); inline;
  28256. procedure setRXHALFIF(thebits : TBits_1); inline;
  28257. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28258. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28259. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28260. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28261. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28262. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28263. procedure setTXHALFIE(thebits : TBits_1); inline;
  28264. procedure setTXHALFIF(thebits : TBits_1); inline;
  28265. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28266. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28267. procedure setw(thebits : TBits_32); inline;
  28268. public
  28269. procedure clearRXFULLIE; inline;
  28270. procedure clearRXFULLIF; inline;
  28271. procedure clearRXHALFIE; inline;
  28272. procedure clearRXHALFIF; inline;
  28273. procedure clearRXNEMPTYIE; inline;
  28274. procedure clearRXNEMPTYIF; inline;
  28275. procedure clearRXOVFLIE; inline;
  28276. procedure clearRXOVFLIF; inline;
  28277. procedure clearTXEMPTYIE; inline;
  28278. procedure clearTXEMPTYIF; inline;
  28279. procedure clearTXHALFIE; inline;
  28280. procedure clearTXHALFIF; inline;
  28281. procedure clearTXNFULLIE; inline;
  28282. procedure clearTXNFULLIF; inline;
  28283. procedure setRXFULLIE; inline;
  28284. procedure setRXFULLIF; inline;
  28285. procedure setRXHALFIE; inline;
  28286. procedure setRXHALFIF; inline;
  28287. procedure setRXNEMPTYIE; inline;
  28288. procedure setRXNEMPTYIF; inline;
  28289. procedure setRXOVFLIE; inline;
  28290. procedure setRXOVFLIF; inline;
  28291. procedure setTXEMPTYIE; inline;
  28292. procedure setTXEMPTYIF; inline;
  28293. procedure setTXHALFIE; inline;
  28294. procedure setTXHALFIF; inline;
  28295. procedure setTXNFULLIE; inline;
  28296. procedure setTXNFULLIF; inline;
  28297. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28298. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28299. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28300. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28301. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28302. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28303. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28304. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28305. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28306. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28307. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28308. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28309. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28310. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28311. property w : TBits_32 read getw write setw;
  28312. end;
  28313. TCAN2_C2FIFOCI26 = record
  28314. private
  28315. function getCFIFOCI : TBits_5; inline;
  28316. function getw : TBits_32; inline;
  28317. procedure setCFIFOCI(thebits : TBits_5); inline;
  28318. procedure setw(thebits : TBits_32); inline;
  28319. public
  28320. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28321. property w : TBits_32 read getw write setw;
  28322. end;
  28323. TCAN2_C2FIFOCON27 = record
  28324. private
  28325. function getDONLY : TBits_1; inline;
  28326. function getFRESET : TBits_1; inline;
  28327. function getFSIZE : TBits_5; inline;
  28328. function getRTREN : TBits_1; inline;
  28329. function getTXABAT : TBits_1; inline;
  28330. function getTXEN : TBits_1; inline;
  28331. function getTXERR : TBits_1; inline;
  28332. function getTXLARB : TBits_1; inline;
  28333. function getTXPRI : TBits_2; inline;
  28334. function getTXREQ : TBits_1; inline;
  28335. function getUINC : TBits_1; inline;
  28336. function getw : TBits_32; inline;
  28337. procedure setDONLY(thebits : TBits_1); inline;
  28338. procedure setFRESET(thebits : TBits_1); inline;
  28339. procedure setFSIZE(thebits : TBits_5); inline;
  28340. procedure setRTREN(thebits : TBits_1); inline;
  28341. procedure setTXABAT(thebits : TBits_1); inline;
  28342. procedure setTXEN(thebits : TBits_1); inline;
  28343. procedure setTXERR(thebits : TBits_1); inline;
  28344. procedure setTXLARB(thebits : TBits_1); inline;
  28345. procedure setTXPRI(thebits : TBits_2); inline;
  28346. procedure setTXREQ(thebits : TBits_1); inline;
  28347. procedure setUINC(thebits : TBits_1); inline;
  28348. procedure setw(thebits : TBits_32); inline;
  28349. public
  28350. procedure clearDONLY; inline;
  28351. procedure clearFRESET; inline;
  28352. procedure clearRTREN; inline;
  28353. procedure clearTXABAT; inline;
  28354. procedure clearTXEN; inline;
  28355. procedure clearTXERR; inline;
  28356. procedure clearTXLARB; inline;
  28357. procedure clearTXREQ; inline;
  28358. procedure clearUINC; inline;
  28359. procedure setDONLY; inline;
  28360. procedure setFRESET; inline;
  28361. procedure setRTREN; inline;
  28362. procedure setTXABAT; inline;
  28363. procedure setTXEN; inline;
  28364. procedure setTXERR; inline;
  28365. procedure setTXLARB; inline;
  28366. procedure setTXREQ; inline;
  28367. procedure setUINC; inline;
  28368. property DONLY : TBits_1 read getDONLY write setDONLY;
  28369. property FRESET : TBits_1 read getFRESET write setFRESET;
  28370. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28371. property RTREN : TBits_1 read getRTREN write setRTREN;
  28372. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28373. property TXEN : TBits_1 read getTXEN write setTXEN;
  28374. property TXERR : TBits_1 read getTXERR write setTXERR;
  28375. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28376. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28377. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28378. property UINC : TBits_1 read getUINC write setUINC;
  28379. property w : TBits_32 read getw write setw;
  28380. end;
  28381. TCAN2_C2FIFOINT27 = record
  28382. private
  28383. function getRXFULLIE : TBits_1; inline;
  28384. function getRXFULLIF : TBits_1; inline;
  28385. function getRXHALFIE : TBits_1; inline;
  28386. function getRXHALFIF : TBits_1; inline;
  28387. function getRXNEMPTYIE : TBits_1; inline;
  28388. function getRXNEMPTYIF : TBits_1; inline;
  28389. function getRXOVFLIE : TBits_1; inline;
  28390. function getRXOVFLIF : TBits_1; inline;
  28391. function getTXEMPTYIE : TBits_1; inline;
  28392. function getTXEMPTYIF : TBits_1; inline;
  28393. function getTXHALFIE : TBits_1; inline;
  28394. function getTXHALFIF : TBits_1; inline;
  28395. function getTXNFULLIE : TBits_1; inline;
  28396. function getTXNFULLIF : TBits_1; inline;
  28397. function getw : TBits_32; inline;
  28398. procedure setRXFULLIE(thebits : TBits_1); inline;
  28399. procedure setRXFULLIF(thebits : TBits_1); inline;
  28400. procedure setRXHALFIE(thebits : TBits_1); inline;
  28401. procedure setRXHALFIF(thebits : TBits_1); inline;
  28402. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28403. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28404. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28405. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28406. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28407. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28408. procedure setTXHALFIE(thebits : TBits_1); inline;
  28409. procedure setTXHALFIF(thebits : TBits_1); inline;
  28410. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28411. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28412. procedure setw(thebits : TBits_32); inline;
  28413. public
  28414. procedure clearRXFULLIE; inline;
  28415. procedure clearRXFULLIF; inline;
  28416. procedure clearRXHALFIE; inline;
  28417. procedure clearRXHALFIF; inline;
  28418. procedure clearRXNEMPTYIE; inline;
  28419. procedure clearRXNEMPTYIF; inline;
  28420. procedure clearRXOVFLIE; inline;
  28421. procedure clearRXOVFLIF; inline;
  28422. procedure clearTXEMPTYIE; inline;
  28423. procedure clearTXEMPTYIF; inline;
  28424. procedure clearTXHALFIE; inline;
  28425. procedure clearTXHALFIF; inline;
  28426. procedure clearTXNFULLIE; inline;
  28427. procedure clearTXNFULLIF; inline;
  28428. procedure setRXFULLIE; inline;
  28429. procedure setRXFULLIF; inline;
  28430. procedure setRXHALFIE; inline;
  28431. procedure setRXHALFIF; inline;
  28432. procedure setRXNEMPTYIE; inline;
  28433. procedure setRXNEMPTYIF; inline;
  28434. procedure setRXOVFLIE; inline;
  28435. procedure setRXOVFLIF; inline;
  28436. procedure setTXEMPTYIE; inline;
  28437. procedure setTXEMPTYIF; inline;
  28438. procedure setTXHALFIE; inline;
  28439. procedure setTXHALFIF; inline;
  28440. procedure setTXNFULLIE; inline;
  28441. procedure setTXNFULLIF; inline;
  28442. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28443. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28444. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28445. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28446. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28447. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28448. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28449. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28450. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28451. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28452. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28453. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28454. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28455. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28456. property w : TBits_32 read getw write setw;
  28457. end;
  28458. TCAN2_C2FIFOCI27 = record
  28459. private
  28460. function getCFIFOCI : TBits_5; inline;
  28461. function getw : TBits_32; inline;
  28462. procedure setCFIFOCI(thebits : TBits_5); inline;
  28463. procedure setw(thebits : TBits_32); inline;
  28464. public
  28465. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28466. property w : TBits_32 read getw write setw;
  28467. end;
  28468. TCAN2_C2FIFOCON28 = record
  28469. private
  28470. function getDONLY : TBits_1; inline;
  28471. function getFRESET : TBits_1; inline;
  28472. function getFSIZE : TBits_5; inline;
  28473. function getRTREN : TBits_1; inline;
  28474. function getTXABAT : TBits_1; inline;
  28475. function getTXEN : TBits_1; inline;
  28476. function getTXERR : TBits_1; inline;
  28477. function getTXLARB : TBits_1; inline;
  28478. function getTXPRI : TBits_2; inline;
  28479. function getTXREQ : TBits_1; inline;
  28480. function getUINC : TBits_1; inline;
  28481. function getw : TBits_32; inline;
  28482. procedure setDONLY(thebits : TBits_1); inline;
  28483. procedure setFRESET(thebits : TBits_1); inline;
  28484. procedure setFSIZE(thebits : TBits_5); inline;
  28485. procedure setRTREN(thebits : TBits_1); inline;
  28486. procedure setTXABAT(thebits : TBits_1); inline;
  28487. procedure setTXEN(thebits : TBits_1); inline;
  28488. procedure setTXERR(thebits : TBits_1); inline;
  28489. procedure setTXLARB(thebits : TBits_1); inline;
  28490. procedure setTXPRI(thebits : TBits_2); inline;
  28491. procedure setTXREQ(thebits : TBits_1); inline;
  28492. procedure setUINC(thebits : TBits_1); inline;
  28493. procedure setw(thebits : TBits_32); inline;
  28494. public
  28495. procedure clearDONLY; inline;
  28496. procedure clearFRESET; inline;
  28497. procedure clearRTREN; inline;
  28498. procedure clearTXABAT; inline;
  28499. procedure clearTXEN; inline;
  28500. procedure clearTXERR; inline;
  28501. procedure clearTXLARB; inline;
  28502. procedure clearTXREQ; inline;
  28503. procedure clearUINC; inline;
  28504. procedure setDONLY; inline;
  28505. procedure setFRESET; inline;
  28506. procedure setRTREN; inline;
  28507. procedure setTXABAT; inline;
  28508. procedure setTXEN; inline;
  28509. procedure setTXERR; inline;
  28510. procedure setTXLARB; inline;
  28511. procedure setTXREQ; inline;
  28512. procedure setUINC; inline;
  28513. property DONLY : TBits_1 read getDONLY write setDONLY;
  28514. property FRESET : TBits_1 read getFRESET write setFRESET;
  28515. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28516. property RTREN : TBits_1 read getRTREN write setRTREN;
  28517. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28518. property TXEN : TBits_1 read getTXEN write setTXEN;
  28519. property TXERR : TBits_1 read getTXERR write setTXERR;
  28520. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28521. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28522. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28523. property UINC : TBits_1 read getUINC write setUINC;
  28524. property w : TBits_32 read getw write setw;
  28525. end;
  28526. TCAN2_C2FIFOINT28 = record
  28527. private
  28528. function getRXFULLIE : TBits_1; inline;
  28529. function getRXFULLIF : TBits_1; inline;
  28530. function getRXHALFIE : TBits_1; inline;
  28531. function getRXHALFIF : TBits_1; inline;
  28532. function getRXNEMPTYIE : TBits_1; inline;
  28533. function getRXNEMPTYIF : TBits_1; inline;
  28534. function getRXOVFLIE : TBits_1; inline;
  28535. function getRXOVFLIF : TBits_1; inline;
  28536. function getTXEMPTYIE : TBits_1; inline;
  28537. function getTXEMPTYIF : TBits_1; inline;
  28538. function getTXHALFIE : TBits_1; inline;
  28539. function getTXHALFIF : TBits_1; inline;
  28540. function getTXNFULLIE : TBits_1; inline;
  28541. function getTXNFULLIF : TBits_1; inline;
  28542. function getw : TBits_32; inline;
  28543. procedure setRXFULLIE(thebits : TBits_1); inline;
  28544. procedure setRXFULLIF(thebits : TBits_1); inline;
  28545. procedure setRXHALFIE(thebits : TBits_1); inline;
  28546. procedure setRXHALFIF(thebits : TBits_1); inline;
  28547. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28548. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28549. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28550. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28551. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28552. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28553. procedure setTXHALFIE(thebits : TBits_1); inline;
  28554. procedure setTXHALFIF(thebits : TBits_1); inline;
  28555. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28556. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28557. procedure setw(thebits : TBits_32); inline;
  28558. public
  28559. procedure clearRXFULLIE; inline;
  28560. procedure clearRXFULLIF; inline;
  28561. procedure clearRXHALFIE; inline;
  28562. procedure clearRXHALFIF; inline;
  28563. procedure clearRXNEMPTYIE; inline;
  28564. procedure clearRXNEMPTYIF; inline;
  28565. procedure clearRXOVFLIE; inline;
  28566. procedure clearRXOVFLIF; inline;
  28567. procedure clearTXEMPTYIE; inline;
  28568. procedure clearTXEMPTYIF; inline;
  28569. procedure clearTXHALFIE; inline;
  28570. procedure clearTXHALFIF; inline;
  28571. procedure clearTXNFULLIE; inline;
  28572. procedure clearTXNFULLIF; inline;
  28573. procedure setRXFULLIE; inline;
  28574. procedure setRXFULLIF; inline;
  28575. procedure setRXHALFIE; inline;
  28576. procedure setRXHALFIF; inline;
  28577. procedure setRXNEMPTYIE; inline;
  28578. procedure setRXNEMPTYIF; inline;
  28579. procedure setRXOVFLIE; inline;
  28580. procedure setRXOVFLIF; inline;
  28581. procedure setTXEMPTYIE; inline;
  28582. procedure setTXEMPTYIF; inline;
  28583. procedure setTXHALFIE; inline;
  28584. procedure setTXHALFIF; inline;
  28585. procedure setTXNFULLIE; inline;
  28586. procedure setTXNFULLIF; inline;
  28587. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28588. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28589. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28590. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28591. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28592. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28593. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28594. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28595. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28596. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28597. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28598. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28599. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28600. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28601. property w : TBits_32 read getw write setw;
  28602. end;
  28603. TCAN2_C2FIFOCI28 = record
  28604. private
  28605. function getCFIFOCI : TBits_5; inline;
  28606. function getw : TBits_32; inline;
  28607. procedure setCFIFOCI(thebits : TBits_5); inline;
  28608. procedure setw(thebits : TBits_32); inline;
  28609. public
  28610. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28611. property w : TBits_32 read getw write setw;
  28612. end;
  28613. TCAN2_C2FIFOCON29 = record
  28614. private
  28615. function getDONLY : TBits_1; inline;
  28616. function getFRESET : TBits_1; inline;
  28617. function getFSIZE : TBits_5; inline;
  28618. function getRTREN : TBits_1; inline;
  28619. function getTXABAT : TBits_1; inline;
  28620. function getTXEN : TBits_1; inline;
  28621. function getTXERR : TBits_1; inline;
  28622. function getTXLARB : TBits_1; inline;
  28623. function getTXPRI : TBits_2; inline;
  28624. function getTXREQ : TBits_1; inline;
  28625. function getUINC : TBits_1; inline;
  28626. function getw : TBits_32; inline;
  28627. procedure setDONLY(thebits : TBits_1); inline;
  28628. procedure setFRESET(thebits : TBits_1); inline;
  28629. procedure setFSIZE(thebits : TBits_5); inline;
  28630. procedure setRTREN(thebits : TBits_1); inline;
  28631. procedure setTXABAT(thebits : TBits_1); inline;
  28632. procedure setTXEN(thebits : TBits_1); inline;
  28633. procedure setTXERR(thebits : TBits_1); inline;
  28634. procedure setTXLARB(thebits : TBits_1); inline;
  28635. procedure setTXPRI(thebits : TBits_2); inline;
  28636. procedure setTXREQ(thebits : TBits_1); inline;
  28637. procedure setUINC(thebits : TBits_1); inline;
  28638. procedure setw(thebits : TBits_32); inline;
  28639. public
  28640. procedure clearDONLY; inline;
  28641. procedure clearFRESET; inline;
  28642. procedure clearRTREN; inline;
  28643. procedure clearTXABAT; inline;
  28644. procedure clearTXEN; inline;
  28645. procedure clearTXERR; inline;
  28646. procedure clearTXLARB; inline;
  28647. procedure clearTXREQ; inline;
  28648. procedure clearUINC; inline;
  28649. procedure setDONLY; inline;
  28650. procedure setFRESET; inline;
  28651. procedure setRTREN; inline;
  28652. procedure setTXABAT; inline;
  28653. procedure setTXEN; inline;
  28654. procedure setTXERR; inline;
  28655. procedure setTXLARB; inline;
  28656. procedure setTXREQ; inline;
  28657. procedure setUINC; inline;
  28658. property DONLY : TBits_1 read getDONLY write setDONLY;
  28659. property FRESET : TBits_1 read getFRESET write setFRESET;
  28660. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28661. property RTREN : TBits_1 read getRTREN write setRTREN;
  28662. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28663. property TXEN : TBits_1 read getTXEN write setTXEN;
  28664. property TXERR : TBits_1 read getTXERR write setTXERR;
  28665. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28666. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28667. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28668. property UINC : TBits_1 read getUINC write setUINC;
  28669. property w : TBits_32 read getw write setw;
  28670. end;
  28671. TCAN2_C2FIFOINT29 = record
  28672. private
  28673. function getRXFULLIE : TBits_1; inline;
  28674. function getRXFULLIF : TBits_1; inline;
  28675. function getRXHALFIE : TBits_1; inline;
  28676. function getRXHALFIF : TBits_1; inline;
  28677. function getRXNEMPTYIE : TBits_1; inline;
  28678. function getRXNEMPTYIF : TBits_1; inline;
  28679. function getRXOVFLIE : TBits_1; inline;
  28680. function getRXOVFLIF : TBits_1; inline;
  28681. function getTXEMPTYIE : TBits_1; inline;
  28682. function getTXEMPTYIF : TBits_1; inline;
  28683. function getTXHALFIE : TBits_1; inline;
  28684. function getTXHALFIF : TBits_1; inline;
  28685. function getTXNFULLIE : TBits_1; inline;
  28686. function getTXNFULLIF : TBits_1; inline;
  28687. function getw : TBits_32; inline;
  28688. procedure setRXFULLIE(thebits : TBits_1); inline;
  28689. procedure setRXFULLIF(thebits : TBits_1); inline;
  28690. procedure setRXHALFIE(thebits : TBits_1); inline;
  28691. procedure setRXHALFIF(thebits : TBits_1); inline;
  28692. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28693. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28694. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28695. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28696. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28697. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28698. procedure setTXHALFIE(thebits : TBits_1); inline;
  28699. procedure setTXHALFIF(thebits : TBits_1); inline;
  28700. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28701. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28702. procedure setw(thebits : TBits_32); inline;
  28703. public
  28704. procedure clearRXFULLIE; inline;
  28705. procedure clearRXFULLIF; inline;
  28706. procedure clearRXHALFIE; inline;
  28707. procedure clearRXHALFIF; inline;
  28708. procedure clearRXNEMPTYIE; inline;
  28709. procedure clearRXNEMPTYIF; inline;
  28710. procedure clearRXOVFLIE; inline;
  28711. procedure clearRXOVFLIF; inline;
  28712. procedure clearTXEMPTYIE; inline;
  28713. procedure clearTXEMPTYIF; inline;
  28714. procedure clearTXHALFIE; inline;
  28715. procedure clearTXHALFIF; inline;
  28716. procedure clearTXNFULLIE; inline;
  28717. procedure clearTXNFULLIF; inline;
  28718. procedure setRXFULLIE; inline;
  28719. procedure setRXFULLIF; inline;
  28720. procedure setRXHALFIE; inline;
  28721. procedure setRXHALFIF; inline;
  28722. procedure setRXNEMPTYIE; inline;
  28723. procedure setRXNEMPTYIF; inline;
  28724. procedure setRXOVFLIE; inline;
  28725. procedure setRXOVFLIF; inline;
  28726. procedure setTXEMPTYIE; inline;
  28727. procedure setTXEMPTYIF; inline;
  28728. procedure setTXHALFIE; inline;
  28729. procedure setTXHALFIF; inline;
  28730. procedure setTXNFULLIE; inline;
  28731. procedure setTXNFULLIF; inline;
  28732. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28733. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28734. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28735. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28736. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28737. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28738. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28739. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28740. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28741. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28742. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28743. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28744. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28745. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28746. property w : TBits_32 read getw write setw;
  28747. end;
  28748. TCAN2_C2FIFOCI29 = record
  28749. private
  28750. function getCFIFOCI : TBits_5; inline;
  28751. function getw : TBits_32; inline;
  28752. procedure setCFIFOCI(thebits : TBits_5); inline;
  28753. procedure setw(thebits : TBits_32); inline;
  28754. public
  28755. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28756. property w : TBits_32 read getw write setw;
  28757. end;
  28758. TCAN2_C2FIFOCON30 = record
  28759. private
  28760. function getDONLY : TBits_1; inline;
  28761. function getFRESET : TBits_1; inline;
  28762. function getFSIZE : TBits_5; inline;
  28763. function getRTREN : TBits_1; inline;
  28764. function getTXABAT : TBits_1; inline;
  28765. function getTXEN : TBits_1; inline;
  28766. function getTXERR : TBits_1; inline;
  28767. function getTXLARB : TBits_1; inline;
  28768. function getTXPRI : TBits_2; inline;
  28769. function getTXREQ : TBits_1; inline;
  28770. function getUINC : TBits_1; inline;
  28771. function getw : TBits_32; inline;
  28772. procedure setDONLY(thebits : TBits_1); inline;
  28773. procedure setFRESET(thebits : TBits_1); inline;
  28774. procedure setFSIZE(thebits : TBits_5); inline;
  28775. procedure setRTREN(thebits : TBits_1); inline;
  28776. procedure setTXABAT(thebits : TBits_1); inline;
  28777. procedure setTXEN(thebits : TBits_1); inline;
  28778. procedure setTXERR(thebits : TBits_1); inline;
  28779. procedure setTXLARB(thebits : TBits_1); inline;
  28780. procedure setTXPRI(thebits : TBits_2); inline;
  28781. procedure setTXREQ(thebits : TBits_1); inline;
  28782. procedure setUINC(thebits : TBits_1); inline;
  28783. procedure setw(thebits : TBits_32); inline;
  28784. public
  28785. procedure clearDONLY; inline;
  28786. procedure clearFRESET; inline;
  28787. procedure clearRTREN; inline;
  28788. procedure clearTXABAT; inline;
  28789. procedure clearTXEN; inline;
  28790. procedure clearTXERR; inline;
  28791. procedure clearTXLARB; inline;
  28792. procedure clearTXREQ; inline;
  28793. procedure clearUINC; inline;
  28794. procedure setDONLY; inline;
  28795. procedure setFRESET; inline;
  28796. procedure setRTREN; inline;
  28797. procedure setTXABAT; inline;
  28798. procedure setTXEN; inline;
  28799. procedure setTXERR; inline;
  28800. procedure setTXLARB; inline;
  28801. procedure setTXREQ; inline;
  28802. procedure setUINC; inline;
  28803. property DONLY : TBits_1 read getDONLY write setDONLY;
  28804. property FRESET : TBits_1 read getFRESET write setFRESET;
  28805. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28806. property RTREN : TBits_1 read getRTREN write setRTREN;
  28807. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28808. property TXEN : TBits_1 read getTXEN write setTXEN;
  28809. property TXERR : TBits_1 read getTXERR write setTXERR;
  28810. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28811. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28812. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28813. property UINC : TBits_1 read getUINC write setUINC;
  28814. property w : TBits_32 read getw write setw;
  28815. end;
  28816. TCAN2_C2FIFOINT30 = record
  28817. private
  28818. function getRXFULLIE : TBits_1; inline;
  28819. function getRXFULLIF : TBits_1; inline;
  28820. function getRXHALFIE : TBits_1; inline;
  28821. function getRXHALFIF : TBits_1; inline;
  28822. function getRXNEMPTYIE : TBits_1; inline;
  28823. function getRXNEMPTYIF : TBits_1; inline;
  28824. function getRXOVFLIE : TBits_1; inline;
  28825. function getRXOVFLIF : TBits_1; inline;
  28826. function getTXEMPTYIE : TBits_1; inline;
  28827. function getTXEMPTYIF : TBits_1; inline;
  28828. function getTXHALFIE : TBits_1; inline;
  28829. function getTXHALFIF : TBits_1; inline;
  28830. function getTXNFULLIE : TBits_1; inline;
  28831. function getTXNFULLIF : TBits_1; inline;
  28832. function getw : TBits_32; inline;
  28833. procedure setRXFULLIE(thebits : TBits_1); inline;
  28834. procedure setRXFULLIF(thebits : TBits_1); inline;
  28835. procedure setRXHALFIE(thebits : TBits_1); inline;
  28836. procedure setRXHALFIF(thebits : TBits_1); inline;
  28837. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28838. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28839. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28840. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28841. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28842. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28843. procedure setTXHALFIE(thebits : TBits_1); inline;
  28844. procedure setTXHALFIF(thebits : TBits_1); inline;
  28845. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28846. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28847. procedure setw(thebits : TBits_32); inline;
  28848. public
  28849. procedure clearRXFULLIE; inline;
  28850. procedure clearRXFULLIF; inline;
  28851. procedure clearRXHALFIE; inline;
  28852. procedure clearRXHALFIF; inline;
  28853. procedure clearRXNEMPTYIE; inline;
  28854. procedure clearRXNEMPTYIF; inline;
  28855. procedure clearRXOVFLIE; inline;
  28856. procedure clearRXOVFLIF; inline;
  28857. procedure clearTXEMPTYIE; inline;
  28858. procedure clearTXEMPTYIF; inline;
  28859. procedure clearTXHALFIE; inline;
  28860. procedure clearTXHALFIF; inline;
  28861. procedure clearTXNFULLIE; inline;
  28862. procedure clearTXNFULLIF; inline;
  28863. procedure setRXFULLIE; inline;
  28864. procedure setRXFULLIF; inline;
  28865. procedure setRXHALFIE; inline;
  28866. procedure setRXHALFIF; inline;
  28867. procedure setRXNEMPTYIE; inline;
  28868. procedure setRXNEMPTYIF; inline;
  28869. procedure setRXOVFLIE; inline;
  28870. procedure setRXOVFLIF; inline;
  28871. procedure setTXEMPTYIE; inline;
  28872. procedure setTXEMPTYIF; inline;
  28873. procedure setTXHALFIE; inline;
  28874. procedure setTXHALFIF; inline;
  28875. procedure setTXNFULLIE; inline;
  28876. procedure setTXNFULLIF; inline;
  28877. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  28878. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  28879. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  28880. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  28881. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  28882. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  28883. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  28884. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  28885. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  28886. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  28887. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  28888. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  28889. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  28890. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  28891. property w : TBits_32 read getw write setw;
  28892. end;
  28893. TCAN2_C2FIFOCI30 = record
  28894. private
  28895. function getCFIFOCI : TBits_5; inline;
  28896. function getw : TBits_32; inline;
  28897. procedure setCFIFOCI(thebits : TBits_5); inline;
  28898. procedure setw(thebits : TBits_32); inline;
  28899. public
  28900. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  28901. property w : TBits_32 read getw write setw;
  28902. end;
  28903. TCAN2_C2FIFOCON31 = record
  28904. private
  28905. function getDONLY : TBits_1; inline;
  28906. function getFRESET : TBits_1; inline;
  28907. function getFSIZE : TBits_5; inline;
  28908. function getRTREN : TBits_1; inline;
  28909. function getTXABAT : TBits_1; inline;
  28910. function getTXEN : TBits_1; inline;
  28911. function getTXERR : TBits_1; inline;
  28912. function getTXLARB : TBits_1; inline;
  28913. function getTXPRI : TBits_2; inline;
  28914. function getTXREQ : TBits_1; inline;
  28915. function getUINC : TBits_1; inline;
  28916. function getw : TBits_32; inline;
  28917. procedure setDONLY(thebits : TBits_1); inline;
  28918. procedure setFRESET(thebits : TBits_1); inline;
  28919. procedure setFSIZE(thebits : TBits_5); inline;
  28920. procedure setRTREN(thebits : TBits_1); inline;
  28921. procedure setTXABAT(thebits : TBits_1); inline;
  28922. procedure setTXEN(thebits : TBits_1); inline;
  28923. procedure setTXERR(thebits : TBits_1); inline;
  28924. procedure setTXLARB(thebits : TBits_1); inline;
  28925. procedure setTXPRI(thebits : TBits_2); inline;
  28926. procedure setTXREQ(thebits : TBits_1); inline;
  28927. procedure setUINC(thebits : TBits_1); inline;
  28928. procedure setw(thebits : TBits_32); inline;
  28929. public
  28930. procedure clearDONLY; inline;
  28931. procedure clearFRESET; inline;
  28932. procedure clearRTREN; inline;
  28933. procedure clearTXABAT; inline;
  28934. procedure clearTXEN; inline;
  28935. procedure clearTXERR; inline;
  28936. procedure clearTXLARB; inline;
  28937. procedure clearTXREQ; inline;
  28938. procedure clearUINC; inline;
  28939. procedure setDONLY; inline;
  28940. procedure setFRESET; inline;
  28941. procedure setRTREN; inline;
  28942. procedure setTXABAT; inline;
  28943. procedure setTXEN; inline;
  28944. procedure setTXERR; inline;
  28945. procedure setTXLARB; inline;
  28946. procedure setTXREQ; inline;
  28947. procedure setUINC; inline;
  28948. property DONLY : TBits_1 read getDONLY write setDONLY;
  28949. property FRESET : TBits_1 read getFRESET write setFRESET;
  28950. property FSIZE : TBits_5 read getFSIZE write setFSIZE;
  28951. property RTREN : TBits_1 read getRTREN write setRTREN;
  28952. property TXABAT : TBits_1 read getTXABAT write setTXABAT;
  28953. property TXEN : TBits_1 read getTXEN write setTXEN;
  28954. property TXERR : TBits_1 read getTXERR write setTXERR;
  28955. property TXLARB : TBits_1 read getTXLARB write setTXLARB;
  28956. property TXPRI : TBits_2 read getTXPRI write setTXPRI;
  28957. property TXREQ : TBits_1 read getTXREQ write setTXREQ;
  28958. property UINC : TBits_1 read getUINC write setUINC;
  28959. property w : TBits_32 read getw write setw;
  28960. end;
  28961. TCAN2_C2FIFOINT31 = record
  28962. private
  28963. function getRXFULLIE : TBits_1; inline;
  28964. function getRXFULLIF : TBits_1; inline;
  28965. function getRXHALFIE : TBits_1; inline;
  28966. function getRXHALFIF : TBits_1; inline;
  28967. function getRXNEMPTYIE : TBits_1; inline;
  28968. function getRXNEMPTYIF : TBits_1; inline;
  28969. function getRXOVFLIE : TBits_1; inline;
  28970. function getRXOVFLIF : TBits_1; inline;
  28971. function getTXEMPTYIE : TBits_1; inline;
  28972. function getTXEMPTYIF : TBits_1; inline;
  28973. function getTXHALFIE : TBits_1; inline;
  28974. function getTXHALFIF : TBits_1; inline;
  28975. function getTXNFULLIE : TBits_1; inline;
  28976. function getTXNFULLIF : TBits_1; inline;
  28977. function getw : TBits_32; inline;
  28978. procedure setRXFULLIE(thebits : TBits_1); inline;
  28979. procedure setRXFULLIF(thebits : TBits_1); inline;
  28980. procedure setRXHALFIE(thebits : TBits_1); inline;
  28981. procedure setRXHALFIF(thebits : TBits_1); inline;
  28982. procedure setRXNEMPTYIE(thebits : TBits_1); inline;
  28983. procedure setRXNEMPTYIF(thebits : TBits_1); inline;
  28984. procedure setRXOVFLIE(thebits : TBits_1); inline;
  28985. procedure setRXOVFLIF(thebits : TBits_1); inline;
  28986. procedure setTXEMPTYIE(thebits : TBits_1); inline;
  28987. procedure setTXEMPTYIF(thebits : TBits_1); inline;
  28988. procedure setTXHALFIE(thebits : TBits_1); inline;
  28989. procedure setTXHALFIF(thebits : TBits_1); inline;
  28990. procedure setTXNFULLIE(thebits : TBits_1); inline;
  28991. procedure setTXNFULLIF(thebits : TBits_1); inline;
  28992. procedure setw(thebits : TBits_32); inline;
  28993. public
  28994. procedure clearRXFULLIE; inline;
  28995. procedure clearRXFULLIF; inline;
  28996. procedure clearRXHALFIE; inline;
  28997. procedure clearRXHALFIF; inline;
  28998. procedure clearRXNEMPTYIE; inline;
  28999. procedure clearRXNEMPTYIF; inline;
  29000. procedure clearRXOVFLIE; inline;
  29001. procedure clearRXOVFLIF; inline;
  29002. procedure clearTXEMPTYIE; inline;
  29003. procedure clearTXEMPTYIF; inline;
  29004. procedure clearTXHALFIE; inline;
  29005. procedure clearTXHALFIF; inline;
  29006. procedure clearTXNFULLIE; inline;
  29007. procedure clearTXNFULLIF; inline;
  29008. procedure setRXFULLIE; inline;
  29009. procedure setRXFULLIF; inline;
  29010. procedure setRXHALFIE; inline;
  29011. procedure setRXHALFIF; inline;
  29012. procedure setRXNEMPTYIE; inline;
  29013. procedure setRXNEMPTYIF; inline;
  29014. procedure setRXOVFLIE; inline;
  29015. procedure setRXOVFLIF; inline;
  29016. procedure setTXEMPTYIE; inline;
  29017. procedure setTXEMPTYIF; inline;
  29018. procedure setTXHALFIE; inline;
  29019. procedure setTXHALFIF; inline;
  29020. procedure setTXNFULLIE; inline;
  29021. procedure setTXNFULLIF; inline;
  29022. property RXFULLIE : TBits_1 read getRXFULLIE write setRXFULLIE;
  29023. property RXFULLIF : TBits_1 read getRXFULLIF write setRXFULLIF;
  29024. property RXHALFIE : TBits_1 read getRXHALFIE write setRXHALFIE;
  29025. property RXHALFIF : TBits_1 read getRXHALFIF write setRXHALFIF;
  29026. property RXNEMPTYIE : TBits_1 read getRXNEMPTYIE write setRXNEMPTYIE;
  29027. property RXNEMPTYIF : TBits_1 read getRXNEMPTYIF write setRXNEMPTYIF;
  29028. property RXOVFLIE : TBits_1 read getRXOVFLIE write setRXOVFLIE;
  29029. property RXOVFLIF : TBits_1 read getRXOVFLIF write setRXOVFLIF;
  29030. property TXEMPTYIE : TBits_1 read getTXEMPTYIE write setTXEMPTYIE;
  29031. property TXEMPTYIF : TBits_1 read getTXEMPTYIF write setTXEMPTYIF;
  29032. property TXHALFIE : TBits_1 read getTXHALFIE write setTXHALFIE;
  29033. property TXHALFIF : TBits_1 read getTXHALFIF write setTXHALFIF;
  29034. property TXNFULLIE : TBits_1 read getTXNFULLIE write setTXNFULLIE;
  29035. property TXNFULLIF : TBits_1 read getTXNFULLIF write setTXNFULLIF;
  29036. property w : TBits_32 read getw write setw;
  29037. end;
  29038. TCAN2_C2FIFOCI31 = record
  29039. private
  29040. function getCFIFOCI : TBits_5; inline;
  29041. function getw : TBits_32; inline;
  29042. procedure setCFIFOCI(thebits : TBits_5); inline;
  29043. procedure setw(thebits : TBits_32); inline;
  29044. public
  29045. property CFIFOCI : TBits_5 read getCFIFOCI write setCFIFOCI;
  29046. property w : TBits_32 read getw write setw;
  29047. end;
  29048. type
  29049. TCAN2Registers = record
  29050. C2CONbits : TCAN2_C2CON;
  29051. C2CON : longWord;
  29052. C2CONCLR : longWord;
  29053. C2CONSET : longWord;
  29054. C2CONINV : longWord;
  29055. C2CFGbits : TCAN2_C2CFG;
  29056. C2CFG : longWord;
  29057. C2CFGCLR : longWord;
  29058. C2CFGSET : longWord;
  29059. C2CFGINV : longWord;
  29060. C2INTbits : TCAN2_C2INT;
  29061. C2INT : longWord;
  29062. C2INTCLR : longWord;
  29063. C2INTSET : longWord;
  29064. C2INTINV : longWord;
  29065. C2VECbits : TCAN2_C2VEC;
  29066. C2VEC : longWord;
  29067. C2VECCLR : longWord;
  29068. C2VECSET : longWord;
  29069. C2VECINV : longWord;
  29070. C2TRECbits : TCAN2_C2TREC;
  29071. C2TREC : longWord;
  29072. C2TRECCLR : longWord;
  29073. C2TRECSET : longWord;
  29074. C2TRECINV : longWord;
  29075. C2FSTATbits : TCAN2_C2FSTAT;
  29076. C2FSTAT : longWord;
  29077. C2FSTATCLR : longWord;
  29078. C2FSTATSET : longWord;
  29079. C2FSTATINV : longWord;
  29080. C2RXOVFbits : TCAN2_C2RXOVF;
  29081. C2RXOVF : longWord;
  29082. C2RXOVFCLR : longWord;
  29083. C2RXOVFSET : longWord;
  29084. C2RXOVFINV : longWord;
  29085. C2TMRbits : TCAN2_C2TMR;
  29086. C2TMR : longWord;
  29087. C2TMRCLR : longWord;
  29088. C2TMRSET : longWord;
  29089. C2TMRINV : longWord;
  29090. C2RXM0bits : TCAN2_C2RXM0;
  29091. C2RXM0 : longWord;
  29092. C2RXM0CLR : longWord;
  29093. C2RXM0SET : longWord;
  29094. C2RXM0INV : longWord;
  29095. C2RXM1bits : TCAN2_C2RXM1;
  29096. C2RXM1 : longWord;
  29097. C2RXM1CLR : longWord;
  29098. C2RXM1SET : longWord;
  29099. C2RXM1INV : longWord;
  29100. C2RXM2bits : TCAN2_C2RXM2;
  29101. C2RXM2 : longWord;
  29102. C2RXM2CLR : longWord;
  29103. C2RXM2SET : longWord;
  29104. C2RXM2INV : longWord;
  29105. C2RXM3bits : TCAN2_C2RXM3;
  29106. C2RXM3 : longWord;
  29107. C2RXM3CLR : longWord;
  29108. C2RXM3SET : longWord;
  29109. C2RXM3INV : longWord;
  29110. C2FLTCON0bits : TCAN2_C2FLTCON0;
  29111. C2FLTCON0 : longWord;
  29112. C2FLTCON0CLR : longWord;
  29113. C2FLTCON0SET : longWord;
  29114. C2FLTCON0INV : longWord;
  29115. C2FLTCON1bits : TCAN2_C2FLTCON1;
  29116. C2FLTCON1 : longWord;
  29117. C2FLTCON1CLR : longWord;
  29118. C2FLTCON1SET : longWord;
  29119. C2FLTCON1INV : longWord;
  29120. C2FLTCON2bits : TCAN2_C2FLTCON2;
  29121. C2FLTCON2 : longWord;
  29122. C2FLTCON2CLR : longWord;
  29123. C2FLTCON2SET : longWord;
  29124. C2FLTCON2INV : longWord;
  29125. C2FLTCON3bits : TCAN2_C2FLTCON3;
  29126. C2FLTCON3 : longWord;
  29127. C2FLTCON3CLR : longWord;
  29128. C2FLTCON3SET : longWord;
  29129. C2FLTCON3INV : longWord;
  29130. C2FLTCON4bits : TCAN2_C2FLTCON4;
  29131. C2FLTCON4 : longWord;
  29132. C2FLTCON4CLR : longWord;
  29133. C2FLTCON4SET : longWord;
  29134. C2FLTCON4INV : longWord;
  29135. C2FLTCON5bits : TCAN2_C2FLTCON5;
  29136. C2FLTCON5 : longWord;
  29137. C2FLTCON5CLR : longWord;
  29138. C2FLTCON5SET : longWord;
  29139. C2FLTCON5INV : longWord;
  29140. C2FLTCON6bits : TCAN2_C2FLTCON6;
  29141. C2FLTCON6 : longWord;
  29142. C2FLTCON6CLR : longWord;
  29143. C2FLTCON6SET : longWord;
  29144. C2FLTCON6INV : longWord;
  29145. C2FLTCON7bits : TCAN2_C2FLTCON7;
  29146. C2FLTCON7 : longWord;
  29147. C2FLTCON7CLR : longWord;
  29148. C2FLTCON7SET : longWord;
  29149. C2FLTCON7INV : longWord;
  29150. C2RXF0bits : TCAN2_C2RXF0;
  29151. C2RXF0 : longWord;
  29152. C2RXF0CLR : longWord;
  29153. C2RXF0SET : longWord;
  29154. C2RXF0INV : longWord;
  29155. C2RXF1bits : TCAN2_C2RXF1;
  29156. C2RXF1 : longWord;
  29157. C2RXF1CLR : longWord;
  29158. C2RXF1SET : longWord;
  29159. C2RXF1INV : longWord;
  29160. C2RXF2bits : TCAN2_C2RXF2;
  29161. C2RXF2 : longWord;
  29162. C2RXF2CLR : longWord;
  29163. C2RXF2SET : longWord;
  29164. C2RXF2INV : longWord;
  29165. C2RXF3bits : TCAN2_C2RXF3;
  29166. C2RXF3 : longWord;
  29167. C2RXF3CLR : longWord;
  29168. C2RXF3SET : longWord;
  29169. C2RXF3INV : longWord;
  29170. C2RXF4bits : TCAN2_C2RXF4;
  29171. C2RXF4 : longWord;
  29172. C2RXF4CLR : longWord;
  29173. C2RXF4SET : longWord;
  29174. C2RXF4INV : longWord;
  29175. C2RXF5bits : TCAN2_C2RXF5;
  29176. C2RXF5 : longWord;
  29177. C2RXF5CLR : longWord;
  29178. C2RXF5SET : longWord;
  29179. C2RXF5INV : longWord;
  29180. C2RXF6bits : TCAN2_C2RXF6;
  29181. C2RXF6 : longWord;
  29182. C2RXF6CLR : longWord;
  29183. C2RXF6SET : longWord;
  29184. C2RXF6INV : longWord;
  29185. C2RXF7bits : TCAN2_C2RXF7;
  29186. C2RXF7 : longWord;
  29187. C2RXF7CLR : longWord;
  29188. C2RXF7SET : longWord;
  29189. C2RXF7INV : longWord;
  29190. C2RXF8bits : TCAN2_C2RXF8;
  29191. C2RXF8 : longWord;
  29192. C2RXF8CLR : longWord;
  29193. C2RXF8SET : longWord;
  29194. C2RXF8INV : longWord;
  29195. C2RXF9bits : TCAN2_C2RXF9;
  29196. C2RXF9 : longWord;
  29197. C2RXF9CLR : longWord;
  29198. C2RXF9SET : longWord;
  29199. C2RXF9INV : longWord;
  29200. C2RXF10bits : TCAN2_C2RXF10;
  29201. C2RXF10 : longWord;
  29202. C2RXF10CLR : longWord;
  29203. C2RXF10SET : longWord;
  29204. C2RXF10INV : longWord;
  29205. C2RXF11bits : TCAN2_C2RXF11;
  29206. C2RXF11 : longWord;
  29207. C2RXF11CLR : longWord;
  29208. C2RXF11SET : longWord;
  29209. C2RXF11INV : longWord;
  29210. C2RXF12bits : TCAN2_C2RXF12;
  29211. C2RXF12 : longWord;
  29212. C2RXF12CLR : longWord;
  29213. C2RXF12SET : longWord;
  29214. C2RXF12INV : longWord;
  29215. C2RXF13bits : TCAN2_C2RXF13;
  29216. C2RXF13 : longWord;
  29217. C2RXF13CLR : longWord;
  29218. C2RXF13SET : longWord;
  29219. C2RXF13INV : longWord;
  29220. C2RXF14bits : TCAN2_C2RXF14;
  29221. C2RXF14 : longWord;
  29222. C2RXF14CLR : longWord;
  29223. C2RXF14SET : longWord;
  29224. C2RXF14INV : longWord;
  29225. C2RXF15bits : TCAN2_C2RXF15;
  29226. C2RXF15 : longWord;
  29227. C2RXF15CLR : longWord;
  29228. C2RXF15SET : longWord;
  29229. C2RXF15INV : longWord;
  29230. C2RXF16bits : TCAN2_C2RXF16;
  29231. C2RXF16 : longWord;
  29232. C2RXF16CLR : longWord;
  29233. C2RXF16SET : longWord;
  29234. C2RXF16INV : longWord;
  29235. C2RXF17bits : TCAN2_C2RXF17;
  29236. C2RXF17 : longWord;
  29237. C2RXF17CLR : longWord;
  29238. C2RXF17SET : longWord;
  29239. C2RXF17INV : longWord;
  29240. C2RXF18bits : TCAN2_C2RXF18;
  29241. C2RXF18 : longWord;
  29242. C2RXF18CLR : longWord;
  29243. C2RXF18SET : longWord;
  29244. C2RXF18INV : longWord;
  29245. C2RXF19bits : TCAN2_C2RXF19;
  29246. C2RXF19 : longWord;
  29247. C2RXF19CLR : longWord;
  29248. C2RXF19SET : longWord;
  29249. C2RXF19INV : longWord;
  29250. C2RXF20bits : TCAN2_C2RXF20;
  29251. C2RXF20 : longWord;
  29252. C2RXF20CLR : longWord;
  29253. C2RXF20SET : longWord;
  29254. C2RXF20INV : longWord;
  29255. C2RXF21bits : TCAN2_C2RXF21;
  29256. C2RXF21 : longWord;
  29257. C2RXF21CLR : longWord;
  29258. C2RXF21SET : longWord;
  29259. C2RXF21INV : longWord;
  29260. C2RXF22bits : TCAN2_C2RXF22;
  29261. C2RXF22 : longWord;
  29262. C2RXF22CLR : longWord;
  29263. C2RXF22SET : longWord;
  29264. C2RXF22INV : longWord;
  29265. C2RXF23bits : TCAN2_C2RXF23;
  29266. C2RXF23 : longWord;
  29267. C2RXF23CLR : longWord;
  29268. C2RXF23SET : longWord;
  29269. C2RXF23INV : longWord;
  29270. C2RXF24bits : TCAN2_C2RXF24;
  29271. C2RXF24 : longWord;
  29272. C2RXF24CLR : longWord;
  29273. C2RXF24SET : longWord;
  29274. C2RXF24INV : longWord;
  29275. C2RXF25bits : TCAN2_C2RXF25;
  29276. C2RXF25 : longWord;
  29277. C2RXF25CLR : longWord;
  29278. C2RXF25SET : longWord;
  29279. C2RXF25INV : longWord;
  29280. C2RXF26bits : TCAN2_C2RXF26;
  29281. C2RXF26 : longWord;
  29282. C2RXF26CLR : longWord;
  29283. C2RXF26SET : longWord;
  29284. C2RXF26INV : longWord;
  29285. C2RXF27bits : TCAN2_C2RXF27;
  29286. C2RXF27 : longWord;
  29287. C2RXF27CLR : longWord;
  29288. C2RXF27SET : longWord;
  29289. C2RXF27INV : longWord;
  29290. C2RXF28bits : TCAN2_C2RXF28;
  29291. C2RXF28 : longWord;
  29292. C2RXF28CLR : longWord;
  29293. C2RXF28SET : longWord;
  29294. C2RXF28INV : longWord;
  29295. C2RXF29bits : TCAN2_C2RXF29;
  29296. C2RXF29 : longWord;
  29297. C2RXF29CLR : longWord;
  29298. C2RXF29SET : longWord;
  29299. C2RXF29INV : longWord;
  29300. C2RXF30bits : TCAN2_C2RXF30;
  29301. C2RXF30 : longWord;
  29302. C2RXF30CLR : longWord;
  29303. C2RXF30SET : longWord;
  29304. C2RXF30INV : longWord;
  29305. C2RXF31bits : TCAN2_C2RXF31;
  29306. C2RXF31 : longWord;
  29307. C2RXF31CLR : longWord;
  29308. C2RXF31SET : longWord;
  29309. C2RXF31INV : longWord;
  29310. C2FIFOBA : longWord;
  29311. C2FIFOBACLR : longWord;
  29312. C2FIFOBASET : longWord;
  29313. C2FIFOBAINV : longWord;
  29314. C2FIFOCON0bits : TCAN2_C2FIFOCON0;
  29315. C2FIFOCON0 : longWord;
  29316. C2FIFOCON0CLR : longWord;
  29317. C2FIFOCON0SET : longWord;
  29318. C2FIFOCON0INV : longWord;
  29319. C2FIFOINT0bits : TCAN2_C2FIFOINT0;
  29320. C2FIFOINT0 : longWord;
  29321. C2FIFOINT0CLR : longWord;
  29322. C2FIFOINT0SET : longWord;
  29323. C2FIFOINT0INV : longWord;
  29324. C2FIFOUA0 : longWord;
  29325. C2FIFOUA0CLR : longWord;
  29326. C2FIFOUA0SET : longWord;
  29327. C2FIFOUA0INV : longWord;
  29328. C2FIFOCI0bits : TCAN2_C2FIFOCI0;
  29329. C2FIFOCI0 : longWord;
  29330. C2FIFOCI0CLR : longWord;
  29331. C2FIFOCI0SET : longWord;
  29332. C2FIFOCI0INV : longWord;
  29333. C2FIFOCON1bits : TCAN2_C2FIFOCON1;
  29334. C2FIFOCON1 : longWord;
  29335. C2FIFOCON1CLR : longWord;
  29336. C2FIFOCON1SET : longWord;
  29337. C2FIFOCON1INV : longWord;
  29338. C2FIFOINT1bits : TCAN2_C2FIFOINT1;
  29339. C2FIFOINT1 : longWord;
  29340. C2FIFOINT1CLR : longWord;
  29341. C2FIFOINT1SET : longWord;
  29342. C2FIFOINT1INV : longWord;
  29343. C2FIFOUA1 : longWord;
  29344. C2FIFOUA1CLR : longWord;
  29345. C2FIFOUA1SET : longWord;
  29346. C2FIFOUA1INV : longWord;
  29347. C2FIFOCI1bits : TCAN2_C2FIFOCI1;
  29348. C2FIFOCI1 : longWord;
  29349. C2FIFOCI1CLR : longWord;
  29350. C2FIFOCI1SET : longWord;
  29351. C2FIFOCI1INV : longWord;
  29352. C2FIFOCON2bits : TCAN2_C2FIFOCON2;
  29353. C2FIFOCON2 : longWord;
  29354. C2FIFOCON2CLR : longWord;
  29355. C2FIFOCON2SET : longWord;
  29356. C2FIFOCON2INV : longWord;
  29357. C2FIFOINT2bits : TCAN2_C2FIFOINT2;
  29358. C2FIFOINT2 : longWord;
  29359. C2FIFOINT2CLR : longWord;
  29360. C2FIFOINT2SET : longWord;
  29361. C2FIFOINT2INV : longWord;
  29362. C2FIFOUA2 : longWord;
  29363. C2FIFOUA2CLR : longWord;
  29364. C2FIFOUA2SET : longWord;
  29365. C2FIFOUA2INV : longWord;
  29366. C2FIFOCI2bits : TCAN2_C2FIFOCI2;
  29367. C2FIFOCI2 : longWord;
  29368. C2FIFOCI2CLR : longWord;
  29369. C2FIFOCI2SET : longWord;
  29370. C2FIFOCI2INV : longWord;
  29371. C2FIFOCON3bits : TCAN2_C2FIFOCON3;
  29372. C2FIFOCON3 : longWord;
  29373. C2FIFOCON3CLR : longWord;
  29374. C2FIFOCON3SET : longWord;
  29375. C2FIFOCON3INV : longWord;
  29376. C2FIFOINT3bits : TCAN2_C2FIFOINT3;
  29377. C2FIFOINT3 : longWord;
  29378. C2FIFOINT3CLR : longWord;
  29379. C2FIFOINT3SET : longWord;
  29380. C2FIFOINT3INV : longWord;
  29381. C2FIFOUA3 : longWord;
  29382. C2FIFOUA3CLR : longWord;
  29383. C2FIFOUA3SET : longWord;
  29384. C2FIFOUA3INV : longWord;
  29385. C2FIFOCI3bits : TCAN2_C2FIFOCI3;
  29386. C2FIFOCI3 : longWord;
  29387. C2FIFOCI3CLR : longWord;
  29388. C2FIFOCI3SET : longWord;
  29389. C2FIFOCI3INV : longWord;
  29390. C2FIFOCON4bits : TCAN2_C2FIFOCON4;
  29391. C2FIFOCON4 : longWord;
  29392. C2FIFOCON4CLR : longWord;
  29393. C2FIFOCON4SET : longWord;
  29394. C2FIFOCON4INV : longWord;
  29395. C2FIFOINT4bits : TCAN2_C2FIFOINT4;
  29396. C2FIFOINT4 : longWord;
  29397. C2FIFOINT4CLR : longWord;
  29398. C2FIFOINT4SET : longWord;
  29399. C2FIFOINT4INV : longWord;
  29400. C2FIFOUA4 : longWord;
  29401. C2FIFOUA4CLR : longWord;
  29402. C2FIFOUA4SET : longWord;
  29403. C2FIFOUA4INV : longWord;
  29404. C2FIFOCI4bits : TCAN2_C2FIFOCI4;
  29405. C2FIFOCI4 : longWord;
  29406. C2FIFOCI4CLR : longWord;
  29407. C2FIFOCI4SET : longWord;
  29408. C2FIFOCI4INV : longWord;
  29409. C2FIFOCON5bits : TCAN2_C2FIFOCON5;
  29410. C2FIFOCON5 : longWord;
  29411. C2FIFOCON5CLR : longWord;
  29412. C2FIFOCON5SET : longWord;
  29413. C2FIFOCON5INV : longWord;
  29414. C2FIFOINT5bits : TCAN2_C2FIFOINT5;
  29415. C2FIFOINT5 : longWord;
  29416. C2FIFOINT5CLR : longWord;
  29417. C2FIFOINT5SET : longWord;
  29418. C2FIFOINT5INV : longWord;
  29419. C2FIFOUA5 : longWord;
  29420. C2FIFOUA5CLR : longWord;
  29421. C2FIFOUA5SET : longWord;
  29422. C2FIFOUA5INV : longWord;
  29423. C2FIFOCI5bits : TCAN2_C2FIFOCI5;
  29424. C2FIFOCI5 : longWord;
  29425. C2FIFOCI5CLR : longWord;
  29426. C2FIFOCI5SET : longWord;
  29427. C2FIFOCI5INV : longWord;
  29428. C2FIFOCON6bits : TCAN2_C2FIFOCON6;
  29429. C2FIFOCON6 : longWord;
  29430. C2FIFOCON6CLR : longWord;
  29431. C2FIFOCON6SET : longWord;
  29432. C2FIFOCON6INV : longWord;
  29433. C2FIFOINT6bits : TCAN2_C2FIFOINT6;
  29434. C2FIFOINT6 : longWord;
  29435. C2FIFOINT6CLR : longWord;
  29436. C2FIFOINT6SET : longWord;
  29437. C2FIFOINT6INV : longWord;
  29438. C2FIFOUA6 : longWord;
  29439. C2FIFOUA6CLR : longWord;
  29440. C2FIFOUA6SET : longWord;
  29441. C2FIFOUA6INV : longWord;
  29442. C2FIFOCI6bits : TCAN2_C2FIFOCI6;
  29443. C2FIFOCI6 : longWord;
  29444. C2FIFOCI6CLR : longWord;
  29445. C2FIFOCI6SET : longWord;
  29446. C2FIFOCI6INV : longWord;
  29447. C2FIFOCON7bits : TCAN2_C2FIFOCON7;
  29448. C2FIFOCON7 : longWord;
  29449. C2FIFOCON7CLR : longWord;
  29450. C2FIFOCON7SET : longWord;
  29451. C2FIFOCON7INV : longWord;
  29452. C2FIFOINT7bits : TCAN2_C2FIFOINT7;
  29453. C2FIFOINT7 : longWord;
  29454. C2FIFOINT7CLR : longWord;
  29455. C2FIFOINT7SET : longWord;
  29456. C2FIFOINT7INV : longWord;
  29457. C2FIFOUA7 : longWord;
  29458. C2FIFOUA7CLR : longWord;
  29459. C2FIFOUA7SET : longWord;
  29460. C2FIFOUA7INV : longWord;
  29461. C2FIFOCI7bits : TCAN2_C2FIFOCI7;
  29462. C2FIFOCI7 : longWord;
  29463. C2FIFOCI7CLR : longWord;
  29464. C2FIFOCI7SET : longWord;
  29465. C2FIFOCI7INV : longWord;
  29466. C2FIFOCON8bits : TCAN2_C2FIFOCON8;
  29467. C2FIFOCON8 : longWord;
  29468. C2FIFOCON8CLR : longWord;
  29469. C2FIFOCON8SET : longWord;
  29470. C2FIFOCON8INV : longWord;
  29471. C2FIFOINT8bits : TCAN2_C2FIFOINT8;
  29472. C2FIFOINT8 : longWord;
  29473. C2FIFOINT8CLR : longWord;
  29474. C2FIFOINT8SET : longWord;
  29475. C2FIFOINT8INV : longWord;
  29476. C2FIFOUA8 : longWord;
  29477. C2FIFOUA8CLR : longWord;
  29478. C2FIFOUA8SET : longWord;
  29479. C2FIFOUA8INV : longWord;
  29480. C2FIFOCI8bits : TCAN2_C2FIFOCI8;
  29481. C2FIFOCI8 : longWord;
  29482. C2FIFOCI8CLR : longWord;
  29483. C2FIFOCI8SET : longWord;
  29484. C2FIFOCI8INV : longWord;
  29485. C2FIFOCON9bits : TCAN2_C2FIFOCON9;
  29486. C2FIFOCON9 : longWord;
  29487. C2FIFOCON9CLR : longWord;
  29488. C2FIFOCON9SET : longWord;
  29489. C2FIFOCON9INV : longWord;
  29490. C2FIFOINT9bits : TCAN2_C2FIFOINT9;
  29491. C2FIFOINT9 : longWord;
  29492. C2FIFOINT9CLR : longWord;
  29493. C2FIFOINT9SET : longWord;
  29494. C2FIFOINT9INV : longWord;
  29495. C2FIFOUA9 : longWord;
  29496. C2FIFOUA9CLR : longWord;
  29497. C2FIFOUA9SET : longWord;
  29498. C2FIFOUA9INV : longWord;
  29499. C2FIFOCI9bits : TCAN2_C2FIFOCI9;
  29500. C2FIFOCI9 : longWord;
  29501. C2FIFOCI9CLR : longWord;
  29502. C2FIFOCI9SET : longWord;
  29503. C2FIFOCI9INV : longWord;
  29504. C2FIFOCON10bits : TCAN2_C2FIFOCON10;
  29505. C2FIFOCON10 : longWord;
  29506. C2FIFOCON10CLR : longWord;
  29507. C2FIFOCON10SET : longWord;
  29508. C2FIFOCON10INV : longWord;
  29509. C2FIFOINT10bits : TCAN2_C2FIFOINT10;
  29510. C2FIFOINT10 : longWord;
  29511. C2FIFOINT10CLR : longWord;
  29512. C2FIFOINT10SET : longWord;
  29513. C2FIFOINT10INV : longWord;
  29514. C2FIFOUA10 : longWord;
  29515. C2FIFOUA10CLR : longWord;
  29516. C2FIFOUA10SET : longWord;
  29517. C2FIFOUA10INV : longWord;
  29518. C2FIFOCI10bits : TCAN2_C2FIFOCI10;
  29519. C2FIFOCI10 : longWord;
  29520. C2FIFOCI10CLR : longWord;
  29521. C2FIFOCI10SET : longWord;
  29522. C2FIFOCI10INV : longWord;
  29523. C2FIFOCON11bits : TCAN2_C2FIFOCON11;
  29524. C2FIFOCON11 : longWord;
  29525. C2FIFOCON11CLR : longWord;
  29526. C2FIFOCON11SET : longWord;
  29527. C2FIFOCON11INV : longWord;
  29528. C2FIFOINT11bits : TCAN2_C2FIFOINT11;
  29529. C2FIFOINT11 : longWord;
  29530. C2FIFOINT11CLR : longWord;
  29531. C2FIFOINT11SET : longWord;
  29532. C2FIFOINT11INV : longWord;
  29533. C2FIFOUA11 : longWord;
  29534. C2FIFOUA11CLR : longWord;
  29535. C2FIFOUA11SET : longWord;
  29536. C2FIFOUA11INV : longWord;
  29537. C2FIFOCI11bits : TCAN2_C2FIFOCI11;
  29538. C2FIFOCI11 : longWord;
  29539. C2FIFOCI11CLR : longWord;
  29540. C2FIFOCI11SET : longWord;
  29541. C2FIFOCI11INV : longWord;
  29542. C2FIFOCON12bits : TCAN2_C2FIFOCON12;
  29543. C2FIFOCON12 : longWord;
  29544. C2FIFOCON12CLR : longWord;
  29545. C2FIFOCON12SET : longWord;
  29546. C2FIFOCON12INV : longWord;
  29547. C2FIFOINT12bits : TCAN2_C2FIFOINT12;
  29548. C2FIFOINT12 : longWord;
  29549. C2FIFOINT12CLR : longWord;
  29550. C2FIFOINT12SET : longWord;
  29551. C2FIFOINT12INV : longWord;
  29552. C2FIFOUA12 : longWord;
  29553. C2FIFOUA12CLR : longWord;
  29554. C2FIFOUA12SET : longWord;
  29555. C2FIFOUA12INV : longWord;
  29556. C2FIFOCI12bits : TCAN2_C2FIFOCI12;
  29557. C2FIFOCI12 : longWord;
  29558. C2FIFOCI12CLR : longWord;
  29559. C2FIFOCI12SET : longWord;
  29560. C2FIFOCI12INV : longWord;
  29561. C2FIFOCON13bits : TCAN2_C2FIFOCON13;
  29562. C2FIFOCON13 : longWord;
  29563. C2FIFOCON13CLR : longWord;
  29564. C2FIFOCON13SET : longWord;
  29565. C2FIFOCON13INV : longWord;
  29566. C2FIFOINT13bits : TCAN2_C2FIFOINT13;
  29567. C2FIFOINT13 : longWord;
  29568. C2FIFOINT13CLR : longWord;
  29569. C2FIFOINT13SET : longWord;
  29570. C2FIFOINT13INV : longWord;
  29571. C2FIFOUA13 : longWord;
  29572. C2FIFOUA13CLR : longWord;
  29573. C2FIFOUA13SET : longWord;
  29574. C2FIFOUA13INV : longWord;
  29575. C2FIFOCI13bits : TCAN2_C2FIFOCI13;
  29576. C2FIFOCI13 : longWord;
  29577. C2FIFOCI13CLR : longWord;
  29578. C2FIFOCI13SET : longWord;
  29579. C2FIFOCI13INV : longWord;
  29580. C2FIFOCON14bits : TCAN2_C2FIFOCON14;
  29581. C2FIFOCON14 : longWord;
  29582. C2FIFOCON14CLR : longWord;
  29583. C2FIFOCON14SET : longWord;
  29584. C2FIFOCON14INV : longWord;
  29585. C2FIFOINT14bits : TCAN2_C2FIFOINT14;
  29586. C2FIFOINT14 : longWord;
  29587. C2FIFOINT14CLR : longWord;
  29588. C2FIFOINT14SET : longWord;
  29589. C2FIFOINT14INV : longWord;
  29590. C2FIFOUA14 : longWord;
  29591. C2FIFOUA14CLR : longWord;
  29592. C2FIFOUA14SET : longWord;
  29593. C2FIFOUA14INV : longWord;
  29594. C2FIFOCI14bits : TCAN2_C2FIFOCI14;
  29595. C2FIFOCI14 : longWord;
  29596. C2FIFOCI14CLR : longWord;
  29597. C2FIFOCI14SET : longWord;
  29598. C2FIFOCI14INV : longWord;
  29599. C2FIFOCON15bits : TCAN2_C2FIFOCON15;
  29600. C2FIFOCON15 : longWord;
  29601. C2FIFOCON15CLR : longWord;
  29602. C2FIFOCON15SET : longWord;
  29603. C2FIFOCON15INV : longWord;
  29604. C2FIFOINT15bits : TCAN2_C2FIFOINT15;
  29605. C2FIFOINT15 : longWord;
  29606. C2FIFOINT15CLR : longWord;
  29607. C2FIFOINT15SET : longWord;
  29608. C2FIFOINT15INV : longWord;
  29609. C2FIFOUA15 : longWord;
  29610. C2FIFOUA15CLR : longWord;
  29611. C2FIFOUA15SET : longWord;
  29612. C2FIFOUA15INV : longWord;
  29613. C2FIFOCI15bits : TCAN2_C2FIFOCI15;
  29614. C2FIFOCI15 : longWord;
  29615. C2FIFOCI15CLR : longWord;
  29616. C2FIFOCI15SET : longWord;
  29617. C2FIFOCI15INV : longWord;
  29618. C2FIFOCON16bits : TCAN2_C2FIFOCON16;
  29619. C2FIFOCON16 : longWord;
  29620. C2FIFOCON16CLR : longWord;
  29621. C2FIFOCON16SET : longWord;
  29622. C2FIFOCON16INV : longWord;
  29623. C2FIFOINT16bits : TCAN2_C2FIFOINT16;
  29624. C2FIFOINT16 : longWord;
  29625. C2FIFOINT16CLR : longWord;
  29626. C2FIFOINT16SET : longWord;
  29627. C2FIFOINT16INV : longWord;
  29628. C2FIFOUA16 : longWord;
  29629. C2FIFOUA16CLR : longWord;
  29630. C2FIFOUA16SET : longWord;
  29631. C2FIFOUA16INV : longWord;
  29632. C2FIFOCI16bits : TCAN2_C2FIFOCI16;
  29633. C2FIFOCI16 : longWord;
  29634. C2FIFOCI16CLR : longWord;
  29635. C2FIFOCI16SET : longWord;
  29636. C2FIFOCI16INV : longWord;
  29637. C2FIFOCON17bits : TCAN2_C2FIFOCON17;
  29638. C2FIFOCON17 : longWord;
  29639. C2FIFOCON17CLR : longWord;
  29640. C2FIFOCON17SET : longWord;
  29641. C2FIFOCON17INV : longWord;
  29642. C2FIFOINT17bits : TCAN2_C2FIFOINT17;
  29643. C2FIFOINT17 : longWord;
  29644. C2FIFOINT17CLR : longWord;
  29645. C2FIFOINT17SET : longWord;
  29646. C2FIFOINT17INV : longWord;
  29647. C2FIFOUA17 : longWord;
  29648. C2FIFOUA17CLR : longWord;
  29649. C2FIFOUA17SET : longWord;
  29650. C2FIFOUA17INV : longWord;
  29651. C2FIFOCI17bits : TCAN2_C2FIFOCI17;
  29652. C2FIFOCI17 : longWord;
  29653. C2FIFOCI17CLR : longWord;
  29654. C2FIFOCI17SET : longWord;
  29655. C2FIFOCI17INV : longWord;
  29656. C2FIFOCON18bits : TCAN2_C2FIFOCON18;
  29657. C2FIFOCON18 : longWord;
  29658. C2FIFOCON18CLR : longWord;
  29659. C2FIFOCON18SET : longWord;
  29660. C2FIFOCON18INV : longWord;
  29661. C2FIFOINT18bits : TCAN2_C2FIFOINT18;
  29662. C2FIFOINT18 : longWord;
  29663. C2FIFOINT18CLR : longWord;
  29664. C2FIFOINT18SET : longWord;
  29665. C2FIFOINT18INV : longWord;
  29666. C2FIFOUA18 : longWord;
  29667. C2FIFOUA18CLR : longWord;
  29668. C2FIFOUA18SET : longWord;
  29669. C2FIFOUA18INV : longWord;
  29670. C2FIFOCI18bits : TCAN2_C2FIFOCI18;
  29671. C2FIFOCI18 : longWord;
  29672. C2FIFOCI18CLR : longWord;
  29673. C2FIFOCI18SET : longWord;
  29674. C2FIFOCI18INV : longWord;
  29675. C2FIFOCON19bits : TCAN2_C2FIFOCON19;
  29676. C2FIFOCON19 : longWord;
  29677. C2FIFOCON19CLR : longWord;
  29678. C2FIFOCON19SET : longWord;
  29679. C2FIFOCON19INV : longWord;
  29680. C2FIFOINT19bits : TCAN2_C2FIFOINT19;
  29681. C2FIFOINT19 : longWord;
  29682. C2FIFOINT19CLR : longWord;
  29683. C2FIFOINT19SET : longWord;
  29684. C2FIFOINT19INV : longWord;
  29685. C2FIFOUA19 : longWord;
  29686. C2FIFOUA19CLR : longWord;
  29687. C2FIFOUA19SET : longWord;
  29688. C2FIFOUA19INV : longWord;
  29689. C2FIFOCI19bits : TCAN2_C2FIFOCI19;
  29690. C2FIFOCI19 : longWord;
  29691. C2FIFOCI19CLR : longWord;
  29692. C2FIFOCI19SET : longWord;
  29693. C2FIFOCI19INV : longWord;
  29694. C2FIFOCON20bits : TCAN2_C2FIFOCON20;
  29695. C2FIFOCON20 : longWord;
  29696. C2FIFOCON20CLR : longWord;
  29697. C2FIFOCON20SET : longWord;
  29698. C2FIFOCON20INV : longWord;
  29699. C2FIFOINT20bits : TCAN2_C2FIFOINT20;
  29700. C2FIFOINT20 : longWord;
  29701. C2FIFOINT20CLR : longWord;
  29702. C2FIFOINT20SET : longWord;
  29703. C2FIFOINT20INV : longWord;
  29704. C2FIFOUA20 : longWord;
  29705. C2FIFOUA20CLR : longWord;
  29706. C2FIFOUA20SET : longWord;
  29707. C2FIFOUA20INV : longWord;
  29708. C2FIFOCI20bits : TCAN2_C2FIFOCI20;
  29709. C2FIFOCI20 : longWord;
  29710. C2FIFOCI20CLR : longWord;
  29711. C2FIFOCI20SET : longWord;
  29712. C2FIFOCI20INV : longWord;
  29713. C2FIFOCON21bits : TCAN2_C2FIFOCON21;
  29714. C2FIFOCON21 : longWord;
  29715. C2FIFOCON21CLR : longWord;
  29716. C2FIFOCON21SET : longWord;
  29717. C2FIFOCON21INV : longWord;
  29718. C2FIFOINT21bits : TCAN2_C2FIFOINT21;
  29719. C2FIFOINT21 : longWord;
  29720. C2FIFOINT21CLR : longWord;
  29721. C2FIFOINT21SET : longWord;
  29722. C2FIFOINT21INV : longWord;
  29723. C2FIFOUA21 : longWord;
  29724. C2FIFOUA21CLR : longWord;
  29725. C2FIFOUA21SET : longWord;
  29726. C2FIFOUA21INV : longWord;
  29727. C2FIFOCI21bits : TCAN2_C2FIFOCI21;
  29728. C2FIFOCI21 : longWord;
  29729. C2FIFOCI21CLR : longWord;
  29730. C2FIFOCI21SET : longWord;
  29731. C2FIFOCI21INV : longWord;
  29732. C2FIFOCON22bits : TCAN2_C2FIFOCON22;
  29733. C2FIFOCON22 : longWord;
  29734. C2FIFOCON22CLR : longWord;
  29735. C2FIFOCON22SET : longWord;
  29736. C2FIFOCON22INV : longWord;
  29737. C2FIFOINT22bits : TCAN2_C2FIFOINT22;
  29738. C2FIFOINT22 : longWord;
  29739. C2FIFOINT22CLR : longWord;
  29740. C2FIFOINT22SET : longWord;
  29741. C2FIFOINT22INV : longWord;
  29742. C2FIFOUA22 : longWord;
  29743. C2FIFOUA22CLR : longWord;
  29744. C2FIFOUA22SET : longWord;
  29745. C2FIFOUA22INV : longWord;
  29746. C2FIFOCI22bits : TCAN2_C2FIFOCI22;
  29747. C2FIFOCI22 : longWord;
  29748. C2FIFOCI22CLR : longWord;
  29749. C2FIFOCI22SET : longWord;
  29750. C2FIFOCI22INV : longWord;
  29751. C2FIFOCON23bits : TCAN2_C2FIFOCON23;
  29752. C2FIFOCON23 : longWord;
  29753. C2FIFOCON23CLR : longWord;
  29754. C2FIFOCON23SET : longWord;
  29755. C2FIFOCON23INV : longWord;
  29756. C2FIFOINT23bits : TCAN2_C2FIFOINT23;
  29757. C2FIFOINT23 : longWord;
  29758. C2FIFOINT23CLR : longWord;
  29759. C2FIFOINT23SET : longWord;
  29760. C2FIFOINT23INV : longWord;
  29761. C2FIFOUA23 : longWord;
  29762. C2FIFOUA23CLR : longWord;
  29763. C2FIFOUA23SET : longWord;
  29764. C2FIFOUA23INV : longWord;
  29765. C2FIFOCI23bits : TCAN2_C2FIFOCI23;
  29766. C2FIFOCI23 : longWord;
  29767. C2FIFOCI23CLR : longWord;
  29768. C2FIFOCI23SET : longWord;
  29769. C2FIFOCI23INV : longWord;
  29770. C2FIFOCON24bits : TCAN2_C2FIFOCON24;
  29771. C2FIFOCON24 : longWord;
  29772. C2FIFOCON24CLR : longWord;
  29773. C2FIFOCON24SET : longWord;
  29774. C2FIFOCON24INV : longWord;
  29775. C2FIFOINT24bits : TCAN2_C2FIFOINT24;
  29776. C2FIFOINT24 : longWord;
  29777. C2FIFOINT24CLR : longWord;
  29778. C2FIFOINT24SET : longWord;
  29779. C2FIFOINT24INV : longWord;
  29780. C2FIFOUA24 : longWord;
  29781. C2FIFOUA24CLR : longWord;
  29782. C2FIFOUA24SET : longWord;
  29783. C2FIFOUA24INV : longWord;
  29784. C2FIFOCI24bits : TCAN2_C2FIFOCI24;
  29785. C2FIFOCI24 : longWord;
  29786. C2FIFOCI24CLR : longWord;
  29787. C2FIFOCI24SET : longWord;
  29788. C2FIFOCI24INV : longWord;
  29789. C2FIFOCON25bits : TCAN2_C2FIFOCON25;
  29790. C2FIFOCON25 : longWord;
  29791. C2FIFOCON25CLR : longWord;
  29792. C2FIFOCON25SET : longWord;
  29793. C2FIFOCON25INV : longWord;
  29794. C2FIFOINT25bits : TCAN2_C2FIFOINT25;
  29795. C2FIFOINT25 : longWord;
  29796. C2FIFOINT25CLR : longWord;
  29797. C2FIFOINT25SET : longWord;
  29798. C2FIFOINT25INV : longWord;
  29799. C2FIFOUA25 : longWord;
  29800. C2FIFOUA25CLR : longWord;
  29801. C2FIFOUA25SET : longWord;
  29802. C2FIFOUA25INV : longWord;
  29803. C2FIFOCI25bits : TCAN2_C2FIFOCI25;
  29804. C2FIFOCI25 : longWord;
  29805. C2FIFOCI25CLR : longWord;
  29806. C2FIFOCI25SET : longWord;
  29807. C2FIFOCI25INV : longWord;
  29808. C2FIFOCON26bits : TCAN2_C2FIFOCON26;
  29809. C2FIFOCON26 : longWord;
  29810. C2FIFOCON26CLR : longWord;
  29811. C2FIFOCON26SET : longWord;
  29812. C2FIFOCON26INV : longWord;
  29813. C2FIFOINT26bits : TCAN2_C2FIFOINT26;
  29814. C2FIFOINT26 : longWord;
  29815. C2FIFOINT26CLR : longWord;
  29816. C2FIFOINT26SET : longWord;
  29817. C2FIFOINT26INV : longWord;
  29818. C2FIFOUA26 : longWord;
  29819. C2FIFOUA26CLR : longWord;
  29820. C2FIFOUA26SET : longWord;
  29821. C2FIFOUA26INV : longWord;
  29822. C2FIFOCI26bits : TCAN2_C2FIFOCI26;
  29823. C2FIFOCI26 : longWord;
  29824. C2FIFOCI26CLR : longWord;
  29825. C2FIFOCI26SET : longWord;
  29826. C2FIFOCI26INV : longWord;
  29827. C2FIFOCON27bits : TCAN2_C2FIFOCON27;
  29828. C2FIFOCON27 : longWord;
  29829. C2FIFOCON27CLR : longWord;
  29830. C2FIFOCON27SET : longWord;
  29831. C2FIFOCON27INV : longWord;
  29832. C2FIFOINT27bits : TCAN2_C2FIFOINT27;
  29833. C2FIFOINT27 : longWord;
  29834. C2FIFOINT27CLR : longWord;
  29835. C2FIFOINT27SET : longWord;
  29836. C2FIFOINT27INV : longWord;
  29837. C2FIFOUA27 : longWord;
  29838. C2FIFOUA27CLR : longWord;
  29839. C2FIFOUA27SET : longWord;
  29840. C2FIFOUA27INV : longWord;
  29841. C2FIFOCI27bits : TCAN2_C2FIFOCI27;
  29842. C2FIFOCI27 : longWord;
  29843. C2FIFOCI27CLR : longWord;
  29844. C2FIFOCI27SET : longWord;
  29845. C2FIFOCI27INV : longWord;
  29846. C2FIFOCON28bits : TCAN2_C2FIFOCON28;
  29847. C2FIFOCON28 : longWord;
  29848. C2FIFOCON28CLR : longWord;
  29849. C2FIFOCON28SET : longWord;
  29850. C2FIFOCON28INV : longWord;
  29851. C2FIFOINT28bits : TCAN2_C2FIFOINT28;
  29852. C2FIFOINT28 : longWord;
  29853. C2FIFOINT28CLR : longWord;
  29854. C2FIFOINT28SET : longWord;
  29855. C2FIFOINT28INV : longWord;
  29856. C2FIFOUA28 : longWord;
  29857. C2FIFOUA28CLR : longWord;
  29858. C2FIFOUA28SET : longWord;
  29859. C2FIFOUA28INV : longWord;
  29860. C2FIFOCI28bits : TCAN2_C2FIFOCI28;
  29861. C2FIFOCI28 : longWord;
  29862. C2FIFOCI28CLR : longWord;
  29863. C2FIFOCI28SET : longWord;
  29864. C2FIFOCI28INV : longWord;
  29865. C2FIFOCON29bits : TCAN2_C2FIFOCON29;
  29866. C2FIFOCON29 : longWord;
  29867. C2FIFOCON29CLR : longWord;
  29868. C2FIFOCON29SET : longWord;
  29869. C2FIFOCON29INV : longWord;
  29870. C2FIFOINT29bits : TCAN2_C2FIFOINT29;
  29871. C2FIFOINT29 : longWord;
  29872. C2FIFOINT29CLR : longWord;
  29873. C2FIFOINT29SET : longWord;
  29874. C2FIFOINT29INV : longWord;
  29875. C2FIFOUA29 : longWord;
  29876. C2FIFOUA29CLR : longWord;
  29877. C2FIFOUA29SET : longWord;
  29878. C2FIFOUA29INV : longWord;
  29879. C2FIFOCI29bits : TCAN2_C2FIFOCI29;
  29880. C2FIFOCI29 : longWord;
  29881. C2FIFOCI29CLR : longWord;
  29882. C2FIFOCI29SET : longWord;
  29883. C2FIFOCI29INV : longWord;
  29884. C2FIFOCON30bits : TCAN2_C2FIFOCON30;
  29885. C2FIFOCON30 : longWord;
  29886. C2FIFOCON30CLR : longWord;
  29887. C2FIFOCON30SET : longWord;
  29888. C2FIFOCON30INV : longWord;
  29889. C2FIFOINT30bits : TCAN2_C2FIFOINT30;
  29890. C2FIFOINT30 : longWord;
  29891. C2FIFOINT30CLR : longWord;
  29892. C2FIFOINT30SET : longWord;
  29893. C2FIFOINT30INV : longWord;
  29894. C2FIFOUA30 : longWord;
  29895. C2FIFOUA30CLR : longWord;
  29896. C2FIFOUA30SET : longWord;
  29897. C2FIFOUA30INV : longWord;
  29898. C2FIFOCI30bits : TCAN2_C2FIFOCI30;
  29899. C2FIFOCI30 : longWord;
  29900. C2FIFOCI30CLR : longWord;
  29901. C2FIFOCI30SET : longWord;
  29902. C2FIFOCI30INV : longWord;
  29903. C2FIFOCON31bits : TCAN2_C2FIFOCON31;
  29904. C2FIFOCON31 : longWord;
  29905. C2FIFOCON31CLR : longWord;
  29906. C2FIFOCON31SET : longWord;
  29907. C2FIFOCON31INV : longWord;
  29908. C2FIFOINT31bits : TCAN2_C2FIFOINT31;
  29909. C2FIFOINT31 : longWord;
  29910. C2FIFOINT31CLR : longWord;
  29911. C2FIFOINT31SET : longWord;
  29912. C2FIFOINT31INV : longWord;
  29913. C2FIFOUA31 : longWord;
  29914. C2FIFOUA31CLR : longWord;
  29915. C2FIFOUA31SET : longWord;
  29916. C2FIFOUA31INV : longWord;
  29917. C2FIFOCI31bits : TCAN2_C2FIFOCI31;
  29918. C2FIFOCI31 : longWord;
  29919. C2FIFOCI31CLR : longWord;
  29920. C2FIFOCI31SET : longWord;
  29921. C2FIFOCI31INV : longWord;
  29922. end;
  29923. TDEVCFG_DEVCFG3 = record
  29924. private
  29925. function getFCANIO : TBits_1; inline;
  29926. function getFETHIO : TBits_1; inline;
  29927. function getFMIIEN : TBits_1; inline;
  29928. function getFSRSSEL : TBits_3; inline;
  29929. function getFUSBIDIO : TBits_1; inline;
  29930. function getFVBUSONIO : TBits_1; inline;
  29931. function getUSERID : TBits_16; inline;
  29932. function getw : TBits_32; inline;
  29933. procedure setFCANIO(thebits : TBits_1); inline;
  29934. procedure setFETHIO(thebits : TBits_1); inline;
  29935. procedure setFMIIEN(thebits : TBits_1); inline;
  29936. procedure setFSRSSEL(thebits : TBits_3); inline;
  29937. procedure setFUSBIDIO(thebits : TBits_1); inline;
  29938. procedure setFVBUSONIO(thebits : TBits_1); inline;
  29939. procedure setUSERID(thebits : TBits_16); inline;
  29940. procedure setw(thebits : TBits_32); inline;
  29941. public
  29942. procedure clearFCANIO; inline;
  29943. procedure clearFETHIO; inline;
  29944. procedure clearFMIIEN; inline;
  29945. procedure clearFUSBIDIO; inline;
  29946. procedure clearFVBUSONIO; inline;
  29947. procedure setFCANIO; inline;
  29948. procedure setFETHIO; inline;
  29949. procedure setFMIIEN; inline;
  29950. procedure setFUSBIDIO; inline;
  29951. procedure setFVBUSONIO; inline;
  29952. property FCANIO : TBits_1 read getFCANIO write setFCANIO;
  29953. property FETHIO : TBits_1 read getFETHIO write setFETHIO;
  29954. property FMIIEN : TBits_1 read getFMIIEN write setFMIIEN;
  29955. property FSRSSEL : TBits_3 read getFSRSSEL write setFSRSSEL;
  29956. property FUSBIDIO : TBits_1 read getFUSBIDIO write setFUSBIDIO;
  29957. property FVBUSONIO : TBits_1 read getFVBUSONIO write setFVBUSONIO;
  29958. property USERID : TBits_16 read getUSERID write setUSERID;
  29959. property w : TBits_32 read getw write setw;
  29960. end;
  29961. TDEVCFG_DEVCFG2 = record
  29962. private
  29963. function getFPLLIDIV : TBits_3; inline;
  29964. function getFPLLMUL : TBits_3; inline;
  29965. function getFPLLODIV : TBits_3; inline;
  29966. function getUPLLEN : TBits_1; inline;
  29967. function getUPLLIDIV : TBits_3; inline;
  29968. function getw : TBits_32; inline;
  29969. procedure setFPLLIDIV(thebits : TBits_3); inline;
  29970. procedure setFPLLMUL(thebits : TBits_3); inline;
  29971. procedure setFPLLODIV(thebits : TBits_3); inline;
  29972. procedure setUPLLEN(thebits : TBits_1); inline;
  29973. procedure setUPLLIDIV(thebits : TBits_3); inline;
  29974. procedure setw(thebits : TBits_32); inline;
  29975. public
  29976. procedure clearUPLLEN; inline;
  29977. procedure setUPLLEN; inline;
  29978. property FPLLIDIV : TBits_3 read getFPLLIDIV write setFPLLIDIV;
  29979. property FPLLMUL : TBits_3 read getFPLLMUL write setFPLLMUL;
  29980. property FPLLODIV : TBits_3 read getFPLLODIV write setFPLLODIV;
  29981. property UPLLEN : TBits_1 read getUPLLEN write setUPLLEN;
  29982. property UPLLIDIV : TBits_3 read getUPLLIDIV write setUPLLIDIV;
  29983. property w : TBits_32 read getw write setw;
  29984. end;
  29985. TDEVCFG_DEVCFG1 = record
  29986. private
  29987. function getFCKSM : TBits_2; inline;
  29988. function getFNOSC : TBits_3; inline;
  29989. function getFPBDIV : TBits_2; inline;
  29990. function getFSOSCEN : TBits_1; inline;
  29991. function getFWDTEN : TBits_1; inline;
  29992. function getIESO : TBits_1; inline;
  29993. function getOSCIOFNC : TBits_1; inline;
  29994. function getPOSCMOD : TBits_2; inline;
  29995. function getWDTPS : TBits_5; inline;
  29996. function getw : TBits_32; inline;
  29997. procedure setFCKSM(thebits : TBits_2); inline;
  29998. procedure setFNOSC(thebits : TBits_3); inline;
  29999. procedure setFPBDIV(thebits : TBits_2); inline;
  30000. procedure setFSOSCEN(thebits : TBits_1); inline;
  30001. procedure setFWDTEN(thebits : TBits_1); inline;
  30002. procedure setIESO(thebits : TBits_1); inline;
  30003. procedure setOSCIOFNC(thebits : TBits_1); inline;
  30004. procedure setPOSCMOD(thebits : TBits_2); inline;
  30005. procedure setWDTPS(thebits : TBits_5); inline;
  30006. procedure setw(thebits : TBits_32); inline;
  30007. public
  30008. procedure clearFSOSCEN; inline;
  30009. procedure clearFWDTEN; inline;
  30010. procedure clearIESO; inline;
  30011. procedure clearOSCIOFNC; inline;
  30012. procedure setFSOSCEN; inline;
  30013. procedure setFWDTEN; inline;
  30014. procedure setIESO; inline;
  30015. procedure setOSCIOFNC; inline;
  30016. property FCKSM : TBits_2 read getFCKSM write setFCKSM;
  30017. property FNOSC : TBits_3 read getFNOSC write setFNOSC;
  30018. property FPBDIV : TBits_2 read getFPBDIV write setFPBDIV;
  30019. property FSOSCEN : TBits_1 read getFSOSCEN write setFSOSCEN;
  30020. property FWDTEN : TBits_1 read getFWDTEN write setFWDTEN;
  30021. property IESO : TBits_1 read getIESO write setIESO;
  30022. property OSCIOFNC : TBits_1 read getOSCIOFNC write setOSCIOFNC;
  30023. property POSCMOD : TBits_2 read getPOSCMOD write setPOSCMOD;
  30024. property WDTPS : TBits_5 read getWDTPS write setWDTPS;
  30025. property w : TBits_32 read getw write setw;
  30026. end;
  30027. TDEVCFG_DEVCFG0 = record
  30028. private
  30029. function getBWP : TBits_1; inline;
  30030. function getCP : TBits_1; inline;
  30031. function getDEBUG : TBits_2; inline;
  30032. function getFDEBUG : TBits_2; inline;
  30033. function getICESEL : TBits_1; inline;
  30034. function getPWP : TBits_8; inline;
  30035. function getw : TBits_32; inline;
  30036. procedure setBWP(thebits : TBits_1); inline;
  30037. procedure setCP(thebits : TBits_1); inline;
  30038. procedure setDEBUG(thebits : TBits_2); inline;
  30039. procedure setFDEBUG(thebits : TBits_2); inline;
  30040. procedure setICESEL(thebits : TBits_1); inline;
  30041. procedure setPWP(thebits : TBits_8); inline;
  30042. procedure setw(thebits : TBits_32); inline;
  30043. public
  30044. procedure clearBWP; inline;
  30045. procedure clearCP; inline;
  30046. procedure clearICESEL; inline;
  30047. procedure setBWP; inline;
  30048. procedure setCP; inline;
  30049. procedure setICESEL; inline;
  30050. property BWP : TBits_1 read getBWP write setBWP;
  30051. property CP : TBits_1 read getCP write setCP;
  30052. property DEBUG : TBits_2 read getDEBUG write setDEBUG;
  30053. property FDEBUG : TBits_2 read getFDEBUG write setFDEBUG;
  30054. property ICESEL : TBits_1 read getICESEL write setICESEL;
  30055. property PWP : TBits_8 read getPWP write setPWP;
  30056. property w : TBits_32 read getw write setw;
  30057. end;
  30058. const
  30059. _CORE_TIMER_IRQ = 0;
  30060. _CORE_SOFTWARE_0_IRQ = 1;
  30061. _CORE_SOFTWARE_1_IRQ = 2;
  30062. _EXTERNAL_0_IRQ = 3;
  30063. _TIMER_1_IRQ = 4;
  30064. _INPUT_CAPTURE_1_IRQ = 5;
  30065. _OUTPUT_COMPARE_1_IRQ = 6;
  30066. _EXTERNAL_1_IRQ = 7;
  30067. _TIMER_2_IRQ = 8;
  30068. _INPUT_CAPTURE_2_IRQ = 9;
  30069. _OUTPUT_COMPARE_2_IRQ = 10;
  30070. _EXTERNAL_2_IRQ = 11;
  30071. _TIMER_3_IRQ = 12;
  30072. _INPUT_CAPTURE_3_IRQ = 13;
  30073. _OUTPUT_COMPARE_3_IRQ = 14;
  30074. _EXTERNAL_3_IRQ = 15;
  30075. _TIMER_4_IRQ = 16;
  30076. _INPUT_CAPTURE_4_IRQ = 17;
  30077. _OUTPUT_COMPARE_4_IRQ = 18;
  30078. _EXTERNAL_4_IRQ = 19;
  30079. _TIMER_5_IRQ = 20;
  30080. _INPUT_CAPTURE_5_IRQ = 21;
  30081. _OUTPUT_COMPARE_5_IRQ = 22;
  30082. _I2C1A_ERR_IRQ = 26;
  30083. _I2C3_BUS_IRQ = 26;
  30084. _SPI1A_ERR_IRQ = 26;
  30085. _SPI3_ERR_IRQ = 26;
  30086. _UART1A_ERR_IRQ = 26;
  30087. _UART1_ERR_IRQ = 26;
  30088. _I2C1A_RX_IRQ = 27;
  30089. _I2C3_SLAVE_IRQ = 27;
  30090. _SPI1A_RX_IRQ = 27;
  30091. _SPI3_RX_IRQ = 27;
  30092. _UART1A_RX_IRQ = 27;
  30093. _UART1_RX_IRQ = 27;
  30094. _I2C1A_TX_IRQ = 28;
  30095. _I2C3_MASTER_IRQ = 28;
  30096. _SPI1A_TX_IRQ = 28;
  30097. _SPI3_TX_IRQ = 28;
  30098. _UART1A_TX_IRQ = 28;
  30099. _UART1_TX_IRQ = 28;
  30100. _I2C1_BUS_IRQ = 29;
  30101. _I2C1_SLAVE_IRQ = 30;
  30102. _I2C1_MASTER_IRQ = 31;
  30103. _CHANGE_NOTICE_IRQ = 32;
  30104. _ADC_IRQ = 33;
  30105. _PMP_IRQ = 34;
  30106. _COMPARATOR_1_IRQ = 35;
  30107. _COMPARATOR_2_IRQ = 36;
  30108. _I2C2A_ERR_IRQ = 37;
  30109. _I2C4_BUS_IRQ = 37;
  30110. _SPI2_ERR_IRQ = 37;
  30111. _SPI2A_ERR_IRQ = 37;
  30112. _UART2A_ERR_IRQ = 37;
  30113. _UART3_ERR_IRQ = 37;
  30114. _I2C2A_RX_IRQ = 38;
  30115. _I2C4_SLAVE_IRQ = 38;
  30116. _SPI2_RX_IRQ = 38;
  30117. _SPI2A_RX_IRQ = 38;
  30118. _UART2A_RX_IRQ = 38;
  30119. _UART3_RX_IRQ = 38;
  30120. _I2C2A_TX_IRQ = 39;
  30121. _I2C4_MASTER_IRQ = 39;
  30122. _SPI2A_TX_IRQ = 39;
  30123. _SPI2_TX_IRQ = 39;
  30124. _UART2A_TX_IRQ = 39;
  30125. _UART3_TX_IRQ = 39;
  30126. _I2C3A_ERR_IRQ = 40;
  30127. _I2C5_BUS_IRQ = 40;
  30128. _SPI3A_ERR_IRQ = 40;
  30129. _SPI4_ERR_IRQ = 40;
  30130. _UART2_ERR_IRQ = 40;
  30131. _UART3A_ERR_IRQ = 40;
  30132. _I2C3A_RX_IRQ = 41;
  30133. _I2C5_SLAVE_IRQ = 41;
  30134. _SPI3A_RX_IRQ = 41;
  30135. _SPI4_RX_IRQ = 41;
  30136. _UART2_RX_IRQ = 41;
  30137. _UART3A_RX_IRQ = 41;
  30138. _I2C3A_TX_IRQ = 42;
  30139. _I2C5_MASTER_IRQ = 42;
  30140. _SPI3A_TX_IRQ = 42;
  30141. _SPI4_TX_IRQ = 42;
  30142. _UART2_TX_IRQ = 42;
  30143. _UART3A_TX_IRQ = 42;
  30144. _FAIL_SAFE_MONITOR_IRQ = 46;
  30145. _RTCC_IRQ = 47;
  30146. _DMA0_IRQ = 48;
  30147. _DMA1_IRQ = 49;
  30148. _DMA2_IRQ = 50;
  30149. _DMA3_IRQ = 51;
  30150. _DMA4_IRQ = 52;
  30151. _DMA5_IRQ = 53;
  30152. _DMA6_IRQ = 54;
  30153. _DMA7_IRQ = 55;
  30154. _FLASH_CONTROL_IRQ = 56;
  30155. _USB_IRQ = 57;
  30156. _CAN1_IRQ = 58;
  30157. _CAN2_IRQ = 59;
  30158. _ETHERNET_IRQ = 60;
  30159. _INPUT_CAPTURE_ERROR_1_IRQ = 61;
  30160. _INPUT_CAPTURE_ERROR_2_IRQ = 62;
  30161. _INPUT_CAPTURE_ERROR_3_IRQ = 63;
  30162. _INPUT_CAPTURE_ERROR_4_IRQ = 64;
  30163. _INPUT_CAPTURE_ERROR_5_IRQ = 65;
  30164. _PMP_ERROR_IRQ = 66;
  30165. _UART1B_ERR_IRQ = 67;
  30166. _UART4_ERR_IRQ = 67;
  30167. _UART1B_RX_IRQ = 68;
  30168. _UART4_RX_IRQ = 68;
  30169. _UART1B_TX_IRQ = 69;
  30170. _UART4_TX_IRQ = 69;
  30171. _UART2B_ERR_IRQ = 70;
  30172. _UART6_ERR_IRQ = 70;
  30173. _UART2B_RX_IRQ = 71;
  30174. _UART6_RX_IRQ = 71;
  30175. _UART2B_TX_IRQ = 72;
  30176. _UART6_TX_IRQ = 72;
  30177. _UART3B_ERR_IRQ = 73;
  30178. _UART5_ERR_IRQ = 73;
  30179. _UART3B_RX_IRQ = 74;
  30180. _UART5_RX_IRQ = 74;
  30181. _UART3B_TX_IRQ = 75;
  30182. _UART5_TX_IRQ = 75;
  30183. const
  30184. ADC10_BASE_ADDRESS = $BF809000;
  30185. var
  30186. ADC10 : TADC10Registers absolute ADC10_BASE_ADDRESS;
  30187. const
  30188. BMX_BASE_ADDRESS = $BF882000;
  30189. var
  30190. BMX : TBMXRegisters absolute BMX_BASE_ADDRESS;
  30191. const
  30192. CAN1_BASE_ADDRESS = $BF88B000;
  30193. var
  30194. CAN1 : TCAN1Registers absolute CAN1_BASE_ADDRESS;
  30195. const
  30196. CAN2_BASE_ADDRESS = $BF88C000;
  30197. var
  30198. CAN2 : TCAN2Registers absolute CAN2_BASE_ADDRESS;
  30199. const
  30200. CFG_BASE_ADDRESS = $BF80F200;
  30201. var
  30202. CFG : TCFGRegisters absolute CFG_BASE_ADDRESS;
  30203. const
  30204. CMP_BASE_ADDRESS = $BF80A000;
  30205. var
  30206. CMP : TCMPRegisters absolute CMP_BASE_ADDRESS;
  30207. const
  30208. CVR_BASE_ADDRESS = $BF809800;
  30209. var
  30210. CVR : TCVRRegisters absolute CVR_BASE_ADDRESS;
  30211. const
  30212. DMAC_BASE_ADDRESS = $BF883000;
  30213. var
  30214. DMAC : TDMACRegisters absolute DMAC_BASE_ADDRESS;
  30215. const
  30216. DMAC0_BASE_ADDRESS = $BF883060;
  30217. var
  30218. DMAC0 : TDMAC0Registers absolute DMAC0_BASE_ADDRESS;
  30219. const
  30220. DMAC1_BASE_ADDRESS = $BF883120;
  30221. var
  30222. DMAC1 : TDMAC1Registers absolute DMAC1_BASE_ADDRESS;
  30223. const
  30224. DMAC2_BASE_ADDRESS = $BF8831E0;
  30225. var
  30226. DMAC2 : TDMAC2Registers absolute DMAC2_BASE_ADDRESS;
  30227. const
  30228. DMAC3_BASE_ADDRESS = $BF8832A0;
  30229. var
  30230. DMAC3 : TDMAC3Registers absolute DMAC3_BASE_ADDRESS;
  30231. const
  30232. DMAC4_BASE_ADDRESS = $BF883360;
  30233. var
  30234. DMAC4 : TDMAC4Registers absolute DMAC4_BASE_ADDRESS;
  30235. const
  30236. DMAC5_BASE_ADDRESS = $BF883420;
  30237. var
  30238. DMAC5 : TDMAC5Registers absolute DMAC5_BASE_ADDRESS;
  30239. const
  30240. DMAC6_BASE_ADDRESS = $BF8834E0;
  30241. var
  30242. DMAC6 : TDMAC6Registers absolute DMAC6_BASE_ADDRESS;
  30243. const
  30244. DMAC7_BASE_ADDRESS = $BF8835A0;
  30245. var
  30246. DMAC7 : TDMAC7Registers absolute DMAC7_BASE_ADDRESS;
  30247. const
  30248. ETH_BASE_ADDRESS = $BF889000;
  30249. var
  30250. ETH : TETHRegisters absolute ETH_BASE_ADDRESS;
  30251. const
  30252. I2C1_BASE_ADDRESS = $BF805300;
  30253. var
  30254. I2C1 : TI2C1Registers absolute I2C1_BASE_ADDRESS;
  30255. const
  30256. I2C1A_BASE_ADDRESS = $BF805000;
  30257. var
  30258. I2C1A : TI2C1ARegisters absolute I2C1A_BASE_ADDRESS;
  30259. const
  30260. I2C2A_BASE_ADDRESS = $BF805100;
  30261. var
  30262. I2C2A : TI2C2ARegisters absolute I2C2A_BASE_ADDRESS;
  30263. const
  30264. I2C3A_BASE_ADDRESS = $BF805200;
  30265. var
  30266. I2C3A : TI2C3ARegisters absolute I2C3A_BASE_ADDRESS;
  30267. const
  30268. ICAP1_BASE_ADDRESS = $BF802000;
  30269. var
  30270. ICAP1 : TICAP1Registers absolute ICAP1_BASE_ADDRESS;
  30271. const
  30272. ICAP2_BASE_ADDRESS = $BF802200;
  30273. var
  30274. ICAP2 : TICAP2Registers absolute ICAP2_BASE_ADDRESS;
  30275. const
  30276. ICAP3_BASE_ADDRESS = $BF802400;
  30277. var
  30278. ICAP3 : TICAP3Registers absolute ICAP3_BASE_ADDRESS;
  30279. const
  30280. ICAP4_BASE_ADDRESS = $BF802600;
  30281. var
  30282. ICAP4 : TICAP4Registers absolute ICAP4_BASE_ADDRESS;
  30283. const
  30284. ICAP5_BASE_ADDRESS = $BF802800;
  30285. var
  30286. ICAP5 : TICAP5Registers absolute ICAP5_BASE_ADDRESS;
  30287. const
  30288. INT_BASE_ADDRESS = $BF881000;
  30289. var
  30290. INT : TINTRegisters absolute INT_BASE_ADDRESS;
  30291. const
  30292. NVM_BASE_ADDRESS = $BF80F400;
  30293. var
  30294. NVM : TNVMRegisters absolute NVM_BASE_ADDRESS;
  30295. const
  30296. OCMP1_BASE_ADDRESS = $BF803000;
  30297. var
  30298. OCMP1 : TOCMP1Registers absolute OCMP1_BASE_ADDRESS;
  30299. const
  30300. OCMP2_BASE_ADDRESS = $BF803200;
  30301. var
  30302. OCMP2 : TOCMP2Registers absolute OCMP2_BASE_ADDRESS;
  30303. const
  30304. OCMP3_BASE_ADDRESS = $BF803400;
  30305. var
  30306. OCMP3 : TOCMP3Registers absolute OCMP3_BASE_ADDRESS;
  30307. const
  30308. OCMP4_BASE_ADDRESS = $BF803600;
  30309. var
  30310. OCMP4 : TOCMP4Registers absolute OCMP4_BASE_ADDRESS;
  30311. const
  30312. OCMP5_BASE_ADDRESS = $BF803800;
  30313. var
  30314. OCMP5 : TOCMP5Registers absolute OCMP5_BASE_ADDRESS;
  30315. const
  30316. OSC_BASE_ADDRESS = $BF80F000;
  30317. var
  30318. OSC : TOSCRegisters absolute OSC_BASE_ADDRESS;
  30319. const
  30320. PCACHE_BASE_ADDRESS = $BF884000;
  30321. var
  30322. PCACHE : TPCACHERegisters absolute PCACHE_BASE_ADDRESS;
  30323. const
  30324. PMP_BASE_ADDRESS = $BF807000;
  30325. var
  30326. PMP : TPMPRegisters absolute PMP_BASE_ADDRESS;
  30327. const
  30328. PORTB_BASE_ADDRESS = $BF886040;
  30329. var
  30330. PORTB : TPORTBRegisters absolute PORTB_BASE_ADDRESS;
  30331. const
  30332. PORTC_BASE_ADDRESS = $BF886080;
  30333. var
  30334. PORTC : TPORTCRegisters absolute PORTC_BASE_ADDRESS;
  30335. const
  30336. PORTD_BASE_ADDRESS = $BF8860C0;
  30337. var
  30338. PORTD : TPORTDRegisters absolute PORTD_BASE_ADDRESS;
  30339. const
  30340. PORTE_BASE_ADDRESS = $BF886100;
  30341. var
  30342. PORTE : TPORTERegisters absolute PORTE_BASE_ADDRESS;
  30343. const
  30344. PORTF_BASE_ADDRESS = $BF886140;
  30345. var
  30346. PORTF : TPORTFRegisters absolute PORTF_BASE_ADDRESS;
  30347. const
  30348. PORTG_BASE_ADDRESS = $BF886180;
  30349. var
  30350. PORTG : TPORTGRegisters absolute PORTG_BASE_ADDRESS;
  30351. const
  30352. RCON_BASE_ADDRESS = $BF80F600;
  30353. var
  30354. RCON : TRCONRegisters absolute RCON_BASE_ADDRESS;
  30355. const
  30356. RTCC_BASE_ADDRESS = $BF800200;
  30357. var
  30358. RTCC : TRTCCRegisters absolute RTCC_BASE_ADDRESS;
  30359. const
  30360. SPI1A_BASE_ADDRESS = $BF805800;
  30361. var
  30362. SPI1A : TSPI1ARegisters absolute SPI1A_BASE_ADDRESS;
  30363. const
  30364. SPI2_BASE_ADDRESS = $BF805A00;
  30365. var
  30366. SPI2 : TSPI2Registers absolute SPI2_BASE_ADDRESS;
  30367. const
  30368. SPI4_BASE_ADDRESS = $BF805C00;
  30369. var
  30370. SPI4 : TSPI4Registers absolute SPI4_BASE_ADDRESS;
  30371. const
  30372. TMR1_BASE_ADDRESS = $BF800600;
  30373. var
  30374. TMR1 : TTMR1Registers absolute TMR1_BASE_ADDRESS;
  30375. const
  30376. TMR23_BASE_ADDRESS = $BF800800;
  30377. var
  30378. TMR23 : TTMR23Registers absolute TMR23_BASE_ADDRESS;
  30379. const
  30380. TMR3_BASE_ADDRESS = $BF800A00;
  30381. var
  30382. TMR3 : TTMR3Registers absolute TMR3_BASE_ADDRESS;
  30383. const
  30384. TMR4_BASE_ADDRESS = $BF800C00;
  30385. var
  30386. TMR4 : TTMR4Registers absolute TMR4_BASE_ADDRESS;
  30387. const
  30388. TMR5_BASE_ADDRESS = $BF800E00;
  30389. var
  30390. TMR5 : TTMR5Registers absolute TMR5_BASE_ADDRESS;
  30391. const
  30392. UART1A_BASE_ADDRESS = $BF806000;
  30393. var
  30394. UART1A : TUART1ARegisters absolute UART1A_BASE_ADDRESS;
  30395. const
  30396. UART1B_BASE_ADDRESS = $BF806200;
  30397. var
  30398. UART1B : TUART1BRegisters absolute UART1B_BASE_ADDRESS;
  30399. const
  30400. UART2_BASE_ADDRESS = $BF806800;
  30401. var
  30402. UART2 : TUART2Registers absolute UART2_BASE_ADDRESS;
  30403. const
  30404. UART2B_BASE_ADDRESS = $BF806600;
  30405. var
  30406. UART2B : TUART2BRegisters absolute UART2B_BASE_ADDRESS;
  30407. const
  30408. UART3_BASE_ADDRESS = $BF806400;
  30409. var
  30410. UART3 : TUART3Registers absolute UART3_BASE_ADDRESS;
  30411. const
  30412. UART3B_BASE_ADDRESS = $BF806A00;
  30413. var
  30414. UART3B : TUART3BRegisters absolute UART3B_BASE_ADDRESS;
  30415. const
  30416. USB_BASE_ADDRESS = $BF885040;
  30417. var
  30418. USB : TUSBRegisters absolute USB_BASE_ADDRESS;
  30419. const
  30420. WDT_BASE_ADDRESS = $BF800000;
  30421. var
  30422. WDT : TWDTRegisters absolute WDT_BASE_ADDRESS;
  30423. const
  30424. _APPI_BASE_ADDRESS = $BF880190;
  30425. var
  30426. _APPI : T_APPIRegisters absolute _APPI_BASE_ADDRESS;
  30427. const
  30428. _APPO_BASE_ADDRESS = $BF880180;
  30429. var
  30430. _APPO : T_APPORegisters absolute _APPO_BASE_ADDRESS;
  30431. const
  30432. _DDPSTAT_BASE_ADDRESS = $BF880140;
  30433. var
  30434. _DDPSTAT : T_DDPSTATRegisters absolute _DDPSTAT_BASE_ADDRESS;
  30435. const
  30436. _STRO_BASE_ADDRESS = $BF880170;
  30437. var
  30438. _STRO : T_STRORegisters absolute _STRO_BASE_ADDRESS;
  30439. implementation
  30440. type
  30441. TDefRegMap = record
  30442. val : longWord;
  30443. clr : longWord;
  30444. &set : longWord;
  30445. inv : longWord;
  30446. end;
  30447. pTDefRegMap = ^TDefRegMap;
  30448. procedure TWDT_WDTCON.setWDTCLR; inline;
  30449. begin
  30450. pTDefRegMap(@Self)^.&set := $00000001;
  30451. end;
  30452. procedure TWDT_WDTCON.clearWDTCLR; inline;
  30453. begin
  30454. pTDefRegMap(@Self)^.clr := $00000001;
  30455. end;
  30456. procedure TWDT_WDTCON.setWDTCLR(thebits : TBits_1); inline;
  30457. begin
  30458. if thebits = 0 then
  30459. pTDefRegMap(@Self)^.clr := $00000001
  30460. else
  30461. pTDefRegMap(@Self)^.&set := $00000001;
  30462. end;
  30463. function TWDT_WDTCON.getWDTCLR : TBits_1; inline;
  30464. begin
  30465. getWDTCLR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  30466. end;
  30467. procedure TWDT_WDTCON.setSWDTPS(thebits : TBits_5); inline;
  30468. begin
  30469. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  30470. end;
  30471. function TWDT_WDTCON.getSWDTPS : TBits_5; inline;
  30472. begin
  30473. getSWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  30474. end;
  30475. procedure TWDT_WDTCON.setON; inline;
  30476. begin
  30477. pTDefRegMap(@Self)^.&set := $00008000;
  30478. end;
  30479. procedure TWDT_WDTCON.clearON; inline;
  30480. begin
  30481. pTDefRegMap(@Self)^.clr := $00008000;
  30482. end;
  30483. procedure TWDT_WDTCON.setON(thebits : TBits_1); inline;
  30484. begin
  30485. if thebits = 0 then
  30486. pTDefRegMap(@Self)^.clr := $00008000
  30487. else
  30488. pTDefRegMap(@Self)^.&set := $00008000;
  30489. end;
  30490. function TWDT_WDTCON.getON : TBits_1; inline;
  30491. begin
  30492. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30493. end;
  30494. procedure TWDT_WDTCON.setSWDTPS0; inline;
  30495. begin
  30496. pTDefRegMap(@Self)^.&set := $00000004;
  30497. end;
  30498. procedure TWDT_WDTCON.clearSWDTPS0; inline;
  30499. begin
  30500. pTDefRegMap(@Self)^.clr := $00000004;
  30501. end;
  30502. procedure TWDT_WDTCON.setSWDTPS0(thebits : TBits_1); inline;
  30503. begin
  30504. if thebits = 0 then
  30505. pTDefRegMap(@Self)^.clr := $00000004
  30506. else
  30507. pTDefRegMap(@Self)^.&set := $00000004;
  30508. end;
  30509. function TWDT_WDTCON.getSWDTPS0 : TBits_1; inline;
  30510. begin
  30511. getSWDTPS0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  30512. end;
  30513. procedure TWDT_WDTCON.setSWDTPS1; inline;
  30514. begin
  30515. pTDefRegMap(@Self)^.&set := $00000008;
  30516. end;
  30517. procedure TWDT_WDTCON.clearSWDTPS1; inline;
  30518. begin
  30519. pTDefRegMap(@Self)^.clr := $00000008;
  30520. end;
  30521. procedure TWDT_WDTCON.setSWDTPS1(thebits : TBits_1); inline;
  30522. begin
  30523. if thebits = 0 then
  30524. pTDefRegMap(@Self)^.clr := $00000008
  30525. else
  30526. pTDefRegMap(@Self)^.&set := $00000008;
  30527. end;
  30528. function TWDT_WDTCON.getSWDTPS1 : TBits_1; inline;
  30529. begin
  30530. getSWDTPS1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30531. end;
  30532. procedure TWDT_WDTCON.setSWDTPS2; inline;
  30533. begin
  30534. pTDefRegMap(@Self)^.&set := $00000010;
  30535. end;
  30536. procedure TWDT_WDTCON.clearSWDTPS2; inline;
  30537. begin
  30538. pTDefRegMap(@Self)^.clr := $00000010;
  30539. end;
  30540. procedure TWDT_WDTCON.setSWDTPS2(thebits : TBits_1); inline;
  30541. begin
  30542. if thebits = 0 then
  30543. pTDefRegMap(@Self)^.clr := $00000010
  30544. else
  30545. pTDefRegMap(@Self)^.&set := $00000010;
  30546. end;
  30547. function TWDT_WDTCON.getSWDTPS2 : TBits_1; inline;
  30548. begin
  30549. getSWDTPS2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  30550. end;
  30551. procedure TWDT_WDTCON.setSWDTPS3; inline;
  30552. begin
  30553. pTDefRegMap(@Self)^.&set := $00000020;
  30554. end;
  30555. procedure TWDT_WDTCON.clearSWDTPS3; inline;
  30556. begin
  30557. pTDefRegMap(@Self)^.clr := $00000020;
  30558. end;
  30559. procedure TWDT_WDTCON.setSWDTPS3(thebits : TBits_1); inline;
  30560. begin
  30561. if thebits = 0 then
  30562. pTDefRegMap(@Self)^.clr := $00000020
  30563. else
  30564. pTDefRegMap(@Self)^.&set := $00000020;
  30565. end;
  30566. function TWDT_WDTCON.getSWDTPS3 : TBits_1; inline;
  30567. begin
  30568. getSWDTPS3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  30569. end;
  30570. procedure TWDT_WDTCON.setSWDTPS4; inline;
  30571. begin
  30572. pTDefRegMap(@Self)^.&set := $00000040;
  30573. end;
  30574. procedure TWDT_WDTCON.clearSWDTPS4; inline;
  30575. begin
  30576. pTDefRegMap(@Self)^.clr := $00000040;
  30577. end;
  30578. procedure TWDT_WDTCON.setSWDTPS4(thebits : TBits_1); inline;
  30579. begin
  30580. if thebits = 0 then
  30581. pTDefRegMap(@Self)^.clr := $00000040
  30582. else
  30583. pTDefRegMap(@Self)^.&set := $00000040;
  30584. end;
  30585. function TWDT_WDTCON.getSWDTPS4 : TBits_1; inline;
  30586. begin
  30587. getSWDTPS4 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30588. end;
  30589. procedure TWDT_WDTCON.setWDTPSTA(thebits : TBits_5); inline;
  30590. begin
  30591. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  30592. end;
  30593. function TWDT_WDTCON.getWDTPSTA : TBits_5; inline;
  30594. begin
  30595. getWDTPSTA := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  30596. end;
  30597. procedure TWDT_WDTCON.setWDTPS(thebits : TBits_5); inline;
  30598. begin
  30599. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF83 or ( thebits shl 2 );
  30600. end;
  30601. function TWDT_WDTCON.getWDTPS : TBits_5; inline;
  30602. begin
  30603. getWDTPS := (pTDefRegMap(@Self)^.val and $0000007C) shr 2;
  30604. end;
  30605. procedure TWDT_WDTCON.setw(thebits : TBits_32); inline;
  30606. begin
  30607. pTDefRegMap(@Self)^.val := thebits;
  30608. end;
  30609. function TWDT_WDTCON.getw : TBits_32; inline;
  30610. begin
  30611. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30612. end;
  30613. procedure TRTCC_RTCCON.setRTCOE; inline;
  30614. begin
  30615. pTDefRegMap(@Self)^.&set := $00000001;
  30616. end;
  30617. procedure TRTCC_RTCCON.clearRTCOE; inline;
  30618. begin
  30619. pTDefRegMap(@Self)^.clr := $00000001;
  30620. end;
  30621. procedure TRTCC_RTCCON.setRTCOE(thebits : TBits_1); inline;
  30622. begin
  30623. if thebits = 0 then
  30624. pTDefRegMap(@Self)^.clr := $00000001
  30625. else
  30626. pTDefRegMap(@Self)^.&set := $00000001;
  30627. end;
  30628. function TRTCC_RTCCON.getRTCOE : TBits_1; inline;
  30629. begin
  30630. getRTCOE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  30631. end;
  30632. procedure TRTCC_RTCCON.setHALFSEC; inline;
  30633. begin
  30634. pTDefRegMap(@Self)^.&set := $00000002;
  30635. end;
  30636. procedure TRTCC_RTCCON.clearHALFSEC; inline;
  30637. begin
  30638. pTDefRegMap(@Self)^.clr := $00000002;
  30639. end;
  30640. procedure TRTCC_RTCCON.setHALFSEC(thebits : TBits_1); inline;
  30641. begin
  30642. if thebits = 0 then
  30643. pTDefRegMap(@Self)^.clr := $00000002
  30644. else
  30645. pTDefRegMap(@Self)^.&set := $00000002;
  30646. end;
  30647. function TRTCC_RTCCON.getHALFSEC : TBits_1; inline;
  30648. begin
  30649. getHALFSEC := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  30650. end;
  30651. procedure TRTCC_RTCCON.setRTCSYNC; inline;
  30652. begin
  30653. pTDefRegMap(@Self)^.&set := $00000004;
  30654. end;
  30655. procedure TRTCC_RTCCON.clearRTCSYNC; inline;
  30656. begin
  30657. pTDefRegMap(@Self)^.clr := $00000004;
  30658. end;
  30659. procedure TRTCC_RTCCON.setRTCSYNC(thebits : TBits_1); inline;
  30660. begin
  30661. if thebits = 0 then
  30662. pTDefRegMap(@Self)^.clr := $00000004
  30663. else
  30664. pTDefRegMap(@Self)^.&set := $00000004;
  30665. end;
  30666. function TRTCC_RTCCON.getRTCSYNC : TBits_1; inline;
  30667. begin
  30668. getRTCSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  30669. end;
  30670. procedure TRTCC_RTCCON.setRTCWREN; inline;
  30671. begin
  30672. pTDefRegMap(@Self)^.&set := $00000008;
  30673. end;
  30674. procedure TRTCC_RTCCON.clearRTCWREN; inline;
  30675. begin
  30676. pTDefRegMap(@Self)^.clr := $00000008;
  30677. end;
  30678. procedure TRTCC_RTCCON.setRTCWREN(thebits : TBits_1); inline;
  30679. begin
  30680. if thebits = 0 then
  30681. pTDefRegMap(@Self)^.clr := $00000008
  30682. else
  30683. pTDefRegMap(@Self)^.&set := $00000008;
  30684. end;
  30685. function TRTCC_RTCCON.getRTCWREN : TBits_1; inline;
  30686. begin
  30687. getRTCWREN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  30688. end;
  30689. procedure TRTCC_RTCCON.setRTCCLKON; inline;
  30690. begin
  30691. pTDefRegMap(@Self)^.&set := $00000040;
  30692. end;
  30693. procedure TRTCC_RTCCON.clearRTCCLKON; inline;
  30694. begin
  30695. pTDefRegMap(@Self)^.clr := $00000040;
  30696. end;
  30697. procedure TRTCC_RTCCON.setRTCCLKON(thebits : TBits_1); inline;
  30698. begin
  30699. if thebits = 0 then
  30700. pTDefRegMap(@Self)^.clr := $00000040
  30701. else
  30702. pTDefRegMap(@Self)^.&set := $00000040;
  30703. end;
  30704. function TRTCC_RTCCON.getRTCCLKON : TBits_1; inline;
  30705. begin
  30706. getRTCCLKON := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  30707. end;
  30708. procedure TRTCC_RTCCON.setRTSECSEL; inline;
  30709. begin
  30710. pTDefRegMap(@Self)^.&set := $00000080;
  30711. end;
  30712. procedure TRTCC_RTCCON.clearRTSECSEL; inline;
  30713. begin
  30714. pTDefRegMap(@Self)^.clr := $00000080;
  30715. end;
  30716. procedure TRTCC_RTCCON.setRTSECSEL(thebits : TBits_1); inline;
  30717. begin
  30718. if thebits = 0 then
  30719. pTDefRegMap(@Self)^.clr := $00000080
  30720. else
  30721. pTDefRegMap(@Self)^.&set := $00000080;
  30722. end;
  30723. function TRTCC_RTCCON.getRTSECSEL : TBits_1; inline;
  30724. begin
  30725. getRTSECSEL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  30726. end;
  30727. procedure TRTCC_RTCCON.setSIDL; inline;
  30728. begin
  30729. pTDefRegMap(@Self)^.&set := $00002000;
  30730. end;
  30731. procedure TRTCC_RTCCON.clearSIDL; inline;
  30732. begin
  30733. pTDefRegMap(@Self)^.clr := $00002000;
  30734. end;
  30735. procedure TRTCC_RTCCON.setSIDL(thebits : TBits_1); inline;
  30736. begin
  30737. if thebits = 0 then
  30738. pTDefRegMap(@Self)^.clr := $00002000
  30739. else
  30740. pTDefRegMap(@Self)^.&set := $00002000;
  30741. end;
  30742. function TRTCC_RTCCON.getSIDL : TBits_1; inline;
  30743. begin
  30744. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30745. end;
  30746. procedure TRTCC_RTCCON.setON; inline;
  30747. begin
  30748. pTDefRegMap(@Self)^.&set := $00008000;
  30749. end;
  30750. procedure TRTCC_RTCCON.clearON; inline;
  30751. begin
  30752. pTDefRegMap(@Self)^.clr := $00008000;
  30753. end;
  30754. procedure TRTCC_RTCCON.setON(thebits : TBits_1); inline;
  30755. begin
  30756. if thebits = 0 then
  30757. pTDefRegMap(@Self)^.clr := $00008000
  30758. else
  30759. pTDefRegMap(@Self)^.&set := $00008000;
  30760. end;
  30761. function TRTCC_RTCCON.getON : TBits_1; inline;
  30762. begin
  30763. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30764. end;
  30765. procedure TRTCC_RTCCON.setCAL(thebits : TBits_10); inline;
  30766. begin
  30767. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FC00FFFF or ( thebits shl 16 );
  30768. end;
  30769. function TRTCC_RTCCON.getCAL : TBits_10; inline;
  30770. begin
  30771. getCAL := (pTDefRegMap(@Self)^.val and $03FF0000) shr 16;
  30772. end;
  30773. procedure TRTCC_RTCCON.setw(thebits : TBits_32); inline;
  30774. begin
  30775. pTDefRegMap(@Self)^.val := thebits;
  30776. end;
  30777. function TRTCC_RTCCON.getw : TBits_32; inline;
  30778. begin
  30779. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30780. end;
  30781. procedure TRTCC_RTCALRM.setARPT(thebits : TBits_8); inline;
  30782. begin
  30783. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  30784. end;
  30785. function TRTCC_RTCALRM.getARPT : TBits_8; inline;
  30786. begin
  30787. getARPT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  30788. end;
  30789. procedure TRTCC_RTCALRM.setAMASK(thebits : TBits_4); inline;
  30790. begin
  30791. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  30792. end;
  30793. function TRTCC_RTCALRM.getAMASK : TBits_4; inline;
  30794. begin
  30795. getAMASK := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  30796. end;
  30797. procedure TRTCC_RTCALRM.setALRMSYNC; inline;
  30798. begin
  30799. pTDefRegMap(@Self)^.&set := $00001000;
  30800. end;
  30801. procedure TRTCC_RTCALRM.clearALRMSYNC; inline;
  30802. begin
  30803. pTDefRegMap(@Self)^.clr := $00001000;
  30804. end;
  30805. procedure TRTCC_RTCALRM.setALRMSYNC(thebits : TBits_1); inline;
  30806. begin
  30807. if thebits = 0 then
  30808. pTDefRegMap(@Self)^.clr := $00001000
  30809. else
  30810. pTDefRegMap(@Self)^.&set := $00001000;
  30811. end;
  30812. function TRTCC_RTCALRM.getALRMSYNC : TBits_1; inline;
  30813. begin
  30814. getALRMSYNC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  30815. end;
  30816. procedure TRTCC_RTCALRM.setPIV; inline;
  30817. begin
  30818. pTDefRegMap(@Self)^.&set := $00002000;
  30819. end;
  30820. procedure TRTCC_RTCALRM.clearPIV; inline;
  30821. begin
  30822. pTDefRegMap(@Self)^.clr := $00002000;
  30823. end;
  30824. procedure TRTCC_RTCALRM.setPIV(thebits : TBits_1); inline;
  30825. begin
  30826. if thebits = 0 then
  30827. pTDefRegMap(@Self)^.clr := $00002000
  30828. else
  30829. pTDefRegMap(@Self)^.&set := $00002000;
  30830. end;
  30831. function TRTCC_RTCALRM.getPIV : TBits_1; inline;
  30832. begin
  30833. getPIV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  30834. end;
  30835. procedure TRTCC_RTCALRM.setCHIME; inline;
  30836. begin
  30837. pTDefRegMap(@Self)^.&set := $00004000;
  30838. end;
  30839. procedure TRTCC_RTCALRM.clearCHIME; inline;
  30840. begin
  30841. pTDefRegMap(@Self)^.clr := $00004000;
  30842. end;
  30843. procedure TRTCC_RTCALRM.setCHIME(thebits : TBits_1); inline;
  30844. begin
  30845. if thebits = 0 then
  30846. pTDefRegMap(@Self)^.clr := $00004000
  30847. else
  30848. pTDefRegMap(@Self)^.&set := $00004000;
  30849. end;
  30850. function TRTCC_RTCALRM.getCHIME : TBits_1; inline;
  30851. begin
  30852. getCHIME := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  30853. end;
  30854. procedure TRTCC_RTCALRM.setALRMEN; inline;
  30855. begin
  30856. pTDefRegMap(@Self)^.&set := $00008000;
  30857. end;
  30858. procedure TRTCC_RTCALRM.clearALRMEN; inline;
  30859. begin
  30860. pTDefRegMap(@Self)^.clr := $00008000;
  30861. end;
  30862. procedure TRTCC_RTCALRM.setALRMEN(thebits : TBits_1); inline;
  30863. begin
  30864. if thebits = 0 then
  30865. pTDefRegMap(@Self)^.clr := $00008000
  30866. else
  30867. pTDefRegMap(@Self)^.&set := $00008000;
  30868. end;
  30869. function TRTCC_RTCALRM.getALRMEN : TBits_1; inline;
  30870. begin
  30871. getALRMEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  30872. end;
  30873. procedure TRTCC_RTCALRM.setw(thebits : TBits_32); inline;
  30874. begin
  30875. pTDefRegMap(@Self)^.val := thebits;
  30876. end;
  30877. function TRTCC_RTCALRM.getw : TBits_32; inline;
  30878. begin
  30879. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30880. end;
  30881. procedure TRTCC_RTCTIME.setSEC01(thebits : TBits_4); inline;
  30882. begin
  30883. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  30884. end;
  30885. function TRTCC_RTCTIME.getSEC01 : TBits_4; inline;
  30886. begin
  30887. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  30888. end;
  30889. procedure TRTCC_RTCTIME.setSEC10(thebits : TBits_4); inline;
  30890. begin
  30891. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  30892. end;
  30893. function TRTCC_RTCTIME.getSEC10 : TBits_4; inline;
  30894. begin
  30895. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  30896. end;
  30897. procedure TRTCC_RTCTIME.setMIN01(thebits : TBits_4); inline;
  30898. begin
  30899. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  30900. end;
  30901. function TRTCC_RTCTIME.getMIN01 : TBits_4; inline;
  30902. begin
  30903. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  30904. end;
  30905. procedure TRTCC_RTCTIME.setMIN10(thebits : TBits_4); inline;
  30906. begin
  30907. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  30908. end;
  30909. function TRTCC_RTCTIME.getMIN10 : TBits_4; inline;
  30910. begin
  30911. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  30912. end;
  30913. procedure TRTCC_RTCTIME.setHR01(thebits : TBits_4); inline;
  30914. begin
  30915. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  30916. end;
  30917. function TRTCC_RTCTIME.getHR01 : TBits_4; inline;
  30918. begin
  30919. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  30920. end;
  30921. procedure TRTCC_RTCTIME.setHR10(thebits : TBits_4); inline;
  30922. begin
  30923. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  30924. end;
  30925. function TRTCC_RTCTIME.getHR10 : TBits_4; inline;
  30926. begin
  30927. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  30928. end;
  30929. procedure TRTCC_RTCTIME.setw(thebits : TBits_32); inline;
  30930. begin
  30931. pTDefRegMap(@Self)^.val := thebits;
  30932. end;
  30933. function TRTCC_RTCTIME.getw : TBits_32; inline;
  30934. begin
  30935. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  30936. end;
  30937. procedure TRTCC_RTCDATE.setWDAY01(thebits : TBits_4); inline;
  30938. begin
  30939. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  30940. end;
  30941. function TRTCC_RTCDATE.getWDAY01 : TBits_4; inline;
  30942. begin
  30943. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  30944. end;
  30945. procedure TRTCC_RTCDATE.setDAY01(thebits : TBits_4); inline;
  30946. begin
  30947. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  30948. end;
  30949. function TRTCC_RTCDATE.getDAY01 : TBits_4; inline;
  30950. begin
  30951. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  30952. end;
  30953. procedure TRTCC_RTCDATE.setDAY10(thebits : TBits_4); inline;
  30954. begin
  30955. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  30956. end;
  30957. function TRTCC_RTCDATE.getDAY10 : TBits_4; inline;
  30958. begin
  30959. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  30960. end;
  30961. procedure TRTCC_RTCDATE.setMONTH01(thebits : TBits_4); inline;
  30962. begin
  30963. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  30964. end;
  30965. function TRTCC_RTCDATE.getMONTH01 : TBits_4; inline;
  30966. begin
  30967. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  30968. end;
  30969. procedure TRTCC_RTCDATE.setMONTH10(thebits : TBits_4); inline;
  30970. begin
  30971. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  30972. end;
  30973. function TRTCC_RTCDATE.getMONTH10 : TBits_4; inline;
  30974. begin
  30975. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  30976. end;
  30977. procedure TRTCC_RTCDATE.setYEAR01(thebits : TBits_4); inline;
  30978. begin
  30979. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  30980. end;
  30981. function TRTCC_RTCDATE.getYEAR01 : TBits_4; inline;
  30982. begin
  30983. getYEAR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  30984. end;
  30985. procedure TRTCC_RTCDATE.setYEAR10(thebits : TBits_4); inline;
  30986. begin
  30987. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  30988. end;
  30989. function TRTCC_RTCDATE.getYEAR10 : TBits_4; inline;
  30990. begin
  30991. getYEAR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  30992. end;
  30993. procedure TRTCC_RTCDATE.setw(thebits : TBits_32); inline;
  30994. begin
  30995. pTDefRegMap(@Self)^.val := thebits;
  30996. end;
  30997. function TRTCC_RTCDATE.getw : TBits_32; inline;
  30998. begin
  30999. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31000. end;
  31001. procedure TRTCC_ALRMTIME.setSEC01(thebits : TBits_4); inline;
  31002. begin
  31003. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  31004. end;
  31005. function TRTCC_ALRMTIME.getSEC01 : TBits_4; inline;
  31006. begin
  31007. getSEC01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  31008. end;
  31009. procedure TRTCC_ALRMTIME.setSEC10(thebits : TBits_4); inline;
  31010. begin
  31011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  31012. end;
  31013. function TRTCC_ALRMTIME.getSEC10 : TBits_4; inline;
  31014. begin
  31015. getSEC10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  31016. end;
  31017. procedure TRTCC_ALRMTIME.setMIN01(thebits : TBits_4); inline;
  31018. begin
  31019. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  31020. end;
  31021. function TRTCC_ALRMTIME.getMIN01 : TBits_4; inline;
  31022. begin
  31023. getMIN01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  31024. end;
  31025. procedure TRTCC_ALRMTIME.setMIN10(thebits : TBits_4); inline;
  31026. begin
  31027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  31028. end;
  31029. function TRTCC_ALRMTIME.getMIN10 : TBits_4; inline;
  31030. begin
  31031. getMIN10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  31032. end;
  31033. procedure TRTCC_ALRMTIME.setHR01(thebits : TBits_4); inline;
  31034. begin
  31035. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  31036. end;
  31037. function TRTCC_ALRMTIME.getHR01 : TBits_4; inline;
  31038. begin
  31039. getHR01 := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  31040. end;
  31041. procedure TRTCC_ALRMTIME.setHR10(thebits : TBits_4); inline;
  31042. begin
  31043. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0FFFFFFF or ( thebits shl 28 );
  31044. end;
  31045. function TRTCC_ALRMTIME.getHR10 : TBits_4; inline;
  31046. begin
  31047. getHR10 := (pTDefRegMap(@Self)^.val and $F0000000) shr 28;
  31048. end;
  31049. procedure TRTCC_ALRMTIME.setw(thebits : TBits_32); inline;
  31050. begin
  31051. pTDefRegMap(@Self)^.val := thebits;
  31052. end;
  31053. function TRTCC_ALRMTIME.getw : TBits_32; inline;
  31054. begin
  31055. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31056. end;
  31057. procedure TRTCC_ALRMDATE.setWDAY01(thebits : TBits_4); inline;
  31058. begin
  31059. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  31060. end;
  31061. function TRTCC_ALRMDATE.getWDAY01 : TBits_4; inline;
  31062. begin
  31063. getWDAY01 := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  31064. end;
  31065. procedure TRTCC_ALRMDATE.setDAY01(thebits : TBits_4); inline;
  31066. begin
  31067. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  31068. end;
  31069. function TRTCC_ALRMDATE.getDAY01 : TBits_4; inline;
  31070. begin
  31071. getDAY01 := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  31072. end;
  31073. procedure TRTCC_ALRMDATE.setDAY10(thebits : TBits_4); inline;
  31074. begin
  31075. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0FFF or ( thebits shl 12 );
  31076. end;
  31077. function TRTCC_ALRMDATE.getDAY10 : TBits_4; inline;
  31078. begin
  31079. getDAY10 := (pTDefRegMap(@Self)^.val and $0000F000) shr 12;
  31080. end;
  31081. procedure TRTCC_ALRMDATE.setMONTH01(thebits : TBits_4); inline;
  31082. begin
  31083. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  31084. end;
  31085. function TRTCC_ALRMDATE.getMONTH01 : TBits_4; inline;
  31086. begin
  31087. getMONTH01 := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  31088. end;
  31089. procedure TRTCC_ALRMDATE.setMONTH10(thebits : TBits_4); inline;
  31090. begin
  31091. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF0FFFFF or ( thebits shl 20 );
  31092. end;
  31093. function TRTCC_ALRMDATE.getMONTH10 : TBits_4; inline;
  31094. begin
  31095. getMONTH10 := (pTDefRegMap(@Self)^.val and $00F00000) shr 20;
  31096. end;
  31097. procedure TRTCC_ALRMDATE.setw(thebits : TBits_32); inline;
  31098. begin
  31099. pTDefRegMap(@Self)^.val := thebits;
  31100. end;
  31101. function TRTCC_ALRMDATE.getw : TBits_32; inline;
  31102. begin
  31103. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31104. end;
  31105. procedure TTMR1_T1CON.setTCS; inline;
  31106. begin
  31107. pTDefRegMap(@Self)^.&set := $00000002;
  31108. end;
  31109. procedure TTMR1_T1CON.clearTCS; inline;
  31110. begin
  31111. pTDefRegMap(@Self)^.clr := $00000002;
  31112. end;
  31113. procedure TTMR1_T1CON.setTCS(thebits : TBits_1); inline;
  31114. begin
  31115. if thebits = 0 then
  31116. pTDefRegMap(@Self)^.clr := $00000002
  31117. else
  31118. pTDefRegMap(@Self)^.&set := $00000002;
  31119. end;
  31120. function TTMR1_T1CON.getTCS : TBits_1; inline;
  31121. begin
  31122. getTCS := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  31123. end;
  31124. procedure TTMR1_T1CON.setTSYNC; inline;
  31125. begin
  31126. pTDefRegMap(@Self)^.&set := $00000004;
  31127. end;
  31128. procedure TTMR1_T1CON.clearTSYNC; inline;
  31129. begin
  31130. pTDefRegMap(@Self)^.clr := $00000004;
  31131. end;
  31132. procedure TTMR1_T1CON.setTSYNC(thebits : TBits_1); inline;
  31133. begin
  31134. if thebits = 0 then
  31135. pTDefRegMap(@Self)^.clr := $00000004
  31136. else
  31137. pTDefRegMap(@Self)^.&set := $00000004;
  31138. end;
  31139. function TTMR1_T1CON.getTSYNC : TBits_1; inline;
  31140. begin
  31141. getTSYNC := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  31142. end;
  31143. procedure TTMR1_T1CON.setTCKPS(thebits : TBits_2); inline;
  31144. begin
  31145. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  31146. end;
  31147. function TTMR1_T1CON.getTCKPS : TBits_2; inline;
  31148. begin
  31149. getTCKPS := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  31150. end;
  31151. procedure TTMR1_T1CON.setTGATE; inline;
  31152. begin
  31153. pTDefRegMap(@Self)^.&set := $00000080;
  31154. end;
  31155. procedure TTMR1_T1CON.clearTGATE; inline;
  31156. begin
  31157. pTDefRegMap(@Self)^.clr := $00000080;
  31158. end;
  31159. procedure TTMR1_T1CON.setTGATE(thebits : TBits_1); inline;
  31160. begin
  31161. if thebits = 0 then
  31162. pTDefRegMap(@Self)^.clr := $00000080
  31163. else
  31164. pTDefRegMap(@Self)^.&set := $00000080;
  31165. end;
  31166. function TTMR1_T1CON.getTGATE : TBits_1; inline;
  31167. begin
  31168. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31169. end;
  31170. procedure TTMR1_T1CON.setTWIP; inline;
  31171. begin
  31172. pTDefRegMap(@Self)^.&set := $00000800;
  31173. end;
  31174. procedure TTMR1_T1CON.clearTWIP; inline;
  31175. begin
  31176. pTDefRegMap(@Self)^.clr := $00000800;
  31177. end;
  31178. procedure TTMR1_T1CON.setTWIP(thebits : TBits_1); inline;
  31179. begin
  31180. if thebits = 0 then
  31181. pTDefRegMap(@Self)^.clr := $00000800
  31182. else
  31183. pTDefRegMap(@Self)^.&set := $00000800;
  31184. end;
  31185. function TTMR1_T1CON.getTWIP : TBits_1; inline;
  31186. begin
  31187. getTWIP := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  31188. end;
  31189. procedure TTMR1_T1CON.setTWDIS; inline;
  31190. begin
  31191. pTDefRegMap(@Self)^.&set := $00001000;
  31192. end;
  31193. procedure TTMR1_T1CON.clearTWDIS; inline;
  31194. begin
  31195. pTDefRegMap(@Self)^.clr := $00001000;
  31196. end;
  31197. procedure TTMR1_T1CON.setTWDIS(thebits : TBits_1); inline;
  31198. begin
  31199. if thebits = 0 then
  31200. pTDefRegMap(@Self)^.clr := $00001000
  31201. else
  31202. pTDefRegMap(@Self)^.&set := $00001000;
  31203. end;
  31204. function TTMR1_T1CON.getTWDIS : TBits_1; inline;
  31205. begin
  31206. getTWDIS := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  31207. end;
  31208. procedure TTMR1_T1CON.setSIDL; inline;
  31209. begin
  31210. pTDefRegMap(@Self)^.&set := $00002000;
  31211. end;
  31212. procedure TTMR1_T1CON.clearSIDL; inline;
  31213. begin
  31214. pTDefRegMap(@Self)^.clr := $00002000;
  31215. end;
  31216. procedure TTMR1_T1CON.setSIDL(thebits : TBits_1); inline;
  31217. begin
  31218. if thebits = 0 then
  31219. pTDefRegMap(@Self)^.clr := $00002000
  31220. else
  31221. pTDefRegMap(@Self)^.&set := $00002000;
  31222. end;
  31223. function TTMR1_T1CON.getSIDL : TBits_1; inline;
  31224. begin
  31225. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31226. end;
  31227. procedure TTMR1_T1CON.setON; inline;
  31228. begin
  31229. pTDefRegMap(@Self)^.&set := $00008000;
  31230. end;
  31231. procedure TTMR1_T1CON.clearON; inline;
  31232. begin
  31233. pTDefRegMap(@Self)^.clr := $00008000;
  31234. end;
  31235. procedure TTMR1_T1CON.setON(thebits : TBits_1); inline;
  31236. begin
  31237. if thebits = 0 then
  31238. pTDefRegMap(@Self)^.clr := $00008000
  31239. else
  31240. pTDefRegMap(@Self)^.&set := $00008000;
  31241. end;
  31242. function TTMR1_T1CON.getON : TBits_1; inline;
  31243. begin
  31244. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31245. end;
  31246. procedure TTMR1_T1CON.setTCKPS0; inline;
  31247. begin
  31248. pTDefRegMap(@Self)^.&set := $00000010;
  31249. end;
  31250. procedure TTMR1_T1CON.clearTCKPS0; inline;
  31251. begin
  31252. pTDefRegMap(@Self)^.clr := $00000010;
  31253. end;
  31254. procedure TTMR1_T1CON.setTCKPS0(thebits : TBits_1); inline;
  31255. begin
  31256. if thebits = 0 then
  31257. pTDefRegMap(@Self)^.clr := $00000010
  31258. else
  31259. pTDefRegMap(@Self)^.&set := $00000010;
  31260. end;
  31261. function TTMR1_T1CON.getTCKPS0 : TBits_1; inline;
  31262. begin
  31263. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  31264. end;
  31265. procedure TTMR1_T1CON.setTCKPS1; inline;
  31266. begin
  31267. pTDefRegMap(@Self)^.&set := $00000020;
  31268. end;
  31269. procedure TTMR1_T1CON.clearTCKPS1; inline;
  31270. begin
  31271. pTDefRegMap(@Self)^.clr := $00000020;
  31272. end;
  31273. procedure TTMR1_T1CON.setTCKPS1(thebits : TBits_1); inline;
  31274. begin
  31275. if thebits = 0 then
  31276. pTDefRegMap(@Self)^.clr := $00000020
  31277. else
  31278. pTDefRegMap(@Self)^.&set := $00000020;
  31279. end;
  31280. function TTMR1_T1CON.getTCKPS1 : TBits_1; inline;
  31281. begin
  31282. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31283. end;
  31284. procedure TTMR1_T1CON.setTSIDL; inline;
  31285. begin
  31286. pTDefRegMap(@Self)^.&set := $00002000;
  31287. end;
  31288. procedure TTMR1_T1CON.clearTSIDL; inline;
  31289. begin
  31290. pTDefRegMap(@Self)^.clr := $00002000;
  31291. end;
  31292. procedure TTMR1_T1CON.setTSIDL(thebits : TBits_1); inline;
  31293. begin
  31294. if thebits = 0 then
  31295. pTDefRegMap(@Self)^.clr := $00002000
  31296. else
  31297. pTDefRegMap(@Self)^.&set := $00002000;
  31298. end;
  31299. function TTMR1_T1CON.getTSIDL : TBits_1; inline;
  31300. begin
  31301. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31302. end;
  31303. procedure TTMR1_T1CON.setTON; inline;
  31304. begin
  31305. pTDefRegMap(@Self)^.&set := $00008000;
  31306. end;
  31307. procedure TTMR1_T1CON.clearTON; inline;
  31308. begin
  31309. pTDefRegMap(@Self)^.clr := $00008000;
  31310. end;
  31311. procedure TTMR1_T1CON.setTON(thebits : TBits_1); inline;
  31312. begin
  31313. if thebits = 0 then
  31314. pTDefRegMap(@Self)^.clr := $00008000
  31315. else
  31316. pTDefRegMap(@Self)^.&set := $00008000;
  31317. end;
  31318. function TTMR1_T1CON.getTON : TBits_1; inline;
  31319. begin
  31320. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31321. end;
  31322. procedure TTMR1_T1CON.setw(thebits : TBits_32); inline;
  31323. begin
  31324. pTDefRegMap(@Self)^.val := thebits;
  31325. end;
  31326. function TTMR1_T1CON.getw : TBits_32; inline;
  31327. begin
  31328. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31329. end;
  31330. procedure TTMR23_T2CON.setT32; inline;
  31331. begin
  31332. pTDefRegMap(@Self)^.&set := $00000008;
  31333. end;
  31334. procedure TTMR23_T2CON.clearT32; inline;
  31335. begin
  31336. pTDefRegMap(@Self)^.clr := $00000008;
  31337. end;
  31338. procedure TTMR23_T2CON.setT32(thebits : TBits_1); inline;
  31339. begin
  31340. if thebits = 0 then
  31341. pTDefRegMap(@Self)^.clr := $00000008
  31342. else
  31343. pTDefRegMap(@Self)^.&set := $00000008;
  31344. end;
  31345. function TTMR23_T2CON.getT32 : TBits_1; inline;
  31346. begin
  31347. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31348. end;
  31349. procedure TTMR23_T2CON.setTCKPS(thebits : TBits_3); inline;
  31350. begin
  31351. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  31352. end;
  31353. function TTMR23_T2CON.getTCKPS : TBits_3; inline;
  31354. begin
  31355. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  31356. end;
  31357. procedure TTMR23_T2CON.setTGATE; inline;
  31358. begin
  31359. pTDefRegMap(@Self)^.&set := $00000080;
  31360. end;
  31361. procedure TTMR23_T2CON.clearTGATE; inline;
  31362. begin
  31363. pTDefRegMap(@Self)^.clr := $00000080;
  31364. end;
  31365. procedure TTMR23_T2CON.setTGATE(thebits : TBits_1); inline;
  31366. begin
  31367. if thebits = 0 then
  31368. pTDefRegMap(@Self)^.clr := $00000080
  31369. else
  31370. pTDefRegMap(@Self)^.&set := $00000080;
  31371. end;
  31372. function TTMR23_T2CON.getTGATE : TBits_1; inline;
  31373. begin
  31374. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31375. end;
  31376. procedure TTMR23_T2CON.setSIDL; inline;
  31377. begin
  31378. pTDefRegMap(@Self)^.&set := $00002000;
  31379. end;
  31380. procedure TTMR23_T2CON.clearSIDL; inline;
  31381. begin
  31382. pTDefRegMap(@Self)^.clr := $00002000;
  31383. end;
  31384. procedure TTMR23_T2CON.setSIDL(thebits : TBits_1); inline;
  31385. begin
  31386. if thebits = 0 then
  31387. pTDefRegMap(@Self)^.clr := $00002000
  31388. else
  31389. pTDefRegMap(@Self)^.&set := $00002000;
  31390. end;
  31391. function TTMR23_T2CON.getSIDL : TBits_1; inline;
  31392. begin
  31393. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31394. end;
  31395. procedure TTMR23_T2CON.setON; inline;
  31396. begin
  31397. pTDefRegMap(@Self)^.&set := $00008000;
  31398. end;
  31399. procedure TTMR23_T2CON.clearON; inline;
  31400. begin
  31401. pTDefRegMap(@Self)^.clr := $00008000;
  31402. end;
  31403. procedure TTMR23_T2CON.setON(thebits : TBits_1); inline;
  31404. begin
  31405. if thebits = 0 then
  31406. pTDefRegMap(@Self)^.clr := $00008000
  31407. else
  31408. pTDefRegMap(@Self)^.&set := $00008000;
  31409. end;
  31410. function TTMR23_T2CON.getON : TBits_1; inline;
  31411. begin
  31412. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31413. end;
  31414. procedure TTMR23_T2CON.setTCKPS0; inline;
  31415. begin
  31416. pTDefRegMap(@Self)^.&set := $00000010;
  31417. end;
  31418. procedure TTMR23_T2CON.clearTCKPS0; inline;
  31419. begin
  31420. pTDefRegMap(@Self)^.clr := $00000010;
  31421. end;
  31422. procedure TTMR23_T2CON.setTCKPS0(thebits : TBits_1); inline;
  31423. begin
  31424. if thebits = 0 then
  31425. pTDefRegMap(@Self)^.clr := $00000010
  31426. else
  31427. pTDefRegMap(@Self)^.&set := $00000010;
  31428. end;
  31429. function TTMR23_T2CON.getTCKPS0 : TBits_1; inline;
  31430. begin
  31431. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  31432. end;
  31433. procedure TTMR23_T2CON.setTCKPS1; inline;
  31434. begin
  31435. pTDefRegMap(@Self)^.&set := $00000020;
  31436. end;
  31437. procedure TTMR23_T2CON.clearTCKPS1; inline;
  31438. begin
  31439. pTDefRegMap(@Self)^.clr := $00000020;
  31440. end;
  31441. procedure TTMR23_T2CON.setTCKPS1(thebits : TBits_1); inline;
  31442. begin
  31443. if thebits = 0 then
  31444. pTDefRegMap(@Self)^.clr := $00000020
  31445. else
  31446. pTDefRegMap(@Self)^.&set := $00000020;
  31447. end;
  31448. function TTMR23_T2CON.getTCKPS1 : TBits_1; inline;
  31449. begin
  31450. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31451. end;
  31452. procedure TTMR23_T2CON.setTCKPS2; inline;
  31453. begin
  31454. pTDefRegMap(@Self)^.&set := $00000040;
  31455. end;
  31456. procedure TTMR23_T2CON.clearTCKPS2; inline;
  31457. begin
  31458. pTDefRegMap(@Self)^.clr := $00000040;
  31459. end;
  31460. procedure TTMR23_T2CON.setTCKPS2(thebits : TBits_1); inline;
  31461. begin
  31462. if thebits = 0 then
  31463. pTDefRegMap(@Self)^.clr := $00000040
  31464. else
  31465. pTDefRegMap(@Self)^.&set := $00000040;
  31466. end;
  31467. function TTMR23_T2CON.getTCKPS2 : TBits_1; inline;
  31468. begin
  31469. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31470. end;
  31471. procedure TTMR23_T2CON.setTSIDL; inline;
  31472. begin
  31473. pTDefRegMap(@Self)^.&set := $00002000;
  31474. end;
  31475. procedure TTMR23_T2CON.clearTSIDL; inline;
  31476. begin
  31477. pTDefRegMap(@Self)^.clr := $00002000;
  31478. end;
  31479. procedure TTMR23_T2CON.setTSIDL(thebits : TBits_1); inline;
  31480. begin
  31481. if thebits = 0 then
  31482. pTDefRegMap(@Self)^.clr := $00002000
  31483. else
  31484. pTDefRegMap(@Self)^.&set := $00002000;
  31485. end;
  31486. function TTMR23_T2CON.getTSIDL : TBits_1; inline;
  31487. begin
  31488. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31489. end;
  31490. procedure TTMR23_T2CON.setTON; inline;
  31491. begin
  31492. pTDefRegMap(@Self)^.&set := $00008000;
  31493. end;
  31494. procedure TTMR23_T2CON.clearTON; inline;
  31495. begin
  31496. pTDefRegMap(@Self)^.clr := $00008000;
  31497. end;
  31498. procedure TTMR23_T2CON.setTON(thebits : TBits_1); inline;
  31499. begin
  31500. if thebits = 0 then
  31501. pTDefRegMap(@Self)^.clr := $00008000
  31502. else
  31503. pTDefRegMap(@Self)^.&set := $00008000;
  31504. end;
  31505. function TTMR23_T2CON.getTON : TBits_1; inline;
  31506. begin
  31507. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31508. end;
  31509. procedure TTMR23_T2CON.setw(thebits : TBits_32); inline;
  31510. begin
  31511. pTDefRegMap(@Self)^.val := thebits;
  31512. end;
  31513. function TTMR23_T2CON.getw : TBits_32; inline;
  31514. begin
  31515. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31516. end;
  31517. procedure TTMR3_T3CON.setTCKPS(thebits : TBits_3); inline;
  31518. begin
  31519. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  31520. end;
  31521. function TTMR3_T3CON.getTCKPS : TBits_3; inline;
  31522. begin
  31523. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  31524. end;
  31525. procedure TTMR3_T3CON.setTGATE; inline;
  31526. begin
  31527. pTDefRegMap(@Self)^.&set := $00000080;
  31528. end;
  31529. procedure TTMR3_T3CON.clearTGATE; inline;
  31530. begin
  31531. pTDefRegMap(@Self)^.clr := $00000080;
  31532. end;
  31533. procedure TTMR3_T3CON.setTGATE(thebits : TBits_1); inline;
  31534. begin
  31535. if thebits = 0 then
  31536. pTDefRegMap(@Self)^.clr := $00000080
  31537. else
  31538. pTDefRegMap(@Self)^.&set := $00000080;
  31539. end;
  31540. function TTMR3_T3CON.getTGATE : TBits_1; inline;
  31541. begin
  31542. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31543. end;
  31544. procedure TTMR3_T3CON.setSIDL; inline;
  31545. begin
  31546. pTDefRegMap(@Self)^.&set := $00002000;
  31547. end;
  31548. procedure TTMR3_T3CON.clearSIDL; inline;
  31549. begin
  31550. pTDefRegMap(@Self)^.clr := $00002000;
  31551. end;
  31552. procedure TTMR3_T3CON.setSIDL(thebits : TBits_1); inline;
  31553. begin
  31554. if thebits = 0 then
  31555. pTDefRegMap(@Self)^.clr := $00002000
  31556. else
  31557. pTDefRegMap(@Self)^.&set := $00002000;
  31558. end;
  31559. function TTMR3_T3CON.getSIDL : TBits_1; inline;
  31560. begin
  31561. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31562. end;
  31563. procedure TTMR3_T3CON.setON; inline;
  31564. begin
  31565. pTDefRegMap(@Self)^.&set := $00008000;
  31566. end;
  31567. procedure TTMR3_T3CON.clearON; inline;
  31568. begin
  31569. pTDefRegMap(@Self)^.clr := $00008000;
  31570. end;
  31571. procedure TTMR3_T3CON.setON(thebits : TBits_1); inline;
  31572. begin
  31573. if thebits = 0 then
  31574. pTDefRegMap(@Self)^.clr := $00008000
  31575. else
  31576. pTDefRegMap(@Self)^.&set := $00008000;
  31577. end;
  31578. function TTMR3_T3CON.getON : TBits_1; inline;
  31579. begin
  31580. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31581. end;
  31582. procedure TTMR3_T3CON.setTCKPS0; inline;
  31583. begin
  31584. pTDefRegMap(@Self)^.&set := $00000010;
  31585. end;
  31586. procedure TTMR3_T3CON.clearTCKPS0; inline;
  31587. begin
  31588. pTDefRegMap(@Self)^.clr := $00000010;
  31589. end;
  31590. procedure TTMR3_T3CON.setTCKPS0(thebits : TBits_1); inline;
  31591. begin
  31592. if thebits = 0 then
  31593. pTDefRegMap(@Self)^.clr := $00000010
  31594. else
  31595. pTDefRegMap(@Self)^.&set := $00000010;
  31596. end;
  31597. function TTMR3_T3CON.getTCKPS0 : TBits_1; inline;
  31598. begin
  31599. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  31600. end;
  31601. procedure TTMR3_T3CON.setTCKPS1; inline;
  31602. begin
  31603. pTDefRegMap(@Self)^.&set := $00000020;
  31604. end;
  31605. procedure TTMR3_T3CON.clearTCKPS1; inline;
  31606. begin
  31607. pTDefRegMap(@Self)^.clr := $00000020;
  31608. end;
  31609. procedure TTMR3_T3CON.setTCKPS1(thebits : TBits_1); inline;
  31610. begin
  31611. if thebits = 0 then
  31612. pTDefRegMap(@Self)^.clr := $00000020
  31613. else
  31614. pTDefRegMap(@Self)^.&set := $00000020;
  31615. end;
  31616. function TTMR3_T3CON.getTCKPS1 : TBits_1; inline;
  31617. begin
  31618. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31619. end;
  31620. procedure TTMR3_T3CON.setTCKPS2; inline;
  31621. begin
  31622. pTDefRegMap(@Self)^.&set := $00000040;
  31623. end;
  31624. procedure TTMR3_T3CON.clearTCKPS2; inline;
  31625. begin
  31626. pTDefRegMap(@Self)^.clr := $00000040;
  31627. end;
  31628. procedure TTMR3_T3CON.setTCKPS2(thebits : TBits_1); inline;
  31629. begin
  31630. if thebits = 0 then
  31631. pTDefRegMap(@Self)^.clr := $00000040
  31632. else
  31633. pTDefRegMap(@Self)^.&set := $00000040;
  31634. end;
  31635. function TTMR3_T3CON.getTCKPS2 : TBits_1; inline;
  31636. begin
  31637. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31638. end;
  31639. procedure TTMR3_T3CON.setTSIDL; inline;
  31640. begin
  31641. pTDefRegMap(@Self)^.&set := $00002000;
  31642. end;
  31643. procedure TTMR3_T3CON.clearTSIDL; inline;
  31644. begin
  31645. pTDefRegMap(@Self)^.clr := $00002000;
  31646. end;
  31647. procedure TTMR3_T3CON.setTSIDL(thebits : TBits_1); inline;
  31648. begin
  31649. if thebits = 0 then
  31650. pTDefRegMap(@Self)^.clr := $00002000
  31651. else
  31652. pTDefRegMap(@Self)^.&set := $00002000;
  31653. end;
  31654. function TTMR3_T3CON.getTSIDL : TBits_1; inline;
  31655. begin
  31656. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31657. end;
  31658. procedure TTMR3_T3CON.setTON; inline;
  31659. begin
  31660. pTDefRegMap(@Self)^.&set := $00008000;
  31661. end;
  31662. procedure TTMR3_T3CON.clearTON; inline;
  31663. begin
  31664. pTDefRegMap(@Self)^.clr := $00008000;
  31665. end;
  31666. procedure TTMR3_T3CON.setTON(thebits : TBits_1); inline;
  31667. begin
  31668. if thebits = 0 then
  31669. pTDefRegMap(@Self)^.clr := $00008000
  31670. else
  31671. pTDefRegMap(@Self)^.&set := $00008000;
  31672. end;
  31673. function TTMR3_T3CON.getTON : TBits_1; inline;
  31674. begin
  31675. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31676. end;
  31677. procedure TTMR3_T3CON.setw(thebits : TBits_32); inline;
  31678. begin
  31679. pTDefRegMap(@Self)^.val := thebits;
  31680. end;
  31681. function TTMR3_T3CON.getw : TBits_32; inline;
  31682. begin
  31683. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31684. end;
  31685. procedure TTMR4_T4CON.setT32; inline;
  31686. begin
  31687. pTDefRegMap(@Self)^.&set := $00000008;
  31688. end;
  31689. procedure TTMR4_T4CON.clearT32; inline;
  31690. begin
  31691. pTDefRegMap(@Self)^.clr := $00000008;
  31692. end;
  31693. procedure TTMR4_T4CON.setT32(thebits : TBits_1); inline;
  31694. begin
  31695. if thebits = 0 then
  31696. pTDefRegMap(@Self)^.clr := $00000008
  31697. else
  31698. pTDefRegMap(@Self)^.&set := $00000008;
  31699. end;
  31700. function TTMR4_T4CON.getT32 : TBits_1; inline;
  31701. begin
  31702. getT32 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  31703. end;
  31704. procedure TTMR4_T4CON.setTCKPS(thebits : TBits_3); inline;
  31705. begin
  31706. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  31707. end;
  31708. function TTMR4_T4CON.getTCKPS : TBits_3; inline;
  31709. begin
  31710. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  31711. end;
  31712. procedure TTMR4_T4CON.setTGATE; inline;
  31713. begin
  31714. pTDefRegMap(@Self)^.&set := $00000080;
  31715. end;
  31716. procedure TTMR4_T4CON.clearTGATE; inline;
  31717. begin
  31718. pTDefRegMap(@Self)^.clr := $00000080;
  31719. end;
  31720. procedure TTMR4_T4CON.setTGATE(thebits : TBits_1); inline;
  31721. begin
  31722. if thebits = 0 then
  31723. pTDefRegMap(@Self)^.clr := $00000080
  31724. else
  31725. pTDefRegMap(@Self)^.&set := $00000080;
  31726. end;
  31727. function TTMR4_T4CON.getTGATE : TBits_1; inline;
  31728. begin
  31729. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31730. end;
  31731. procedure TTMR4_T4CON.setSIDL; inline;
  31732. begin
  31733. pTDefRegMap(@Self)^.&set := $00002000;
  31734. end;
  31735. procedure TTMR4_T4CON.clearSIDL; inline;
  31736. begin
  31737. pTDefRegMap(@Self)^.clr := $00002000;
  31738. end;
  31739. procedure TTMR4_T4CON.setSIDL(thebits : TBits_1); inline;
  31740. begin
  31741. if thebits = 0 then
  31742. pTDefRegMap(@Self)^.clr := $00002000
  31743. else
  31744. pTDefRegMap(@Self)^.&set := $00002000;
  31745. end;
  31746. function TTMR4_T4CON.getSIDL : TBits_1; inline;
  31747. begin
  31748. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31749. end;
  31750. procedure TTMR4_T4CON.setON; inline;
  31751. begin
  31752. pTDefRegMap(@Self)^.&set := $00008000;
  31753. end;
  31754. procedure TTMR4_T4CON.clearON; inline;
  31755. begin
  31756. pTDefRegMap(@Self)^.clr := $00008000;
  31757. end;
  31758. procedure TTMR4_T4CON.setON(thebits : TBits_1); inline;
  31759. begin
  31760. if thebits = 0 then
  31761. pTDefRegMap(@Self)^.clr := $00008000
  31762. else
  31763. pTDefRegMap(@Self)^.&set := $00008000;
  31764. end;
  31765. function TTMR4_T4CON.getON : TBits_1; inline;
  31766. begin
  31767. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31768. end;
  31769. procedure TTMR4_T4CON.setTCKPS0; inline;
  31770. begin
  31771. pTDefRegMap(@Self)^.&set := $00000010;
  31772. end;
  31773. procedure TTMR4_T4CON.clearTCKPS0; inline;
  31774. begin
  31775. pTDefRegMap(@Self)^.clr := $00000010;
  31776. end;
  31777. procedure TTMR4_T4CON.setTCKPS0(thebits : TBits_1); inline;
  31778. begin
  31779. if thebits = 0 then
  31780. pTDefRegMap(@Self)^.clr := $00000010
  31781. else
  31782. pTDefRegMap(@Self)^.&set := $00000010;
  31783. end;
  31784. function TTMR4_T4CON.getTCKPS0 : TBits_1; inline;
  31785. begin
  31786. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  31787. end;
  31788. procedure TTMR4_T4CON.setTCKPS1; inline;
  31789. begin
  31790. pTDefRegMap(@Self)^.&set := $00000020;
  31791. end;
  31792. procedure TTMR4_T4CON.clearTCKPS1; inline;
  31793. begin
  31794. pTDefRegMap(@Self)^.clr := $00000020;
  31795. end;
  31796. procedure TTMR4_T4CON.setTCKPS1(thebits : TBits_1); inline;
  31797. begin
  31798. if thebits = 0 then
  31799. pTDefRegMap(@Self)^.clr := $00000020
  31800. else
  31801. pTDefRegMap(@Self)^.&set := $00000020;
  31802. end;
  31803. function TTMR4_T4CON.getTCKPS1 : TBits_1; inline;
  31804. begin
  31805. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31806. end;
  31807. procedure TTMR4_T4CON.setTCKPS2; inline;
  31808. begin
  31809. pTDefRegMap(@Self)^.&set := $00000040;
  31810. end;
  31811. procedure TTMR4_T4CON.clearTCKPS2; inline;
  31812. begin
  31813. pTDefRegMap(@Self)^.clr := $00000040;
  31814. end;
  31815. procedure TTMR4_T4CON.setTCKPS2(thebits : TBits_1); inline;
  31816. begin
  31817. if thebits = 0 then
  31818. pTDefRegMap(@Self)^.clr := $00000040
  31819. else
  31820. pTDefRegMap(@Self)^.&set := $00000040;
  31821. end;
  31822. function TTMR4_T4CON.getTCKPS2 : TBits_1; inline;
  31823. begin
  31824. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31825. end;
  31826. procedure TTMR4_T4CON.setTSIDL; inline;
  31827. begin
  31828. pTDefRegMap(@Self)^.&set := $00002000;
  31829. end;
  31830. procedure TTMR4_T4CON.clearTSIDL; inline;
  31831. begin
  31832. pTDefRegMap(@Self)^.clr := $00002000;
  31833. end;
  31834. procedure TTMR4_T4CON.setTSIDL(thebits : TBits_1); inline;
  31835. begin
  31836. if thebits = 0 then
  31837. pTDefRegMap(@Self)^.clr := $00002000
  31838. else
  31839. pTDefRegMap(@Self)^.&set := $00002000;
  31840. end;
  31841. function TTMR4_T4CON.getTSIDL : TBits_1; inline;
  31842. begin
  31843. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31844. end;
  31845. procedure TTMR4_T4CON.setTON; inline;
  31846. begin
  31847. pTDefRegMap(@Self)^.&set := $00008000;
  31848. end;
  31849. procedure TTMR4_T4CON.clearTON; inline;
  31850. begin
  31851. pTDefRegMap(@Self)^.clr := $00008000;
  31852. end;
  31853. procedure TTMR4_T4CON.setTON(thebits : TBits_1); inline;
  31854. begin
  31855. if thebits = 0 then
  31856. pTDefRegMap(@Self)^.clr := $00008000
  31857. else
  31858. pTDefRegMap(@Self)^.&set := $00008000;
  31859. end;
  31860. function TTMR4_T4CON.getTON : TBits_1; inline;
  31861. begin
  31862. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31863. end;
  31864. procedure TTMR4_T4CON.setw(thebits : TBits_32); inline;
  31865. begin
  31866. pTDefRegMap(@Self)^.val := thebits;
  31867. end;
  31868. function TTMR4_T4CON.getw : TBits_32; inline;
  31869. begin
  31870. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  31871. end;
  31872. procedure TTMR5_T5CON.setTCKPS(thebits : TBits_3); inline;
  31873. begin
  31874. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  31875. end;
  31876. function TTMR5_T5CON.getTCKPS : TBits_3; inline;
  31877. begin
  31878. getTCKPS := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  31879. end;
  31880. procedure TTMR5_T5CON.setTGATE; inline;
  31881. begin
  31882. pTDefRegMap(@Self)^.&set := $00000080;
  31883. end;
  31884. procedure TTMR5_T5CON.clearTGATE; inline;
  31885. begin
  31886. pTDefRegMap(@Self)^.clr := $00000080;
  31887. end;
  31888. procedure TTMR5_T5CON.setTGATE(thebits : TBits_1); inline;
  31889. begin
  31890. if thebits = 0 then
  31891. pTDefRegMap(@Self)^.clr := $00000080
  31892. else
  31893. pTDefRegMap(@Self)^.&set := $00000080;
  31894. end;
  31895. function TTMR5_T5CON.getTGATE : TBits_1; inline;
  31896. begin
  31897. getTGATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  31898. end;
  31899. procedure TTMR5_T5CON.setSIDL; inline;
  31900. begin
  31901. pTDefRegMap(@Self)^.&set := $00002000;
  31902. end;
  31903. procedure TTMR5_T5CON.clearSIDL; inline;
  31904. begin
  31905. pTDefRegMap(@Self)^.clr := $00002000;
  31906. end;
  31907. procedure TTMR5_T5CON.setSIDL(thebits : TBits_1); inline;
  31908. begin
  31909. if thebits = 0 then
  31910. pTDefRegMap(@Self)^.clr := $00002000
  31911. else
  31912. pTDefRegMap(@Self)^.&set := $00002000;
  31913. end;
  31914. function TTMR5_T5CON.getSIDL : TBits_1; inline;
  31915. begin
  31916. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  31917. end;
  31918. procedure TTMR5_T5CON.setON; inline;
  31919. begin
  31920. pTDefRegMap(@Self)^.&set := $00008000;
  31921. end;
  31922. procedure TTMR5_T5CON.clearON; inline;
  31923. begin
  31924. pTDefRegMap(@Self)^.clr := $00008000;
  31925. end;
  31926. procedure TTMR5_T5CON.setON(thebits : TBits_1); inline;
  31927. begin
  31928. if thebits = 0 then
  31929. pTDefRegMap(@Self)^.clr := $00008000
  31930. else
  31931. pTDefRegMap(@Self)^.&set := $00008000;
  31932. end;
  31933. function TTMR5_T5CON.getON : TBits_1; inline;
  31934. begin
  31935. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  31936. end;
  31937. procedure TTMR5_T5CON.setTCKPS0; inline;
  31938. begin
  31939. pTDefRegMap(@Self)^.&set := $00000010;
  31940. end;
  31941. procedure TTMR5_T5CON.clearTCKPS0; inline;
  31942. begin
  31943. pTDefRegMap(@Self)^.clr := $00000010;
  31944. end;
  31945. procedure TTMR5_T5CON.setTCKPS0(thebits : TBits_1); inline;
  31946. begin
  31947. if thebits = 0 then
  31948. pTDefRegMap(@Self)^.clr := $00000010
  31949. else
  31950. pTDefRegMap(@Self)^.&set := $00000010;
  31951. end;
  31952. function TTMR5_T5CON.getTCKPS0 : TBits_1; inline;
  31953. begin
  31954. getTCKPS0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  31955. end;
  31956. procedure TTMR5_T5CON.setTCKPS1; inline;
  31957. begin
  31958. pTDefRegMap(@Self)^.&set := $00000020;
  31959. end;
  31960. procedure TTMR5_T5CON.clearTCKPS1; inline;
  31961. begin
  31962. pTDefRegMap(@Self)^.clr := $00000020;
  31963. end;
  31964. procedure TTMR5_T5CON.setTCKPS1(thebits : TBits_1); inline;
  31965. begin
  31966. if thebits = 0 then
  31967. pTDefRegMap(@Self)^.clr := $00000020
  31968. else
  31969. pTDefRegMap(@Self)^.&set := $00000020;
  31970. end;
  31971. function TTMR5_T5CON.getTCKPS1 : TBits_1; inline;
  31972. begin
  31973. getTCKPS1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  31974. end;
  31975. procedure TTMR5_T5CON.setTCKPS2; inline;
  31976. begin
  31977. pTDefRegMap(@Self)^.&set := $00000040;
  31978. end;
  31979. procedure TTMR5_T5CON.clearTCKPS2; inline;
  31980. begin
  31981. pTDefRegMap(@Self)^.clr := $00000040;
  31982. end;
  31983. procedure TTMR5_T5CON.setTCKPS2(thebits : TBits_1); inline;
  31984. begin
  31985. if thebits = 0 then
  31986. pTDefRegMap(@Self)^.clr := $00000040
  31987. else
  31988. pTDefRegMap(@Self)^.&set := $00000040;
  31989. end;
  31990. function TTMR5_T5CON.getTCKPS2 : TBits_1; inline;
  31991. begin
  31992. getTCKPS2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  31993. end;
  31994. procedure TTMR5_T5CON.setTSIDL; inline;
  31995. begin
  31996. pTDefRegMap(@Self)^.&set := $00002000;
  31997. end;
  31998. procedure TTMR5_T5CON.clearTSIDL; inline;
  31999. begin
  32000. pTDefRegMap(@Self)^.clr := $00002000;
  32001. end;
  32002. procedure TTMR5_T5CON.setTSIDL(thebits : TBits_1); inline;
  32003. begin
  32004. if thebits = 0 then
  32005. pTDefRegMap(@Self)^.clr := $00002000
  32006. else
  32007. pTDefRegMap(@Self)^.&set := $00002000;
  32008. end;
  32009. function TTMR5_T5CON.getTSIDL : TBits_1; inline;
  32010. begin
  32011. getTSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32012. end;
  32013. procedure TTMR5_T5CON.setTON; inline;
  32014. begin
  32015. pTDefRegMap(@Self)^.&set := $00008000;
  32016. end;
  32017. procedure TTMR5_T5CON.clearTON; inline;
  32018. begin
  32019. pTDefRegMap(@Self)^.clr := $00008000;
  32020. end;
  32021. procedure TTMR5_T5CON.setTON(thebits : TBits_1); inline;
  32022. begin
  32023. if thebits = 0 then
  32024. pTDefRegMap(@Self)^.clr := $00008000
  32025. else
  32026. pTDefRegMap(@Self)^.&set := $00008000;
  32027. end;
  32028. function TTMR5_T5CON.getTON : TBits_1; inline;
  32029. begin
  32030. getTON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32031. end;
  32032. procedure TTMR5_T5CON.setw(thebits : TBits_32); inline;
  32033. begin
  32034. pTDefRegMap(@Self)^.val := thebits;
  32035. end;
  32036. function TTMR5_T5CON.getw : TBits_32; inline;
  32037. begin
  32038. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32039. end;
  32040. procedure TICAP1_IC1CON.setICM(thebits : TBits_3); inline;
  32041. begin
  32042. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  32043. end;
  32044. function TICAP1_IC1CON.getICM : TBits_3; inline;
  32045. begin
  32046. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  32047. end;
  32048. procedure TICAP1_IC1CON.setICBNE; inline;
  32049. begin
  32050. pTDefRegMap(@Self)^.&set := $00000008;
  32051. end;
  32052. procedure TICAP1_IC1CON.clearICBNE; inline;
  32053. begin
  32054. pTDefRegMap(@Self)^.clr := $00000008;
  32055. end;
  32056. procedure TICAP1_IC1CON.setICBNE(thebits : TBits_1); inline;
  32057. begin
  32058. if thebits = 0 then
  32059. pTDefRegMap(@Self)^.clr := $00000008
  32060. else
  32061. pTDefRegMap(@Self)^.&set := $00000008;
  32062. end;
  32063. function TICAP1_IC1CON.getICBNE : TBits_1; inline;
  32064. begin
  32065. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32066. end;
  32067. procedure TICAP1_IC1CON.setICOV; inline;
  32068. begin
  32069. pTDefRegMap(@Self)^.&set := $00000010;
  32070. end;
  32071. procedure TICAP1_IC1CON.clearICOV; inline;
  32072. begin
  32073. pTDefRegMap(@Self)^.clr := $00000010;
  32074. end;
  32075. procedure TICAP1_IC1CON.setICOV(thebits : TBits_1); inline;
  32076. begin
  32077. if thebits = 0 then
  32078. pTDefRegMap(@Self)^.clr := $00000010
  32079. else
  32080. pTDefRegMap(@Self)^.&set := $00000010;
  32081. end;
  32082. function TICAP1_IC1CON.getICOV : TBits_1; inline;
  32083. begin
  32084. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32085. end;
  32086. procedure TICAP1_IC1CON.setICI(thebits : TBits_2); inline;
  32087. begin
  32088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  32089. end;
  32090. function TICAP1_IC1CON.getICI : TBits_2; inline;
  32091. begin
  32092. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  32093. end;
  32094. procedure TICAP1_IC1CON.setICTMR; inline;
  32095. begin
  32096. pTDefRegMap(@Self)^.&set := $00000080;
  32097. end;
  32098. procedure TICAP1_IC1CON.clearICTMR; inline;
  32099. begin
  32100. pTDefRegMap(@Self)^.clr := $00000080;
  32101. end;
  32102. procedure TICAP1_IC1CON.setICTMR(thebits : TBits_1); inline;
  32103. begin
  32104. if thebits = 0 then
  32105. pTDefRegMap(@Self)^.clr := $00000080
  32106. else
  32107. pTDefRegMap(@Self)^.&set := $00000080;
  32108. end;
  32109. function TICAP1_IC1CON.getICTMR : TBits_1; inline;
  32110. begin
  32111. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32112. end;
  32113. procedure TICAP1_IC1CON.setC32; inline;
  32114. begin
  32115. pTDefRegMap(@Self)^.&set := $00000100;
  32116. end;
  32117. procedure TICAP1_IC1CON.clearC32; inline;
  32118. begin
  32119. pTDefRegMap(@Self)^.clr := $00000100;
  32120. end;
  32121. procedure TICAP1_IC1CON.setC32(thebits : TBits_1); inline;
  32122. begin
  32123. if thebits = 0 then
  32124. pTDefRegMap(@Self)^.clr := $00000100
  32125. else
  32126. pTDefRegMap(@Self)^.&set := $00000100;
  32127. end;
  32128. function TICAP1_IC1CON.getC32 : TBits_1; inline;
  32129. begin
  32130. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32131. end;
  32132. procedure TICAP1_IC1CON.setFEDGE; inline;
  32133. begin
  32134. pTDefRegMap(@Self)^.&set := $00000200;
  32135. end;
  32136. procedure TICAP1_IC1CON.clearFEDGE; inline;
  32137. begin
  32138. pTDefRegMap(@Self)^.clr := $00000200;
  32139. end;
  32140. procedure TICAP1_IC1CON.setFEDGE(thebits : TBits_1); inline;
  32141. begin
  32142. if thebits = 0 then
  32143. pTDefRegMap(@Self)^.clr := $00000200
  32144. else
  32145. pTDefRegMap(@Self)^.&set := $00000200;
  32146. end;
  32147. function TICAP1_IC1CON.getFEDGE : TBits_1; inline;
  32148. begin
  32149. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32150. end;
  32151. procedure TICAP1_IC1CON.setSIDL; inline;
  32152. begin
  32153. pTDefRegMap(@Self)^.&set := $00002000;
  32154. end;
  32155. procedure TICAP1_IC1CON.clearSIDL; inline;
  32156. begin
  32157. pTDefRegMap(@Self)^.clr := $00002000;
  32158. end;
  32159. procedure TICAP1_IC1CON.setSIDL(thebits : TBits_1); inline;
  32160. begin
  32161. if thebits = 0 then
  32162. pTDefRegMap(@Self)^.clr := $00002000
  32163. else
  32164. pTDefRegMap(@Self)^.&set := $00002000;
  32165. end;
  32166. function TICAP1_IC1CON.getSIDL : TBits_1; inline;
  32167. begin
  32168. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32169. end;
  32170. procedure TICAP1_IC1CON.setON; inline;
  32171. begin
  32172. pTDefRegMap(@Self)^.&set := $00008000;
  32173. end;
  32174. procedure TICAP1_IC1CON.clearON; inline;
  32175. begin
  32176. pTDefRegMap(@Self)^.clr := $00008000;
  32177. end;
  32178. procedure TICAP1_IC1CON.setON(thebits : TBits_1); inline;
  32179. begin
  32180. if thebits = 0 then
  32181. pTDefRegMap(@Self)^.clr := $00008000
  32182. else
  32183. pTDefRegMap(@Self)^.&set := $00008000;
  32184. end;
  32185. function TICAP1_IC1CON.getON : TBits_1; inline;
  32186. begin
  32187. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32188. end;
  32189. procedure TICAP1_IC1CON.setICM0; inline;
  32190. begin
  32191. pTDefRegMap(@Self)^.&set := $00000001;
  32192. end;
  32193. procedure TICAP1_IC1CON.clearICM0; inline;
  32194. begin
  32195. pTDefRegMap(@Self)^.clr := $00000001;
  32196. end;
  32197. procedure TICAP1_IC1CON.setICM0(thebits : TBits_1); inline;
  32198. begin
  32199. if thebits = 0 then
  32200. pTDefRegMap(@Self)^.clr := $00000001
  32201. else
  32202. pTDefRegMap(@Self)^.&set := $00000001;
  32203. end;
  32204. function TICAP1_IC1CON.getICM0 : TBits_1; inline;
  32205. begin
  32206. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32207. end;
  32208. procedure TICAP1_IC1CON.setICM1; inline;
  32209. begin
  32210. pTDefRegMap(@Self)^.&set := $00000002;
  32211. end;
  32212. procedure TICAP1_IC1CON.clearICM1; inline;
  32213. begin
  32214. pTDefRegMap(@Self)^.clr := $00000002;
  32215. end;
  32216. procedure TICAP1_IC1CON.setICM1(thebits : TBits_1); inline;
  32217. begin
  32218. if thebits = 0 then
  32219. pTDefRegMap(@Self)^.clr := $00000002
  32220. else
  32221. pTDefRegMap(@Self)^.&set := $00000002;
  32222. end;
  32223. function TICAP1_IC1CON.getICM1 : TBits_1; inline;
  32224. begin
  32225. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32226. end;
  32227. procedure TICAP1_IC1CON.setICM2; inline;
  32228. begin
  32229. pTDefRegMap(@Self)^.&set := $00000004;
  32230. end;
  32231. procedure TICAP1_IC1CON.clearICM2; inline;
  32232. begin
  32233. pTDefRegMap(@Self)^.clr := $00000004;
  32234. end;
  32235. procedure TICAP1_IC1CON.setICM2(thebits : TBits_1); inline;
  32236. begin
  32237. if thebits = 0 then
  32238. pTDefRegMap(@Self)^.clr := $00000004
  32239. else
  32240. pTDefRegMap(@Self)^.&set := $00000004;
  32241. end;
  32242. function TICAP1_IC1CON.getICM2 : TBits_1; inline;
  32243. begin
  32244. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32245. end;
  32246. procedure TICAP1_IC1CON.setICI0; inline;
  32247. begin
  32248. pTDefRegMap(@Self)^.&set := $00000020;
  32249. end;
  32250. procedure TICAP1_IC1CON.clearICI0; inline;
  32251. begin
  32252. pTDefRegMap(@Self)^.clr := $00000020;
  32253. end;
  32254. procedure TICAP1_IC1CON.setICI0(thebits : TBits_1); inline;
  32255. begin
  32256. if thebits = 0 then
  32257. pTDefRegMap(@Self)^.clr := $00000020
  32258. else
  32259. pTDefRegMap(@Self)^.&set := $00000020;
  32260. end;
  32261. function TICAP1_IC1CON.getICI0 : TBits_1; inline;
  32262. begin
  32263. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32264. end;
  32265. procedure TICAP1_IC1CON.setICI1; inline;
  32266. begin
  32267. pTDefRegMap(@Self)^.&set := $00000040;
  32268. end;
  32269. procedure TICAP1_IC1CON.clearICI1; inline;
  32270. begin
  32271. pTDefRegMap(@Self)^.clr := $00000040;
  32272. end;
  32273. procedure TICAP1_IC1CON.setICI1(thebits : TBits_1); inline;
  32274. begin
  32275. if thebits = 0 then
  32276. pTDefRegMap(@Self)^.clr := $00000040
  32277. else
  32278. pTDefRegMap(@Self)^.&set := $00000040;
  32279. end;
  32280. function TICAP1_IC1CON.getICI1 : TBits_1; inline;
  32281. begin
  32282. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32283. end;
  32284. procedure TICAP1_IC1CON.setICSIDL; inline;
  32285. begin
  32286. pTDefRegMap(@Self)^.&set := $00002000;
  32287. end;
  32288. procedure TICAP1_IC1CON.clearICSIDL; inline;
  32289. begin
  32290. pTDefRegMap(@Self)^.clr := $00002000;
  32291. end;
  32292. procedure TICAP1_IC1CON.setICSIDL(thebits : TBits_1); inline;
  32293. begin
  32294. if thebits = 0 then
  32295. pTDefRegMap(@Self)^.clr := $00002000
  32296. else
  32297. pTDefRegMap(@Self)^.&set := $00002000;
  32298. end;
  32299. function TICAP1_IC1CON.getICSIDL : TBits_1; inline;
  32300. begin
  32301. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32302. end;
  32303. procedure TICAP1_IC1CON.setw(thebits : TBits_32); inline;
  32304. begin
  32305. pTDefRegMap(@Self)^.val := thebits;
  32306. end;
  32307. function TICAP1_IC1CON.getw : TBits_32; inline;
  32308. begin
  32309. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32310. end;
  32311. procedure TICAP2_IC2CON.setICM(thebits : TBits_3); inline;
  32312. begin
  32313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  32314. end;
  32315. function TICAP2_IC2CON.getICM : TBits_3; inline;
  32316. begin
  32317. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  32318. end;
  32319. procedure TICAP2_IC2CON.setICBNE; inline;
  32320. begin
  32321. pTDefRegMap(@Self)^.&set := $00000008;
  32322. end;
  32323. procedure TICAP2_IC2CON.clearICBNE; inline;
  32324. begin
  32325. pTDefRegMap(@Self)^.clr := $00000008;
  32326. end;
  32327. procedure TICAP2_IC2CON.setICBNE(thebits : TBits_1); inline;
  32328. begin
  32329. if thebits = 0 then
  32330. pTDefRegMap(@Self)^.clr := $00000008
  32331. else
  32332. pTDefRegMap(@Self)^.&set := $00000008;
  32333. end;
  32334. function TICAP2_IC2CON.getICBNE : TBits_1; inline;
  32335. begin
  32336. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32337. end;
  32338. procedure TICAP2_IC2CON.setICOV; inline;
  32339. begin
  32340. pTDefRegMap(@Self)^.&set := $00000010;
  32341. end;
  32342. procedure TICAP2_IC2CON.clearICOV; inline;
  32343. begin
  32344. pTDefRegMap(@Self)^.clr := $00000010;
  32345. end;
  32346. procedure TICAP2_IC2CON.setICOV(thebits : TBits_1); inline;
  32347. begin
  32348. if thebits = 0 then
  32349. pTDefRegMap(@Self)^.clr := $00000010
  32350. else
  32351. pTDefRegMap(@Self)^.&set := $00000010;
  32352. end;
  32353. function TICAP2_IC2CON.getICOV : TBits_1; inline;
  32354. begin
  32355. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32356. end;
  32357. procedure TICAP2_IC2CON.setICI(thebits : TBits_2); inline;
  32358. begin
  32359. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  32360. end;
  32361. function TICAP2_IC2CON.getICI : TBits_2; inline;
  32362. begin
  32363. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  32364. end;
  32365. procedure TICAP2_IC2CON.setICTMR; inline;
  32366. begin
  32367. pTDefRegMap(@Self)^.&set := $00000080;
  32368. end;
  32369. procedure TICAP2_IC2CON.clearICTMR; inline;
  32370. begin
  32371. pTDefRegMap(@Self)^.clr := $00000080;
  32372. end;
  32373. procedure TICAP2_IC2CON.setICTMR(thebits : TBits_1); inline;
  32374. begin
  32375. if thebits = 0 then
  32376. pTDefRegMap(@Self)^.clr := $00000080
  32377. else
  32378. pTDefRegMap(@Self)^.&set := $00000080;
  32379. end;
  32380. function TICAP2_IC2CON.getICTMR : TBits_1; inline;
  32381. begin
  32382. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32383. end;
  32384. procedure TICAP2_IC2CON.setC32; inline;
  32385. begin
  32386. pTDefRegMap(@Self)^.&set := $00000100;
  32387. end;
  32388. procedure TICAP2_IC2CON.clearC32; inline;
  32389. begin
  32390. pTDefRegMap(@Self)^.clr := $00000100;
  32391. end;
  32392. procedure TICAP2_IC2CON.setC32(thebits : TBits_1); inline;
  32393. begin
  32394. if thebits = 0 then
  32395. pTDefRegMap(@Self)^.clr := $00000100
  32396. else
  32397. pTDefRegMap(@Self)^.&set := $00000100;
  32398. end;
  32399. function TICAP2_IC2CON.getC32 : TBits_1; inline;
  32400. begin
  32401. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32402. end;
  32403. procedure TICAP2_IC2CON.setFEDGE; inline;
  32404. begin
  32405. pTDefRegMap(@Self)^.&set := $00000200;
  32406. end;
  32407. procedure TICAP2_IC2CON.clearFEDGE; inline;
  32408. begin
  32409. pTDefRegMap(@Self)^.clr := $00000200;
  32410. end;
  32411. procedure TICAP2_IC2CON.setFEDGE(thebits : TBits_1); inline;
  32412. begin
  32413. if thebits = 0 then
  32414. pTDefRegMap(@Self)^.clr := $00000200
  32415. else
  32416. pTDefRegMap(@Self)^.&set := $00000200;
  32417. end;
  32418. function TICAP2_IC2CON.getFEDGE : TBits_1; inline;
  32419. begin
  32420. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32421. end;
  32422. procedure TICAP2_IC2CON.setSIDL; inline;
  32423. begin
  32424. pTDefRegMap(@Self)^.&set := $00002000;
  32425. end;
  32426. procedure TICAP2_IC2CON.clearSIDL; inline;
  32427. begin
  32428. pTDefRegMap(@Self)^.clr := $00002000;
  32429. end;
  32430. procedure TICAP2_IC2CON.setSIDL(thebits : TBits_1); inline;
  32431. begin
  32432. if thebits = 0 then
  32433. pTDefRegMap(@Self)^.clr := $00002000
  32434. else
  32435. pTDefRegMap(@Self)^.&set := $00002000;
  32436. end;
  32437. function TICAP2_IC2CON.getSIDL : TBits_1; inline;
  32438. begin
  32439. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32440. end;
  32441. procedure TICAP2_IC2CON.setON; inline;
  32442. begin
  32443. pTDefRegMap(@Self)^.&set := $00008000;
  32444. end;
  32445. procedure TICAP2_IC2CON.clearON; inline;
  32446. begin
  32447. pTDefRegMap(@Self)^.clr := $00008000;
  32448. end;
  32449. procedure TICAP2_IC2CON.setON(thebits : TBits_1); inline;
  32450. begin
  32451. if thebits = 0 then
  32452. pTDefRegMap(@Self)^.clr := $00008000
  32453. else
  32454. pTDefRegMap(@Self)^.&set := $00008000;
  32455. end;
  32456. function TICAP2_IC2CON.getON : TBits_1; inline;
  32457. begin
  32458. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32459. end;
  32460. procedure TICAP2_IC2CON.setICM0; inline;
  32461. begin
  32462. pTDefRegMap(@Self)^.&set := $00000001;
  32463. end;
  32464. procedure TICAP2_IC2CON.clearICM0; inline;
  32465. begin
  32466. pTDefRegMap(@Self)^.clr := $00000001;
  32467. end;
  32468. procedure TICAP2_IC2CON.setICM0(thebits : TBits_1); inline;
  32469. begin
  32470. if thebits = 0 then
  32471. pTDefRegMap(@Self)^.clr := $00000001
  32472. else
  32473. pTDefRegMap(@Self)^.&set := $00000001;
  32474. end;
  32475. function TICAP2_IC2CON.getICM0 : TBits_1; inline;
  32476. begin
  32477. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32478. end;
  32479. procedure TICAP2_IC2CON.setICM1; inline;
  32480. begin
  32481. pTDefRegMap(@Self)^.&set := $00000002;
  32482. end;
  32483. procedure TICAP2_IC2CON.clearICM1; inline;
  32484. begin
  32485. pTDefRegMap(@Self)^.clr := $00000002;
  32486. end;
  32487. procedure TICAP2_IC2CON.setICM1(thebits : TBits_1); inline;
  32488. begin
  32489. if thebits = 0 then
  32490. pTDefRegMap(@Self)^.clr := $00000002
  32491. else
  32492. pTDefRegMap(@Self)^.&set := $00000002;
  32493. end;
  32494. function TICAP2_IC2CON.getICM1 : TBits_1; inline;
  32495. begin
  32496. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32497. end;
  32498. procedure TICAP2_IC2CON.setICM2; inline;
  32499. begin
  32500. pTDefRegMap(@Self)^.&set := $00000004;
  32501. end;
  32502. procedure TICAP2_IC2CON.clearICM2; inline;
  32503. begin
  32504. pTDefRegMap(@Self)^.clr := $00000004;
  32505. end;
  32506. procedure TICAP2_IC2CON.setICM2(thebits : TBits_1); inline;
  32507. begin
  32508. if thebits = 0 then
  32509. pTDefRegMap(@Self)^.clr := $00000004
  32510. else
  32511. pTDefRegMap(@Self)^.&set := $00000004;
  32512. end;
  32513. function TICAP2_IC2CON.getICM2 : TBits_1; inline;
  32514. begin
  32515. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32516. end;
  32517. procedure TICAP2_IC2CON.setICI0; inline;
  32518. begin
  32519. pTDefRegMap(@Self)^.&set := $00000020;
  32520. end;
  32521. procedure TICAP2_IC2CON.clearICI0; inline;
  32522. begin
  32523. pTDefRegMap(@Self)^.clr := $00000020;
  32524. end;
  32525. procedure TICAP2_IC2CON.setICI0(thebits : TBits_1); inline;
  32526. begin
  32527. if thebits = 0 then
  32528. pTDefRegMap(@Self)^.clr := $00000020
  32529. else
  32530. pTDefRegMap(@Self)^.&set := $00000020;
  32531. end;
  32532. function TICAP2_IC2CON.getICI0 : TBits_1; inline;
  32533. begin
  32534. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32535. end;
  32536. procedure TICAP2_IC2CON.setICI1; inline;
  32537. begin
  32538. pTDefRegMap(@Self)^.&set := $00000040;
  32539. end;
  32540. procedure TICAP2_IC2CON.clearICI1; inline;
  32541. begin
  32542. pTDefRegMap(@Self)^.clr := $00000040;
  32543. end;
  32544. procedure TICAP2_IC2CON.setICI1(thebits : TBits_1); inline;
  32545. begin
  32546. if thebits = 0 then
  32547. pTDefRegMap(@Self)^.clr := $00000040
  32548. else
  32549. pTDefRegMap(@Self)^.&set := $00000040;
  32550. end;
  32551. function TICAP2_IC2CON.getICI1 : TBits_1; inline;
  32552. begin
  32553. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32554. end;
  32555. procedure TICAP2_IC2CON.setICSIDL; inline;
  32556. begin
  32557. pTDefRegMap(@Self)^.&set := $00002000;
  32558. end;
  32559. procedure TICAP2_IC2CON.clearICSIDL; inline;
  32560. begin
  32561. pTDefRegMap(@Self)^.clr := $00002000;
  32562. end;
  32563. procedure TICAP2_IC2CON.setICSIDL(thebits : TBits_1); inline;
  32564. begin
  32565. if thebits = 0 then
  32566. pTDefRegMap(@Self)^.clr := $00002000
  32567. else
  32568. pTDefRegMap(@Self)^.&set := $00002000;
  32569. end;
  32570. function TICAP2_IC2CON.getICSIDL : TBits_1; inline;
  32571. begin
  32572. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32573. end;
  32574. procedure TICAP2_IC2CON.setw(thebits : TBits_32); inline;
  32575. begin
  32576. pTDefRegMap(@Self)^.val := thebits;
  32577. end;
  32578. function TICAP2_IC2CON.getw : TBits_32; inline;
  32579. begin
  32580. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32581. end;
  32582. procedure TICAP3_IC3CON.setICM(thebits : TBits_3); inline;
  32583. begin
  32584. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  32585. end;
  32586. function TICAP3_IC3CON.getICM : TBits_3; inline;
  32587. begin
  32588. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  32589. end;
  32590. procedure TICAP3_IC3CON.setICBNE; inline;
  32591. begin
  32592. pTDefRegMap(@Self)^.&set := $00000008;
  32593. end;
  32594. procedure TICAP3_IC3CON.clearICBNE; inline;
  32595. begin
  32596. pTDefRegMap(@Self)^.clr := $00000008;
  32597. end;
  32598. procedure TICAP3_IC3CON.setICBNE(thebits : TBits_1); inline;
  32599. begin
  32600. if thebits = 0 then
  32601. pTDefRegMap(@Self)^.clr := $00000008
  32602. else
  32603. pTDefRegMap(@Self)^.&set := $00000008;
  32604. end;
  32605. function TICAP3_IC3CON.getICBNE : TBits_1; inline;
  32606. begin
  32607. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32608. end;
  32609. procedure TICAP3_IC3CON.setICOV; inline;
  32610. begin
  32611. pTDefRegMap(@Self)^.&set := $00000010;
  32612. end;
  32613. procedure TICAP3_IC3CON.clearICOV; inline;
  32614. begin
  32615. pTDefRegMap(@Self)^.clr := $00000010;
  32616. end;
  32617. procedure TICAP3_IC3CON.setICOV(thebits : TBits_1); inline;
  32618. begin
  32619. if thebits = 0 then
  32620. pTDefRegMap(@Self)^.clr := $00000010
  32621. else
  32622. pTDefRegMap(@Self)^.&set := $00000010;
  32623. end;
  32624. function TICAP3_IC3CON.getICOV : TBits_1; inline;
  32625. begin
  32626. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32627. end;
  32628. procedure TICAP3_IC3CON.setICI(thebits : TBits_2); inline;
  32629. begin
  32630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  32631. end;
  32632. function TICAP3_IC3CON.getICI : TBits_2; inline;
  32633. begin
  32634. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  32635. end;
  32636. procedure TICAP3_IC3CON.setICTMR; inline;
  32637. begin
  32638. pTDefRegMap(@Self)^.&set := $00000080;
  32639. end;
  32640. procedure TICAP3_IC3CON.clearICTMR; inline;
  32641. begin
  32642. pTDefRegMap(@Self)^.clr := $00000080;
  32643. end;
  32644. procedure TICAP3_IC3CON.setICTMR(thebits : TBits_1); inline;
  32645. begin
  32646. if thebits = 0 then
  32647. pTDefRegMap(@Self)^.clr := $00000080
  32648. else
  32649. pTDefRegMap(@Self)^.&set := $00000080;
  32650. end;
  32651. function TICAP3_IC3CON.getICTMR : TBits_1; inline;
  32652. begin
  32653. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32654. end;
  32655. procedure TICAP3_IC3CON.setC32; inline;
  32656. begin
  32657. pTDefRegMap(@Self)^.&set := $00000100;
  32658. end;
  32659. procedure TICAP3_IC3CON.clearC32; inline;
  32660. begin
  32661. pTDefRegMap(@Self)^.clr := $00000100;
  32662. end;
  32663. procedure TICAP3_IC3CON.setC32(thebits : TBits_1); inline;
  32664. begin
  32665. if thebits = 0 then
  32666. pTDefRegMap(@Self)^.clr := $00000100
  32667. else
  32668. pTDefRegMap(@Self)^.&set := $00000100;
  32669. end;
  32670. function TICAP3_IC3CON.getC32 : TBits_1; inline;
  32671. begin
  32672. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32673. end;
  32674. procedure TICAP3_IC3CON.setFEDGE; inline;
  32675. begin
  32676. pTDefRegMap(@Self)^.&set := $00000200;
  32677. end;
  32678. procedure TICAP3_IC3CON.clearFEDGE; inline;
  32679. begin
  32680. pTDefRegMap(@Self)^.clr := $00000200;
  32681. end;
  32682. procedure TICAP3_IC3CON.setFEDGE(thebits : TBits_1); inline;
  32683. begin
  32684. if thebits = 0 then
  32685. pTDefRegMap(@Self)^.clr := $00000200
  32686. else
  32687. pTDefRegMap(@Self)^.&set := $00000200;
  32688. end;
  32689. function TICAP3_IC3CON.getFEDGE : TBits_1; inline;
  32690. begin
  32691. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32692. end;
  32693. procedure TICAP3_IC3CON.setSIDL; inline;
  32694. begin
  32695. pTDefRegMap(@Self)^.&set := $00002000;
  32696. end;
  32697. procedure TICAP3_IC3CON.clearSIDL; inline;
  32698. begin
  32699. pTDefRegMap(@Self)^.clr := $00002000;
  32700. end;
  32701. procedure TICAP3_IC3CON.setSIDL(thebits : TBits_1); inline;
  32702. begin
  32703. if thebits = 0 then
  32704. pTDefRegMap(@Self)^.clr := $00002000
  32705. else
  32706. pTDefRegMap(@Self)^.&set := $00002000;
  32707. end;
  32708. function TICAP3_IC3CON.getSIDL : TBits_1; inline;
  32709. begin
  32710. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32711. end;
  32712. procedure TICAP3_IC3CON.setON; inline;
  32713. begin
  32714. pTDefRegMap(@Self)^.&set := $00008000;
  32715. end;
  32716. procedure TICAP3_IC3CON.clearON; inline;
  32717. begin
  32718. pTDefRegMap(@Self)^.clr := $00008000;
  32719. end;
  32720. procedure TICAP3_IC3CON.setON(thebits : TBits_1); inline;
  32721. begin
  32722. if thebits = 0 then
  32723. pTDefRegMap(@Self)^.clr := $00008000
  32724. else
  32725. pTDefRegMap(@Self)^.&set := $00008000;
  32726. end;
  32727. function TICAP3_IC3CON.getON : TBits_1; inline;
  32728. begin
  32729. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  32730. end;
  32731. procedure TICAP3_IC3CON.setICM0; inline;
  32732. begin
  32733. pTDefRegMap(@Self)^.&set := $00000001;
  32734. end;
  32735. procedure TICAP3_IC3CON.clearICM0; inline;
  32736. begin
  32737. pTDefRegMap(@Self)^.clr := $00000001;
  32738. end;
  32739. procedure TICAP3_IC3CON.setICM0(thebits : TBits_1); inline;
  32740. begin
  32741. if thebits = 0 then
  32742. pTDefRegMap(@Self)^.clr := $00000001
  32743. else
  32744. pTDefRegMap(@Self)^.&set := $00000001;
  32745. end;
  32746. function TICAP3_IC3CON.getICM0 : TBits_1; inline;
  32747. begin
  32748. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  32749. end;
  32750. procedure TICAP3_IC3CON.setICM1; inline;
  32751. begin
  32752. pTDefRegMap(@Self)^.&set := $00000002;
  32753. end;
  32754. procedure TICAP3_IC3CON.clearICM1; inline;
  32755. begin
  32756. pTDefRegMap(@Self)^.clr := $00000002;
  32757. end;
  32758. procedure TICAP3_IC3CON.setICM1(thebits : TBits_1); inline;
  32759. begin
  32760. if thebits = 0 then
  32761. pTDefRegMap(@Self)^.clr := $00000002
  32762. else
  32763. pTDefRegMap(@Self)^.&set := $00000002;
  32764. end;
  32765. function TICAP3_IC3CON.getICM1 : TBits_1; inline;
  32766. begin
  32767. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  32768. end;
  32769. procedure TICAP3_IC3CON.setICM2; inline;
  32770. begin
  32771. pTDefRegMap(@Self)^.&set := $00000004;
  32772. end;
  32773. procedure TICAP3_IC3CON.clearICM2; inline;
  32774. begin
  32775. pTDefRegMap(@Self)^.clr := $00000004;
  32776. end;
  32777. procedure TICAP3_IC3CON.setICM2(thebits : TBits_1); inline;
  32778. begin
  32779. if thebits = 0 then
  32780. pTDefRegMap(@Self)^.clr := $00000004
  32781. else
  32782. pTDefRegMap(@Self)^.&set := $00000004;
  32783. end;
  32784. function TICAP3_IC3CON.getICM2 : TBits_1; inline;
  32785. begin
  32786. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  32787. end;
  32788. procedure TICAP3_IC3CON.setICI0; inline;
  32789. begin
  32790. pTDefRegMap(@Self)^.&set := $00000020;
  32791. end;
  32792. procedure TICAP3_IC3CON.clearICI0; inline;
  32793. begin
  32794. pTDefRegMap(@Self)^.clr := $00000020;
  32795. end;
  32796. procedure TICAP3_IC3CON.setICI0(thebits : TBits_1); inline;
  32797. begin
  32798. if thebits = 0 then
  32799. pTDefRegMap(@Self)^.clr := $00000020
  32800. else
  32801. pTDefRegMap(@Self)^.&set := $00000020;
  32802. end;
  32803. function TICAP3_IC3CON.getICI0 : TBits_1; inline;
  32804. begin
  32805. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  32806. end;
  32807. procedure TICAP3_IC3CON.setICI1; inline;
  32808. begin
  32809. pTDefRegMap(@Self)^.&set := $00000040;
  32810. end;
  32811. procedure TICAP3_IC3CON.clearICI1; inline;
  32812. begin
  32813. pTDefRegMap(@Self)^.clr := $00000040;
  32814. end;
  32815. procedure TICAP3_IC3CON.setICI1(thebits : TBits_1); inline;
  32816. begin
  32817. if thebits = 0 then
  32818. pTDefRegMap(@Self)^.clr := $00000040
  32819. else
  32820. pTDefRegMap(@Self)^.&set := $00000040;
  32821. end;
  32822. function TICAP3_IC3CON.getICI1 : TBits_1; inline;
  32823. begin
  32824. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  32825. end;
  32826. procedure TICAP3_IC3CON.setICSIDL; inline;
  32827. begin
  32828. pTDefRegMap(@Self)^.&set := $00002000;
  32829. end;
  32830. procedure TICAP3_IC3CON.clearICSIDL; inline;
  32831. begin
  32832. pTDefRegMap(@Self)^.clr := $00002000;
  32833. end;
  32834. procedure TICAP3_IC3CON.setICSIDL(thebits : TBits_1); inline;
  32835. begin
  32836. if thebits = 0 then
  32837. pTDefRegMap(@Self)^.clr := $00002000
  32838. else
  32839. pTDefRegMap(@Self)^.&set := $00002000;
  32840. end;
  32841. function TICAP3_IC3CON.getICSIDL : TBits_1; inline;
  32842. begin
  32843. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32844. end;
  32845. procedure TICAP3_IC3CON.setw(thebits : TBits_32); inline;
  32846. begin
  32847. pTDefRegMap(@Self)^.val := thebits;
  32848. end;
  32849. function TICAP3_IC3CON.getw : TBits_32; inline;
  32850. begin
  32851. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  32852. end;
  32853. procedure TICAP4_IC4CON.setICM(thebits : TBits_3); inline;
  32854. begin
  32855. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  32856. end;
  32857. function TICAP4_IC4CON.getICM : TBits_3; inline;
  32858. begin
  32859. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  32860. end;
  32861. procedure TICAP4_IC4CON.setICBNE; inline;
  32862. begin
  32863. pTDefRegMap(@Self)^.&set := $00000008;
  32864. end;
  32865. procedure TICAP4_IC4CON.clearICBNE; inline;
  32866. begin
  32867. pTDefRegMap(@Self)^.clr := $00000008;
  32868. end;
  32869. procedure TICAP4_IC4CON.setICBNE(thebits : TBits_1); inline;
  32870. begin
  32871. if thebits = 0 then
  32872. pTDefRegMap(@Self)^.clr := $00000008
  32873. else
  32874. pTDefRegMap(@Self)^.&set := $00000008;
  32875. end;
  32876. function TICAP4_IC4CON.getICBNE : TBits_1; inline;
  32877. begin
  32878. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  32879. end;
  32880. procedure TICAP4_IC4CON.setICOV; inline;
  32881. begin
  32882. pTDefRegMap(@Self)^.&set := $00000010;
  32883. end;
  32884. procedure TICAP4_IC4CON.clearICOV; inline;
  32885. begin
  32886. pTDefRegMap(@Self)^.clr := $00000010;
  32887. end;
  32888. procedure TICAP4_IC4CON.setICOV(thebits : TBits_1); inline;
  32889. begin
  32890. if thebits = 0 then
  32891. pTDefRegMap(@Self)^.clr := $00000010
  32892. else
  32893. pTDefRegMap(@Self)^.&set := $00000010;
  32894. end;
  32895. function TICAP4_IC4CON.getICOV : TBits_1; inline;
  32896. begin
  32897. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  32898. end;
  32899. procedure TICAP4_IC4CON.setICI(thebits : TBits_2); inline;
  32900. begin
  32901. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  32902. end;
  32903. function TICAP4_IC4CON.getICI : TBits_2; inline;
  32904. begin
  32905. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  32906. end;
  32907. procedure TICAP4_IC4CON.setICTMR; inline;
  32908. begin
  32909. pTDefRegMap(@Self)^.&set := $00000080;
  32910. end;
  32911. procedure TICAP4_IC4CON.clearICTMR; inline;
  32912. begin
  32913. pTDefRegMap(@Self)^.clr := $00000080;
  32914. end;
  32915. procedure TICAP4_IC4CON.setICTMR(thebits : TBits_1); inline;
  32916. begin
  32917. if thebits = 0 then
  32918. pTDefRegMap(@Self)^.clr := $00000080
  32919. else
  32920. pTDefRegMap(@Self)^.&set := $00000080;
  32921. end;
  32922. function TICAP4_IC4CON.getICTMR : TBits_1; inline;
  32923. begin
  32924. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  32925. end;
  32926. procedure TICAP4_IC4CON.setC32; inline;
  32927. begin
  32928. pTDefRegMap(@Self)^.&set := $00000100;
  32929. end;
  32930. procedure TICAP4_IC4CON.clearC32; inline;
  32931. begin
  32932. pTDefRegMap(@Self)^.clr := $00000100;
  32933. end;
  32934. procedure TICAP4_IC4CON.setC32(thebits : TBits_1); inline;
  32935. begin
  32936. if thebits = 0 then
  32937. pTDefRegMap(@Self)^.clr := $00000100
  32938. else
  32939. pTDefRegMap(@Self)^.&set := $00000100;
  32940. end;
  32941. function TICAP4_IC4CON.getC32 : TBits_1; inline;
  32942. begin
  32943. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  32944. end;
  32945. procedure TICAP4_IC4CON.setFEDGE; inline;
  32946. begin
  32947. pTDefRegMap(@Self)^.&set := $00000200;
  32948. end;
  32949. procedure TICAP4_IC4CON.clearFEDGE; inline;
  32950. begin
  32951. pTDefRegMap(@Self)^.clr := $00000200;
  32952. end;
  32953. procedure TICAP4_IC4CON.setFEDGE(thebits : TBits_1); inline;
  32954. begin
  32955. if thebits = 0 then
  32956. pTDefRegMap(@Self)^.clr := $00000200
  32957. else
  32958. pTDefRegMap(@Self)^.&set := $00000200;
  32959. end;
  32960. function TICAP4_IC4CON.getFEDGE : TBits_1; inline;
  32961. begin
  32962. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  32963. end;
  32964. procedure TICAP4_IC4CON.setSIDL; inline;
  32965. begin
  32966. pTDefRegMap(@Self)^.&set := $00002000;
  32967. end;
  32968. procedure TICAP4_IC4CON.clearSIDL; inline;
  32969. begin
  32970. pTDefRegMap(@Self)^.clr := $00002000;
  32971. end;
  32972. procedure TICAP4_IC4CON.setSIDL(thebits : TBits_1); inline;
  32973. begin
  32974. if thebits = 0 then
  32975. pTDefRegMap(@Self)^.clr := $00002000
  32976. else
  32977. pTDefRegMap(@Self)^.&set := $00002000;
  32978. end;
  32979. function TICAP4_IC4CON.getSIDL : TBits_1; inline;
  32980. begin
  32981. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  32982. end;
  32983. procedure TICAP4_IC4CON.setON; inline;
  32984. begin
  32985. pTDefRegMap(@Self)^.&set := $00008000;
  32986. end;
  32987. procedure TICAP4_IC4CON.clearON; inline;
  32988. begin
  32989. pTDefRegMap(@Self)^.clr := $00008000;
  32990. end;
  32991. procedure TICAP4_IC4CON.setON(thebits : TBits_1); inline;
  32992. begin
  32993. if thebits = 0 then
  32994. pTDefRegMap(@Self)^.clr := $00008000
  32995. else
  32996. pTDefRegMap(@Self)^.&set := $00008000;
  32997. end;
  32998. function TICAP4_IC4CON.getON : TBits_1; inline;
  32999. begin
  33000. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33001. end;
  33002. procedure TICAP4_IC4CON.setICM0; inline;
  33003. begin
  33004. pTDefRegMap(@Self)^.&set := $00000001;
  33005. end;
  33006. procedure TICAP4_IC4CON.clearICM0; inline;
  33007. begin
  33008. pTDefRegMap(@Self)^.clr := $00000001;
  33009. end;
  33010. procedure TICAP4_IC4CON.setICM0(thebits : TBits_1); inline;
  33011. begin
  33012. if thebits = 0 then
  33013. pTDefRegMap(@Self)^.clr := $00000001
  33014. else
  33015. pTDefRegMap(@Self)^.&set := $00000001;
  33016. end;
  33017. function TICAP4_IC4CON.getICM0 : TBits_1; inline;
  33018. begin
  33019. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33020. end;
  33021. procedure TICAP4_IC4CON.setICM1; inline;
  33022. begin
  33023. pTDefRegMap(@Self)^.&set := $00000002;
  33024. end;
  33025. procedure TICAP4_IC4CON.clearICM1; inline;
  33026. begin
  33027. pTDefRegMap(@Self)^.clr := $00000002;
  33028. end;
  33029. procedure TICAP4_IC4CON.setICM1(thebits : TBits_1); inline;
  33030. begin
  33031. if thebits = 0 then
  33032. pTDefRegMap(@Self)^.clr := $00000002
  33033. else
  33034. pTDefRegMap(@Self)^.&set := $00000002;
  33035. end;
  33036. function TICAP4_IC4CON.getICM1 : TBits_1; inline;
  33037. begin
  33038. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33039. end;
  33040. procedure TICAP4_IC4CON.setICM2; inline;
  33041. begin
  33042. pTDefRegMap(@Self)^.&set := $00000004;
  33043. end;
  33044. procedure TICAP4_IC4CON.clearICM2; inline;
  33045. begin
  33046. pTDefRegMap(@Self)^.clr := $00000004;
  33047. end;
  33048. procedure TICAP4_IC4CON.setICM2(thebits : TBits_1); inline;
  33049. begin
  33050. if thebits = 0 then
  33051. pTDefRegMap(@Self)^.clr := $00000004
  33052. else
  33053. pTDefRegMap(@Self)^.&set := $00000004;
  33054. end;
  33055. function TICAP4_IC4CON.getICM2 : TBits_1; inline;
  33056. begin
  33057. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33058. end;
  33059. procedure TICAP4_IC4CON.setICI0; inline;
  33060. begin
  33061. pTDefRegMap(@Self)^.&set := $00000020;
  33062. end;
  33063. procedure TICAP4_IC4CON.clearICI0; inline;
  33064. begin
  33065. pTDefRegMap(@Self)^.clr := $00000020;
  33066. end;
  33067. procedure TICAP4_IC4CON.setICI0(thebits : TBits_1); inline;
  33068. begin
  33069. if thebits = 0 then
  33070. pTDefRegMap(@Self)^.clr := $00000020
  33071. else
  33072. pTDefRegMap(@Self)^.&set := $00000020;
  33073. end;
  33074. function TICAP4_IC4CON.getICI0 : TBits_1; inline;
  33075. begin
  33076. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33077. end;
  33078. procedure TICAP4_IC4CON.setICI1; inline;
  33079. begin
  33080. pTDefRegMap(@Self)^.&set := $00000040;
  33081. end;
  33082. procedure TICAP4_IC4CON.clearICI1; inline;
  33083. begin
  33084. pTDefRegMap(@Self)^.clr := $00000040;
  33085. end;
  33086. procedure TICAP4_IC4CON.setICI1(thebits : TBits_1); inline;
  33087. begin
  33088. if thebits = 0 then
  33089. pTDefRegMap(@Self)^.clr := $00000040
  33090. else
  33091. pTDefRegMap(@Self)^.&set := $00000040;
  33092. end;
  33093. function TICAP4_IC4CON.getICI1 : TBits_1; inline;
  33094. begin
  33095. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33096. end;
  33097. procedure TICAP4_IC4CON.setICSIDL; inline;
  33098. begin
  33099. pTDefRegMap(@Self)^.&set := $00002000;
  33100. end;
  33101. procedure TICAP4_IC4CON.clearICSIDL; inline;
  33102. begin
  33103. pTDefRegMap(@Self)^.clr := $00002000;
  33104. end;
  33105. procedure TICAP4_IC4CON.setICSIDL(thebits : TBits_1); inline;
  33106. begin
  33107. if thebits = 0 then
  33108. pTDefRegMap(@Self)^.clr := $00002000
  33109. else
  33110. pTDefRegMap(@Self)^.&set := $00002000;
  33111. end;
  33112. function TICAP4_IC4CON.getICSIDL : TBits_1; inline;
  33113. begin
  33114. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33115. end;
  33116. procedure TICAP4_IC4CON.setw(thebits : TBits_32); inline;
  33117. begin
  33118. pTDefRegMap(@Self)^.val := thebits;
  33119. end;
  33120. function TICAP4_IC4CON.getw : TBits_32; inline;
  33121. begin
  33122. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33123. end;
  33124. procedure TICAP5_IC5CON.setICM(thebits : TBits_3); inline;
  33125. begin
  33126. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33127. end;
  33128. function TICAP5_IC5CON.getICM : TBits_3; inline;
  33129. begin
  33130. getICM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33131. end;
  33132. procedure TICAP5_IC5CON.setICBNE; inline;
  33133. begin
  33134. pTDefRegMap(@Self)^.&set := $00000008;
  33135. end;
  33136. procedure TICAP5_IC5CON.clearICBNE; inline;
  33137. begin
  33138. pTDefRegMap(@Self)^.clr := $00000008;
  33139. end;
  33140. procedure TICAP5_IC5CON.setICBNE(thebits : TBits_1); inline;
  33141. begin
  33142. if thebits = 0 then
  33143. pTDefRegMap(@Self)^.clr := $00000008
  33144. else
  33145. pTDefRegMap(@Self)^.&set := $00000008;
  33146. end;
  33147. function TICAP5_IC5CON.getICBNE : TBits_1; inline;
  33148. begin
  33149. getICBNE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33150. end;
  33151. procedure TICAP5_IC5CON.setICOV; inline;
  33152. begin
  33153. pTDefRegMap(@Self)^.&set := $00000010;
  33154. end;
  33155. procedure TICAP5_IC5CON.clearICOV; inline;
  33156. begin
  33157. pTDefRegMap(@Self)^.clr := $00000010;
  33158. end;
  33159. procedure TICAP5_IC5CON.setICOV(thebits : TBits_1); inline;
  33160. begin
  33161. if thebits = 0 then
  33162. pTDefRegMap(@Self)^.clr := $00000010
  33163. else
  33164. pTDefRegMap(@Self)^.&set := $00000010;
  33165. end;
  33166. function TICAP5_IC5CON.getICOV : TBits_1; inline;
  33167. begin
  33168. getICOV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33169. end;
  33170. procedure TICAP5_IC5CON.setICI(thebits : TBits_2); inline;
  33171. begin
  33172. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  33173. end;
  33174. function TICAP5_IC5CON.getICI : TBits_2; inline;
  33175. begin
  33176. getICI := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  33177. end;
  33178. procedure TICAP5_IC5CON.setICTMR; inline;
  33179. begin
  33180. pTDefRegMap(@Self)^.&set := $00000080;
  33181. end;
  33182. procedure TICAP5_IC5CON.clearICTMR; inline;
  33183. begin
  33184. pTDefRegMap(@Self)^.clr := $00000080;
  33185. end;
  33186. procedure TICAP5_IC5CON.setICTMR(thebits : TBits_1); inline;
  33187. begin
  33188. if thebits = 0 then
  33189. pTDefRegMap(@Self)^.clr := $00000080
  33190. else
  33191. pTDefRegMap(@Self)^.&set := $00000080;
  33192. end;
  33193. function TICAP5_IC5CON.getICTMR : TBits_1; inline;
  33194. begin
  33195. getICTMR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  33196. end;
  33197. procedure TICAP5_IC5CON.setC32; inline;
  33198. begin
  33199. pTDefRegMap(@Self)^.&set := $00000100;
  33200. end;
  33201. procedure TICAP5_IC5CON.clearC32; inline;
  33202. begin
  33203. pTDefRegMap(@Self)^.clr := $00000100;
  33204. end;
  33205. procedure TICAP5_IC5CON.setC32(thebits : TBits_1); inline;
  33206. begin
  33207. if thebits = 0 then
  33208. pTDefRegMap(@Self)^.clr := $00000100
  33209. else
  33210. pTDefRegMap(@Self)^.&set := $00000100;
  33211. end;
  33212. function TICAP5_IC5CON.getC32 : TBits_1; inline;
  33213. begin
  33214. getC32 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  33215. end;
  33216. procedure TICAP5_IC5CON.setFEDGE; inline;
  33217. begin
  33218. pTDefRegMap(@Self)^.&set := $00000200;
  33219. end;
  33220. procedure TICAP5_IC5CON.clearFEDGE; inline;
  33221. begin
  33222. pTDefRegMap(@Self)^.clr := $00000200;
  33223. end;
  33224. procedure TICAP5_IC5CON.setFEDGE(thebits : TBits_1); inline;
  33225. begin
  33226. if thebits = 0 then
  33227. pTDefRegMap(@Self)^.clr := $00000200
  33228. else
  33229. pTDefRegMap(@Self)^.&set := $00000200;
  33230. end;
  33231. function TICAP5_IC5CON.getFEDGE : TBits_1; inline;
  33232. begin
  33233. getFEDGE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  33234. end;
  33235. procedure TICAP5_IC5CON.setSIDL; inline;
  33236. begin
  33237. pTDefRegMap(@Self)^.&set := $00002000;
  33238. end;
  33239. procedure TICAP5_IC5CON.clearSIDL; inline;
  33240. begin
  33241. pTDefRegMap(@Self)^.clr := $00002000;
  33242. end;
  33243. procedure TICAP5_IC5CON.setSIDL(thebits : TBits_1); inline;
  33244. begin
  33245. if thebits = 0 then
  33246. pTDefRegMap(@Self)^.clr := $00002000
  33247. else
  33248. pTDefRegMap(@Self)^.&set := $00002000;
  33249. end;
  33250. function TICAP5_IC5CON.getSIDL : TBits_1; inline;
  33251. begin
  33252. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33253. end;
  33254. procedure TICAP5_IC5CON.setON; inline;
  33255. begin
  33256. pTDefRegMap(@Self)^.&set := $00008000;
  33257. end;
  33258. procedure TICAP5_IC5CON.clearON; inline;
  33259. begin
  33260. pTDefRegMap(@Self)^.clr := $00008000;
  33261. end;
  33262. procedure TICAP5_IC5CON.setON(thebits : TBits_1); inline;
  33263. begin
  33264. if thebits = 0 then
  33265. pTDefRegMap(@Self)^.clr := $00008000
  33266. else
  33267. pTDefRegMap(@Self)^.&set := $00008000;
  33268. end;
  33269. function TICAP5_IC5CON.getON : TBits_1; inline;
  33270. begin
  33271. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33272. end;
  33273. procedure TICAP5_IC5CON.setICM0; inline;
  33274. begin
  33275. pTDefRegMap(@Self)^.&set := $00000001;
  33276. end;
  33277. procedure TICAP5_IC5CON.clearICM0; inline;
  33278. begin
  33279. pTDefRegMap(@Self)^.clr := $00000001;
  33280. end;
  33281. procedure TICAP5_IC5CON.setICM0(thebits : TBits_1); inline;
  33282. begin
  33283. if thebits = 0 then
  33284. pTDefRegMap(@Self)^.clr := $00000001
  33285. else
  33286. pTDefRegMap(@Self)^.&set := $00000001;
  33287. end;
  33288. function TICAP5_IC5CON.getICM0 : TBits_1; inline;
  33289. begin
  33290. getICM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33291. end;
  33292. procedure TICAP5_IC5CON.setICM1; inline;
  33293. begin
  33294. pTDefRegMap(@Self)^.&set := $00000002;
  33295. end;
  33296. procedure TICAP5_IC5CON.clearICM1; inline;
  33297. begin
  33298. pTDefRegMap(@Self)^.clr := $00000002;
  33299. end;
  33300. procedure TICAP5_IC5CON.setICM1(thebits : TBits_1); inline;
  33301. begin
  33302. if thebits = 0 then
  33303. pTDefRegMap(@Self)^.clr := $00000002
  33304. else
  33305. pTDefRegMap(@Self)^.&set := $00000002;
  33306. end;
  33307. function TICAP5_IC5CON.getICM1 : TBits_1; inline;
  33308. begin
  33309. getICM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33310. end;
  33311. procedure TICAP5_IC5CON.setICM2; inline;
  33312. begin
  33313. pTDefRegMap(@Self)^.&set := $00000004;
  33314. end;
  33315. procedure TICAP5_IC5CON.clearICM2; inline;
  33316. begin
  33317. pTDefRegMap(@Self)^.clr := $00000004;
  33318. end;
  33319. procedure TICAP5_IC5CON.setICM2(thebits : TBits_1); inline;
  33320. begin
  33321. if thebits = 0 then
  33322. pTDefRegMap(@Self)^.clr := $00000004
  33323. else
  33324. pTDefRegMap(@Self)^.&set := $00000004;
  33325. end;
  33326. function TICAP5_IC5CON.getICM2 : TBits_1; inline;
  33327. begin
  33328. getICM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33329. end;
  33330. procedure TICAP5_IC5CON.setICI0; inline;
  33331. begin
  33332. pTDefRegMap(@Self)^.&set := $00000020;
  33333. end;
  33334. procedure TICAP5_IC5CON.clearICI0; inline;
  33335. begin
  33336. pTDefRegMap(@Self)^.clr := $00000020;
  33337. end;
  33338. procedure TICAP5_IC5CON.setICI0(thebits : TBits_1); inline;
  33339. begin
  33340. if thebits = 0 then
  33341. pTDefRegMap(@Self)^.clr := $00000020
  33342. else
  33343. pTDefRegMap(@Self)^.&set := $00000020;
  33344. end;
  33345. function TICAP5_IC5CON.getICI0 : TBits_1; inline;
  33346. begin
  33347. getICI0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33348. end;
  33349. procedure TICAP5_IC5CON.setICI1; inline;
  33350. begin
  33351. pTDefRegMap(@Self)^.&set := $00000040;
  33352. end;
  33353. procedure TICAP5_IC5CON.clearICI1; inline;
  33354. begin
  33355. pTDefRegMap(@Self)^.clr := $00000040;
  33356. end;
  33357. procedure TICAP5_IC5CON.setICI1(thebits : TBits_1); inline;
  33358. begin
  33359. if thebits = 0 then
  33360. pTDefRegMap(@Self)^.clr := $00000040
  33361. else
  33362. pTDefRegMap(@Self)^.&set := $00000040;
  33363. end;
  33364. function TICAP5_IC5CON.getICI1 : TBits_1; inline;
  33365. begin
  33366. getICI1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  33367. end;
  33368. procedure TICAP5_IC5CON.setICSIDL; inline;
  33369. begin
  33370. pTDefRegMap(@Self)^.&set := $00002000;
  33371. end;
  33372. procedure TICAP5_IC5CON.clearICSIDL; inline;
  33373. begin
  33374. pTDefRegMap(@Self)^.clr := $00002000;
  33375. end;
  33376. procedure TICAP5_IC5CON.setICSIDL(thebits : TBits_1); inline;
  33377. begin
  33378. if thebits = 0 then
  33379. pTDefRegMap(@Self)^.clr := $00002000
  33380. else
  33381. pTDefRegMap(@Self)^.&set := $00002000;
  33382. end;
  33383. function TICAP5_IC5CON.getICSIDL : TBits_1; inline;
  33384. begin
  33385. getICSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33386. end;
  33387. procedure TICAP5_IC5CON.setw(thebits : TBits_32); inline;
  33388. begin
  33389. pTDefRegMap(@Self)^.val := thebits;
  33390. end;
  33391. function TICAP5_IC5CON.getw : TBits_32; inline;
  33392. begin
  33393. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33394. end;
  33395. procedure TOCMP1_OC1CON.setOCM(thebits : TBits_3); inline;
  33396. begin
  33397. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33398. end;
  33399. function TOCMP1_OC1CON.getOCM : TBits_3; inline;
  33400. begin
  33401. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33402. end;
  33403. procedure TOCMP1_OC1CON.setOCTSEL; inline;
  33404. begin
  33405. pTDefRegMap(@Self)^.&set := $00000008;
  33406. end;
  33407. procedure TOCMP1_OC1CON.clearOCTSEL; inline;
  33408. begin
  33409. pTDefRegMap(@Self)^.clr := $00000008;
  33410. end;
  33411. procedure TOCMP1_OC1CON.setOCTSEL(thebits : TBits_1); inline;
  33412. begin
  33413. if thebits = 0 then
  33414. pTDefRegMap(@Self)^.clr := $00000008
  33415. else
  33416. pTDefRegMap(@Self)^.&set := $00000008;
  33417. end;
  33418. function TOCMP1_OC1CON.getOCTSEL : TBits_1; inline;
  33419. begin
  33420. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33421. end;
  33422. procedure TOCMP1_OC1CON.setOCFLT; inline;
  33423. begin
  33424. pTDefRegMap(@Self)^.&set := $00000010;
  33425. end;
  33426. procedure TOCMP1_OC1CON.clearOCFLT; inline;
  33427. begin
  33428. pTDefRegMap(@Self)^.clr := $00000010;
  33429. end;
  33430. procedure TOCMP1_OC1CON.setOCFLT(thebits : TBits_1); inline;
  33431. begin
  33432. if thebits = 0 then
  33433. pTDefRegMap(@Self)^.clr := $00000010
  33434. else
  33435. pTDefRegMap(@Self)^.&set := $00000010;
  33436. end;
  33437. function TOCMP1_OC1CON.getOCFLT : TBits_1; inline;
  33438. begin
  33439. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33440. end;
  33441. procedure TOCMP1_OC1CON.setOC32; inline;
  33442. begin
  33443. pTDefRegMap(@Self)^.&set := $00000020;
  33444. end;
  33445. procedure TOCMP1_OC1CON.clearOC32; inline;
  33446. begin
  33447. pTDefRegMap(@Self)^.clr := $00000020;
  33448. end;
  33449. procedure TOCMP1_OC1CON.setOC32(thebits : TBits_1); inline;
  33450. begin
  33451. if thebits = 0 then
  33452. pTDefRegMap(@Self)^.clr := $00000020
  33453. else
  33454. pTDefRegMap(@Self)^.&set := $00000020;
  33455. end;
  33456. function TOCMP1_OC1CON.getOC32 : TBits_1; inline;
  33457. begin
  33458. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33459. end;
  33460. procedure TOCMP1_OC1CON.setSIDL; inline;
  33461. begin
  33462. pTDefRegMap(@Self)^.&set := $00002000;
  33463. end;
  33464. procedure TOCMP1_OC1CON.clearSIDL; inline;
  33465. begin
  33466. pTDefRegMap(@Self)^.clr := $00002000;
  33467. end;
  33468. procedure TOCMP1_OC1CON.setSIDL(thebits : TBits_1); inline;
  33469. begin
  33470. if thebits = 0 then
  33471. pTDefRegMap(@Self)^.clr := $00002000
  33472. else
  33473. pTDefRegMap(@Self)^.&set := $00002000;
  33474. end;
  33475. function TOCMP1_OC1CON.getSIDL : TBits_1; inline;
  33476. begin
  33477. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33478. end;
  33479. procedure TOCMP1_OC1CON.setON; inline;
  33480. begin
  33481. pTDefRegMap(@Self)^.&set := $00008000;
  33482. end;
  33483. procedure TOCMP1_OC1CON.clearON; inline;
  33484. begin
  33485. pTDefRegMap(@Self)^.clr := $00008000;
  33486. end;
  33487. procedure TOCMP1_OC1CON.setON(thebits : TBits_1); inline;
  33488. begin
  33489. if thebits = 0 then
  33490. pTDefRegMap(@Self)^.clr := $00008000
  33491. else
  33492. pTDefRegMap(@Self)^.&set := $00008000;
  33493. end;
  33494. function TOCMP1_OC1CON.getON : TBits_1; inline;
  33495. begin
  33496. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33497. end;
  33498. procedure TOCMP1_OC1CON.setOCM0; inline;
  33499. begin
  33500. pTDefRegMap(@Self)^.&set := $00000001;
  33501. end;
  33502. procedure TOCMP1_OC1CON.clearOCM0; inline;
  33503. begin
  33504. pTDefRegMap(@Self)^.clr := $00000001;
  33505. end;
  33506. procedure TOCMP1_OC1CON.setOCM0(thebits : TBits_1); inline;
  33507. begin
  33508. if thebits = 0 then
  33509. pTDefRegMap(@Self)^.clr := $00000001
  33510. else
  33511. pTDefRegMap(@Self)^.&set := $00000001;
  33512. end;
  33513. function TOCMP1_OC1CON.getOCM0 : TBits_1; inline;
  33514. begin
  33515. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33516. end;
  33517. procedure TOCMP1_OC1CON.setOCM1; inline;
  33518. begin
  33519. pTDefRegMap(@Self)^.&set := $00000002;
  33520. end;
  33521. procedure TOCMP1_OC1CON.clearOCM1; inline;
  33522. begin
  33523. pTDefRegMap(@Self)^.clr := $00000002;
  33524. end;
  33525. procedure TOCMP1_OC1CON.setOCM1(thebits : TBits_1); inline;
  33526. begin
  33527. if thebits = 0 then
  33528. pTDefRegMap(@Self)^.clr := $00000002
  33529. else
  33530. pTDefRegMap(@Self)^.&set := $00000002;
  33531. end;
  33532. function TOCMP1_OC1CON.getOCM1 : TBits_1; inline;
  33533. begin
  33534. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33535. end;
  33536. procedure TOCMP1_OC1CON.setOCM2; inline;
  33537. begin
  33538. pTDefRegMap(@Self)^.&set := $00000004;
  33539. end;
  33540. procedure TOCMP1_OC1CON.clearOCM2; inline;
  33541. begin
  33542. pTDefRegMap(@Self)^.clr := $00000004;
  33543. end;
  33544. procedure TOCMP1_OC1CON.setOCM2(thebits : TBits_1); inline;
  33545. begin
  33546. if thebits = 0 then
  33547. pTDefRegMap(@Self)^.clr := $00000004
  33548. else
  33549. pTDefRegMap(@Self)^.&set := $00000004;
  33550. end;
  33551. function TOCMP1_OC1CON.getOCM2 : TBits_1; inline;
  33552. begin
  33553. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33554. end;
  33555. procedure TOCMP1_OC1CON.setOCSIDL; inline;
  33556. begin
  33557. pTDefRegMap(@Self)^.&set := $00002000;
  33558. end;
  33559. procedure TOCMP1_OC1CON.clearOCSIDL; inline;
  33560. begin
  33561. pTDefRegMap(@Self)^.clr := $00002000;
  33562. end;
  33563. procedure TOCMP1_OC1CON.setOCSIDL(thebits : TBits_1); inline;
  33564. begin
  33565. if thebits = 0 then
  33566. pTDefRegMap(@Self)^.clr := $00002000
  33567. else
  33568. pTDefRegMap(@Self)^.&set := $00002000;
  33569. end;
  33570. function TOCMP1_OC1CON.getOCSIDL : TBits_1; inline;
  33571. begin
  33572. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33573. end;
  33574. procedure TOCMP1_OC1CON.setw(thebits : TBits_32); inline;
  33575. begin
  33576. pTDefRegMap(@Self)^.val := thebits;
  33577. end;
  33578. function TOCMP1_OC1CON.getw : TBits_32; inline;
  33579. begin
  33580. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33581. end;
  33582. procedure TOCMP2_OC2CON.setOCM(thebits : TBits_3); inline;
  33583. begin
  33584. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33585. end;
  33586. function TOCMP2_OC2CON.getOCM : TBits_3; inline;
  33587. begin
  33588. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33589. end;
  33590. procedure TOCMP2_OC2CON.setOCTSEL; inline;
  33591. begin
  33592. pTDefRegMap(@Self)^.&set := $00000008;
  33593. end;
  33594. procedure TOCMP2_OC2CON.clearOCTSEL; inline;
  33595. begin
  33596. pTDefRegMap(@Self)^.clr := $00000008;
  33597. end;
  33598. procedure TOCMP2_OC2CON.setOCTSEL(thebits : TBits_1); inline;
  33599. begin
  33600. if thebits = 0 then
  33601. pTDefRegMap(@Self)^.clr := $00000008
  33602. else
  33603. pTDefRegMap(@Self)^.&set := $00000008;
  33604. end;
  33605. function TOCMP2_OC2CON.getOCTSEL : TBits_1; inline;
  33606. begin
  33607. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33608. end;
  33609. procedure TOCMP2_OC2CON.setOCFLT; inline;
  33610. begin
  33611. pTDefRegMap(@Self)^.&set := $00000010;
  33612. end;
  33613. procedure TOCMP2_OC2CON.clearOCFLT; inline;
  33614. begin
  33615. pTDefRegMap(@Self)^.clr := $00000010;
  33616. end;
  33617. procedure TOCMP2_OC2CON.setOCFLT(thebits : TBits_1); inline;
  33618. begin
  33619. if thebits = 0 then
  33620. pTDefRegMap(@Self)^.clr := $00000010
  33621. else
  33622. pTDefRegMap(@Self)^.&set := $00000010;
  33623. end;
  33624. function TOCMP2_OC2CON.getOCFLT : TBits_1; inline;
  33625. begin
  33626. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33627. end;
  33628. procedure TOCMP2_OC2CON.setOC32; inline;
  33629. begin
  33630. pTDefRegMap(@Self)^.&set := $00000020;
  33631. end;
  33632. procedure TOCMP2_OC2CON.clearOC32; inline;
  33633. begin
  33634. pTDefRegMap(@Self)^.clr := $00000020;
  33635. end;
  33636. procedure TOCMP2_OC2CON.setOC32(thebits : TBits_1); inline;
  33637. begin
  33638. if thebits = 0 then
  33639. pTDefRegMap(@Self)^.clr := $00000020
  33640. else
  33641. pTDefRegMap(@Self)^.&set := $00000020;
  33642. end;
  33643. function TOCMP2_OC2CON.getOC32 : TBits_1; inline;
  33644. begin
  33645. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33646. end;
  33647. procedure TOCMP2_OC2CON.setSIDL; inline;
  33648. begin
  33649. pTDefRegMap(@Self)^.&set := $00002000;
  33650. end;
  33651. procedure TOCMP2_OC2CON.clearSIDL; inline;
  33652. begin
  33653. pTDefRegMap(@Self)^.clr := $00002000;
  33654. end;
  33655. procedure TOCMP2_OC2CON.setSIDL(thebits : TBits_1); inline;
  33656. begin
  33657. if thebits = 0 then
  33658. pTDefRegMap(@Self)^.clr := $00002000
  33659. else
  33660. pTDefRegMap(@Self)^.&set := $00002000;
  33661. end;
  33662. function TOCMP2_OC2CON.getSIDL : TBits_1; inline;
  33663. begin
  33664. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33665. end;
  33666. procedure TOCMP2_OC2CON.setON; inline;
  33667. begin
  33668. pTDefRegMap(@Self)^.&set := $00008000;
  33669. end;
  33670. procedure TOCMP2_OC2CON.clearON; inline;
  33671. begin
  33672. pTDefRegMap(@Self)^.clr := $00008000;
  33673. end;
  33674. procedure TOCMP2_OC2CON.setON(thebits : TBits_1); inline;
  33675. begin
  33676. if thebits = 0 then
  33677. pTDefRegMap(@Self)^.clr := $00008000
  33678. else
  33679. pTDefRegMap(@Self)^.&set := $00008000;
  33680. end;
  33681. function TOCMP2_OC2CON.getON : TBits_1; inline;
  33682. begin
  33683. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33684. end;
  33685. procedure TOCMP2_OC2CON.setOCM0; inline;
  33686. begin
  33687. pTDefRegMap(@Self)^.&set := $00000001;
  33688. end;
  33689. procedure TOCMP2_OC2CON.clearOCM0; inline;
  33690. begin
  33691. pTDefRegMap(@Self)^.clr := $00000001;
  33692. end;
  33693. procedure TOCMP2_OC2CON.setOCM0(thebits : TBits_1); inline;
  33694. begin
  33695. if thebits = 0 then
  33696. pTDefRegMap(@Self)^.clr := $00000001
  33697. else
  33698. pTDefRegMap(@Self)^.&set := $00000001;
  33699. end;
  33700. function TOCMP2_OC2CON.getOCM0 : TBits_1; inline;
  33701. begin
  33702. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33703. end;
  33704. procedure TOCMP2_OC2CON.setOCM1; inline;
  33705. begin
  33706. pTDefRegMap(@Self)^.&set := $00000002;
  33707. end;
  33708. procedure TOCMP2_OC2CON.clearOCM1; inline;
  33709. begin
  33710. pTDefRegMap(@Self)^.clr := $00000002;
  33711. end;
  33712. procedure TOCMP2_OC2CON.setOCM1(thebits : TBits_1); inline;
  33713. begin
  33714. if thebits = 0 then
  33715. pTDefRegMap(@Self)^.clr := $00000002
  33716. else
  33717. pTDefRegMap(@Self)^.&set := $00000002;
  33718. end;
  33719. function TOCMP2_OC2CON.getOCM1 : TBits_1; inline;
  33720. begin
  33721. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33722. end;
  33723. procedure TOCMP2_OC2CON.setOCM2; inline;
  33724. begin
  33725. pTDefRegMap(@Self)^.&set := $00000004;
  33726. end;
  33727. procedure TOCMP2_OC2CON.clearOCM2; inline;
  33728. begin
  33729. pTDefRegMap(@Self)^.clr := $00000004;
  33730. end;
  33731. procedure TOCMP2_OC2CON.setOCM2(thebits : TBits_1); inline;
  33732. begin
  33733. if thebits = 0 then
  33734. pTDefRegMap(@Self)^.clr := $00000004
  33735. else
  33736. pTDefRegMap(@Self)^.&set := $00000004;
  33737. end;
  33738. function TOCMP2_OC2CON.getOCM2 : TBits_1; inline;
  33739. begin
  33740. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33741. end;
  33742. procedure TOCMP2_OC2CON.setOCSIDL; inline;
  33743. begin
  33744. pTDefRegMap(@Self)^.&set := $00002000;
  33745. end;
  33746. procedure TOCMP2_OC2CON.clearOCSIDL; inline;
  33747. begin
  33748. pTDefRegMap(@Self)^.clr := $00002000;
  33749. end;
  33750. procedure TOCMP2_OC2CON.setOCSIDL(thebits : TBits_1); inline;
  33751. begin
  33752. if thebits = 0 then
  33753. pTDefRegMap(@Self)^.clr := $00002000
  33754. else
  33755. pTDefRegMap(@Self)^.&set := $00002000;
  33756. end;
  33757. function TOCMP2_OC2CON.getOCSIDL : TBits_1; inline;
  33758. begin
  33759. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33760. end;
  33761. procedure TOCMP2_OC2CON.setw(thebits : TBits_32); inline;
  33762. begin
  33763. pTDefRegMap(@Self)^.val := thebits;
  33764. end;
  33765. function TOCMP2_OC2CON.getw : TBits_32; inline;
  33766. begin
  33767. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33768. end;
  33769. procedure TOCMP3_OC3CON.setOCM(thebits : TBits_3); inline;
  33770. begin
  33771. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33772. end;
  33773. function TOCMP3_OC3CON.getOCM : TBits_3; inline;
  33774. begin
  33775. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33776. end;
  33777. procedure TOCMP3_OC3CON.setOCTSEL; inline;
  33778. begin
  33779. pTDefRegMap(@Self)^.&set := $00000008;
  33780. end;
  33781. procedure TOCMP3_OC3CON.clearOCTSEL; inline;
  33782. begin
  33783. pTDefRegMap(@Self)^.clr := $00000008;
  33784. end;
  33785. procedure TOCMP3_OC3CON.setOCTSEL(thebits : TBits_1); inline;
  33786. begin
  33787. if thebits = 0 then
  33788. pTDefRegMap(@Self)^.clr := $00000008
  33789. else
  33790. pTDefRegMap(@Self)^.&set := $00000008;
  33791. end;
  33792. function TOCMP3_OC3CON.getOCTSEL : TBits_1; inline;
  33793. begin
  33794. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33795. end;
  33796. procedure TOCMP3_OC3CON.setOCFLT; inline;
  33797. begin
  33798. pTDefRegMap(@Self)^.&set := $00000010;
  33799. end;
  33800. procedure TOCMP3_OC3CON.clearOCFLT; inline;
  33801. begin
  33802. pTDefRegMap(@Self)^.clr := $00000010;
  33803. end;
  33804. procedure TOCMP3_OC3CON.setOCFLT(thebits : TBits_1); inline;
  33805. begin
  33806. if thebits = 0 then
  33807. pTDefRegMap(@Self)^.clr := $00000010
  33808. else
  33809. pTDefRegMap(@Self)^.&set := $00000010;
  33810. end;
  33811. function TOCMP3_OC3CON.getOCFLT : TBits_1; inline;
  33812. begin
  33813. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  33814. end;
  33815. procedure TOCMP3_OC3CON.setOC32; inline;
  33816. begin
  33817. pTDefRegMap(@Self)^.&set := $00000020;
  33818. end;
  33819. procedure TOCMP3_OC3CON.clearOC32; inline;
  33820. begin
  33821. pTDefRegMap(@Self)^.clr := $00000020;
  33822. end;
  33823. procedure TOCMP3_OC3CON.setOC32(thebits : TBits_1); inline;
  33824. begin
  33825. if thebits = 0 then
  33826. pTDefRegMap(@Self)^.clr := $00000020
  33827. else
  33828. pTDefRegMap(@Self)^.&set := $00000020;
  33829. end;
  33830. function TOCMP3_OC3CON.getOC32 : TBits_1; inline;
  33831. begin
  33832. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  33833. end;
  33834. procedure TOCMP3_OC3CON.setSIDL; inline;
  33835. begin
  33836. pTDefRegMap(@Self)^.&set := $00002000;
  33837. end;
  33838. procedure TOCMP3_OC3CON.clearSIDL; inline;
  33839. begin
  33840. pTDefRegMap(@Self)^.clr := $00002000;
  33841. end;
  33842. procedure TOCMP3_OC3CON.setSIDL(thebits : TBits_1); inline;
  33843. begin
  33844. if thebits = 0 then
  33845. pTDefRegMap(@Self)^.clr := $00002000
  33846. else
  33847. pTDefRegMap(@Self)^.&set := $00002000;
  33848. end;
  33849. function TOCMP3_OC3CON.getSIDL : TBits_1; inline;
  33850. begin
  33851. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33852. end;
  33853. procedure TOCMP3_OC3CON.setON; inline;
  33854. begin
  33855. pTDefRegMap(@Self)^.&set := $00008000;
  33856. end;
  33857. procedure TOCMP3_OC3CON.clearON; inline;
  33858. begin
  33859. pTDefRegMap(@Self)^.clr := $00008000;
  33860. end;
  33861. procedure TOCMP3_OC3CON.setON(thebits : TBits_1); inline;
  33862. begin
  33863. if thebits = 0 then
  33864. pTDefRegMap(@Self)^.clr := $00008000
  33865. else
  33866. pTDefRegMap(@Self)^.&set := $00008000;
  33867. end;
  33868. function TOCMP3_OC3CON.getON : TBits_1; inline;
  33869. begin
  33870. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  33871. end;
  33872. procedure TOCMP3_OC3CON.setOCM0; inline;
  33873. begin
  33874. pTDefRegMap(@Self)^.&set := $00000001;
  33875. end;
  33876. procedure TOCMP3_OC3CON.clearOCM0; inline;
  33877. begin
  33878. pTDefRegMap(@Self)^.clr := $00000001;
  33879. end;
  33880. procedure TOCMP3_OC3CON.setOCM0(thebits : TBits_1); inline;
  33881. begin
  33882. if thebits = 0 then
  33883. pTDefRegMap(@Self)^.clr := $00000001
  33884. else
  33885. pTDefRegMap(@Self)^.&set := $00000001;
  33886. end;
  33887. function TOCMP3_OC3CON.getOCM0 : TBits_1; inline;
  33888. begin
  33889. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  33890. end;
  33891. procedure TOCMP3_OC3CON.setOCM1; inline;
  33892. begin
  33893. pTDefRegMap(@Self)^.&set := $00000002;
  33894. end;
  33895. procedure TOCMP3_OC3CON.clearOCM1; inline;
  33896. begin
  33897. pTDefRegMap(@Self)^.clr := $00000002;
  33898. end;
  33899. procedure TOCMP3_OC3CON.setOCM1(thebits : TBits_1); inline;
  33900. begin
  33901. if thebits = 0 then
  33902. pTDefRegMap(@Self)^.clr := $00000002
  33903. else
  33904. pTDefRegMap(@Self)^.&set := $00000002;
  33905. end;
  33906. function TOCMP3_OC3CON.getOCM1 : TBits_1; inline;
  33907. begin
  33908. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  33909. end;
  33910. procedure TOCMP3_OC3CON.setOCM2; inline;
  33911. begin
  33912. pTDefRegMap(@Self)^.&set := $00000004;
  33913. end;
  33914. procedure TOCMP3_OC3CON.clearOCM2; inline;
  33915. begin
  33916. pTDefRegMap(@Self)^.clr := $00000004;
  33917. end;
  33918. procedure TOCMP3_OC3CON.setOCM2(thebits : TBits_1); inline;
  33919. begin
  33920. if thebits = 0 then
  33921. pTDefRegMap(@Self)^.clr := $00000004
  33922. else
  33923. pTDefRegMap(@Self)^.&set := $00000004;
  33924. end;
  33925. function TOCMP3_OC3CON.getOCM2 : TBits_1; inline;
  33926. begin
  33927. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  33928. end;
  33929. procedure TOCMP3_OC3CON.setOCSIDL; inline;
  33930. begin
  33931. pTDefRegMap(@Self)^.&set := $00002000;
  33932. end;
  33933. procedure TOCMP3_OC3CON.clearOCSIDL; inline;
  33934. begin
  33935. pTDefRegMap(@Self)^.clr := $00002000;
  33936. end;
  33937. procedure TOCMP3_OC3CON.setOCSIDL(thebits : TBits_1); inline;
  33938. begin
  33939. if thebits = 0 then
  33940. pTDefRegMap(@Self)^.clr := $00002000
  33941. else
  33942. pTDefRegMap(@Self)^.&set := $00002000;
  33943. end;
  33944. function TOCMP3_OC3CON.getOCSIDL : TBits_1; inline;
  33945. begin
  33946. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  33947. end;
  33948. procedure TOCMP3_OC3CON.setw(thebits : TBits_32); inline;
  33949. begin
  33950. pTDefRegMap(@Self)^.val := thebits;
  33951. end;
  33952. function TOCMP3_OC3CON.getw : TBits_32; inline;
  33953. begin
  33954. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  33955. end;
  33956. procedure TOCMP4_OC4CON.setOCM(thebits : TBits_3); inline;
  33957. begin
  33958. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  33959. end;
  33960. function TOCMP4_OC4CON.getOCM : TBits_3; inline;
  33961. begin
  33962. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  33963. end;
  33964. procedure TOCMP4_OC4CON.setOCTSEL; inline;
  33965. begin
  33966. pTDefRegMap(@Self)^.&set := $00000008;
  33967. end;
  33968. procedure TOCMP4_OC4CON.clearOCTSEL; inline;
  33969. begin
  33970. pTDefRegMap(@Self)^.clr := $00000008;
  33971. end;
  33972. procedure TOCMP4_OC4CON.setOCTSEL(thebits : TBits_1); inline;
  33973. begin
  33974. if thebits = 0 then
  33975. pTDefRegMap(@Self)^.clr := $00000008
  33976. else
  33977. pTDefRegMap(@Self)^.&set := $00000008;
  33978. end;
  33979. function TOCMP4_OC4CON.getOCTSEL : TBits_1; inline;
  33980. begin
  33981. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  33982. end;
  33983. procedure TOCMP4_OC4CON.setOCFLT; inline;
  33984. begin
  33985. pTDefRegMap(@Self)^.&set := $00000010;
  33986. end;
  33987. procedure TOCMP4_OC4CON.clearOCFLT; inline;
  33988. begin
  33989. pTDefRegMap(@Self)^.clr := $00000010;
  33990. end;
  33991. procedure TOCMP4_OC4CON.setOCFLT(thebits : TBits_1); inline;
  33992. begin
  33993. if thebits = 0 then
  33994. pTDefRegMap(@Self)^.clr := $00000010
  33995. else
  33996. pTDefRegMap(@Self)^.&set := $00000010;
  33997. end;
  33998. function TOCMP4_OC4CON.getOCFLT : TBits_1; inline;
  33999. begin
  34000. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34001. end;
  34002. procedure TOCMP4_OC4CON.setOC32; inline;
  34003. begin
  34004. pTDefRegMap(@Self)^.&set := $00000020;
  34005. end;
  34006. procedure TOCMP4_OC4CON.clearOC32; inline;
  34007. begin
  34008. pTDefRegMap(@Self)^.clr := $00000020;
  34009. end;
  34010. procedure TOCMP4_OC4CON.setOC32(thebits : TBits_1); inline;
  34011. begin
  34012. if thebits = 0 then
  34013. pTDefRegMap(@Self)^.clr := $00000020
  34014. else
  34015. pTDefRegMap(@Self)^.&set := $00000020;
  34016. end;
  34017. function TOCMP4_OC4CON.getOC32 : TBits_1; inline;
  34018. begin
  34019. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34020. end;
  34021. procedure TOCMP4_OC4CON.setSIDL; inline;
  34022. begin
  34023. pTDefRegMap(@Self)^.&set := $00002000;
  34024. end;
  34025. procedure TOCMP4_OC4CON.clearSIDL; inline;
  34026. begin
  34027. pTDefRegMap(@Self)^.clr := $00002000;
  34028. end;
  34029. procedure TOCMP4_OC4CON.setSIDL(thebits : TBits_1); inline;
  34030. begin
  34031. if thebits = 0 then
  34032. pTDefRegMap(@Self)^.clr := $00002000
  34033. else
  34034. pTDefRegMap(@Self)^.&set := $00002000;
  34035. end;
  34036. function TOCMP4_OC4CON.getSIDL : TBits_1; inline;
  34037. begin
  34038. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34039. end;
  34040. procedure TOCMP4_OC4CON.setON; inline;
  34041. begin
  34042. pTDefRegMap(@Self)^.&set := $00008000;
  34043. end;
  34044. procedure TOCMP4_OC4CON.clearON; inline;
  34045. begin
  34046. pTDefRegMap(@Self)^.clr := $00008000;
  34047. end;
  34048. procedure TOCMP4_OC4CON.setON(thebits : TBits_1); inline;
  34049. begin
  34050. if thebits = 0 then
  34051. pTDefRegMap(@Self)^.clr := $00008000
  34052. else
  34053. pTDefRegMap(@Self)^.&set := $00008000;
  34054. end;
  34055. function TOCMP4_OC4CON.getON : TBits_1; inline;
  34056. begin
  34057. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34058. end;
  34059. procedure TOCMP4_OC4CON.setOCM0; inline;
  34060. begin
  34061. pTDefRegMap(@Self)^.&set := $00000001;
  34062. end;
  34063. procedure TOCMP4_OC4CON.clearOCM0; inline;
  34064. begin
  34065. pTDefRegMap(@Self)^.clr := $00000001;
  34066. end;
  34067. procedure TOCMP4_OC4CON.setOCM0(thebits : TBits_1); inline;
  34068. begin
  34069. if thebits = 0 then
  34070. pTDefRegMap(@Self)^.clr := $00000001
  34071. else
  34072. pTDefRegMap(@Self)^.&set := $00000001;
  34073. end;
  34074. function TOCMP4_OC4CON.getOCM0 : TBits_1; inline;
  34075. begin
  34076. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34077. end;
  34078. procedure TOCMP4_OC4CON.setOCM1; inline;
  34079. begin
  34080. pTDefRegMap(@Self)^.&set := $00000002;
  34081. end;
  34082. procedure TOCMP4_OC4CON.clearOCM1; inline;
  34083. begin
  34084. pTDefRegMap(@Self)^.clr := $00000002;
  34085. end;
  34086. procedure TOCMP4_OC4CON.setOCM1(thebits : TBits_1); inline;
  34087. begin
  34088. if thebits = 0 then
  34089. pTDefRegMap(@Self)^.clr := $00000002
  34090. else
  34091. pTDefRegMap(@Self)^.&set := $00000002;
  34092. end;
  34093. function TOCMP4_OC4CON.getOCM1 : TBits_1; inline;
  34094. begin
  34095. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34096. end;
  34097. procedure TOCMP4_OC4CON.setOCM2; inline;
  34098. begin
  34099. pTDefRegMap(@Self)^.&set := $00000004;
  34100. end;
  34101. procedure TOCMP4_OC4CON.clearOCM2; inline;
  34102. begin
  34103. pTDefRegMap(@Self)^.clr := $00000004;
  34104. end;
  34105. procedure TOCMP4_OC4CON.setOCM2(thebits : TBits_1); inline;
  34106. begin
  34107. if thebits = 0 then
  34108. pTDefRegMap(@Self)^.clr := $00000004
  34109. else
  34110. pTDefRegMap(@Self)^.&set := $00000004;
  34111. end;
  34112. function TOCMP4_OC4CON.getOCM2 : TBits_1; inline;
  34113. begin
  34114. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34115. end;
  34116. procedure TOCMP4_OC4CON.setOCSIDL; inline;
  34117. begin
  34118. pTDefRegMap(@Self)^.&set := $00002000;
  34119. end;
  34120. procedure TOCMP4_OC4CON.clearOCSIDL; inline;
  34121. begin
  34122. pTDefRegMap(@Self)^.clr := $00002000;
  34123. end;
  34124. procedure TOCMP4_OC4CON.setOCSIDL(thebits : TBits_1); inline;
  34125. begin
  34126. if thebits = 0 then
  34127. pTDefRegMap(@Self)^.clr := $00002000
  34128. else
  34129. pTDefRegMap(@Self)^.&set := $00002000;
  34130. end;
  34131. function TOCMP4_OC4CON.getOCSIDL : TBits_1; inline;
  34132. begin
  34133. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34134. end;
  34135. procedure TOCMP4_OC4CON.setw(thebits : TBits_32); inline;
  34136. begin
  34137. pTDefRegMap(@Self)^.val := thebits;
  34138. end;
  34139. function TOCMP4_OC4CON.getw : TBits_32; inline;
  34140. begin
  34141. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34142. end;
  34143. procedure TOCMP5_OC5CON.setOCM(thebits : TBits_3); inline;
  34144. begin
  34145. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  34146. end;
  34147. function TOCMP5_OC5CON.getOCM : TBits_3; inline;
  34148. begin
  34149. getOCM := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  34150. end;
  34151. procedure TOCMP5_OC5CON.setOCTSEL; inline;
  34152. begin
  34153. pTDefRegMap(@Self)^.&set := $00000008;
  34154. end;
  34155. procedure TOCMP5_OC5CON.clearOCTSEL; inline;
  34156. begin
  34157. pTDefRegMap(@Self)^.clr := $00000008;
  34158. end;
  34159. procedure TOCMP5_OC5CON.setOCTSEL(thebits : TBits_1); inline;
  34160. begin
  34161. if thebits = 0 then
  34162. pTDefRegMap(@Self)^.clr := $00000008
  34163. else
  34164. pTDefRegMap(@Self)^.&set := $00000008;
  34165. end;
  34166. function TOCMP5_OC5CON.getOCTSEL : TBits_1; inline;
  34167. begin
  34168. getOCTSEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34169. end;
  34170. procedure TOCMP5_OC5CON.setOCFLT; inline;
  34171. begin
  34172. pTDefRegMap(@Self)^.&set := $00000010;
  34173. end;
  34174. procedure TOCMP5_OC5CON.clearOCFLT; inline;
  34175. begin
  34176. pTDefRegMap(@Self)^.clr := $00000010;
  34177. end;
  34178. procedure TOCMP5_OC5CON.setOCFLT(thebits : TBits_1); inline;
  34179. begin
  34180. if thebits = 0 then
  34181. pTDefRegMap(@Self)^.clr := $00000010
  34182. else
  34183. pTDefRegMap(@Self)^.&set := $00000010;
  34184. end;
  34185. function TOCMP5_OC5CON.getOCFLT : TBits_1; inline;
  34186. begin
  34187. getOCFLT := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34188. end;
  34189. procedure TOCMP5_OC5CON.setOC32; inline;
  34190. begin
  34191. pTDefRegMap(@Self)^.&set := $00000020;
  34192. end;
  34193. procedure TOCMP5_OC5CON.clearOC32; inline;
  34194. begin
  34195. pTDefRegMap(@Self)^.clr := $00000020;
  34196. end;
  34197. procedure TOCMP5_OC5CON.setOC32(thebits : TBits_1); inline;
  34198. begin
  34199. if thebits = 0 then
  34200. pTDefRegMap(@Self)^.clr := $00000020
  34201. else
  34202. pTDefRegMap(@Self)^.&set := $00000020;
  34203. end;
  34204. function TOCMP5_OC5CON.getOC32 : TBits_1; inline;
  34205. begin
  34206. getOC32 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34207. end;
  34208. procedure TOCMP5_OC5CON.setSIDL; inline;
  34209. begin
  34210. pTDefRegMap(@Self)^.&set := $00002000;
  34211. end;
  34212. procedure TOCMP5_OC5CON.clearSIDL; inline;
  34213. begin
  34214. pTDefRegMap(@Self)^.clr := $00002000;
  34215. end;
  34216. procedure TOCMP5_OC5CON.setSIDL(thebits : TBits_1); inline;
  34217. begin
  34218. if thebits = 0 then
  34219. pTDefRegMap(@Self)^.clr := $00002000
  34220. else
  34221. pTDefRegMap(@Self)^.&set := $00002000;
  34222. end;
  34223. function TOCMP5_OC5CON.getSIDL : TBits_1; inline;
  34224. begin
  34225. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34226. end;
  34227. procedure TOCMP5_OC5CON.setON; inline;
  34228. begin
  34229. pTDefRegMap(@Self)^.&set := $00008000;
  34230. end;
  34231. procedure TOCMP5_OC5CON.clearON; inline;
  34232. begin
  34233. pTDefRegMap(@Self)^.clr := $00008000;
  34234. end;
  34235. procedure TOCMP5_OC5CON.setON(thebits : TBits_1); inline;
  34236. begin
  34237. if thebits = 0 then
  34238. pTDefRegMap(@Self)^.clr := $00008000
  34239. else
  34240. pTDefRegMap(@Self)^.&set := $00008000;
  34241. end;
  34242. function TOCMP5_OC5CON.getON : TBits_1; inline;
  34243. begin
  34244. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34245. end;
  34246. procedure TOCMP5_OC5CON.setOCM0; inline;
  34247. begin
  34248. pTDefRegMap(@Self)^.&set := $00000001;
  34249. end;
  34250. procedure TOCMP5_OC5CON.clearOCM0; inline;
  34251. begin
  34252. pTDefRegMap(@Self)^.clr := $00000001;
  34253. end;
  34254. procedure TOCMP5_OC5CON.setOCM0(thebits : TBits_1); inline;
  34255. begin
  34256. if thebits = 0 then
  34257. pTDefRegMap(@Self)^.clr := $00000001
  34258. else
  34259. pTDefRegMap(@Self)^.&set := $00000001;
  34260. end;
  34261. function TOCMP5_OC5CON.getOCM0 : TBits_1; inline;
  34262. begin
  34263. getOCM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34264. end;
  34265. procedure TOCMP5_OC5CON.setOCM1; inline;
  34266. begin
  34267. pTDefRegMap(@Self)^.&set := $00000002;
  34268. end;
  34269. procedure TOCMP5_OC5CON.clearOCM1; inline;
  34270. begin
  34271. pTDefRegMap(@Self)^.clr := $00000002;
  34272. end;
  34273. procedure TOCMP5_OC5CON.setOCM1(thebits : TBits_1); inline;
  34274. begin
  34275. if thebits = 0 then
  34276. pTDefRegMap(@Self)^.clr := $00000002
  34277. else
  34278. pTDefRegMap(@Self)^.&set := $00000002;
  34279. end;
  34280. function TOCMP5_OC5CON.getOCM1 : TBits_1; inline;
  34281. begin
  34282. getOCM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34283. end;
  34284. procedure TOCMP5_OC5CON.setOCM2; inline;
  34285. begin
  34286. pTDefRegMap(@Self)^.&set := $00000004;
  34287. end;
  34288. procedure TOCMP5_OC5CON.clearOCM2; inline;
  34289. begin
  34290. pTDefRegMap(@Self)^.clr := $00000004;
  34291. end;
  34292. procedure TOCMP5_OC5CON.setOCM2(thebits : TBits_1); inline;
  34293. begin
  34294. if thebits = 0 then
  34295. pTDefRegMap(@Self)^.clr := $00000004
  34296. else
  34297. pTDefRegMap(@Self)^.&set := $00000004;
  34298. end;
  34299. function TOCMP5_OC5CON.getOCM2 : TBits_1; inline;
  34300. begin
  34301. getOCM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34302. end;
  34303. procedure TOCMP5_OC5CON.setOCSIDL; inline;
  34304. begin
  34305. pTDefRegMap(@Self)^.&set := $00002000;
  34306. end;
  34307. procedure TOCMP5_OC5CON.clearOCSIDL; inline;
  34308. begin
  34309. pTDefRegMap(@Self)^.clr := $00002000;
  34310. end;
  34311. procedure TOCMP5_OC5CON.setOCSIDL(thebits : TBits_1); inline;
  34312. begin
  34313. if thebits = 0 then
  34314. pTDefRegMap(@Self)^.clr := $00002000
  34315. else
  34316. pTDefRegMap(@Self)^.&set := $00002000;
  34317. end;
  34318. function TOCMP5_OC5CON.getOCSIDL : TBits_1; inline;
  34319. begin
  34320. getOCSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34321. end;
  34322. procedure TOCMP5_OC5CON.setw(thebits : TBits_32); inline;
  34323. begin
  34324. pTDefRegMap(@Self)^.val := thebits;
  34325. end;
  34326. function TOCMP5_OC5CON.getw : TBits_32; inline;
  34327. begin
  34328. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34329. end;
  34330. procedure TI2C1A_I2C1ACON.setSEN; inline;
  34331. begin
  34332. pTDefRegMap(@Self)^.&set := $00000001;
  34333. end;
  34334. procedure TI2C1A_I2C1ACON.clearSEN; inline;
  34335. begin
  34336. pTDefRegMap(@Self)^.clr := $00000001;
  34337. end;
  34338. procedure TI2C1A_I2C1ACON.setSEN(thebits : TBits_1); inline;
  34339. begin
  34340. if thebits = 0 then
  34341. pTDefRegMap(@Self)^.clr := $00000001
  34342. else
  34343. pTDefRegMap(@Self)^.&set := $00000001;
  34344. end;
  34345. function TI2C1A_I2C1ACON.getSEN : TBits_1; inline;
  34346. begin
  34347. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34348. end;
  34349. procedure TI2C1A_I2C1ACON.setRSEN; inline;
  34350. begin
  34351. pTDefRegMap(@Self)^.&set := $00000002;
  34352. end;
  34353. procedure TI2C1A_I2C1ACON.clearRSEN; inline;
  34354. begin
  34355. pTDefRegMap(@Self)^.clr := $00000002;
  34356. end;
  34357. procedure TI2C1A_I2C1ACON.setRSEN(thebits : TBits_1); inline;
  34358. begin
  34359. if thebits = 0 then
  34360. pTDefRegMap(@Self)^.clr := $00000002
  34361. else
  34362. pTDefRegMap(@Self)^.&set := $00000002;
  34363. end;
  34364. function TI2C1A_I2C1ACON.getRSEN : TBits_1; inline;
  34365. begin
  34366. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34367. end;
  34368. procedure TI2C1A_I2C1ACON.setPEN; inline;
  34369. begin
  34370. pTDefRegMap(@Self)^.&set := $00000004;
  34371. end;
  34372. procedure TI2C1A_I2C1ACON.clearPEN; inline;
  34373. begin
  34374. pTDefRegMap(@Self)^.clr := $00000004;
  34375. end;
  34376. procedure TI2C1A_I2C1ACON.setPEN(thebits : TBits_1); inline;
  34377. begin
  34378. if thebits = 0 then
  34379. pTDefRegMap(@Self)^.clr := $00000004
  34380. else
  34381. pTDefRegMap(@Self)^.&set := $00000004;
  34382. end;
  34383. function TI2C1A_I2C1ACON.getPEN : TBits_1; inline;
  34384. begin
  34385. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34386. end;
  34387. procedure TI2C1A_I2C1ACON.setRCEN; inline;
  34388. begin
  34389. pTDefRegMap(@Self)^.&set := $00000008;
  34390. end;
  34391. procedure TI2C1A_I2C1ACON.clearRCEN; inline;
  34392. begin
  34393. pTDefRegMap(@Self)^.clr := $00000008;
  34394. end;
  34395. procedure TI2C1A_I2C1ACON.setRCEN(thebits : TBits_1); inline;
  34396. begin
  34397. if thebits = 0 then
  34398. pTDefRegMap(@Self)^.clr := $00000008
  34399. else
  34400. pTDefRegMap(@Self)^.&set := $00000008;
  34401. end;
  34402. function TI2C1A_I2C1ACON.getRCEN : TBits_1; inline;
  34403. begin
  34404. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34405. end;
  34406. procedure TI2C1A_I2C1ACON.setACKEN; inline;
  34407. begin
  34408. pTDefRegMap(@Self)^.&set := $00000010;
  34409. end;
  34410. procedure TI2C1A_I2C1ACON.clearACKEN; inline;
  34411. begin
  34412. pTDefRegMap(@Self)^.clr := $00000010;
  34413. end;
  34414. procedure TI2C1A_I2C1ACON.setACKEN(thebits : TBits_1); inline;
  34415. begin
  34416. if thebits = 0 then
  34417. pTDefRegMap(@Self)^.clr := $00000010
  34418. else
  34419. pTDefRegMap(@Self)^.&set := $00000010;
  34420. end;
  34421. function TI2C1A_I2C1ACON.getACKEN : TBits_1; inline;
  34422. begin
  34423. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34424. end;
  34425. procedure TI2C1A_I2C1ACON.setACKDT; inline;
  34426. begin
  34427. pTDefRegMap(@Self)^.&set := $00000020;
  34428. end;
  34429. procedure TI2C1A_I2C1ACON.clearACKDT; inline;
  34430. begin
  34431. pTDefRegMap(@Self)^.clr := $00000020;
  34432. end;
  34433. procedure TI2C1A_I2C1ACON.setACKDT(thebits : TBits_1); inline;
  34434. begin
  34435. if thebits = 0 then
  34436. pTDefRegMap(@Self)^.clr := $00000020
  34437. else
  34438. pTDefRegMap(@Self)^.&set := $00000020;
  34439. end;
  34440. function TI2C1A_I2C1ACON.getACKDT : TBits_1; inline;
  34441. begin
  34442. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34443. end;
  34444. procedure TI2C1A_I2C1ACON.setSTREN; inline;
  34445. begin
  34446. pTDefRegMap(@Self)^.&set := $00000040;
  34447. end;
  34448. procedure TI2C1A_I2C1ACON.clearSTREN; inline;
  34449. begin
  34450. pTDefRegMap(@Self)^.clr := $00000040;
  34451. end;
  34452. procedure TI2C1A_I2C1ACON.setSTREN(thebits : TBits_1); inline;
  34453. begin
  34454. if thebits = 0 then
  34455. pTDefRegMap(@Self)^.clr := $00000040
  34456. else
  34457. pTDefRegMap(@Self)^.&set := $00000040;
  34458. end;
  34459. function TI2C1A_I2C1ACON.getSTREN : TBits_1; inline;
  34460. begin
  34461. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34462. end;
  34463. procedure TI2C1A_I2C1ACON.setGCEN; inline;
  34464. begin
  34465. pTDefRegMap(@Self)^.&set := $00000080;
  34466. end;
  34467. procedure TI2C1A_I2C1ACON.clearGCEN; inline;
  34468. begin
  34469. pTDefRegMap(@Self)^.clr := $00000080;
  34470. end;
  34471. procedure TI2C1A_I2C1ACON.setGCEN(thebits : TBits_1); inline;
  34472. begin
  34473. if thebits = 0 then
  34474. pTDefRegMap(@Self)^.clr := $00000080
  34475. else
  34476. pTDefRegMap(@Self)^.&set := $00000080;
  34477. end;
  34478. function TI2C1A_I2C1ACON.getGCEN : TBits_1; inline;
  34479. begin
  34480. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34481. end;
  34482. procedure TI2C1A_I2C1ACON.setSMEN; inline;
  34483. begin
  34484. pTDefRegMap(@Self)^.&set := $00000100;
  34485. end;
  34486. procedure TI2C1A_I2C1ACON.clearSMEN; inline;
  34487. begin
  34488. pTDefRegMap(@Self)^.clr := $00000100;
  34489. end;
  34490. procedure TI2C1A_I2C1ACON.setSMEN(thebits : TBits_1); inline;
  34491. begin
  34492. if thebits = 0 then
  34493. pTDefRegMap(@Self)^.clr := $00000100
  34494. else
  34495. pTDefRegMap(@Self)^.&set := $00000100;
  34496. end;
  34497. function TI2C1A_I2C1ACON.getSMEN : TBits_1; inline;
  34498. begin
  34499. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34500. end;
  34501. procedure TI2C1A_I2C1ACON.setDISSLW; inline;
  34502. begin
  34503. pTDefRegMap(@Self)^.&set := $00000200;
  34504. end;
  34505. procedure TI2C1A_I2C1ACON.clearDISSLW; inline;
  34506. begin
  34507. pTDefRegMap(@Self)^.clr := $00000200;
  34508. end;
  34509. procedure TI2C1A_I2C1ACON.setDISSLW(thebits : TBits_1); inline;
  34510. begin
  34511. if thebits = 0 then
  34512. pTDefRegMap(@Self)^.clr := $00000200
  34513. else
  34514. pTDefRegMap(@Self)^.&set := $00000200;
  34515. end;
  34516. function TI2C1A_I2C1ACON.getDISSLW : TBits_1; inline;
  34517. begin
  34518. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34519. end;
  34520. procedure TI2C1A_I2C1ACON.setA10M; inline;
  34521. begin
  34522. pTDefRegMap(@Self)^.&set := $00000400;
  34523. end;
  34524. procedure TI2C1A_I2C1ACON.clearA10M; inline;
  34525. begin
  34526. pTDefRegMap(@Self)^.clr := $00000400;
  34527. end;
  34528. procedure TI2C1A_I2C1ACON.setA10M(thebits : TBits_1); inline;
  34529. begin
  34530. if thebits = 0 then
  34531. pTDefRegMap(@Self)^.clr := $00000400
  34532. else
  34533. pTDefRegMap(@Self)^.&set := $00000400;
  34534. end;
  34535. function TI2C1A_I2C1ACON.getA10M : TBits_1; inline;
  34536. begin
  34537. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34538. end;
  34539. procedure TI2C1A_I2C1ACON.setSTRICT; inline;
  34540. begin
  34541. pTDefRegMap(@Self)^.&set := $00000800;
  34542. end;
  34543. procedure TI2C1A_I2C1ACON.clearSTRICT; inline;
  34544. begin
  34545. pTDefRegMap(@Self)^.clr := $00000800;
  34546. end;
  34547. procedure TI2C1A_I2C1ACON.setSTRICT(thebits : TBits_1); inline;
  34548. begin
  34549. if thebits = 0 then
  34550. pTDefRegMap(@Self)^.clr := $00000800
  34551. else
  34552. pTDefRegMap(@Self)^.&set := $00000800;
  34553. end;
  34554. function TI2C1A_I2C1ACON.getSTRICT : TBits_1; inline;
  34555. begin
  34556. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34557. end;
  34558. procedure TI2C1A_I2C1ACON.setSCLREL; inline;
  34559. begin
  34560. pTDefRegMap(@Self)^.&set := $00001000;
  34561. end;
  34562. procedure TI2C1A_I2C1ACON.clearSCLREL; inline;
  34563. begin
  34564. pTDefRegMap(@Self)^.clr := $00001000;
  34565. end;
  34566. procedure TI2C1A_I2C1ACON.setSCLREL(thebits : TBits_1); inline;
  34567. begin
  34568. if thebits = 0 then
  34569. pTDefRegMap(@Self)^.clr := $00001000
  34570. else
  34571. pTDefRegMap(@Self)^.&set := $00001000;
  34572. end;
  34573. function TI2C1A_I2C1ACON.getSCLREL : TBits_1; inline;
  34574. begin
  34575. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34576. end;
  34577. procedure TI2C1A_I2C1ACON.setSIDL; inline;
  34578. begin
  34579. pTDefRegMap(@Self)^.&set := $00002000;
  34580. end;
  34581. procedure TI2C1A_I2C1ACON.clearSIDL; inline;
  34582. begin
  34583. pTDefRegMap(@Self)^.clr := $00002000;
  34584. end;
  34585. procedure TI2C1A_I2C1ACON.setSIDL(thebits : TBits_1); inline;
  34586. begin
  34587. if thebits = 0 then
  34588. pTDefRegMap(@Self)^.clr := $00002000
  34589. else
  34590. pTDefRegMap(@Self)^.&set := $00002000;
  34591. end;
  34592. function TI2C1A_I2C1ACON.getSIDL : TBits_1; inline;
  34593. begin
  34594. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34595. end;
  34596. procedure TI2C1A_I2C1ACON.setON; inline;
  34597. begin
  34598. pTDefRegMap(@Self)^.&set := $00008000;
  34599. end;
  34600. procedure TI2C1A_I2C1ACON.clearON; inline;
  34601. begin
  34602. pTDefRegMap(@Self)^.clr := $00008000;
  34603. end;
  34604. procedure TI2C1A_I2C1ACON.setON(thebits : TBits_1); inline;
  34605. begin
  34606. if thebits = 0 then
  34607. pTDefRegMap(@Self)^.clr := $00008000
  34608. else
  34609. pTDefRegMap(@Self)^.&set := $00008000;
  34610. end;
  34611. function TI2C1A_I2C1ACON.getON : TBits_1; inline;
  34612. begin
  34613. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34614. end;
  34615. procedure TI2C1A_I2C1ACON.setIPMIEN; inline;
  34616. begin
  34617. pTDefRegMap(@Self)^.&set := $00000800;
  34618. end;
  34619. procedure TI2C1A_I2C1ACON.clearIPMIEN; inline;
  34620. begin
  34621. pTDefRegMap(@Self)^.clr := $00000800;
  34622. end;
  34623. procedure TI2C1A_I2C1ACON.setIPMIEN(thebits : TBits_1); inline;
  34624. begin
  34625. if thebits = 0 then
  34626. pTDefRegMap(@Self)^.clr := $00000800
  34627. else
  34628. pTDefRegMap(@Self)^.&set := $00000800;
  34629. end;
  34630. function TI2C1A_I2C1ACON.getIPMIEN : TBits_1; inline;
  34631. begin
  34632. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34633. end;
  34634. procedure TI2C1A_I2C1ACON.setI2CSIDL; inline;
  34635. begin
  34636. pTDefRegMap(@Self)^.&set := $00002000;
  34637. end;
  34638. procedure TI2C1A_I2C1ACON.clearI2CSIDL; inline;
  34639. begin
  34640. pTDefRegMap(@Self)^.clr := $00002000;
  34641. end;
  34642. procedure TI2C1A_I2C1ACON.setI2CSIDL(thebits : TBits_1); inline;
  34643. begin
  34644. if thebits = 0 then
  34645. pTDefRegMap(@Self)^.clr := $00002000
  34646. else
  34647. pTDefRegMap(@Self)^.&set := $00002000;
  34648. end;
  34649. function TI2C1A_I2C1ACON.getI2CSIDL : TBits_1; inline;
  34650. begin
  34651. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34652. end;
  34653. procedure TI2C1A_I2C1ACON.setI2CEN; inline;
  34654. begin
  34655. pTDefRegMap(@Self)^.&set := $00008000;
  34656. end;
  34657. procedure TI2C1A_I2C1ACON.clearI2CEN; inline;
  34658. begin
  34659. pTDefRegMap(@Self)^.clr := $00008000;
  34660. end;
  34661. procedure TI2C1A_I2C1ACON.setI2CEN(thebits : TBits_1); inline;
  34662. begin
  34663. if thebits = 0 then
  34664. pTDefRegMap(@Self)^.clr := $00008000
  34665. else
  34666. pTDefRegMap(@Self)^.&set := $00008000;
  34667. end;
  34668. function TI2C1A_I2C1ACON.getI2CEN : TBits_1; inline;
  34669. begin
  34670. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34671. end;
  34672. procedure TI2C1A_I2C1ACON.setw(thebits : TBits_32); inline;
  34673. begin
  34674. pTDefRegMap(@Self)^.val := thebits;
  34675. end;
  34676. function TI2C1A_I2C1ACON.getw : TBits_32; inline;
  34677. begin
  34678. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  34679. end;
  34680. procedure TI2C1A_I2C3CON.setSEN; inline;
  34681. begin
  34682. pTDefRegMap(@Self)^.&set := $00000001;
  34683. end;
  34684. procedure TI2C1A_I2C3CON.clearSEN; inline;
  34685. begin
  34686. pTDefRegMap(@Self)^.clr := $00000001;
  34687. end;
  34688. procedure TI2C1A_I2C3CON.setSEN(thebits : TBits_1); inline;
  34689. begin
  34690. if thebits = 0 then
  34691. pTDefRegMap(@Self)^.clr := $00000001
  34692. else
  34693. pTDefRegMap(@Self)^.&set := $00000001;
  34694. end;
  34695. function TI2C1A_I2C3CON.getSEN : TBits_1; inline;
  34696. begin
  34697. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  34698. end;
  34699. procedure TI2C1A_I2C3CON.setRSEN; inline;
  34700. begin
  34701. pTDefRegMap(@Self)^.&set := $00000002;
  34702. end;
  34703. procedure TI2C1A_I2C3CON.clearRSEN; inline;
  34704. begin
  34705. pTDefRegMap(@Self)^.clr := $00000002;
  34706. end;
  34707. procedure TI2C1A_I2C3CON.setRSEN(thebits : TBits_1); inline;
  34708. begin
  34709. if thebits = 0 then
  34710. pTDefRegMap(@Self)^.clr := $00000002
  34711. else
  34712. pTDefRegMap(@Self)^.&set := $00000002;
  34713. end;
  34714. function TI2C1A_I2C3CON.getRSEN : TBits_1; inline;
  34715. begin
  34716. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  34717. end;
  34718. procedure TI2C1A_I2C3CON.setPEN; inline;
  34719. begin
  34720. pTDefRegMap(@Self)^.&set := $00000004;
  34721. end;
  34722. procedure TI2C1A_I2C3CON.clearPEN; inline;
  34723. begin
  34724. pTDefRegMap(@Self)^.clr := $00000004;
  34725. end;
  34726. procedure TI2C1A_I2C3CON.setPEN(thebits : TBits_1); inline;
  34727. begin
  34728. if thebits = 0 then
  34729. pTDefRegMap(@Self)^.clr := $00000004
  34730. else
  34731. pTDefRegMap(@Self)^.&set := $00000004;
  34732. end;
  34733. function TI2C1A_I2C3CON.getPEN : TBits_1; inline;
  34734. begin
  34735. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  34736. end;
  34737. procedure TI2C1A_I2C3CON.setRCEN; inline;
  34738. begin
  34739. pTDefRegMap(@Self)^.&set := $00000008;
  34740. end;
  34741. procedure TI2C1A_I2C3CON.clearRCEN; inline;
  34742. begin
  34743. pTDefRegMap(@Self)^.clr := $00000008;
  34744. end;
  34745. procedure TI2C1A_I2C3CON.setRCEN(thebits : TBits_1); inline;
  34746. begin
  34747. if thebits = 0 then
  34748. pTDefRegMap(@Self)^.clr := $00000008
  34749. else
  34750. pTDefRegMap(@Self)^.&set := $00000008;
  34751. end;
  34752. function TI2C1A_I2C3CON.getRCEN : TBits_1; inline;
  34753. begin
  34754. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  34755. end;
  34756. procedure TI2C1A_I2C3CON.setACKEN; inline;
  34757. begin
  34758. pTDefRegMap(@Self)^.&set := $00000010;
  34759. end;
  34760. procedure TI2C1A_I2C3CON.clearACKEN; inline;
  34761. begin
  34762. pTDefRegMap(@Self)^.clr := $00000010;
  34763. end;
  34764. procedure TI2C1A_I2C3CON.setACKEN(thebits : TBits_1); inline;
  34765. begin
  34766. if thebits = 0 then
  34767. pTDefRegMap(@Self)^.clr := $00000010
  34768. else
  34769. pTDefRegMap(@Self)^.&set := $00000010;
  34770. end;
  34771. function TI2C1A_I2C3CON.getACKEN : TBits_1; inline;
  34772. begin
  34773. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  34774. end;
  34775. procedure TI2C1A_I2C3CON.setACKDT; inline;
  34776. begin
  34777. pTDefRegMap(@Self)^.&set := $00000020;
  34778. end;
  34779. procedure TI2C1A_I2C3CON.clearACKDT; inline;
  34780. begin
  34781. pTDefRegMap(@Self)^.clr := $00000020;
  34782. end;
  34783. procedure TI2C1A_I2C3CON.setACKDT(thebits : TBits_1); inline;
  34784. begin
  34785. if thebits = 0 then
  34786. pTDefRegMap(@Self)^.clr := $00000020
  34787. else
  34788. pTDefRegMap(@Self)^.&set := $00000020;
  34789. end;
  34790. function TI2C1A_I2C3CON.getACKDT : TBits_1; inline;
  34791. begin
  34792. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  34793. end;
  34794. procedure TI2C1A_I2C3CON.setSTREN; inline;
  34795. begin
  34796. pTDefRegMap(@Self)^.&set := $00000040;
  34797. end;
  34798. procedure TI2C1A_I2C3CON.clearSTREN; inline;
  34799. begin
  34800. pTDefRegMap(@Self)^.clr := $00000040;
  34801. end;
  34802. procedure TI2C1A_I2C3CON.setSTREN(thebits : TBits_1); inline;
  34803. begin
  34804. if thebits = 0 then
  34805. pTDefRegMap(@Self)^.clr := $00000040
  34806. else
  34807. pTDefRegMap(@Self)^.&set := $00000040;
  34808. end;
  34809. function TI2C1A_I2C3CON.getSTREN : TBits_1; inline;
  34810. begin
  34811. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  34812. end;
  34813. procedure TI2C1A_I2C3CON.setGCEN; inline;
  34814. begin
  34815. pTDefRegMap(@Self)^.&set := $00000080;
  34816. end;
  34817. procedure TI2C1A_I2C3CON.clearGCEN; inline;
  34818. begin
  34819. pTDefRegMap(@Self)^.clr := $00000080;
  34820. end;
  34821. procedure TI2C1A_I2C3CON.setGCEN(thebits : TBits_1); inline;
  34822. begin
  34823. if thebits = 0 then
  34824. pTDefRegMap(@Self)^.clr := $00000080
  34825. else
  34826. pTDefRegMap(@Self)^.&set := $00000080;
  34827. end;
  34828. function TI2C1A_I2C3CON.getGCEN : TBits_1; inline;
  34829. begin
  34830. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  34831. end;
  34832. procedure TI2C1A_I2C3CON.setSMEN; inline;
  34833. begin
  34834. pTDefRegMap(@Self)^.&set := $00000100;
  34835. end;
  34836. procedure TI2C1A_I2C3CON.clearSMEN; inline;
  34837. begin
  34838. pTDefRegMap(@Self)^.clr := $00000100;
  34839. end;
  34840. procedure TI2C1A_I2C3CON.setSMEN(thebits : TBits_1); inline;
  34841. begin
  34842. if thebits = 0 then
  34843. pTDefRegMap(@Self)^.clr := $00000100
  34844. else
  34845. pTDefRegMap(@Self)^.&set := $00000100;
  34846. end;
  34847. function TI2C1A_I2C3CON.getSMEN : TBits_1; inline;
  34848. begin
  34849. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  34850. end;
  34851. procedure TI2C1A_I2C3CON.setDISSLW; inline;
  34852. begin
  34853. pTDefRegMap(@Self)^.&set := $00000200;
  34854. end;
  34855. procedure TI2C1A_I2C3CON.clearDISSLW; inline;
  34856. begin
  34857. pTDefRegMap(@Self)^.clr := $00000200;
  34858. end;
  34859. procedure TI2C1A_I2C3CON.setDISSLW(thebits : TBits_1); inline;
  34860. begin
  34861. if thebits = 0 then
  34862. pTDefRegMap(@Self)^.clr := $00000200
  34863. else
  34864. pTDefRegMap(@Self)^.&set := $00000200;
  34865. end;
  34866. function TI2C1A_I2C3CON.getDISSLW : TBits_1; inline;
  34867. begin
  34868. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  34869. end;
  34870. procedure TI2C1A_I2C3CON.setA10M; inline;
  34871. begin
  34872. pTDefRegMap(@Self)^.&set := $00000400;
  34873. end;
  34874. procedure TI2C1A_I2C3CON.clearA10M; inline;
  34875. begin
  34876. pTDefRegMap(@Self)^.clr := $00000400;
  34877. end;
  34878. procedure TI2C1A_I2C3CON.setA10M(thebits : TBits_1); inline;
  34879. begin
  34880. if thebits = 0 then
  34881. pTDefRegMap(@Self)^.clr := $00000400
  34882. else
  34883. pTDefRegMap(@Self)^.&set := $00000400;
  34884. end;
  34885. function TI2C1A_I2C3CON.getA10M : TBits_1; inline;
  34886. begin
  34887. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  34888. end;
  34889. procedure TI2C1A_I2C3CON.setSTRICT; inline;
  34890. begin
  34891. pTDefRegMap(@Self)^.&set := $00000800;
  34892. end;
  34893. procedure TI2C1A_I2C3CON.clearSTRICT; inline;
  34894. begin
  34895. pTDefRegMap(@Self)^.clr := $00000800;
  34896. end;
  34897. procedure TI2C1A_I2C3CON.setSTRICT(thebits : TBits_1); inline;
  34898. begin
  34899. if thebits = 0 then
  34900. pTDefRegMap(@Self)^.clr := $00000800
  34901. else
  34902. pTDefRegMap(@Self)^.&set := $00000800;
  34903. end;
  34904. function TI2C1A_I2C3CON.getSTRICT : TBits_1; inline;
  34905. begin
  34906. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34907. end;
  34908. procedure TI2C1A_I2C3CON.setSCLREL; inline;
  34909. begin
  34910. pTDefRegMap(@Self)^.&set := $00001000;
  34911. end;
  34912. procedure TI2C1A_I2C3CON.clearSCLREL; inline;
  34913. begin
  34914. pTDefRegMap(@Self)^.clr := $00001000;
  34915. end;
  34916. procedure TI2C1A_I2C3CON.setSCLREL(thebits : TBits_1); inline;
  34917. begin
  34918. if thebits = 0 then
  34919. pTDefRegMap(@Self)^.clr := $00001000
  34920. else
  34921. pTDefRegMap(@Self)^.&set := $00001000;
  34922. end;
  34923. function TI2C1A_I2C3CON.getSCLREL : TBits_1; inline;
  34924. begin
  34925. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  34926. end;
  34927. procedure TI2C1A_I2C3CON.setSIDL; inline;
  34928. begin
  34929. pTDefRegMap(@Self)^.&set := $00002000;
  34930. end;
  34931. procedure TI2C1A_I2C3CON.clearSIDL; inline;
  34932. begin
  34933. pTDefRegMap(@Self)^.clr := $00002000;
  34934. end;
  34935. procedure TI2C1A_I2C3CON.setSIDL(thebits : TBits_1); inline;
  34936. begin
  34937. if thebits = 0 then
  34938. pTDefRegMap(@Self)^.clr := $00002000
  34939. else
  34940. pTDefRegMap(@Self)^.&set := $00002000;
  34941. end;
  34942. function TI2C1A_I2C3CON.getSIDL : TBits_1; inline;
  34943. begin
  34944. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  34945. end;
  34946. procedure TI2C1A_I2C3CON.setON; inline;
  34947. begin
  34948. pTDefRegMap(@Self)^.&set := $00008000;
  34949. end;
  34950. procedure TI2C1A_I2C3CON.clearON; inline;
  34951. begin
  34952. pTDefRegMap(@Self)^.clr := $00008000;
  34953. end;
  34954. procedure TI2C1A_I2C3CON.setON(thebits : TBits_1); inline;
  34955. begin
  34956. if thebits = 0 then
  34957. pTDefRegMap(@Self)^.clr := $00008000
  34958. else
  34959. pTDefRegMap(@Self)^.&set := $00008000;
  34960. end;
  34961. function TI2C1A_I2C3CON.getON : TBits_1; inline;
  34962. begin
  34963. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  34964. end;
  34965. procedure TI2C1A_I2C3CON.setIPMIEN; inline;
  34966. begin
  34967. pTDefRegMap(@Self)^.&set := $00000800;
  34968. end;
  34969. procedure TI2C1A_I2C3CON.clearIPMIEN; inline;
  34970. begin
  34971. pTDefRegMap(@Self)^.clr := $00000800;
  34972. end;
  34973. procedure TI2C1A_I2C3CON.setIPMIEN(thebits : TBits_1); inline;
  34974. begin
  34975. if thebits = 0 then
  34976. pTDefRegMap(@Self)^.clr := $00000800
  34977. else
  34978. pTDefRegMap(@Self)^.&set := $00000800;
  34979. end;
  34980. function TI2C1A_I2C3CON.getIPMIEN : TBits_1; inline;
  34981. begin
  34982. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  34983. end;
  34984. procedure TI2C1A_I2C3CON.setI2CSIDL; inline;
  34985. begin
  34986. pTDefRegMap(@Self)^.&set := $00002000;
  34987. end;
  34988. procedure TI2C1A_I2C3CON.clearI2CSIDL; inline;
  34989. begin
  34990. pTDefRegMap(@Self)^.clr := $00002000;
  34991. end;
  34992. procedure TI2C1A_I2C3CON.setI2CSIDL(thebits : TBits_1); inline;
  34993. begin
  34994. if thebits = 0 then
  34995. pTDefRegMap(@Self)^.clr := $00002000
  34996. else
  34997. pTDefRegMap(@Self)^.&set := $00002000;
  34998. end;
  34999. function TI2C1A_I2C3CON.getI2CSIDL : TBits_1; inline;
  35000. begin
  35001. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35002. end;
  35003. procedure TI2C1A_I2C3CON.setI2CEN; inline;
  35004. begin
  35005. pTDefRegMap(@Self)^.&set := $00008000;
  35006. end;
  35007. procedure TI2C1A_I2C3CON.clearI2CEN; inline;
  35008. begin
  35009. pTDefRegMap(@Self)^.clr := $00008000;
  35010. end;
  35011. procedure TI2C1A_I2C3CON.setI2CEN(thebits : TBits_1); inline;
  35012. begin
  35013. if thebits = 0 then
  35014. pTDefRegMap(@Self)^.clr := $00008000
  35015. else
  35016. pTDefRegMap(@Self)^.&set := $00008000;
  35017. end;
  35018. function TI2C1A_I2C3CON.getI2CEN : TBits_1; inline;
  35019. begin
  35020. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35021. end;
  35022. procedure TI2C1A_I2C3CON.setw(thebits : TBits_32); inline;
  35023. begin
  35024. pTDefRegMap(@Self)^.val := thebits;
  35025. end;
  35026. function TI2C1A_I2C3CON.getw : TBits_32; inline;
  35027. begin
  35028. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35029. end;
  35030. procedure TI2C1A_I2C1ASTAT.setTBF; inline;
  35031. begin
  35032. pTDefRegMap(@Self)^.&set := $00000001;
  35033. end;
  35034. procedure TI2C1A_I2C1ASTAT.clearTBF; inline;
  35035. begin
  35036. pTDefRegMap(@Self)^.clr := $00000001;
  35037. end;
  35038. procedure TI2C1A_I2C1ASTAT.setTBF(thebits : TBits_1); inline;
  35039. begin
  35040. if thebits = 0 then
  35041. pTDefRegMap(@Self)^.clr := $00000001
  35042. else
  35043. pTDefRegMap(@Self)^.&set := $00000001;
  35044. end;
  35045. function TI2C1A_I2C1ASTAT.getTBF : TBits_1; inline;
  35046. begin
  35047. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35048. end;
  35049. procedure TI2C1A_I2C1ASTAT.setRBF; inline;
  35050. begin
  35051. pTDefRegMap(@Self)^.&set := $00000002;
  35052. end;
  35053. procedure TI2C1A_I2C1ASTAT.clearRBF; inline;
  35054. begin
  35055. pTDefRegMap(@Self)^.clr := $00000002;
  35056. end;
  35057. procedure TI2C1A_I2C1ASTAT.setRBF(thebits : TBits_1); inline;
  35058. begin
  35059. if thebits = 0 then
  35060. pTDefRegMap(@Self)^.clr := $00000002
  35061. else
  35062. pTDefRegMap(@Self)^.&set := $00000002;
  35063. end;
  35064. function TI2C1A_I2C1ASTAT.getRBF : TBits_1; inline;
  35065. begin
  35066. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35067. end;
  35068. procedure TI2C1A_I2C1ASTAT.setR_W; inline;
  35069. begin
  35070. pTDefRegMap(@Self)^.&set := $00000004;
  35071. end;
  35072. procedure TI2C1A_I2C1ASTAT.clearR_W; inline;
  35073. begin
  35074. pTDefRegMap(@Self)^.clr := $00000004;
  35075. end;
  35076. procedure TI2C1A_I2C1ASTAT.setR_W(thebits : TBits_1); inline;
  35077. begin
  35078. if thebits = 0 then
  35079. pTDefRegMap(@Self)^.clr := $00000004
  35080. else
  35081. pTDefRegMap(@Self)^.&set := $00000004;
  35082. end;
  35083. function TI2C1A_I2C1ASTAT.getR_W : TBits_1; inline;
  35084. begin
  35085. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35086. end;
  35087. procedure TI2C1A_I2C1ASTAT.setS; inline;
  35088. begin
  35089. pTDefRegMap(@Self)^.&set := $00000008;
  35090. end;
  35091. procedure TI2C1A_I2C1ASTAT.clearS; inline;
  35092. begin
  35093. pTDefRegMap(@Self)^.clr := $00000008;
  35094. end;
  35095. procedure TI2C1A_I2C1ASTAT.setS(thebits : TBits_1); inline;
  35096. begin
  35097. if thebits = 0 then
  35098. pTDefRegMap(@Self)^.clr := $00000008
  35099. else
  35100. pTDefRegMap(@Self)^.&set := $00000008;
  35101. end;
  35102. function TI2C1A_I2C1ASTAT.getS : TBits_1; inline;
  35103. begin
  35104. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35105. end;
  35106. procedure TI2C1A_I2C1ASTAT.setP; inline;
  35107. begin
  35108. pTDefRegMap(@Self)^.&set := $00000010;
  35109. end;
  35110. procedure TI2C1A_I2C1ASTAT.clearP; inline;
  35111. begin
  35112. pTDefRegMap(@Self)^.clr := $00000010;
  35113. end;
  35114. procedure TI2C1A_I2C1ASTAT.setP(thebits : TBits_1); inline;
  35115. begin
  35116. if thebits = 0 then
  35117. pTDefRegMap(@Self)^.clr := $00000010
  35118. else
  35119. pTDefRegMap(@Self)^.&set := $00000010;
  35120. end;
  35121. function TI2C1A_I2C1ASTAT.getP : TBits_1; inline;
  35122. begin
  35123. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35124. end;
  35125. procedure TI2C1A_I2C1ASTAT.setD_A; inline;
  35126. begin
  35127. pTDefRegMap(@Self)^.&set := $00000020;
  35128. end;
  35129. procedure TI2C1A_I2C1ASTAT.clearD_A; inline;
  35130. begin
  35131. pTDefRegMap(@Self)^.clr := $00000020;
  35132. end;
  35133. procedure TI2C1A_I2C1ASTAT.setD_A(thebits : TBits_1); inline;
  35134. begin
  35135. if thebits = 0 then
  35136. pTDefRegMap(@Self)^.clr := $00000020
  35137. else
  35138. pTDefRegMap(@Self)^.&set := $00000020;
  35139. end;
  35140. function TI2C1A_I2C1ASTAT.getD_A : TBits_1; inline;
  35141. begin
  35142. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35143. end;
  35144. procedure TI2C1A_I2C1ASTAT.setI2COV; inline;
  35145. begin
  35146. pTDefRegMap(@Self)^.&set := $00000040;
  35147. end;
  35148. procedure TI2C1A_I2C1ASTAT.clearI2COV; inline;
  35149. begin
  35150. pTDefRegMap(@Self)^.clr := $00000040;
  35151. end;
  35152. procedure TI2C1A_I2C1ASTAT.setI2COV(thebits : TBits_1); inline;
  35153. begin
  35154. if thebits = 0 then
  35155. pTDefRegMap(@Self)^.clr := $00000040
  35156. else
  35157. pTDefRegMap(@Self)^.&set := $00000040;
  35158. end;
  35159. function TI2C1A_I2C1ASTAT.getI2COV : TBits_1; inline;
  35160. begin
  35161. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35162. end;
  35163. procedure TI2C1A_I2C1ASTAT.setIWCOL; inline;
  35164. begin
  35165. pTDefRegMap(@Self)^.&set := $00000080;
  35166. end;
  35167. procedure TI2C1A_I2C1ASTAT.clearIWCOL; inline;
  35168. begin
  35169. pTDefRegMap(@Self)^.clr := $00000080;
  35170. end;
  35171. procedure TI2C1A_I2C1ASTAT.setIWCOL(thebits : TBits_1); inline;
  35172. begin
  35173. if thebits = 0 then
  35174. pTDefRegMap(@Self)^.clr := $00000080
  35175. else
  35176. pTDefRegMap(@Self)^.&set := $00000080;
  35177. end;
  35178. function TI2C1A_I2C1ASTAT.getIWCOL : TBits_1; inline;
  35179. begin
  35180. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35181. end;
  35182. procedure TI2C1A_I2C1ASTAT.setADD10; inline;
  35183. begin
  35184. pTDefRegMap(@Self)^.&set := $00000100;
  35185. end;
  35186. procedure TI2C1A_I2C1ASTAT.clearADD10; inline;
  35187. begin
  35188. pTDefRegMap(@Self)^.clr := $00000100;
  35189. end;
  35190. procedure TI2C1A_I2C1ASTAT.setADD10(thebits : TBits_1); inline;
  35191. begin
  35192. if thebits = 0 then
  35193. pTDefRegMap(@Self)^.clr := $00000100
  35194. else
  35195. pTDefRegMap(@Self)^.&set := $00000100;
  35196. end;
  35197. function TI2C1A_I2C1ASTAT.getADD10 : TBits_1; inline;
  35198. begin
  35199. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35200. end;
  35201. procedure TI2C1A_I2C1ASTAT.setGCSTAT; inline;
  35202. begin
  35203. pTDefRegMap(@Self)^.&set := $00000200;
  35204. end;
  35205. procedure TI2C1A_I2C1ASTAT.clearGCSTAT; inline;
  35206. begin
  35207. pTDefRegMap(@Self)^.clr := $00000200;
  35208. end;
  35209. procedure TI2C1A_I2C1ASTAT.setGCSTAT(thebits : TBits_1); inline;
  35210. begin
  35211. if thebits = 0 then
  35212. pTDefRegMap(@Self)^.clr := $00000200
  35213. else
  35214. pTDefRegMap(@Self)^.&set := $00000200;
  35215. end;
  35216. function TI2C1A_I2C1ASTAT.getGCSTAT : TBits_1; inline;
  35217. begin
  35218. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35219. end;
  35220. procedure TI2C1A_I2C1ASTAT.setBCL; inline;
  35221. begin
  35222. pTDefRegMap(@Self)^.&set := $00000400;
  35223. end;
  35224. procedure TI2C1A_I2C1ASTAT.clearBCL; inline;
  35225. begin
  35226. pTDefRegMap(@Self)^.clr := $00000400;
  35227. end;
  35228. procedure TI2C1A_I2C1ASTAT.setBCL(thebits : TBits_1); inline;
  35229. begin
  35230. if thebits = 0 then
  35231. pTDefRegMap(@Self)^.clr := $00000400
  35232. else
  35233. pTDefRegMap(@Self)^.&set := $00000400;
  35234. end;
  35235. function TI2C1A_I2C1ASTAT.getBCL : TBits_1; inline;
  35236. begin
  35237. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35238. end;
  35239. procedure TI2C1A_I2C1ASTAT.setTRSTAT; inline;
  35240. begin
  35241. pTDefRegMap(@Self)^.&set := $00004000;
  35242. end;
  35243. procedure TI2C1A_I2C1ASTAT.clearTRSTAT; inline;
  35244. begin
  35245. pTDefRegMap(@Self)^.clr := $00004000;
  35246. end;
  35247. procedure TI2C1A_I2C1ASTAT.setTRSTAT(thebits : TBits_1); inline;
  35248. begin
  35249. if thebits = 0 then
  35250. pTDefRegMap(@Self)^.clr := $00004000
  35251. else
  35252. pTDefRegMap(@Self)^.&set := $00004000;
  35253. end;
  35254. function TI2C1A_I2C1ASTAT.getTRSTAT : TBits_1; inline;
  35255. begin
  35256. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35257. end;
  35258. procedure TI2C1A_I2C1ASTAT.setACKSTAT; inline;
  35259. begin
  35260. pTDefRegMap(@Self)^.&set := $00008000;
  35261. end;
  35262. procedure TI2C1A_I2C1ASTAT.clearACKSTAT; inline;
  35263. begin
  35264. pTDefRegMap(@Self)^.clr := $00008000;
  35265. end;
  35266. procedure TI2C1A_I2C1ASTAT.setACKSTAT(thebits : TBits_1); inline;
  35267. begin
  35268. if thebits = 0 then
  35269. pTDefRegMap(@Self)^.clr := $00008000
  35270. else
  35271. pTDefRegMap(@Self)^.&set := $00008000;
  35272. end;
  35273. function TI2C1A_I2C1ASTAT.getACKSTAT : TBits_1; inline;
  35274. begin
  35275. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35276. end;
  35277. procedure TI2C1A_I2C1ASTAT.setI2CPOV; inline;
  35278. begin
  35279. pTDefRegMap(@Self)^.&set := $00000040;
  35280. end;
  35281. procedure TI2C1A_I2C1ASTAT.clearI2CPOV; inline;
  35282. begin
  35283. pTDefRegMap(@Self)^.clr := $00000040;
  35284. end;
  35285. procedure TI2C1A_I2C1ASTAT.setI2CPOV(thebits : TBits_1); inline;
  35286. begin
  35287. if thebits = 0 then
  35288. pTDefRegMap(@Self)^.clr := $00000040
  35289. else
  35290. pTDefRegMap(@Self)^.&set := $00000040;
  35291. end;
  35292. function TI2C1A_I2C1ASTAT.getI2CPOV : TBits_1; inline;
  35293. begin
  35294. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35295. end;
  35296. procedure TI2C1A_I2C1ASTAT.setw(thebits : TBits_32); inline;
  35297. begin
  35298. pTDefRegMap(@Self)^.val := thebits;
  35299. end;
  35300. function TI2C1A_I2C1ASTAT.getw : TBits_32; inline;
  35301. begin
  35302. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35303. end;
  35304. procedure TI2C1A_I2C3STAT.setTBF; inline;
  35305. begin
  35306. pTDefRegMap(@Self)^.&set := $00000001;
  35307. end;
  35308. procedure TI2C1A_I2C3STAT.clearTBF; inline;
  35309. begin
  35310. pTDefRegMap(@Self)^.clr := $00000001;
  35311. end;
  35312. procedure TI2C1A_I2C3STAT.setTBF(thebits : TBits_1); inline;
  35313. begin
  35314. if thebits = 0 then
  35315. pTDefRegMap(@Self)^.clr := $00000001
  35316. else
  35317. pTDefRegMap(@Self)^.&set := $00000001;
  35318. end;
  35319. function TI2C1A_I2C3STAT.getTBF : TBits_1; inline;
  35320. begin
  35321. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35322. end;
  35323. procedure TI2C1A_I2C3STAT.setRBF; inline;
  35324. begin
  35325. pTDefRegMap(@Self)^.&set := $00000002;
  35326. end;
  35327. procedure TI2C1A_I2C3STAT.clearRBF; inline;
  35328. begin
  35329. pTDefRegMap(@Self)^.clr := $00000002;
  35330. end;
  35331. procedure TI2C1A_I2C3STAT.setRBF(thebits : TBits_1); inline;
  35332. begin
  35333. if thebits = 0 then
  35334. pTDefRegMap(@Self)^.clr := $00000002
  35335. else
  35336. pTDefRegMap(@Self)^.&set := $00000002;
  35337. end;
  35338. function TI2C1A_I2C3STAT.getRBF : TBits_1; inline;
  35339. begin
  35340. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35341. end;
  35342. procedure TI2C1A_I2C3STAT.setR_W; inline;
  35343. begin
  35344. pTDefRegMap(@Self)^.&set := $00000004;
  35345. end;
  35346. procedure TI2C1A_I2C3STAT.clearR_W; inline;
  35347. begin
  35348. pTDefRegMap(@Self)^.clr := $00000004;
  35349. end;
  35350. procedure TI2C1A_I2C3STAT.setR_W(thebits : TBits_1); inline;
  35351. begin
  35352. if thebits = 0 then
  35353. pTDefRegMap(@Self)^.clr := $00000004
  35354. else
  35355. pTDefRegMap(@Self)^.&set := $00000004;
  35356. end;
  35357. function TI2C1A_I2C3STAT.getR_W : TBits_1; inline;
  35358. begin
  35359. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35360. end;
  35361. procedure TI2C1A_I2C3STAT.setS; inline;
  35362. begin
  35363. pTDefRegMap(@Self)^.&set := $00000008;
  35364. end;
  35365. procedure TI2C1A_I2C3STAT.clearS; inline;
  35366. begin
  35367. pTDefRegMap(@Self)^.clr := $00000008;
  35368. end;
  35369. procedure TI2C1A_I2C3STAT.setS(thebits : TBits_1); inline;
  35370. begin
  35371. if thebits = 0 then
  35372. pTDefRegMap(@Self)^.clr := $00000008
  35373. else
  35374. pTDefRegMap(@Self)^.&set := $00000008;
  35375. end;
  35376. function TI2C1A_I2C3STAT.getS : TBits_1; inline;
  35377. begin
  35378. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35379. end;
  35380. procedure TI2C1A_I2C3STAT.setP; inline;
  35381. begin
  35382. pTDefRegMap(@Self)^.&set := $00000010;
  35383. end;
  35384. procedure TI2C1A_I2C3STAT.clearP; inline;
  35385. begin
  35386. pTDefRegMap(@Self)^.clr := $00000010;
  35387. end;
  35388. procedure TI2C1A_I2C3STAT.setP(thebits : TBits_1); inline;
  35389. begin
  35390. if thebits = 0 then
  35391. pTDefRegMap(@Self)^.clr := $00000010
  35392. else
  35393. pTDefRegMap(@Self)^.&set := $00000010;
  35394. end;
  35395. function TI2C1A_I2C3STAT.getP : TBits_1; inline;
  35396. begin
  35397. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35398. end;
  35399. procedure TI2C1A_I2C3STAT.setD_A; inline;
  35400. begin
  35401. pTDefRegMap(@Self)^.&set := $00000020;
  35402. end;
  35403. procedure TI2C1A_I2C3STAT.clearD_A; inline;
  35404. begin
  35405. pTDefRegMap(@Self)^.clr := $00000020;
  35406. end;
  35407. procedure TI2C1A_I2C3STAT.setD_A(thebits : TBits_1); inline;
  35408. begin
  35409. if thebits = 0 then
  35410. pTDefRegMap(@Self)^.clr := $00000020
  35411. else
  35412. pTDefRegMap(@Self)^.&set := $00000020;
  35413. end;
  35414. function TI2C1A_I2C3STAT.getD_A : TBits_1; inline;
  35415. begin
  35416. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35417. end;
  35418. procedure TI2C1A_I2C3STAT.setI2COV; inline;
  35419. begin
  35420. pTDefRegMap(@Self)^.&set := $00000040;
  35421. end;
  35422. procedure TI2C1A_I2C3STAT.clearI2COV; inline;
  35423. begin
  35424. pTDefRegMap(@Self)^.clr := $00000040;
  35425. end;
  35426. procedure TI2C1A_I2C3STAT.setI2COV(thebits : TBits_1); inline;
  35427. begin
  35428. if thebits = 0 then
  35429. pTDefRegMap(@Self)^.clr := $00000040
  35430. else
  35431. pTDefRegMap(@Self)^.&set := $00000040;
  35432. end;
  35433. function TI2C1A_I2C3STAT.getI2COV : TBits_1; inline;
  35434. begin
  35435. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35436. end;
  35437. procedure TI2C1A_I2C3STAT.setIWCOL; inline;
  35438. begin
  35439. pTDefRegMap(@Self)^.&set := $00000080;
  35440. end;
  35441. procedure TI2C1A_I2C3STAT.clearIWCOL; inline;
  35442. begin
  35443. pTDefRegMap(@Self)^.clr := $00000080;
  35444. end;
  35445. procedure TI2C1A_I2C3STAT.setIWCOL(thebits : TBits_1); inline;
  35446. begin
  35447. if thebits = 0 then
  35448. pTDefRegMap(@Self)^.clr := $00000080
  35449. else
  35450. pTDefRegMap(@Self)^.&set := $00000080;
  35451. end;
  35452. function TI2C1A_I2C3STAT.getIWCOL : TBits_1; inline;
  35453. begin
  35454. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35455. end;
  35456. procedure TI2C1A_I2C3STAT.setADD10; inline;
  35457. begin
  35458. pTDefRegMap(@Self)^.&set := $00000100;
  35459. end;
  35460. procedure TI2C1A_I2C3STAT.clearADD10; inline;
  35461. begin
  35462. pTDefRegMap(@Self)^.clr := $00000100;
  35463. end;
  35464. procedure TI2C1A_I2C3STAT.setADD10(thebits : TBits_1); inline;
  35465. begin
  35466. if thebits = 0 then
  35467. pTDefRegMap(@Self)^.clr := $00000100
  35468. else
  35469. pTDefRegMap(@Self)^.&set := $00000100;
  35470. end;
  35471. function TI2C1A_I2C3STAT.getADD10 : TBits_1; inline;
  35472. begin
  35473. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35474. end;
  35475. procedure TI2C1A_I2C3STAT.setGCSTAT; inline;
  35476. begin
  35477. pTDefRegMap(@Self)^.&set := $00000200;
  35478. end;
  35479. procedure TI2C1A_I2C3STAT.clearGCSTAT; inline;
  35480. begin
  35481. pTDefRegMap(@Self)^.clr := $00000200;
  35482. end;
  35483. procedure TI2C1A_I2C3STAT.setGCSTAT(thebits : TBits_1); inline;
  35484. begin
  35485. if thebits = 0 then
  35486. pTDefRegMap(@Self)^.clr := $00000200
  35487. else
  35488. pTDefRegMap(@Self)^.&set := $00000200;
  35489. end;
  35490. function TI2C1A_I2C3STAT.getGCSTAT : TBits_1; inline;
  35491. begin
  35492. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35493. end;
  35494. procedure TI2C1A_I2C3STAT.setBCL; inline;
  35495. begin
  35496. pTDefRegMap(@Self)^.&set := $00000400;
  35497. end;
  35498. procedure TI2C1A_I2C3STAT.clearBCL; inline;
  35499. begin
  35500. pTDefRegMap(@Self)^.clr := $00000400;
  35501. end;
  35502. procedure TI2C1A_I2C3STAT.setBCL(thebits : TBits_1); inline;
  35503. begin
  35504. if thebits = 0 then
  35505. pTDefRegMap(@Self)^.clr := $00000400
  35506. else
  35507. pTDefRegMap(@Self)^.&set := $00000400;
  35508. end;
  35509. function TI2C1A_I2C3STAT.getBCL : TBits_1; inline;
  35510. begin
  35511. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35512. end;
  35513. procedure TI2C1A_I2C3STAT.setTRSTAT; inline;
  35514. begin
  35515. pTDefRegMap(@Self)^.&set := $00004000;
  35516. end;
  35517. procedure TI2C1A_I2C3STAT.clearTRSTAT; inline;
  35518. begin
  35519. pTDefRegMap(@Self)^.clr := $00004000;
  35520. end;
  35521. procedure TI2C1A_I2C3STAT.setTRSTAT(thebits : TBits_1); inline;
  35522. begin
  35523. if thebits = 0 then
  35524. pTDefRegMap(@Self)^.clr := $00004000
  35525. else
  35526. pTDefRegMap(@Self)^.&set := $00004000;
  35527. end;
  35528. function TI2C1A_I2C3STAT.getTRSTAT : TBits_1; inline;
  35529. begin
  35530. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  35531. end;
  35532. procedure TI2C1A_I2C3STAT.setACKSTAT; inline;
  35533. begin
  35534. pTDefRegMap(@Self)^.&set := $00008000;
  35535. end;
  35536. procedure TI2C1A_I2C3STAT.clearACKSTAT; inline;
  35537. begin
  35538. pTDefRegMap(@Self)^.clr := $00008000;
  35539. end;
  35540. procedure TI2C1A_I2C3STAT.setACKSTAT(thebits : TBits_1); inline;
  35541. begin
  35542. if thebits = 0 then
  35543. pTDefRegMap(@Self)^.clr := $00008000
  35544. else
  35545. pTDefRegMap(@Self)^.&set := $00008000;
  35546. end;
  35547. function TI2C1A_I2C3STAT.getACKSTAT : TBits_1; inline;
  35548. begin
  35549. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35550. end;
  35551. procedure TI2C1A_I2C3STAT.setI2CPOV; inline;
  35552. begin
  35553. pTDefRegMap(@Self)^.&set := $00000040;
  35554. end;
  35555. procedure TI2C1A_I2C3STAT.clearI2CPOV; inline;
  35556. begin
  35557. pTDefRegMap(@Self)^.clr := $00000040;
  35558. end;
  35559. procedure TI2C1A_I2C3STAT.setI2CPOV(thebits : TBits_1); inline;
  35560. begin
  35561. if thebits = 0 then
  35562. pTDefRegMap(@Self)^.clr := $00000040
  35563. else
  35564. pTDefRegMap(@Self)^.&set := $00000040;
  35565. end;
  35566. function TI2C1A_I2C3STAT.getI2CPOV : TBits_1; inline;
  35567. begin
  35568. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35569. end;
  35570. procedure TI2C1A_I2C3STAT.setw(thebits : TBits_32); inline;
  35571. begin
  35572. pTDefRegMap(@Self)^.val := thebits;
  35573. end;
  35574. function TI2C1A_I2C3STAT.getw : TBits_32; inline;
  35575. begin
  35576. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35577. end;
  35578. procedure TI2C2A_I2C2ACON.setSEN; inline;
  35579. begin
  35580. pTDefRegMap(@Self)^.&set := $00000001;
  35581. end;
  35582. procedure TI2C2A_I2C2ACON.clearSEN; inline;
  35583. begin
  35584. pTDefRegMap(@Self)^.clr := $00000001;
  35585. end;
  35586. procedure TI2C2A_I2C2ACON.setSEN(thebits : TBits_1); inline;
  35587. begin
  35588. if thebits = 0 then
  35589. pTDefRegMap(@Self)^.clr := $00000001
  35590. else
  35591. pTDefRegMap(@Self)^.&set := $00000001;
  35592. end;
  35593. function TI2C2A_I2C2ACON.getSEN : TBits_1; inline;
  35594. begin
  35595. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35596. end;
  35597. procedure TI2C2A_I2C2ACON.setRSEN; inline;
  35598. begin
  35599. pTDefRegMap(@Self)^.&set := $00000002;
  35600. end;
  35601. procedure TI2C2A_I2C2ACON.clearRSEN; inline;
  35602. begin
  35603. pTDefRegMap(@Self)^.clr := $00000002;
  35604. end;
  35605. procedure TI2C2A_I2C2ACON.setRSEN(thebits : TBits_1); inline;
  35606. begin
  35607. if thebits = 0 then
  35608. pTDefRegMap(@Self)^.clr := $00000002
  35609. else
  35610. pTDefRegMap(@Self)^.&set := $00000002;
  35611. end;
  35612. function TI2C2A_I2C2ACON.getRSEN : TBits_1; inline;
  35613. begin
  35614. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35615. end;
  35616. procedure TI2C2A_I2C2ACON.setPEN; inline;
  35617. begin
  35618. pTDefRegMap(@Self)^.&set := $00000004;
  35619. end;
  35620. procedure TI2C2A_I2C2ACON.clearPEN; inline;
  35621. begin
  35622. pTDefRegMap(@Self)^.clr := $00000004;
  35623. end;
  35624. procedure TI2C2A_I2C2ACON.setPEN(thebits : TBits_1); inline;
  35625. begin
  35626. if thebits = 0 then
  35627. pTDefRegMap(@Self)^.clr := $00000004
  35628. else
  35629. pTDefRegMap(@Self)^.&set := $00000004;
  35630. end;
  35631. function TI2C2A_I2C2ACON.getPEN : TBits_1; inline;
  35632. begin
  35633. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35634. end;
  35635. procedure TI2C2A_I2C2ACON.setRCEN; inline;
  35636. begin
  35637. pTDefRegMap(@Self)^.&set := $00000008;
  35638. end;
  35639. procedure TI2C2A_I2C2ACON.clearRCEN; inline;
  35640. begin
  35641. pTDefRegMap(@Self)^.clr := $00000008;
  35642. end;
  35643. procedure TI2C2A_I2C2ACON.setRCEN(thebits : TBits_1); inline;
  35644. begin
  35645. if thebits = 0 then
  35646. pTDefRegMap(@Self)^.clr := $00000008
  35647. else
  35648. pTDefRegMap(@Self)^.&set := $00000008;
  35649. end;
  35650. function TI2C2A_I2C2ACON.getRCEN : TBits_1; inline;
  35651. begin
  35652. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  35653. end;
  35654. procedure TI2C2A_I2C2ACON.setACKEN; inline;
  35655. begin
  35656. pTDefRegMap(@Self)^.&set := $00000010;
  35657. end;
  35658. procedure TI2C2A_I2C2ACON.clearACKEN; inline;
  35659. begin
  35660. pTDefRegMap(@Self)^.clr := $00000010;
  35661. end;
  35662. procedure TI2C2A_I2C2ACON.setACKEN(thebits : TBits_1); inline;
  35663. begin
  35664. if thebits = 0 then
  35665. pTDefRegMap(@Self)^.clr := $00000010
  35666. else
  35667. pTDefRegMap(@Self)^.&set := $00000010;
  35668. end;
  35669. function TI2C2A_I2C2ACON.getACKEN : TBits_1; inline;
  35670. begin
  35671. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  35672. end;
  35673. procedure TI2C2A_I2C2ACON.setACKDT; inline;
  35674. begin
  35675. pTDefRegMap(@Self)^.&set := $00000020;
  35676. end;
  35677. procedure TI2C2A_I2C2ACON.clearACKDT; inline;
  35678. begin
  35679. pTDefRegMap(@Self)^.clr := $00000020;
  35680. end;
  35681. procedure TI2C2A_I2C2ACON.setACKDT(thebits : TBits_1); inline;
  35682. begin
  35683. if thebits = 0 then
  35684. pTDefRegMap(@Self)^.clr := $00000020
  35685. else
  35686. pTDefRegMap(@Self)^.&set := $00000020;
  35687. end;
  35688. function TI2C2A_I2C2ACON.getACKDT : TBits_1; inline;
  35689. begin
  35690. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  35691. end;
  35692. procedure TI2C2A_I2C2ACON.setSTREN; inline;
  35693. begin
  35694. pTDefRegMap(@Self)^.&set := $00000040;
  35695. end;
  35696. procedure TI2C2A_I2C2ACON.clearSTREN; inline;
  35697. begin
  35698. pTDefRegMap(@Self)^.clr := $00000040;
  35699. end;
  35700. procedure TI2C2A_I2C2ACON.setSTREN(thebits : TBits_1); inline;
  35701. begin
  35702. if thebits = 0 then
  35703. pTDefRegMap(@Self)^.clr := $00000040
  35704. else
  35705. pTDefRegMap(@Self)^.&set := $00000040;
  35706. end;
  35707. function TI2C2A_I2C2ACON.getSTREN : TBits_1; inline;
  35708. begin
  35709. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  35710. end;
  35711. procedure TI2C2A_I2C2ACON.setGCEN; inline;
  35712. begin
  35713. pTDefRegMap(@Self)^.&set := $00000080;
  35714. end;
  35715. procedure TI2C2A_I2C2ACON.clearGCEN; inline;
  35716. begin
  35717. pTDefRegMap(@Self)^.clr := $00000080;
  35718. end;
  35719. procedure TI2C2A_I2C2ACON.setGCEN(thebits : TBits_1); inline;
  35720. begin
  35721. if thebits = 0 then
  35722. pTDefRegMap(@Self)^.clr := $00000080
  35723. else
  35724. pTDefRegMap(@Self)^.&set := $00000080;
  35725. end;
  35726. function TI2C2A_I2C2ACON.getGCEN : TBits_1; inline;
  35727. begin
  35728. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  35729. end;
  35730. procedure TI2C2A_I2C2ACON.setSMEN; inline;
  35731. begin
  35732. pTDefRegMap(@Self)^.&set := $00000100;
  35733. end;
  35734. procedure TI2C2A_I2C2ACON.clearSMEN; inline;
  35735. begin
  35736. pTDefRegMap(@Self)^.clr := $00000100;
  35737. end;
  35738. procedure TI2C2A_I2C2ACON.setSMEN(thebits : TBits_1); inline;
  35739. begin
  35740. if thebits = 0 then
  35741. pTDefRegMap(@Self)^.clr := $00000100
  35742. else
  35743. pTDefRegMap(@Self)^.&set := $00000100;
  35744. end;
  35745. function TI2C2A_I2C2ACON.getSMEN : TBits_1; inline;
  35746. begin
  35747. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  35748. end;
  35749. procedure TI2C2A_I2C2ACON.setDISSLW; inline;
  35750. begin
  35751. pTDefRegMap(@Self)^.&set := $00000200;
  35752. end;
  35753. procedure TI2C2A_I2C2ACON.clearDISSLW; inline;
  35754. begin
  35755. pTDefRegMap(@Self)^.clr := $00000200;
  35756. end;
  35757. procedure TI2C2A_I2C2ACON.setDISSLW(thebits : TBits_1); inline;
  35758. begin
  35759. if thebits = 0 then
  35760. pTDefRegMap(@Self)^.clr := $00000200
  35761. else
  35762. pTDefRegMap(@Self)^.&set := $00000200;
  35763. end;
  35764. function TI2C2A_I2C2ACON.getDISSLW : TBits_1; inline;
  35765. begin
  35766. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  35767. end;
  35768. procedure TI2C2A_I2C2ACON.setA10M; inline;
  35769. begin
  35770. pTDefRegMap(@Self)^.&set := $00000400;
  35771. end;
  35772. procedure TI2C2A_I2C2ACON.clearA10M; inline;
  35773. begin
  35774. pTDefRegMap(@Self)^.clr := $00000400;
  35775. end;
  35776. procedure TI2C2A_I2C2ACON.setA10M(thebits : TBits_1); inline;
  35777. begin
  35778. if thebits = 0 then
  35779. pTDefRegMap(@Self)^.clr := $00000400
  35780. else
  35781. pTDefRegMap(@Self)^.&set := $00000400;
  35782. end;
  35783. function TI2C2A_I2C2ACON.getA10M : TBits_1; inline;
  35784. begin
  35785. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  35786. end;
  35787. procedure TI2C2A_I2C2ACON.setSTRICT; inline;
  35788. begin
  35789. pTDefRegMap(@Self)^.&set := $00000800;
  35790. end;
  35791. procedure TI2C2A_I2C2ACON.clearSTRICT; inline;
  35792. begin
  35793. pTDefRegMap(@Self)^.clr := $00000800;
  35794. end;
  35795. procedure TI2C2A_I2C2ACON.setSTRICT(thebits : TBits_1); inline;
  35796. begin
  35797. if thebits = 0 then
  35798. pTDefRegMap(@Self)^.clr := $00000800
  35799. else
  35800. pTDefRegMap(@Self)^.&set := $00000800;
  35801. end;
  35802. function TI2C2A_I2C2ACON.getSTRICT : TBits_1; inline;
  35803. begin
  35804. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35805. end;
  35806. procedure TI2C2A_I2C2ACON.setSCLREL; inline;
  35807. begin
  35808. pTDefRegMap(@Self)^.&set := $00001000;
  35809. end;
  35810. procedure TI2C2A_I2C2ACON.clearSCLREL; inline;
  35811. begin
  35812. pTDefRegMap(@Self)^.clr := $00001000;
  35813. end;
  35814. procedure TI2C2A_I2C2ACON.setSCLREL(thebits : TBits_1); inline;
  35815. begin
  35816. if thebits = 0 then
  35817. pTDefRegMap(@Self)^.clr := $00001000
  35818. else
  35819. pTDefRegMap(@Self)^.&set := $00001000;
  35820. end;
  35821. function TI2C2A_I2C2ACON.getSCLREL : TBits_1; inline;
  35822. begin
  35823. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  35824. end;
  35825. procedure TI2C2A_I2C2ACON.setSIDL; inline;
  35826. begin
  35827. pTDefRegMap(@Self)^.&set := $00002000;
  35828. end;
  35829. procedure TI2C2A_I2C2ACON.clearSIDL; inline;
  35830. begin
  35831. pTDefRegMap(@Self)^.clr := $00002000;
  35832. end;
  35833. procedure TI2C2A_I2C2ACON.setSIDL(thebits : TBits_1); inline;
  35834. begin
  35835. if thebits = 0 then
  35836. pTDefRegMap(@Self)^.clr := $00002000
  35837. else
  35838. pTDefRegMap(@Self)^.&set := $00002000;
  35839. end;
  35840. function TI2C2A_I2C2ACON.getSIDL : TBits_1; inline;
  35841. begin
  35842. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35843. end;
  35844. procedure TI2C2A_I2C2ACON.setON; inline;
  35845. begin
  35846. pTDefRegMap(@Self)^.&set := $00008000;
  35847. end;
  35848. procedure TI2C2A_I2C2ACON.clearON; inline;
  35849. begin
  35850. pTDefRegMap(@Self)^.clr := $00008000;
  35851. end;
  35852. procedure TI2C2A_I2C2ACON.setON(thebits : TBits_1); inline;
  35853. begin
  35854. if thebits = 0 then
  35855. pTDefRegMap(@Self)^.clr := $00008000
  35856. else
  35857. pTDefRegMap(@Self)^.&set := $00008000;
  35858. end;
  35859. function TI2C2A_I2C2ACON.getON : TBits_1; inline;
  35860. begin
  35861. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35862. end;
  35863. procedure TI2C2A_I2C2ACON.setIPMIEN; inline;
  35864. begin
  35865. pTDefRegMap(@Self)^.&set := $00000800;
  35866. end;
  35867. procedure TI2C2A_I2C2ACON.clearIPMIEN; inline;
  35868. begin
  35869. pTDefRegMap(@Self)^.clr := $00000800;
  35870. end;
  35871. procedure TI2C2A_I2C2ACON.setIPMIEN(thebits : TBits_1); inline;
  35872. begin
  35873. if thebits = 0 then
  35874. pTDefRegMap(@Self)^.clr := $00000800
  35875. else
  35876. pTDefRegMap(@Self)^.&set := $00000800;
  35877. end;
  35878. function TI2C2A_I2C2ACON.getIPMIEN : TBits_1; inline;
  35879. begin
  35880. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  35881. end;
  35882. procedure TI2C2A_I2C2ACON.setI2CSIDL; inline;
  35883. begin
  35884. pTDefRegMap(@Self)^.&set := $00002000;
  35885. end;
  35886. procedure TI2C2A_I2C2ACON.clearI2CSIDL; inline;
  35887. begin
  35888. pTDefRegMap(@Self)^.clr := $00002000;
  35889. end;
  35890. procedure TI2C2A_I2C2ACON.setI2CSIDL(thebits : TBits_1); inline;
  35891. begin
  35892. if thebits = 0 then
  35893. pTDefRegMap(@Self)^.clr := $00002000
  35894. else
  35895. pTDefRegMap(@Self)^.&set := $00002000;
  35896. end;
  35897. function TI2C2A_I2C2ACON.getI2CSIDL : TBits_1; inline;
  35898. begin
  35899. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  35900. end;
  35901. procedure TI2C2A_I2C2ACON.setI2CEN; inline;
  35902. begin
  35903. pTDefRegMap(@Self)^.&set := $00008000;
  35904. end;
  35905. procedure TI2C2A_I2C2ACON.clearI2CEN; inline;
  35906. begin
  35907. pTDefRegMap(@Self)^.clr := $00008000;
  35908. end;
  35909. procedure TI2C2A_I2C2ACON.setI2CEN(thebits : TBits_1); inline;
  35910. begin
  35911. if thebits = 0 then
  35912. pTDefRegMap(@Self)^.clr := $00008000
  35913. else
  35914. pTDefRegMap(@Self)^.&set := $00008000;
  35915. end;
  35916. function TI2C2A_I2C2ACON.getI2CEN : TBits_1; inline;
  35917. begin
  35918. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  35919. end;
  35920. procedure TI2C2A_I2C2ACON.setw(thebits : TBits_32); inline;
  35921. begin
  35922. pTDefRegMap(@Self)^.val := thebits;
  35923. end;
  35924. function TI2C2A_I2C2ACON.getw : TBits_32; inline;
  35925. begin
  35926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  35927. end;
  35928. procedure TI2C2A_I2C4CON.setSEN; inline;
  35929. begin
  35930. pTDefRegMap(@Self)^.&set := $00000001;
  35931. end;
  35932. procedure TI2C2A_I2C4CON.clearSEN; inline;
  35933. begin
  35934. pTDefRegMap(@Self)^.clr := $00000001;
  35935. end;
  35936. procedure TI2C2A_I2C4CON.setSEN(thebits : TBits_1); inline;
  35937. begin
  35938. if thebits = 0 then
  35939. pTDefRegMap(@Self)^.clr := $00000001
  35940. else
  35941. pTDefRegMap(@Self)^.&set := $00000001;
  35942. end;
  35943. function TI2C2A_I2C4CON.getSEN : TBits_1; inline;
  35944. begin
  35945. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  35946. end;
  35947. procedure TI2C2A_I2C4CON.setRSEN; inline;
  35948. begin
  35949. pTDefRegMap(@Self)^.&set := $00000002;
  35950. end;
  35951. procedure TI2C2A_I2C4CON.clearRSEN; inline;
  35952. begin
  35953. pTDefRegMap(@Self)^.clr := $00000002;
  35954. end;
  35955. procedure TI2C2A_I2C4CON.setRSEN(thebits : TBits_1); inline;
  35956. begin
  35957. if thebits = 0 then
  35958. pTDefRegMap(@Self)^.clr := $00000002
  35959. else
  35960. pTDefRegMap(@Self)^.&set := $00000002;
  35961. end;
  35962. function TI2C2A_I2C4CON.getRSEN : TBits_1; inline;
  35963. begin
  35964. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  35965. end;
  35966. procedure TI2C2A_I2C4CON.setPEN; inline;
  35967. begin
  35968. pTDefRegMap(@Self)^.&set := $00000004;
  35969. end;
  35970. procedure TI2C2A_I2C4CON.clearPEN; inline;
  35971. begin
  35972. pTDefRegMap(@Self)^.clr := $00000004;
  35973. end;
  35974. procedure TI2C2A_I2C4CON.setPEN(thebits : TBits_1); inline;
  35975. begin
  35976. if thebits = 0 then
  35977. pTDefRegMap(@Self)^.clr := $00000004
  35978. else
  35979. pTDefRegMap(@Self)^.&set := $00000004;
  35980. end;
  35981. function TI2C2A_I2C4CON.getPEN : TBits_1; inline;
  35982. begin
  35983. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  35984. end;
  35985. procedure TI2C2A_I2C4CON.setRCEN; inline;
  35986. begin
  35987. pTDefRegMap(@Self)^.&set := $00000008;
  35988. end;
  35989. procedure TI2C2A_I2C4CON.clearRCEN; inline;
  35990. begin
  35991. pTDefRegMap(@Self)^.clr := $00000008;
  35992. end;
  35993. procedure TI2C2A_I2C4CON.setRCEN(thebits : TBits_1); inline;
  35994. begin
  35995. if thebits = 0 then
  35996. pTDefRegMap(@Self)^.clr := $00000008
  35997. else
  35998. pTDefRegMap(@Self)^.&set := $00000008;
  35999. end;
  36000. function TI2C2A_I2C4CON.getRCEN : TBits_1; inline;
  36001. begin
  36002. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36003. end;
  36004. procedure TI2C2A_I2C4CON.setACKEN; inline;
  36005. begin
  36006. pTDefRegMap(@Self)^.&set := $00000010;
  36007. end;
  36008. procedure TI2C2A_I2C4CON.clearACKEN; inline;
  36009. begin
  36010. pTDefRegMap(@Self)^.clr := $00000010;
  36011. end;
  36012. procedure TI2C2A_I2C4CON.setACKEN(thebits : TBits_1); inline;
  36013. begin
  36014. if thebits = 0 then
  36015. pTDefRegMap(@Self)^.clr := $00000010
  36016. else
  36017. pTDefRegMap(@Self)^.&set := $00000010;
  36018. end;
  36019. function TI2C2A_I2C4CON.getACKEN : TBits_1; inline;
  36020. begin
  36021. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36022. end;
  36023. procedure TI2C2A_I2C4CON.setACKDT; inline;
  36024. begin
  36025. pTDefRegMap(@Self)^.&set := $00000020;
  36026. end;
  36027. procedure TI2C2A_I2C4CON.clearACKDT; inline;
  36028. begin
  36029. pTDefRegMap(@Self)^.clr := $00000020;
  36030. end;
  36031. procedure TI2C2A_I2C4CON.setACKDT(thebits : TBits_1); inline;
  36032. begin
  36033. if thebits = 0 then
  36034. pTDefRegMap(@Self)^.clr := $00000020
  36035. else
  36036. pTDefRegMap(@Self)^.&set := $00000020;
  36037. end;
  36038. function TI2C2A_I2C4CON.getACKDT : TBits_1; inline;
  36039. begin
  36040. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36041. end;
  36042. procedure TI2C2A_I2C4CON.setSTREN; inline;
  36043. begin
  36044. pTDefRegMap(@Self)^.&set := $00000040;
  36045. end;
  36046. procedure TI2C2A_I2C4CON.clearSTREN; inline;
  36047. begin
  36048. pTDefRegMap(@Self)^.clr := $00000040;
  36049. end;
  36050. procedure TI2C2A_I2C4CON.setSTREN(thebits : TBits_1); inline;
  36051. begin
  36052. if thebits = 0 then
  36053. pTDefRegMap(@Self)^.clr := $00000040
  36054. else
  36055. pTDefRegMap(@Self)^.&set := $00000040;
  36056. end;
  36057. function TI2C2A_I2C4CON.getSTREN : TBits_1; inline;
  36058. begin
  36059. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36060. end;
  36061. procedure TI2C2A_I2C4CON.setGCEN; inline;
  36062. begin
  36063. pTDefRegMap(@Self)^.&set := $00000080;
  36064. end;
  36065. procedure TI2C2A_I2C4CON.clearGCEN; inline;
  36066. begin
  36067. pTDefRegMap(@Self)^.clr := $00000080;
  36068. end;
  36069. procedure TI2C2A_I2C4CON.setGCEN(thebits : TBits_1); inline;
  36070. begin
  36071. if thebits = 0 then
  36072. pTDefRegMap(@Self)^.clr := $00000080
  36073. else
  36074. pTDefRegMap(@Self)^.&set := $00000080;
  36075. end;
  36076. function TI2C2A_I2C4CON.getGCEN : TBits_1; inline;
  36077. begin
  36078. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36079. end;
  36080. procedure TI2C2A_I2C4CON.setSMEN; inline;
  36081. begin
  36082. pTDefRegMap(@Self)^.&set := $00000100;
  36083. end;
  36084. procedure TI2C2A_I2C4CON.clearSMEN; inline;
  36085. begin
  36086. pTDefRegMap(@Self)^.clr := $00000100;
  36087. end;
  36088. procedure TI2C2A_I2C4CON.setSMEN(thebits : TBits_1); inline;
  36089. begin
  36090. if thebits = 0 then
  36091. pTDefRegMap(@Self)^.clr := $00000100
  36092. else
  36093. pTDefRegMap(@Self)^.&set := $00000100;
  36094. end;
  36095. function TI2C2A_I2C4CON.getSMEN : TBits_1; inline;
  36096. begin
  36097. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36098. end;
  36099. procedure TI2C2A_I2C4CON.setDISSLW; inline;
  36100. begin
  36101. pTDefRegMap(@Self)^.&set := $00000200;
  36102. end;
  36103. procedure TI2C2A_I2C4CON.clearDISSLW; inline;
  36104. begin
  36105. pTDefRegMap(@Self)^.clr := $00000200;
  36106. end;
  36107. procedure TI2C2A_I2C4CON.setDISSLW(thebits : TBits_1); inline;
  36108. begin
  36109. if thebits = 0 then
  36110. pTDefRegMap(@Self)^.clr := $00000200
  36111. else
  36112. pTDefRegMap(@Self)^.&set := $00000200;
  36113. end;
  36114. function TI2C2A_I2C4CON.getDISSLW : TBits_1; inline;
  36115. begin
  36116. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36117. end;
  36118. procedure TI2C2A_I2C4CON.setA10M; inline;
  36119. begin
  36120. pTDefRegMap(@Self)^.&set := $00000400;
  36121. end;
  36122. procedure TI2C2A_I2C4CON.clearA10M; inline;
  36123. begin
  36124. pTDefRegMap(@Self)^.clr := $00000400;
  36125. end;
  36126. procedure TI2C2A_I2C4CON.setA10M(thebits : TBits_1); inline;
  36127. begin
  36128. if thebits = 0 then
  36129. pTDefRegMap(@Self)^.clr := $00000400
  36130. else
  36131. pTDefRegMap(@Self)^.&set := $00000400;
  36132. end;
  36133. function TI2C2A_I2C4CON.getA10M : TBits_1; inline;
  36134. begin
  36135. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36136. end;
  36137. procedure TI2C2A_I2C4CON.setSTRICT; inline;
  36138. begin
  36139. pTDefRegMap(@Self)^.&set := $00000800;
  36140. end;
  36141. procedure TI2C2A_I2C4CON.clearSTRICT; inline;
  36142. begin
  36143. pTDefRegMap(@Self)^.clr := $00000800;
  36144. end;
  36145. procedure TI2C2A_I2C4CON.setSTRICT(thebits : TBits_1); inline;
  36146. begin
  36147. if thebits = 0 then
  36148. pTDefRegMap(@Self)^.clr := $00000800
  36149. else
  36150. pTDefRegMap(@Self)^.&set := $00000800;
  36151. end;
  36152. function TI2C2A_I2C4CON.getSTRICT : TBits_1; inline;
  36153. begin
  36154. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36155. end;
  36156. procedure TI2C2A_I2C4CON.setSCLREL; inline;
  36157. begin
  36158. pTDefRegMap(@Self)^.&set := $00001000;
  36159. end;
  36160. procedure TI2C2A_I2C4CON.clearSCLREL; inline;
  36161. begin
  36162. pTDefRegMap(@Self)^.clr := $00001000;
  36163. end;
  36164. procedure TI2C2A_I2C4CON.setSCLREL(thebits : TBits_1); inline;
  36165. begin
  36166. if thebits = 0 then
  36167. pTDefRegMap(@Self)^.clr := $00001000
  36168. else
  36169. pTDefRegMap(@Self)^.&set := $00001000;
  36170. end;
  36171. function TI2C2A_I2C4CON.getSCLREL : TBits_1; inline;
  36172. begin
  36173. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  36174. end;
  36175. procedure TI2C2A_I2C4CON.setSIDL; inline;
  36176. begin
  36177. pTDefRegMap(@Self)^.&set := $00002000;
  36178. end;
  36179. procedure TI2C2A_I2C4CON.clearSIDL; inline;
  36180. begin
  36181. pTDefRegMap(@Self)^.clr := $00002000;
  36182. end;
  36183. procedure TI2C2A_I2C4CON.setSIDL(thebits : TBits_1); inline;
  36184. begin
  36185. if thebits = 0 then
  36186. pTDefRegMap(@Self)^.clr := $00002000
  36187. else
  36188. pTDefRegMap(@Self)^.&set := $00002000;
  36189. end;
  36190. function TI2C2A_I2C4CON.getSIDL : TBits_1; inline;
  36191. begin
  36192. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36193. end;
  36194. procedure TI2C2A_I2C4CON.setON; inline;
  36195. begin
  36196. pTDefRegMap(@Self)^.&set := $00008000;
  36197. end;
  36198. procedure TI2C2A_I2C4CON.clearON; inline;
  36199. begin
  36200. pTDefRegMap(@Self)^.clr := $00008000;
  36201. end;
  36202. procedure TI2C2A_I2C4CON.setON(thebits : TBits_1); inline;
  36203. begin
  36204. if thebits = 0 then
  36205. pTDefRegMap(@Self)^.clr := $00008000
  36206. else
  36207. pTDefRegMap(@Self)^.&set := $00008000;
  36208. end;
  36209. function TI2C2A_I2C4CON.getON : TBits_1; inline;
  36210. begin
  36211. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36212. end;
  36213. procedure TI2C2A_I2C4CON.setIPMIEN; inline;
  36214. begin
  36215. pTDefRegMap(@Self)^.&set := $00000800;
  36216. end;
  36217. procedure TI2C2A_I2C4CON.clearIPMIEN; inline;
  36218. begin
  36219. pTDefRegMap(@Self)^.clr := $00000800;
  36220. end;
  36221. procedure TI2C2A_I2C4CON.setIPMIEN(thebits : TBits_1); inline;
  36222. begin
  36223. if thebits = 0 then
  36224. pTDefRegMap(@Self)^.clr := $00000800
  36225. else
  36226. pTDefRegMap(@Self)^.&set := $00000800;
  36227. end;
  36228. function TI2C2A_I2C4CON.getIPMIEN : TBits_1; inline;
  36229. begin
  36230. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  36231. end;
  36232. procedure TI2C2A_I2C4CON.setI2CSIDL; inline;
  36233. begin
  36234. pTDefRegMap(@Self)^.&set := $00002000;
  36235. end;
  36236. procedure TI2C2A_I2C4CON.clearI2CSIDL; inline;
  36237. begin
  36238. pTDefRegMap(@Self)^.clr := $00002000;
  36239. end;
  36240. procedure TI2C2A_I2C4CON.setI2CSIDL(thebits : TBits_1); inline;
  36241. begin
  36242. if thebits = 0 then
  36243. pTDefRegMap(@Self)^.clr := $00002000
  36244. else
  36245. pTDefRegMap(@Self)^.&set := $00002000;
  36246. end;
  36247. function TI2C2A_I2C4CON.getI2CSIDL : TBits_1; inline;
  36248. begin
  36249. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  36250. end;
  36251. procedure TI2C2A_I2C4CON.setI2CEN; inline;
  36252. begin
  36253. pTDefRegMap(@Self)^.&set := $00008000;
  36254. end;
  36255. procedure TI2C2A_I2C4CON.clearI2CEN; inline;
  36256. begin
  36257. pTDefRegMap(@Self)^.clr := $00008000;
  36258. end;
  36259. procedure TI2C2A_I2C4CON.setI2CEN(thebits : TBits_1); inline;
  36260. begin
  36261. if thebits = 0 then
  36262. pTDefRegMap(@Self)^.clr := $00008000
  36263. else
  36264. pTDefRegMap(@Self)^.&set := $00008000;
  36265. end;
  36266. function TI2C2A_I2C4CON.getI2CEN : TBits_1; inline;
  36267. begin
  36268. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36269. end;
  36270. procedure TI2C2A_I2C4CON.setw(thebits : TBits_32); inline;
  36271. begin
  36272. pTDefRegMap(@Self)^.val := thebits;
  36273. end;
  36274. function TI2C2A_I2C4CON.getw : TBits_32; inline;
  36275. begin
  36276. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36277. end;
  36278. procedure TI2C2A_I2C2ASTAT.setTBF; inline;
  36279. begin
  36280. pTDefRegMap(@Self)^.&set := $00000001;
  36281. end;
  36282. procedure TI2C2A_I2C2ASTAT.clearTBF; inline;
  36283. begin
  36284. pTDefRegMap(@Self)^.clr := $00000001;
  36285. end;
  36286. procedure TI2C2A_I2C2ASTAT.setTBF(thebits : TBits_1); inline;
  36287. begin
  36288. if thebits = 0 then
  36289. pTDefRegMap(@Self)^.clr := $00000001
  36290. else
  36291. pTDefRegMap(@Self)^.&set := $00000001;
  36292. end;
  36293. function TI2C2A_I2C2ASTAT.getTBF : TBits_1; inline;
  36294. begin
  36295. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36296. end;
  36297. procedure TI2C2A_I2C2ASTAT.setRBF; inline;
  36298. begin
  36299. pTDefRegMap(@Self)^.&set := $00000002;
  36300. end;
  36301. procedure TI2C2A_I2C2ASTAT.clearRBF; inline;
  36302. begin
  36303. pTDefRegMap(@Self)^.clr := $00000002;
  36304. end;
  36305. procedure TI2C2A_I2C2ASTAT.setRBF(thebits : TBits_1); inline;
  36306. begin
  36307. if thebits = 0 then
  36308. pTDefRegMap(@Self)^.clr := $00000002
  36309. else
  36310. pTDefRegMap(@Self)^.&set := $00000002;
  36311. end;
  36312. function TI2C2A_I2C2ASTAT.getRBF : TBits_1; inline;
  36313. begin
  36314. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36315. end;
  36316. procedure TI2C2A_I2C2ASTAT.setR_W; inline;
  36317. begin
  36318. pTDefRegMap(@Self)^.&set := $00000004;
  36319. end;
  36320. procedure TI2C2A_I2C2ASTAT.clearR_W; inline;
  36321. begin
  36322. pTDefRegMap(@Self)^.clr := $00000004;
  36323. end;
  36324. procedure TI2C2A_I2C2ASTAT.setR_W(thebits : TBits_1); inline;
  36325. begin
  36326. if thebits = 0 then
  36327. pTDefRegMap(@Self)^.clr := $00000004
  36328. else
  36329. pTDefRegMap(@Self)^.&set := $00000004;
  36330. end;
  36331. function TI2C2A_I2C2ASTAT.getR_W : TBits_1; inline;
  36332. begin
  36333. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36334. end;
  36335. procedure TI2C2A_I2C2ASTAT.setS; inline;
  36336. begin
  36337. pTDefRegMap(@Self)^.&set := $00000008;
  36338. end;
  36339. procedure TI2C2A_I2C2ASTAT.clearS; inline;
  36340. begin
  36341. pTDefRegMap(@Self)^.clr := $00000008;
  36342. end;
  36343. procedure TI2C2A_I2C2ASTAT.setS(thebits : TBits_1); inline;
  36344. begin
  36345. if thebits = 0 then
  36346. pTDefRegMap(@Self)^.clr := $00000008
  36347. else
  36348. pTDefRegMap(@Self)^.&set := $00000008;
  36349. end;
  36350. function TI2C2A_I2C2ASTAT.getS : TBits_1; inline;
  36351. begin
  36352. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36353. end;
  36354. procedure TI2C2A_I2C2ASTAT.setP; inline;
  36355. begin
  36356. pTDefRegMap(@Self)^.&set := $00000010;
  36357. end;
  36358. procedure TI2C2A_I2C2ASTAT.clearP; inline;
  36359. begin
  36360. pTDefRegMap(@Self)^.clr := $00000010;
  36361. end;
  36362. procedure TI2C2A_I2C2ASTAT.setP(thebits : TBits_1); inline;
  36363. begin
  36364. if thebits = 0 then
  36365. pTDefRegMap(@Self)^.clr := $00000010
  36366. else
  36367. pTDefRegMap(@Self)^.&set := $00000010;
  36368. end;
  36369. function TI2C2A_I2C2ASTAT.getP : TBits_1; inline;
  36370. begin
  36371. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36372. end;
  36373. procedure TI2C2A_I2C2ASTAT.setD_A; inline;
  36374. begin
  36375. pTDefRegMap(@Self)^.&set := $00000020;
  36376. end;
  36377. procedure TI2C2A_I2C2ASTAT.clearD_A; inline;
  36378. begin
  36379. pTDefRegMap(@Self)^.clr := $00000020;
  36380. end;
  36381. procedure TI2C2A_I2C2ASTAT.setD_A(thebits : TBits_1); inline;
  36382. begin
  36383. if thebits = 0 then
  36384. pTDefRegMap(@Self)^.clr := $00000020
  36385. else
  36386. pTDefRegMap(@Self)^.&set := $00000020;
  36387. end;
  36388. function TI2C2A_I2C2ASTAT.getD_A : TBits_1; inline;
  36389. begin
  36390. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36391. end;
  36392. procedure TI2C2A_I2C2ASTAT.setI2COV; inline;
  36393. begin
  36394. pTDefRegMap(@Self)^.&set := $00000040;
  36395. end;
  36396. procedure TI2C2A_I2C2ASTAT.clearI2COV; inline;
  36397. begin
  36398. pTDefRegMap(@Self)^.clr := $00000040;
  36399. end;
  36400. procedure TI2C2A_I2C2ASTAT.setI2COV(thebits : TBits_1); inline;
  36401. begin
  36402. if thebits = 0 then
  36403. pTDefRegMap(@Self)^.clr := $00000040
  36404. else
  36405. pTDefRegMap(@Self)^.&set := $00000040;
  36406. end;
  36407. function TI2C2A_I2C2ASTAT.getI2COV : TBits_1; inline;
  36408. begin
  36409. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36410. end;
  36411. procedure TI2C2A_I2C2ASTAT.setIWCOL; inline;
  36412. begin
  36413. pTDefRegMap(@Self)^.&set := $00000080;
  36414. end;
  36415. procedure TI2C2A_I2C2ASTAT.clearIWCOL; inline;
  36416. begin
  36417. pTDefRegMap(@Self)^.clr := $00000080;
  36418. end;
  36419. procedure TI2C2A_I2C2ASTAT.setIWCOL(thebits : TBits_1); inline;
  36420. begin
  36421. if thebits = 0 then
  36422. pTDefRegMap(@Self)^.clr := $00000080
  36423. else
  36424. pTDefRegMap(@Self)^.&set := $00000080;
  36425. end;
  36426. function TI2C2A_I2C2ASTAT.getIWCOL : TBits_1; inline;
  36427. begin
  36428. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36429. end;
  36430. procedure TI2C2A_I2C2ASTAT.setADD10; inline;
  36431. begin
  36432. pTDefRegMap(@Self)^.&set := $00000100;
  36433. end;
  36434. procedure TI2C2A_I2C2ASTAT.clearADD10; inline;
  36435. begin
  36436. pTDefRegMap(@Self)^.clr := $00000100;
  36437. end;
  36438. procedure TI2C2A_I2C2ASTAT.setADD10(thebits : TBits_1); inline;
  36439. begin
  36440. if thebits = 0 then
  36441. pTDefRegMap(@Self)^.clr := $00000100
  36442. else
  36443. pTDefRegMap(@Self)^.&set := $00000100;
  36444. end;
  36445. function TI2C2A_I2C2ASTAT.getADD10 : TBits_1; inline;
  36446. begin
  36447. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36448. end;
  36449. procedure TI2C2A_I2C2ASTAT.setGCSTAT; inline;
  36450. begin
  36451. pTDefRegMap(@Self)^.&set := $00000200;
  36452. end;
  36453. procedure TI2C2A_I2C2ASTAT.clearGCSTAT; inline;
  36454. begin
  36455. pTDefRegMap(@Self)^.clr := $00000200;
  36456. end;
  36457. procedure TI2C2A_I2C2ASTAT.setGCSTAT(thebits : TBits_1); inline;
  36458. begin
  36459. if thebits = 0 then
  36460. pTDefRegMap(@Self)^.clr := $00000200
  36461. else
  36462. pTDefRegMap(@Self)^.&set := $00000200;
  36463. end;
  36464. function TI2C2A_I2C2ASTAT.getGCSTAT : TBits_1; inline;
  36465. begin
  36466. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36467. end;
  36468. procedure TI2C2A_I2C2ASTAT.setBCL; inline;
  36469. begin
  36470. pTDefRegMap(@Self)^.&set := $00000400;
  36471. end;
  36472. procedure TI2C2A_I2C2ASTAT.clearBCL; inline;
  36473. begin
  36474. pTDefRegMap(@Self)^.clr := $00000400;
  36475. end;
  36476. procedure TI2C2A_I2C2ASTAT.setBCL(thebits : TBits_1); inline;
  36477. begin
  36478. if thebits = 0 then
  36479. pTDefRegMap(@Self)^.clr := $00000400
  36480. else
  36481. pTDefRegMap(@Self)^.&set := $00000400;
  36482. end;
  36483. function TI2C2A_I2C2ASTAT.getBCL : TBits_1; inline;
  36484. begin
  36485. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36486. end;
  36487. procedure TI2C2A_I2C2ASTAT.setTRSTAT; inline;
  36488. begin
  36489. pTDefRegMap(@Self)^.&set := $00004000;
  36490. end;
  36491. procedure TI2C2A_I2C2ASTAT.clearTRSTAT; inline;
  36492. begin
  36493. pTDefRegMap(@Self)^.clr := $00004000;
  36494. end;
  36495. procedure TI2C2A_I2C2ASTAT.setTRSTAT(thebits : TBits_1); inline;
  36496. begin
  36497. if thebits = 0 then
  36498. pTDefRegMap(@Self)^.clr := $00004000
  36499. else
  36500. pTDefRegMap(@Self)^.&set := $00004000;
  36501. end;
  36502. function TI2C2A_I2C2ASTAT.getTRSTAT : TBits_1; inline;
  36503. begin
  36504. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36505. end;
  36506. procedure TI2C2A_I2C2ASTAT.setACKSTAT; inline;
  36507. begin
  36508. pTDefRegMap(@Self)^.&set := $00008000;
  36509. end;
  36510. procedure TI2C2A_I2C2ASTAT.clearACKSTAT; inline;
  36511. begin
  36512. pTDefRegMap(@Self)^.clr := $00008000;
  36513. end;
  36514. procedure TI2C2A_I2C2ASTAT.setACKSTAT(thebits : TBits_1); inline;
  36515. begin
  36516. if thebits = 0 then
  36517. pTDefRegMap(@Self)^.clr := $00008000
  36518. else
  36519. pTDefRegMap(@Self)^.&set := $00008000;
  36520. end;
  36521. function TI2C2A_I2C2ASTAT.getACKSTAT : TBits_1; inline;
  36522. begin
  36523. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36524. end;
  36525. procedure TI2C2A_I2C2ASTAT.setI2CPOV; inline;
  36526. begin
  36527. pTDefRegMap(@Self)^.&set := $00000040;
  36528. end;
  36529. procedure TI2C2A_I2C2ASTAT.clearI2CPOV; inline;
  36530. begin
  36531. pTDefRegMap(@Self)^.clr := $00000040;
  36532. end;
  36533. procedure TI2C2A_I2C2ASTAT.setI2CPOV(thebits : TBits_1); inline;
  36534. begin
  36535. if thebits = 0 then
  36536. pTDefRegMap(@Self)^.clr := $00000040
  36537. else
  36538. pTDefRegMap(@Self)^.&set := $00000040;
  36539. end;
  36540. function TI2C2A_I2C2ASTAT.getI2CPOV : TBits_1; inline;
  36541. begin
  36542. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36543. end;
  36544. procedure TI2C2A_I2C2ASTAT.setw(thebits : TBits_32); inline;
  36545. begin
  36546. pTDefRegMap(@Self)^.val := thebits;
  36547. end;
  36548. function TI2C2A_I2C2ASTAT.getw : TBits_32; inline;
  36549. begin
  36550. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36551. end;
  36552. procedure TI2C2A_I2C4STAT.setTBF; inline;
  36553. begin
  36554. pTDefRegMap(@Self)^.&set := $00000001;
  36555. end;
  36556. procedure TI2C2A_I2C4STAT.clearTBF; inline;
  36557. begin
  36558. pTDefRegMap(@Self)^.clr := $00000001;
  36559. end;
  36560. procedure TI2C2A_I2C4STAT.setTBF(thebits : TBits_1); inline;
  36561. begin
  36562. if thebits = 0 then
  36563. pTDefRegMap(@Self)^.clr := $00000001
  36564. else
  36565. pTDefRegMap(@Self)^.&set := $00000001;
  36566. end;
  36567. function TI2C2A_I2C4STAT.getTBF : TBits_1; inline;
  36568. begin
  36569. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36570. end;
  36571. procedure TI2C2A_I2C4STAT.setRBF; inline;
  36572. begin
  36573. pTDefRegMap(@Self)^.&set := $00000002;
  36574. end;
  36575. procedure TI2C2A_I2C4STAT.clearRBF; inline;
  36576. begin
  36577. pTDefRegMap(@Self)^.clr := $00000002;
  36578. end;
  36579. procedure TI2C2A_I2C4STAT.setRBF(thebits : TBits_1); inline;
  36580. begin
  36581. if thebits = 0 then
  36582. pTDefRegMap(@Self)^.clr := $00000002
  36583. else
  36584. pTDefRegMap(@Self)^.&set := $00000002;
  36585. end;
  36586. function TI2C2A_I2C4STAT.getRBF : TBits_1; inline;
  36587. begin
  36588. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36589. end;
  36590. procedure TI2C2A_I2C4STAT.setR_W; inline;
  36591. begin
  36592. pTDefRegMap(@Self)^.&set := $00000004;
  36593. end;
  36594. procedure TI2C2A_I2C4STAT.clearR_W; inline;
  36595. begin
  36596. pTDefRegMap(@Self)^.clr := $00000004;
  36597. end;
  36598. procedure TI2C2A_I2C4STAT.setR_W(thebits : TBits_1); inline;
  36599. begin
  36600. if thebits = 0 then
  36601. pTDefRegMap(@Self)^.clr := $00000004
  36602. else
  36603. pTDefRegMap(@Self)^.&set := $00000004;
  36604. end;
  36605. function TI2C2A_I2C4STAT.getR_W : TBits_1; inline;
  36606. begin
  36607. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36608. end;
  36609. procedure TI2C2A_I2C4STAT.setS; inline;
  36610. begin
  36611. pTDefRegMap(@Self)^.&set := $00000008;
  36612. end;
  36613. procedure TI2C2A_I2C4STAT.clearS; inline;
  36614. begin
  36615. pTDefRegMap(@Self)^.clr := $00000008;
  36616. end;
  36617. procedure TI2C2A_I2C4STAT.setS(thebits : TBits_1); inline;
  36618. begin
  36619. if thebits = 0 then
  36620. pTDefRegMap(@Self)^.clr := $00000008
  36621. else
  36622. pTDefRegMap(@Self)^.&set := $00000008;
  36623. end;
  36624. function TI2C2A_I2C4STAT.getS : TBits_1; inline;
  36625. begin
  36626. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36627. end;
  36628. procedure TI2C2A_I2C4STAT.setP; inline;
  36629. begin
  36630. pTDefRegMap(@Self)^.&set := $00000010;
  36631. end;
  36632. procedure TI2C2A_I2C4STAT.clearP; inline;
  36633. begin
  36634. pTDefRegMap(@Self)^.clr := $00000010;
  36635. end;
  36636. procedure TI2C2A_I2C4STAT.setP(thebits : TBits_1); inline;
  36637. begin
  36638. if thebits = 0 then
  36639. pTDefRegMap(@Self)^.clr := $00000010
  36640. else
  36641. pTDefRegMap(@Self)^.&set := $00000010;
  36642. end;
  36643. function TI2C2A_I2C4STAT.getP : TBits_1; inline;
  36644. begin
  36645. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36646. end;
  36647. procedure TI2C2A_I2C4STAT.setD_A; inline;
  36648. begin
  36649. pTDefRegMap(@Self)^.&set := $00000020;
  36650. end;
  36651. procedure TI2C2A_I2C4STAT.clearD_A; inline;
  36652. begin
  36653. pTDefRegMap(@Self)^.clr := $00000020;
  36654. end;
  36655. procedure TI2C2A_I2C4STAT.setD_A(thebits : TBits_1); inline;
  36656. begin
  36657. if thebits = 0 then
  36658. pTDefRegMap(@Self)^.clr := $00000020
  36659. else
  36660. pTDefRegMap(@Self)^.&set := $00000020;
  36661. end;
  36662. function TI2C2A_I2C4STAT.getD_A : TBits_1; inline;
  36663. begin
  36664. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36665. end;
  36666. procedure TI2C2A_I2C4STAT.setI2COV; inline;
  36667. begin
  36668. pTDefRegMap(@Self)^.&set := $00000040;
  36669. end;
  36670. procedure TI2C2A_I2C4STAT.clearI2COV; inline;
  36671. begin
  36672. pTDefRegMap(@Self)^.clr := $00000040;
  36673. end;
  36674. procedure TI2C2A_I2C4STAT.setI2COV(thebits : TBits_1); inline;
  36675. begin
  36676. if thebits = 0 then
  36677. pTDefRegMap(@Self)^.clr := $00000040
  36678. else
  36679. pTDefRegMap(@Self)^.&set := $00000040;
  36680. end;
  36681. function TI2C2A_I2C4STAT.getI2COV : TBits_1; inline;
  36682. begin
  36683. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36684. end;
  36685. procedure TI2C2A_I2C4STAT.setIWCOL; inline;
  36686. begin
  36687. pTDefRegMap(@Self)^.&set := $00000080;
  36688. end;
  36689. procedure TI2C2A_I2C4STAT.clearIWCOL; inline;
  36690. begin
  36691. pTDefRegMap(@Self)^.clr := $00000080;
  36692. end;
  36693. procedure TI2C2A_I2C4STAT.setIWCOL(thebits : TBits_1); inline;
  36694. begin
  36695. if thebits = 0 then
  36696. pTDefRegMap(@Self)^.clr := $00000080
  36697. else
  36698. pTDefRegMap(@Self)^.&set := $00000080;
  36699. end;
  36700. function TI2C2A_I2C4STAT.getIWCOL : TBits_1; inline;
  36701. begin
  36702. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36703. end;
  36704. procedure TI2C2A_I2C4STAT.setADD10; inline;
  36705. begin
  36706. pTDefRegMap(@Self)^.&set := $00000100;
  36707. end;
  36708. procedure TI2C2A_I2C4STAT.clearADD10; inline;
  36709. begin
  36710. pTDefRegMap(@Self)^.clr := $00000100;
  36711. end;
  36712. procedure TI2C2A_I2C4STAT.setADD10(thebits : TBits_1); inline;
  36713. begin
  36714. if thebits = 0 then
  36715. pTDefRegMap(@Self)^.clr := $00000100
  36716. else
  36717. pTDefRegMap(@Self)^.&set := $00000100;
  36718. end;
  36719. function TI2C2A_I2C4STAT.getADD10 : TBits_1; inline;
  36720. begin
  36721. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36722. end;
  36723. procedure TI2C2A_I2C4STAT.setGCSTAT; inline;
  36724. begin
  36725. pTDefRegMap(@Self)^.&set := $00000200;
  36726. end;
  36727. procedure TI2C2A_I2C4STAT.clearGCSTAT; inline;
  36728. begin
  36729. pTDefRegMap(@Self)^.clr := $00000200;
  36730. end;
  36731. procedure TI2C2A_I2C4STAT.setGCSTAT(thebits : TBits_1); inline;
  36732. begin
  36733. if thebits = 0 then
  36734. pTDefRegMap(@Self)^.clr := $00000200
  36735. else
  36736. pTDefRegMap(@Self)^.&set := $00000200;
  36737. end;
  36738. function TI2C2A_I2C4STAT.getGCSTAT : TBits_1; inline;
  36739. begin
  36740. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  36741. end;
  36742. procedure TI2C2A_I2C4STAT.setBCL; inline;
  36743. begin
  36744. pTDefRegMap(@Self)^.&set := $00000400;
  36745. end;
  36746. procedure TI2C2A_I2C4STAT.clearBCL; inline;
  36747. begin
  36748. pTDefRegMap(@Self)^.clr := $00000400;
  36749. end;
  36750. procedure TI2C2A_I2C4STAT.setBCL(thebits : TBits_1); inline;
  36751. begin
  36752. if thebits = 0 then
  36753. pTDefRegMap(@Self)^.clr := $00000400
  36754. else
  36755. pTDefRegMap(@Self)^.&set := $00000400;
  36756. end;
  36757. function TI2C2A_I2C4STAT.getBCL : TBits_1; inline;
  36758. begin
  36759. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  36760. end;
  36761. procedure TI2C2A_I2C4STAT.setTRSTAT; inline;
  36762. begin
  36763. pTDefRegMap(@Self)^.&set := $00004000;
  36764. end;
  36765. procedure TI2C2A_I2C4STAT.clearTRSTAT; inline;
  36766. begin
  36767. pTDefRegMap(@Self)^.clr := $00004000;
  36768. end;
  36769. procedure TI2C2A_I2C4STAT.setTRSTAT(thebits : TBits_1); inline;
  36770. begin
  36771. if thebits = 0 then
  36772. pTDefRegMap(@Self)^.clr := $00004000
  36773. else
  36774. pTDefRegMap(@Self)^.&set := $00004000;
  36775. end;
  36776. function TI2C2A_I2C4STAT.getTRSTAT : TBits_1; inline;
  36777. begin
  36778. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  36779. end;
  36780. procedure TI2C2A_I2C4STAT.setACKSTAT; inline;
  36781. begin
  36782. pTDefRegMap(@Self)^.&set := $00008000;
  36783. end;
  36784. procedure TI2C2A_I2C4STAT.clearACKSTAT; inline;
  36785. begin
  36786. pTDefRegMap(@Self)^.clr := $00008000;
  36787. end;
  36788. procedure TI2C2A_I2C4STAT.setACKSTAT(thebits : TBits_1); inline;
  36789. begin
  36790. if thebits = 0 then
  36791. pTDefRegMap(@Self)^.clr := $00008000
  36792. else
  36793. pTDefRegMap(@Self)^.&set := $00008000;
  36794. end;
  36795. function TI2C2A_I2C4STAT.getACKSTAT : TBits_1; inline;
  36796. begin
  36797. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  36798. end;
  36799. procedure TI2C2A_I2C4STAT.setI2CPOV; inline;
  36800. begin
  36801. pTDefRegMap(@Self)^.&set := $00000040;
  36802. end;
  36803. procedure TI2C2A_I2C4STAT.clearI2CPOV; inline;
  36804. begin
  36805. pTDefRegMap(@Self)^.clr := $00000040;
  36806. end;
  36807. procedure TI2C2A_I2C4STAT.setI2CPOV(thebits : TBits_1); inline;
  36808. begin
  36809. if thebits = 0 then
  36810. pTDefRegMap(@Self)^.clr := $00000040
  36811. else
  36812. pTDefRegMap(@Self)^.&set := $00000040;
  36813. end;
  36814. function TI2C2A_I2C4STAT.getI2CPOV : TBits_1; inline;
  36815. begin
  36816. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36817. end;
  36818. procedure TI2C2A_I2C4STAT.setw(thebits : TBits_32); inline;
  36819. begin
  36820. pTDefRegMap(@Self)^.val := thebits;
  36821. end;
  36822. function TI2C2A_I2C4STAT.getw : TBits_32; inline;
  36823. begin
  36824. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  36825. end;
  36826. procedure TI2C3A_I2C3ACON.setSEN; inline;
  36827. begin
  36828. pTDefRegMap(@Self)^.&set := $00000001;
  36829. end;
  36830. procedure TI2C3A_I2C3ACON.clearSEN; inline;
  36831. begin
  36832. pTDefRegMap(@Self)^.clr := $00000001;
  36833. end;
  36834. procedure TI2C3A_I2C3ACON.setSEN(thebits : TBits_1); inline;
  36835. begin
  36836. if thebits = 0 then
  36837. pTDefRegMap(@Self)^.clr := $00000001
  36838. else
  36839. pTDefRegMap(@Self)^.&set := $00000001;
  36840. end;
  36841. function TI2C3A_I2C3ACON.getSEN : TBits_1; inline;
  36842. begin
  36843. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  36844. end;
  36845. procedure TI2C3A_I2C3ACON.setRSEN; inline;
  36846. begin
  36847. pTDefRegMap(@Self)^.&set := $00000002;
  36848. end;
  36849. procedure TI2C3A_I2C3ACON.clearRSEN; inline;
  36850. begin
  36851. pTDefRegMap(@Self)^.clr := $00000002;
  36852. end;
  36853. procedure TI2C3A_I2C3ACON.setRSEN(thebits : TBits_1); inline;
  36854. begin
  36855. if thebits = 0 then
  36856. pTDefRegMap(@Self)^.clr := $00000002
  36857. else
  36858. pTDefRegMap(@Self)^.&set := $00000002;
  36859. end;
  36860. function TI2C3A_I2C3ACON.getRSEN : TBits_1; inline;
  36861. begin
  36862. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  36863. end;
  36864. procedure TI2C3A_I2C3ACON.setPEN; inline;
  36865. begin
  36866. pTDefRegMap(@Self)^.&set := $00000004;
  36867. end;
  36868. procedure TI2C3A_I2C3ACON.clearPEN; inline;
  36869. begin
  36870. pTDefRegMap(@Self)^.clr := $00000004;
  36871. end;
  36872. procedure TI2C3A_I2C3ACON.setPEN(thebits : TBits_1); inline;
  36873. begin
  36874. if thebits = 0 then
  36875. pTDefRegMap(@Self)^.clr := $00000004
  36876. else
  36877. pTDefRegMap(@Self)^.&set := $00000004;
  36878. end;
  36879. function TI2C3A_I2C3ACON.getPEN : TBits_1; inline;
  36880. begin
  36881. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  36882. end;
  36883. procedure TI2C3A_I2C3ACON.setRCEN; inline;
  36884. begin
  36885. pTDefRegMap(@Self)^.&set := $00000008;
  36886. end;
  36887. procedure TI2C3A_I2C3ACON.clearRCEN; inline;
  36888. begin
  36889. pTDefRegMap(@Self)^.clr := $00000008;
  36890. end;
  36891. procedure TI2C3A_I2C3ACON.setRCEN(thebits : TBits_1); inline;
  36892. begin
  36893. if thebits = 0 then
  36894. pTDefRegMap(@Self)^.clr := $00000008
  36895. else
  36896. pTDefRegMap(@Self)^.&set := $00000008;
  36897. end;
  36898. function TI2C3A_I2C3ACON.getRCEN : TBits_1; inline;
  36899. begin
  36900. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  36901. end;
  36902. procedure TI2C3A_I2C3ACON.setACKEN; inline;
  36903. begin
  36904. pTDefRegMap(@Self)^.&set := $00000010;
  36905. end;
  36906. procedure TI2C3A_I2C3ACON.clearACKEN; inline;
  36907. begin
  36908. pTDefRegMap(@Self)^.clr := $00000010;
  36909. end;
  36910. procedure TI2C3A_I2C3ACON.setACKEN(thebits : TBits_1); inline;
  36911. begin
  36912. if thebits = 0 then
  36913. pTDefRegMap(@Self)^.clr := $00000010
  36914. else
  36915. pTDefRegMap(@Self)^.&set := $00000010;
  36916. end;
  36917. function TI2C3A_I2C3ACON.getACKEN : TBits_1; inline;
  36918. begin
  36919. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  36920. end;
  36921. procedure TI2C3A_I2C3ACON.setACKDT; inline;
  36922. begin
  36923. pTDefRegMap(@Self)^.&set := $00000020;
  36924. end;
  36925. procedure TI2C3A_I2C3ACON.clearACKDT; inline;
  36926. begin
  36927. pTDefRegMap(@Self)^.clr := $00000020;
  36928. end;
  36929. procedure TI2C3A_I2C3ACON.setACKDT(thebits : TBits_1); inline;
  36930. begin
  36931. if thebits = 0 then
  36932. pTDefRegMap(@Self)^.clr := $00000020
  36933. else
  36934. pTDefRegMap(@Self)^.&set := $00000020;
  36935. end;
  36936. function TI2C3A_I2C3ACON.getACKDT : TBits_1; inline;
  36937. begin
  36938. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  36939. end;
  36940. procedure TI2C3A_I2C3ACON.setSTREN; inline;
  36941. begin
  36942. pTDefRegMap(@Self)^.&set := $00000040;
  36943. end;
  36944. procedure TI2C3A_I2C3ACON.clearSTREN; inline;
  36945. begin
  36946. pTDefRegMap(@Self)^.clr := $00000040;
  36947. end;
  36948. procedure TI2C3A_I2C3ACON.setSTREN(thebits : TBits_1); inline;
  36949. begin
  36950. if thebits = 0 then
  36951. pTDefRegMap(@Self)^.clr := $00000040
  36952. else
  36953. pTDefRegMap(@Self)^.&set := $00000040;
  36954. end;
  36955. function TI2C3A_I2C3ACON.getSTREN : TBits_1; inline;
  36956. begin
  36957. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  36958. end;
  36959. procedure TI2C3A_I2C3ACON.setGCEN; inline;
  36960. begin
  36961. pTDefRegMap(@Self)^.&set := $00000080;
  36962. end;
  36963. procedure TI2C3A_I2C3ACON.clearGCEN; inline;
  36964. begin
  36965. pTDefRegMap(@Self)^.clr := $00000080;
  36966. end;
  36967. procedure TI2C3A_I2C3ACON.setGCEN(thebits : TBits_1); inline;
  36968. begin
  36969. if thebits = 0 then
  36970. pTDefRegMap(@Self)^.clr := $00000080
  36971. else
  36972. pTDefRegMap(@Self)^.&set := $00000080;
  36973. end;
  36974. function TI2C3A_I2C3ACON.getGCEN : TBits_1; inline;
  36975. begin
  36976. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  36977. end;
  36978. procedure TI2C3A_I2C3ACON.setSMEN; inline;
  36979. begin
  36980. pTDefRegMap(@Self)^.&set := $00000100;
  36981. end;
  36982. procedure TI2C3A_I2C3ACON.clearSMEN; inline;
  36983. begin
  36984. pTDefRegMap(@Self)^.clr := $00000100;
  36985. end;
  36986. procedure TI2C3A_I2C3ACON.setSMEN(thebits : TBits_1); inline;
  36987. begin
  36988. if thebits = 0 then
  36989. pTDefRegMap(@Self)^.clr := $00000100
  36990. else
  36991. pTDefRegMap(@Self)^.&set := $00000100;
  36992. end;
  36993. function TI2C3A_I2C3ACON.getSMEN : TBits_1; inline;
  36994. begin
  36995. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  36996. end;
  36997. procedure TI2C3A_I2C3ACON.setDISSLW; inline;
  36998. begin
  36999. pTDefRegMap(@Self)^.&set := $00000200;
  37000. end;
  37001. procedure TI2C3A_I2C3ACON.clearDISSLW; inline;
  37002. begin
  37003. pTDefRegMap(@Self)^.clr := $00000200;
  37004. end;
  37005. procedure TI2C3A_I2C3ACON.setDISSLW(thebits : TBits_1); inline;
  37006. begin
  37007. if thebits = 0 then
  37008. pTDefRegMap(@Self)^.clr := $00000200
  37009. else
  37010. pTDefRegMap(@Self)^.&set := $00000200;
  37011. end;
  37012. function TI2C3A_I2C3ACON.getDISSLW : TBits_1; inline;
  37013. begin
  37014. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37015. end;
  37016. procedure TI2C3A_I2C3ACON.setA10M; inline;
  37017. begin
  37018. pTDefRegMap(@Self)^.&set := $00000400;
  37019. end;
  37020. procedure TI2C3A_I2C3ACON.clearA10M; inline;
  37021. begin
  37022. pTDefRegMap(@Self)^.clr := $00000400;
  37023. end;
  37024. procedure TI2C3A_I2C3ACON.setA10M(thebits : TBits_1); inline;
  37025. begin
  37026. if thebits = 0 then
  37027. pTDefRegMap(@Self)^.clr := $00000400
  37028. else
  37029. pTDefRegMap(@Self)^.&set := $00000400;
  37030. end;
  37031. function TI2C3A_I2C3ACON.getA10M : TBits_1; inline;
  37032. begin
  37033. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37034. end;
  37035. procedure TI2C3A_I2C3ACON.setSTRICT; inline;
  37036. begin
  37037. pTDefRegMap(@Self)^.&set := $00000800;
  37038. end;
  37039. procedure TI2C3A_I2C3ACON.clearSTRICT; inline;
  37040. begin
  37041. pTDefRegMap(@Self)^.clr := $00000800;
  37042. end;
  37043. procedure TI2C3A_I2C3ACON.setSTRICT(thebits : TBits_1); inline;
  37044. begin
  37045. if thebits = 0 then
  37046. pTDefRegMap(@Self)^.clr := $00000800
  37047. else
  37048. pTDefRegMap(@Self)^.&set := $00000800;
  37049. end;
  37050. function TI2C3A_I2C3ACON.getSTRICT : TBits_1; inline;
  37051. begin
  37052. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37053. end;
  37054. procedure TI2C3A_I2C3ACON.setSCLREL; inline;
  37055. begin
  37056. pTDefRegMap(@Self)^.&set := $00001000;
  37057. end;
  37058. procedure TI2C3A_I2C3ACON.clearSCLREL; inline;
  37059. begin
  37060. pTDefRegMap(@Self)^.clr := $00001000;
  37061. end;
  37062. procedure TI2C3A_I2C3ACON.setSCLREL(thebits : TBits_1); inline;
  37063. begin
  37064. if thebits = 0 then
  37065. pTDefRegMap(@Self)^.clr := $00001000
  37066. else
  37067. pTDefRegMap(@Self)^.&set := $00001000;
  37068. end;
  37069. function TI2C3A_I2C3ACON.getSCLREL : TBits_1; inline;
  37070. begin
  37071. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37072. end;
  37073. procedure TI2C3A_I2C3ACON.setSIDL; inline;
  37074. begin
  37075. pTDefRegMap(@Self)^.&set := $00002000;
  37076. end;
  37077. procedure TI2C3A_I2C3ACON.clearSIDL; inline;
  37078. begin
  37079. pTDefRegMap(@Self)^.clr := $00002000;
  37080. end;
  37081. procedure TI2C3A_I2C3ACON.setSIDL(thebits : TBits_1); inline;
  37082. begin
  37083. if thebits = 0 then
  37084. pTDefRegMap(@Self)^.clr := $00002000
  37085. else
  37086. pTDefRegMap(@Self)^.&set := $00002000;
  37087. end;
  37088. function TI2C3A_I2C3ACON.getSIDL : TBits_1; inline;
  37089. begin
  37090. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37091. end;
  37092. procedure TI2C3A_I2C3ACON.setON; inline;
  37093. begin
  37094. pTDefRegMap(@Self)^.&set := $00008000;
  37095. end;
  37096. procedure TI2C3A_I2C3ACON.clearON; inline;
  37097. begin
  37098. pTDefRegMap(@Self)^.clr := $00008000;
  37099. end;
  37100. procedure TI2C3A_I2C3ACON.setON(thebits : TBits_1); inline;
  37101. begin
  37102. if thebits = 0 then
  37103. pTDefRegMap(@Self)^.clr := $00008000
  37104. else
  37105. pTDefRegMap(@Self)^.&set := $00008000;
  37106. end;
  37107. function TI2C3A_I2C3ACON.getON : TBits_1; inline;
  37108. begin
  37109. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37110. end;
  37111. procedure TI2C3A_I2C3ACON.setIPMIEN; inline;
  37112. begin
  37113. pTDefRegMap(@Self)^.&set := $00000800;
  37114. end;
  37115. procedure TI2C3A_I2C3ACON.clearIPMIEN; inline;
  37116. begin
  37117. pTDefRegMap(@Self)^.clr := $00000800;
  37118. end;
  37119. procedure TI2C3A_I2C3ACON.setIPMIEN(thebits : TBits_1); inline;
  37120. begin
  37121. if thebits = 0 then
  37122. pTDefRegMap(@Self)^.clr := $00000800
  37123. else
  37124. pTDefRegMap(@Self)^.&set := $00000800;
  37125. end;
  37126. function TI2C3A_I2C3ACON.getIPMIEN : TBits_1; inline;
  37127. begin
  37128. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37129. end;
  37130. procedure TI2C3A_I2C3ACON.setI2CSIDL; inline;
  37131. begin
  37132. pTDefRegMap(@Self)^.&set := $00002000;
  37133. end;
  37134. procedure TI2C3A_I2C3ACON.clearI2CSIDL; inline;
  37135. begin
  37136. pTDefRegMap(@Self)^.clr := $00002000;
  37137. end;
  37138. procedure TI2C3A_I2C3ACON.setI2CSIDL(thebits : TBits_1); inline;
  37139. begin
  37140. if thebits = 0 then
  37141. pTDefRegMap(@Self)^.clr := $00002000
  37142. else
  37143. pTDefRegMap(@Self)^.&set := $00002000;
  37144. end;
  37145. function TI2C3A_I2C3ACON.getI2CSIDL : TBits_1; inline;
  37146. begin
  37147. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37148. end;
  37149. procedure TI2C3A_I2C3ACON.setI2CEN; inline;
  37150. begin
  37151. pTDefRegMap(@Self)^.&set := $00008000;
  37152. end;
  37153. procedure TI2C3A_I2C3ACON.clearI2CEN; inline;
  37154. begin
  37155. pTDefRegMap(@Self)^.clr := $00008000;
  37156. end;
  37157. procedure TI2C3A_I2C3ACON.setI2CEN(thebits : TBits_1); inline;
  37158. begin
  37159. if thebits = 0 then
  37160. pTDefRegMap(@Self)^.clr := $00008000
  37161. else
  37162. pTDefRegMap(@Self)^.&set := $00008000;
  37163. end;
  37164. function TI2C3A_I2C3ACON.getI2CEN : TBits_1; inline;
  37165. begin
  37166. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37167. end;
  37168. procedure TI2C3A_I2C3ACON.setw(thebits : TBits_32); inline;
  37169. begin
  37170. pTDefRegMap(@Self)^.val := thebits;
  37171. end;
  37172. function TI2C3A_I2C3ACON.getw : TBits_32; inline;
  37173. begin
  37174. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37175. end;
  37176. procedure TI2C3A_I2C5CON.setSEN; inline;
  37177. begin
  37178. pTDefRegMap(@Self)^.&set := $00000001;
  37179. end;
  37180. procedure TI2C3A_I2C5CON.clearSEN; inline;
  37181. begin
  37182. pTDefRegMap(@Self)^.clr := $00000001;
  37183. end;
  37184. procedure TI2C3A_I2C5CON.setSEN(thebits : TBits_1); inline;
  37185. begin
  37186. if thebits = 0 then
  37187. pTDefRegMap(@Self)^.clr := $00000001
  37188. else
  37189. pTDefRegMap(@Self)^.&set := $00000001;
  37190. end;
  37191. function TI2C3A_I2C5CON.getSEN : TBits_1; inline;
  37192. begin
  37193. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37194. end;
  37195. procedure TI2C3A_I2C5CON.setRSEN; inline;
  37196. begin
  37197. pTDefRegMap(@Self)^.&set := $00000002;
  37198. end;
  37199. procedure TI2C3A_I2C5CON.clearRSEN; inline;
  37200. begin
  37201. pTDefRegMap(@Self)^.clr := $00000002;
  37202. end;
  37203. procedure TI2C3A_I2C5CON.setRSEN(thebits : TBits_1); inline;
  37204. begin
  37205. if thebits = 0 then
  37206. pTDefRegMap(@Self)^.clr := $00000002
  37207. else
  37208. pTDefRegMap(@Self)^.&set := $00000002;
  37209. end;
  37210. function TI2C3A_I2C5CON.getRSEN : TBits_1; inline;
  37211. begin
  37212. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37213. end;
  37214. procedure TI2C3A_I2C5CON.setPEN; inline;
  37215. begin
  37216. pTDefRegMap(@Self)^.&set := $00000004;
  37217. end;
  37218. procedure TI2C3A_I2C5CON.clearPEN; inline;
  37219. begin
  37220. pTDefRegMap(@Self)^.clr := $00000004;
  37221. end;
  37222. procedure TI2C3A_I2C5CON.setPEN(thebits : TBits_1); inline;
  37223. begin
  37224. if thebits = 0 then
  37225. pTDefRegMap(@Self)^.clr := $00000004
  37226. else
  37227. pTDefRegMap(@Self)^.&set := $00000004;
  37228. end;
  37229. function TI2C3A_I2C5CON.getPEN : TBits_1; inline;
  37230. begin
  37231. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37232. end;
  37233. procedure TI2C3A_I2C5CON.setRCEN; inline;
  37234. begin
  37235. pTDefRegMap(@Self)^.&set := $00000008;
  37236. end;
  37237. procedure TI2C3A_I2C5CON.clearRCEN; inline;
  37238. begin
  37239. pTDefRegMap(@Self)^.clr := $00000008;
  37240. end;
  37241. procedure TI2C3A_I2C5CON.setRCEN(thebits : TBits_1); inline;
  37242. begin
  37243. if thebits = 0 then
  37244. pTDefRegMap(@Self)^.clr := $00000008
  37245. else
  37246. pTDefRegMap(@Self)^.&set := $00000008;
  37247. end;
  37248. function TI2C3A_I2C5CON.getRCEN : TBits_1; inline;
  37249. begin
  37250. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37251. end;
  37252. procedure TI2C3A_I2C5CON.setACKEN; inline;
  37253. begin
  37254. pTDefRegMap(@Self)^.&set := $00000010;
  37255. end;
  37256. procedure TI2C3A_I2C5CON.clearACKEN; inline;
  37257. begin
  37258. pTDefRegMap(@Self)^.clr := $00000010;
  37259. end;
  37260. procedure TI2C3A_I2C5CON.setACKEN(thebits : TBits_1); inline;
  37261. begin
  37262. if thebits = 0 then
  37263. pTDefRegMap(@Self)^.clr := $00000010
  37264. else
  37265. pTDefRegMap(@Self)^.&set := $00000010;
  37266. end;
  37267. function TI2C3A_I2C5CON.getACKEN : TBits_1; inline;
  37268. begin
  37269. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37270. end;
  37271. procedure TI2C3A_I2C5CON.setACKDT; inline;
  37272. begin
  37273. pTDefRegMap(@Self)^.&set := $00000020;
  37274. end;
  37275. procedure TI2C3A_I2C5CON.clearACKDT; inline;
  37276. begin
  37277. pTDefRegMap(@Self)^.clr := $00000020;
  37278. end;
  37279. procedure TI2C3A_I2C5CON.setACKDT(thebits : TBits_1); inline;
  37280. begin
  37281. if thebits = 0 then
  37282. pTDefRegMap(@Self)^.clr := $00000020
  37283. else
  37284. pTDefRegMap(@Self)^.&set := $00000020;
  37285. end;
  37286. function TI2C3A_I2C5CON.getACKDT : TBits_1; inline;
  37287. begin
  37288. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37289. end;
  37290. procedure TI2C3A_I2C5CON.setSTREN; inline;
  37291. begin
  37292. pTDefRegMap(@Self)^.&set := $00000040;
  37293. end;
  37294. procedure TI2C3A_I2C5CON.clearSTREN; inline;
  37295. begin
  37296. pTDefRegMap(@Self)^.clr := $00000040;
  37297. end;
  37298. procedure TI2C3A_I2C5CON.setSTREN(thebits : TBits_1); inline;
  37299. begin
  37300. if thebits = 0 then
  37301. pTDefRegMap(@Self)^.clr := $00000040
  37302. else
  37303. pTDefRegMap(@Self)^.&set := $00000040;
  37304. end;
  37305. function TI2C3A_I2C5CON.getSTREN : TBits_1; inline;
  37306. begin
  37307. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37308. end;
  37309. procedure TI2C3A_I2C5CON.setGCEN; inline;
  37310. begin
  37311. pTDefRegMap(@Self)^.&set := $00000080;
  37312. end;
  37313. procedure TI2C3A_I2C5CON.clearGCEN; inline;
  37314. begin
  37315. pTDefRegMap(@Self)^.clr := $00000080;
  37316. end;
  37317. procedure TI2C3A_I2C5CON.setGCEN(thebits : TBits_1); inline;
  37318. begin
  37319. if thebits = 0 then
  37320. pTDefRegMap(@Self)^.clr := $00000080
  37321. else
  37322. pTDefRegMap(@Self)^.&set := $00000080;
  37323. end;
  37324. function TI2C3A_I2C5CON.getGCEN : TBits_1; inline;
  37325. begin
  37326. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37327. end;
  37328. procedure TI2C3A_I2C5CON.setSMEN; inline;
  37329. begin
  37330. pTDefRegMap(@Self)^.&set := $00000100;
  37331. end;
  37332. procedure TI2C3A_I2C5CON.clearSMEN; inline;
  37333. begin
  37334. pTDefRegMap(@Self)^.clr := $00000100;
  37335. end;
  37336. procedure TI2C3A_I2C5CON.setSMEN(thebits : TBits_1); inline;
  37337. begin
  37338. if thebits = 0 then
  37339. pTDefRegMap(@Self)^.clr := $00000100
  37340. else
  37341. pTDefRegMap(@Self)^.&set := $00000100;
  37342. end;
  37343. function TI2C3A_I2C5CON.getSMEN : TBits_1; inline;
  37344. begin
  37345. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37346. end;
  37347. procedure TI2C3A_I2C5CON.setDISSLW; inline;
  37348. begin
  37349. pTDefRegMap(@Self)^.&set := $00000200;
  37350. end;
  37351. procedure TI2C3A_I2C5CON.clearDISSLW; inline;
  37352. begin
  37353. pTDefRegMap(@Self)^.clr := $00000200;
  37354. end;
  37355. procedure TI2C3A_I2C5CON.setDISSLW(thebits : TBits_1); inline;
  37356. begin
  37357. if thebits = 0 then
  37358. pTDefRegMap(@Self)^.clr := $00000200
  37359. else
  37360. pTDefRegMap(@Self)^.&set := $00000200;
  37361. end;
  37362. function TI2C3A_I2C5CON.getDISSLW : TBits_1; inline;
  37363. begin
  37364. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37365. end;
  37366. procedure TI2C3A_I2C5CON.setA10M; inline;
  37367. begin
  37368. pTDefRegMap(@Self)^.&set := $00000400;
  37369. end;
  37370. procedure TI2C3A_I2C5CON.clearA10M; inline;
  37371. begin
  37372. pTDefRegMap(@Self)^.clr := $00000400;
  37373. end;
  37374. procedure TI2C3A_I2C5CON.setA10M(thebits : TBits_1); inline;
  37375. begin
  37376. if thebits = 0 then
  37377. pTDefRegMap(@Self)^.clr := $00000400
  37378. else
  37379. pTDefRegMap(@Self)^.&set := $00000400;
  37380. end;
  37381. function TI2C3A_I2C5CON.getA10M : TBits_1; inline;
  37382. begin
  37383. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37384. end;
  37385. procedure TI2C3A_I2C5CON.setSTRICT; inline;
  37386. begin
  37387. pTDefRegMap(@Self)^.&set := $00000800;
  37388. end;
  37389. procedure TI2C3A_I2C5CON.clearSTRICT; inline;
  37390. begin
  37391. pTDefRegMap(@Self)^.clr := $00000800;
  37392. end;
  37393. procedure TI2C3A_I2C5CON.setSTRICT(thebits : TBits_1); inline;
  37394. begin
  37395. if thebits = 0 then
  37396. pTDefRegMap(@Self)^.clr := $00000800
  37397. else
  37398. pTDefRegMap(@Self)^.&set := $00000800;
  37399. end;
  37400. function TI2C3A_I2C5CON.getSTRICT : TBits_1; inline;
  37401. begin
  37402. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37403. end;
  37404. procedure TI2C3A_I2C5CON.setSCLREL; inline;
  37405. begin
  37406. pTDefRegMap(@Self)^.&set := $00001000;
  37407. end;
  37408. procedure TI2C3A_I2C5CON.clearSCLREL; inline;
  37409. begin
  37410. pTDefRegMap(@Self)^.clr := $00001000;
  37411. end;
  37412. procedure TI2C3A_I2C5CON.setSCLREL(thebits : TBits_1); inline;
  37413. begin
  37414. if thebits = 0 then
  37415. pTDefRegMap(@Self)^.clr := $00001000
  37416. else
  37417. pTDefRegMap(@Self)^.&set := $00001000;
  37418. end;
  37419. function TI2C3A_I2C5CON.getSCLREL : TBits_1; inline;
  37420. begin
  37421. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  37422. end;
  37423. procedure TI2C3A_I2C5CON.setSIDL; inline;
  37424. begin
  37425. pTDefRegMap(@Self)^.&set := $00002000;
  37426. end;
  37427. procedure TI2C3A_I2C5CON.clearSIDL; inline;
  37428. begin
  37429. pTDefRegMap(@Self)^.clr := $00002000;
  37430. end;
  37431. procedure TI2C3A_I2C5CON.setSIDL(thebits : TBits_1); inline;
  37432. begin
  37433. if thebits = 0 then
  37434. pTDefRegMap(@Self)^.clr := $00002000
  37435. else
  37436. pTDefRegMap(@Self)^.&set := $00002000;
  37437. end;
  37438. function TI2C3A_I2C5CON.getSIDL : TBits_1; inline;
  37439. begin
  37440. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37441. end;
  37442. procedure TI2C3A_I2C5CON.setON; inline;
  37443. begin
  37444. pTDefRegMap(@Self)^.&set := $00008000;
  37445. end;
  37446. procedure TI2C3A_I2C5CON.clearON; inline;
  37447. begin
  37448. pTDefRegMap(@Self)^.clr := $00008000;
  37449. end;
  37450. procedure TI2C3A_I2C5CON.setON(thebits : TBits_1); inline;
  37451. begin
  37452. if thebits = 0 then
  37453. pTDefRegMap(@Self)^.clr := $00008000
  37454. else
  37455. pTDefRegMap(@Self)^.&set := $00008000;
  37456. end;
  37457. function TI2C3A_I2C5CON.getON : TBits_1; inline;
  37458. begin
  37459. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37460. end;
  37461. procedure TI2C3A_I2C5CON.setIPMIEN; inline;
  37462. begin
  37463. pTDefRegMap(@Self)^.&set := $00000800;
  37464. end;
  37465. procedure TI2C3A_I2C5CON.clearIPMIEN; inline;
  37466. begin
  37467. pTDefRegMap(@Self)^.clr := $00000800;
  37468. end;
  37469. procedure TI2C3A_I2C5CON.setIPMIEN(thebits : TBits_1); inline;
  37470. begin
  37471. if thebits = 0 then
  37472. pTDefRegMap(@Self)^.clr := $00000800
  37473. else
  37474. pTDefRegMap(@Self)^.&set := $00000800;
  37475. end;
  37476. function TI2C3A_I2C5CON.getIPMIEN : TBits_1; inline;
  37477. begin
  37478. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  37479. end;
  37480. procedure TI2C3A_I2C5CON.setI2CSIDL; inline;
  37481. begin
  37482. pTDefRegMap(@Self)^.&set := $00002000;
  37483. end;
  37484. procedure TI2C3A_I2C5CON.clearI2CSIDL; inline;
  37485. begin
  37486. pTDefRegMap(@Self)^.clr := $00002000;
  37487. end;
  37488. procedure TI2C3A_I2C5CON.setI2CSIDL(thebits : TBits_1); inline;
  37489. begin
  37490. if thebits = 0 then
  37491. pTDefRegMap(@Self)^.clr := $00002000
  37492. else
  37493. pTDefRegMap(@Self)^.&set := $00002000;
  37494. end;
  37495. function TI2C3A_I2C5CON.getI2CSIDL : TBits_1; inline;
  37496. begin
  37497. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  37498. end;
  37499. procedure TI2C3A_I2C5CON.setI2CEN; inline;
  37500. begin
  37501. pTDefRegMap(@Self)^.&set := $00008000;
  37502. end;
  37503. procedure TI2C3A_I2C5CON.clearI2CEN; inline;
  37504. begin
  37505. pTDefRegMap(@Self)^.clr := $00008000;
  37506. end;
  37507. procedure TI2C3A_I2C5CON.setI2CEN(thebits : TBits_1); inline;
  37508. begin
  37509. if thebits = 0 then
  37510. pTDefRegMap(@Self)^.clr := $00008000
  37511. else
  37512. pTDefRegMap(@Self)^.&set := $00008000;
  37513. end;
  37514. function TI2C3A_I2C5CON.getI2CEN : TBits_1; inline;
  37515. begin
  37516. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37517. end;
  37518. procedure TI2C3A_I2C5CON.setw(thebits : TBits_32); inline;
  37519. begin
  37520. pTDefRegMap(@Self)^.val := thebits;
  37521. end;
  37522. function TI2C3A_I2C5CON.getw : TBits_32; inline;
  37523. begin
  37524. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37525. end;
  37526. procedure TI2C3A_I2C3ASTAT.setTBF; inline;
  37527. begin
  37528. pTDefRegMap(@Self)^.&set := $00000001;
  37529. end;
  37530. procedure TI2C3A_I2C3ASTAT.clearTBF; inline;
  37531. begin
  37532. pTDefRegMap(@Self)^.clr := $00000001;
  37533. end;
  37534. procedure TI2C3A_I2C3ASTAT.setTBF(thebits : TBits_1); inline;
  37535. begin
  37536. if thebits = 0 then
  37537. pTDefRegMap(@Self)^.clr := $00000001
  37538. else
  37539. pTDefRegMap(@Self)^.&set := $00000001;
  37540. end;
  37541. function TI2C3A_I2C3ASTAT.getTBF : TBits_1; inline;
  37542. begin
  37543. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37544. end;
  37545. procedure TI2C3A_I2C3ASTAT.setRBF; inline;
  37546. begin
  37547. pTDefRegMap(@Self)^.&set := $00000002;
  37548. end;
  37549. procedure TI2C3A_I2C3ASTAT.clearRBF; inline;
  37550. begin
  37551. pTDefRegMap(@Self)^.clr := $00000002;
  37552. end;
  37553. procedure TI2C3A_I2C3ASTAT.setRBF(thebits : TBits_1); inline;
  37554. begin
  37555. if thebits = 0 then
  37556. pTDefRegMap(@Self)^.clr := $00000002
  37557. else
  37558. pTDefRegMap(@Self)^.&set := $00000002;
  37559. end;
  37560. function TI2C3A_I2C3ASTAT.getRBF : TBits_1; inline;
  37561. begin
  37562. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37563. end;
  37564. procedure TI2C3A_I2C3ASTAT.setR_W; inline;
  37565. begin
  37566. pTDefRegMap(@Self)^.&set := $00000004;
  37567. end;
  37568. procedure TI2C3A_I2C3ASTAT.clearR_W; inline;
  37569. begin
  37570. pTDefRegMap(@Self)^.clr := $00000004;
  37571. end;
  37572. procedure TI2C3A_I2C3ASTAT.setR_W(thebits : TBits_1); inline;
  37573. begin
  37574. if thebits = 0 then
  37575. pTDefRegMap(@Self)^.clr := $00000004
  37576. else
  37577. pTDefRegMap(@Self)^.&set := $00000004;
  37578. end;
  37579. function TI2C3A_I2C3ASTAT.getR_W : TBits_1; inline;
  37580. begin
  37581. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37582. end;
  37583. procedure TI2C3A_I2C3ASTAT.setS; inline;
  37584. begin
  37585. pTDefRegMap(@Self)^.&set := $00000008;
  37586. end;
  37587. procedure TI2C3A_I2C3ASTAT.clearS; inline;
  37588. begin
  37589. pTDefRegMap(@Self)^.clr := $00000008;
  37590. end;
  37591. procedure TI2C3A_I2C3ASTAT.setS(thebits : TBits_1); inline;
  37592. begin
  37593. if thebits = 0 then
  37594. pTDefRegMap(@Self)^.clr := $00000008
  37595. else
  37596. pTDefRegMap(@Self)^.&set := $00000008;
  37597. end;
  37598. function TI2C3A_I2C3ASTAT.getS : TBits_1; inline;
  37599. begin
  37600. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37601. end;
  37602. procedure TI2C3A_I2C3ASTAT.setP; inline;
  37603. begin
  37604. pTDefRegMap(@Self)^.&set := $00000010;
  37605. end;
  37606. procedure TI2C3A_I2C3ASTAT.clearP; inline;
  37607. begin
  37608. pTDefRegMap(@Self)^.clr := $00000010;
  37609. end;
  37610. procedure TI2C3A_I2C3ASTAT.setP(thebits : TBits_1); inline;
  37611. begin
  37612. if thebits = 0 then
  37613. pTDefRegMap(@Self)^.clr := $00000010
  37614. else
  37615. pTDefRegMap(@Self)^.&set := $00000010;
  37616. end;
  37617. function TI2C3A_I2C3ASTAT.getP : TBits_1; inline;
  37618. begin
  37619. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37620. end;
  37621. procedure TI2C3A_I2C3ASTAT.setD_A; inline;
  37622. begin
  37623. pTDefRegMap(@Self)^.&set := $00000020;
  37624. end;
  37625. procedure TI2C3A_I2C3ASTAT.clearD_A; inline;
  37626. begin
  37627. pTDefRegMap(@Self)^.clr := $00000020;
  37628. end;
  37629. procedure TI2C3A_I2C3ASTAT.setD_A(thebits : TBits_1); inline;
  37630. begin
  37631. if thebits = 0 then
  37632. pTDefRegMap(@Self)^.clr := $00000020
  37633. else
  37634. pTDefRegMap(@Self)^.&set := $00000020;
  37635. end;
  37636. function TI2C3A_I2C3ASTAT.getD_A : TBits_1; inline;
  37637. begin
  37638. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37639. end;
  37640. procedure TI2C3A_I2C3ASTAT.setI2COV; inline;
  37641. begin
  37642. pTDefRegMap(@Self)^.&set := $00000040;
  37643. end;
  37644. procedure TI2C3A_I2C3ASTAT.clearI2COV; inline;
  37645. begin
  37646. pTDefRegMap(@Self)^.clr := $00000040;
  37647. end;
  37648. procedure TI2C3A_I2C3ASTAT.setI2COV(thebits : TBits_1); inline;
  37649. begin
  37650. if thebits = 0 then
  37651. pTDefRegMap(@Self)^.clr := $00000040
  37652. else
  37653. pTDefRegMap(@Self)^.&set := $00000040;
  37654. end;
  37655. function TI2C3A_I2C3ASTAT.getI2COV : TBits_1; inline;
  37656. begin
  37657. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37658. end;
  37659. procedure TI2C3A_I2C3ASTAT.setIWCOL; inline;
  37660. begin
  37661. pTDefRegMap(@Self)^.&set := $00000080;
  37662. end;
  37663. procedure TI2C3A_I2C3ASTAT.clearIWCOL; inline;
  37664. begin
  37665. pTDefRegMap(@Self)^.clr := $00000080;
  37666. end;
  37667. procedure TI2C3A_I2C3ASTAT.setIWCOL(thebits : TBits_1); inline;
  37668. begin
  37669. if thebits = 0 then
  37670. pTDefRegMap(@Self)^.clr := $00000080
  37671. else
  37672. pTDefRegMap(@Self)^.&set := $00000080;
  37673. end;
  37674. function TI2C3A_I2C3ASTAT.getIWCOL : TBits_1; inline;
  37675. begin
  37676. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37677. end;
  37678. procedure TI2C3A_I2C3ASTAT.setADD10; inline;
  37679. begin
  37680. pTDefRegMap(@Self)^.&set := $00000100;
  37681. end;
  37682. procedure TI2C3A_I2C3ASTAT.clearADD10; inline;
  37683. begin
  37684. pTDefRegMap(@Self)^.clr := $00000100;
  37685. end;
  37686. procedure TI2C3A_I2C3ASTAT.setADD10(thebits : TBits_1); inline;
  37687. begin
  37688. if thebits = 0 then
  37689. pTDefRegMap(@Self)^.clr := $00000100
  37690. else
  37691. pTDefRegMap(@Self)^.&set := $00000100;
  37692. end;
  37693. function TI2C3A_I2C3ASTAT.getADD10 : TBits_1; inline;
  37694. begin
  37695. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37696. end;
  37697. procedure TI2C3A_I2C3ASTAT.setGCSTAT; inline;
  37698. begin
  37699. pTDefRegMap(@Self)^.&set := $00000200;
  37700. end;
  37701. procedure TI2C3A_I2C3ASTAT.clearGCSTAT; inline;
  37702. begin
  37703. pTDefRegMap(@Self)^.clr := $00000200;
  37704. end;
  37705. procedure TI2C3A_I2C3ASTAT.setGCSTAT(thebits : TBits_1); inline;
  37706. begin
  37707. if thebits = 0 then
  37708. pTDefRegMap(@Self)^.clr := $00000200
  37709. else
  37710. pTDefRegMap(@Self)^.&set := $00000200;
  37711. end;
  37712. function TI2C3A_I2C3ASTAT.getGCSTAT : TBits_1; inline;
  37713. begin
  37714. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37715. end;
  37716. procedure TI2C3A_I2C3ASTAT.setBCL; inline;
  37717. begin
  37718. pTDefRegMap(@Self)^.&set := $00000400;
  37719. end;
  37720. procedure TI2C3A_I2C3ASTAT.clearBCL; inline;
  37721. begin
  37722. pTDefRegMap(@Self)^.clr := $00000400;
  37723. end;
  37724. procedure TI2C3A_I2C3ASTAT.setBCL(thebits : TBits_1); inline;
  37725. begin
  37726. if thebits = 0 then
  37727. pTDefRegMap(@Self)^.clr := $00000400
  37728. else
  37729. pTDefRegMap(@Self)^.&set := $00000400;
  37730. end;
  37731. function TI2C3A_I2C3ASTAT.getBCL : TBits_1; inline;
  37732. begin
  37733. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  37734. end;
  37735. procedure TI2C3A_I2C3ASTAT.setTRSTAT; inline;
  37736. begin
  37737. pTDefRegMap(@Self)^.&set := $00004000;
  37738. end;
  37739. procedure TI2C3A_I2C3ASTAT.clearTRSTAT; inline;
  37740. begin
  37741. pTDefRegMap(@Self)^.clr := $00004000;
  37742. end;
  37743. procedure TI2C3A_I2C3ASTAT.setTRSTAT(thebits : TBits_1); inline;
  37744. begin
  37745. if thebits = 0 then
  37746. pTDefRegMap(@Self)^.clr := $00004000
  37747. else
  37748. pTDefRegMap(@Self)^.&set := $00004000;
  37749. end;
  37750. function TI2C3A_I2C3ASTAT.getTRSTAT : TBits_1; inline;
  37751. begin
  37752. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  37753. end;
  37754. procedure TI2C3A_I2C3ASTAT.setACKSTAT; inline;
  37755. begin
  37756. pTDefRegMap(@Self)^.&set := $00008000;
  37757. end;
  37758. procedure TI2C3A_I2C3ASTAT.clearACKSTAT; inline;
  37759. begin
  37760. pTDefRegMap(@Self)^.clr := $00008000;
  37761. end;
  37762. procedure TI2C3A_I2C3ASTAT.setACKSTAT(thebits : TBits_1); inline;
  37763. begin
  37764. if thebits = 0 then
  37765. pTDefRegMap(@Self)^.clr := $00008000
  37766. else
  37767. pTDefRegMap(@Self)^.&set := $00008000;
  37768. end;
  37769. function TI2C3A_I2C3ASTAT.getACKSTAT : TBits_1; inline;
  37770. begin
  37771. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  37772. end;
  37773. procedure TI2C3A_I2C3ASTAT.setI2CPOV; inline;
  37774. begin
  37775. pTDefRegMap(@Self)^.&set := $00000040;
  37776. end;
  37777. procedure TI2C3A_I2C3ASTAT.clearI2CPOV; inline;
  37778. begin
  37779. pTDefRegMap(@Self)^.clr := $00000040;
  37780. end;
  37781. procedure TI2C3A_I2C3ASTAT.setI2CPOV(thebits : TBits_1); inline;
  37782. begin
  37783. if thebits = 0 then
  37784. pTDefRegMap(@Self)^.clr := $00000040
  37785. else
  37786. pTDefRegMap(@Self)^.&set := $00000040;
  37787. end;
  37788. function TI2C3A_I2C3ASTAT.getI2CPOV : TBits_1; inline;
  37789. begin
  37790. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37791. end;
  37792. procedure TI2C3A_I2C3ASTAT.setw(thebits : TBits_32); inline;
  37793. begin
  37794. pTDefRegMap(@Self)^.val := thebits;
  37795. end;
  37796. function TI2C3A_I2C3ASTAT.getw : TBits_32; inline;
  37797. begin
  37798. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  37799. end;
  37800. procedure TI2C3A_I2C5STAT.setTBF; inline;
  37801. begin
  37802. pTDefRegMap(@Self)^.&set := $00000001;
  37803. end;
  37804. procedure TI2C3A_I2C5STAT.clearTBF; inline;
  37805. begin
  37806. pTDefRegMap(@Self)^.clr := $00000001;
  37807. end;
  37808. procedure TI2C3A_I2C5STAT.setTBF(thebits : TBits_1); inline;
  37809. begin
  37810. if thebits = 0 then
  37811. pTDefRegMap(@Self)^.clr := $00000001
  37812. else
  37813. pTDefRegMap(@Self)^.&set := $00000001;
  37814. end;
  37815. function TI2C3A_I2C5STAT.getTBF : TBits_1; inline;
  37816. begin
  37817. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  37818. end;
  37819. procedure TI2C3A_I2C5STAT.setRBF; inline;
  37820. begin
  37821. pTDefRegMap(@Self)^.&set := $00000002;
  37822. end;
  37823. procedure TI2C3A_I2C5STAT.clearRBF; inline;
  37824. begin
  37825. pTDefRegMap(@Self)^.clr := $00000002;
  37826. end;
  37827. procedure TI2C3A_I2C5STAT.setRBF(thebits : TBits_1); inline;
  37828. begin
  37829. if thebits = 0 then
  37830. pTDefRegMap(@Self)^.clr := $00000002
  37831. else
  37832. pTDefRegMap(@Self)^.&set := $00000002;
  37833. end;
  37834. function TI2C3A_I2C5STAT.getRBF : TBits_1; inline;
  37835. begin
  37836. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  37837. end;
  37838. procedure TI2C3A_I2C5STAT.setR_W; inline;
  37839. begin
  37840. pTDefRegMap(@Self)^.&set := $00000004;
  37841. end;
  37842. procedure TI2C3A_I2C5STAT.clearR_W; inline;
  37843. begin
  37844. pTDefRegMap(@Self)^.clr := $00000004;
  37845. end;
  37846. procedure TI2C3A_I2C5STAT.setR_W(thebits : TBits_1); inline;
  37847. begin
  37848. if thebits = 0 then
  37849. pTDefRegMap(@Self)^.clr := $00000004
  37850. else
  37851. pTDefRegMap(@Self)^.&set := $00000004;
  37852. end;
  37853. function TI2C3A_I2C5STAT.getR_W : TBits_1; inline;
  37854. begin
  37855. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  37856. end;
  37857. procedure TI2C3A_I2C5STAT.setS; inline;
  37858. begin
  37859. pTDefRegMap(@Self)^.&set := $00000008;
  37860. end;
  37861. procedure TI2C3A_I2C5STAT.clearS; inline;
  37862. begin
  37863. pTDefRegMap(@Self)^.clr := $00000008;
  37864. end;
  37865. procedure TI2C3A_I2C5STAT.setS(thebits : TBits_1); inline;
  37866. begin
  37867. if thebits = 0 then
  37868. pTDefRegMap(@Self)^.clr := $00000008
  37869. else
  37870. pTDefRegMap(@Self)^.&set := $00000008;
  37871. end;
  37872. function TI2C3A_I2C5STAT.getS : TBits_1; inline;
  37873. begin
  37874. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  37875. end;
  37876. procedure TI2C3A_I2C5STAT.setP; inline;
  37877. begin
  37878. pTDefRegMap(@Self)^.&set := $00000010;
  37879. end;
  37880. procedure TI2C3A_I2C5STAT.clearP; inline;
  37881. begin
  37882. pTDefRegMap(@Self)^.clr := $00000010;
  37883. end;
  37884. procedure TI2C3A_I2C5STAT.setP(thebits : TBits_1); inline;
  37885. begin
  37886. if thebits = 0 then
  37887. pTDefRegMap(@Self)^.clr := $00000010
  37888. else
  37889. pTDefRegMap(@Self)^.&set := $00000010;
  37890. end;
  37891. function TI2C3A_I2C5STAT.getP : TBits_1; inline;
  37892. begin
  37893. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  37894. end;
  37895. procedure TI2C3A_I2C5STAT.setD_A; inline;
  37896. begin
  37897. pTDefRegMap(@Self)^.&set := $00000020;
  37898. end;
  37899. procedure TI2C3A_I2C5STAT.clearD_A; inline;
  37900. begin
  37901. pTDefRegMap(@Self)^.clr := $00000020;
  37902. end;
  37903. procedure TI2C3A_I2C5STAT.setD_A(thebits : TBits_1); inline;
  37904. begin
  37905. if thebits = 0 then
  37906. pTDefRegMap(@Self)^.clr := $00000020
  37907. else
  37908. pTDefRegMap(@Self)^.&set := $00000020;
  37909. end;
  37910. function TI2C3A_I2C5STAT.getD_A : TBits_1; inline;
  37911. begin
  37912. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  37913. end;
  37914. procedure TI2C3A_I2C5STAT.setI2COV; inline;
  37915. begin
  37916. pTDefRegMap(@Self)^.&set := $00000040;
  37917. end;
  37918. procedure TI2C3A_I2C5STAT.clearI2COV; inline;
  37919. begin
  37920. pTDefRegMap(@Self)^.clr := $00000040;
  37921. end;
  37922. procedure TI2C3A_I2C5STAT.setI2COV(thebits : TBits_1); inline;
  37923. begin
  37924. if thebits = 0 then
  37925. pTDefRegMap(@Self)^.clr := $00000040
  37926. else
  37927. pTDefRegMap(@Self)^.&set := $00000040;
  37928. end;
  37929. function TI2C3A_I2C5STAT.getI2COV : TBits_1; inline;
  37930. begin
  37931. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  37932. end;
  37933. procedure TI2C3A_I2C5STAT.setIWCOL; inline;
  37934. begin
  37935. pTDefRegMap(@Self)^.&set := $00000080;
  37936. end;
  37937. procedure TI2C3A_I2C5STAT.clearIWCOL; inline;
  37938. begin
  37939. pTDefRegMap(@Self)^.clr := $00000080;
  37940. end;
  37941. procedure TI2C3A_I2C5STAT.setIWCOL(thebits : TBits_1); inline;
  37942. begin
  37943. if thebits = 0 then
  37944. pTDefRegMap(@Self)^.clr := $00000080
  37945. else
  37946. pTDefRegMap(@Self)^.&set := $00000080;
  37947. end;
  37948. function TI2C3A_I2C5STAT.getIWCOL : TBits_1; inline;
  37949. begin
  37950. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  37951. end;
  37952. procedure TI2C3A_I2C5STAT.setADD10; inline;
  37953. begin
  37954. pTDefRegMap(@Self)^.&set := $00000100;
  37955. end;
  37956. procedure TI2C3A_I2C5STAT.clearADD10; inline;
  37957. begin
  37958. pTDefRegMap(@Self)^.clr := $00000100;
  37959. end;
  37960. procedure TI2C3A_I2C5STAT.setADD10(thebits : TBits_1); inline;
  37961. begin
  37962. if thebits = 0 then
  37963. pTDefRegMap(@Self)^.clr := $00000100
  37964. else
  37965. pTDefRegMap(@Self)^.&set := $00000100;
  37966. end;
  37967. function TI2C3A_I2C5STAT.getADD10 : TBits_1; inline;
  37968. begin
  37969. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  37970. end;
  37971. procedure TI2C3A_I2C5STAT.setGCSTAT; inline;
  37972. begin
  37973. pTDefRegMap(@Self)^.&set := $00000200;
  37974. end;
  37975. procedure TI2C3A_I2C5STAT.clearGCSTAT; inline;
  37976. begin
  37977. pTDefRegMap(@Self)^.clr := $00000200;
  37978. end;
  37979. procedure TI2C3A_I2C5STAT.setGCSTAT(thebits : TBits_1); inline;
  37980. begin
  37981. if thebits = 0 then
  37982. pTDefRegMap(@Self)^.clr := $00000200
  37983. else
  37984. pTDefRegMap(@Self)^.&set := $00000200;
  37985. end;
  37986. function TI2C3A_I2C5STAT.getGCSTAT : TBits_1; inline;
  37987. begin
  37988. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  37989. end;
  37990. procedure TI2C3A_I2C5STAT.setBCL; inline;
  37991. begin
  37992. pTDefRegMap(@Self)^.&set := $00000400;
  37993. end;
  37994. procedure TI2C3A_I2C5STAT.clearBCL; inline;
  37995. begin
  37996. pTDefRegMap(@Self)^.clr := $00000400;
  37997. end;
  37998. procedure TI2C3A_I2C5STAT.setBCL(thebits : TBits_1); inline;
  37999. begin
  38000. if thebits = 0 then
  38001. pTDefRegMap(@Self)^.clr := $00000400
  38002. else
  38003. pTDefRegMap(@Self)^.&set := $00000400;
  38004. end;
  38005. function TI2C3A_I2C5STAT.getBCL : TBits_1; inline;
  38006. begin
  38007. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38008. end;
  38009. procedure TI2C3A_I2C5STAT.setTRSTAT; inline;
  38010. begin
  38011. pTDefRegMap(@Self)^.&set := $00004000;
  38012. end;
  38013. procedure TI2C3A_I2C5STAT.clearTRSTAT; inline;
  38014. begin
  38015. pTDefRegMap(@Self)^.clr := $00004000;
  38016. end;
  38017. procedure TI2C3A_I2C5STAT.setTRSTAT(thebits : TBits_1); inline;
  38018. begin
  38019. if thebits = 0 then
  38020. pTDefRegMap(@Self)^.clr := $00004000
  38021. else
  38022. pTDefRegMap(@Self)^.&set := $00004000;
  38023. end;
  38024. function TI2C3A_I2C5STAT.getTRSTAT : TBits_1; inline;
  38025. begin
  38026. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38027. end;
  38028. procedure TI2C3A_I2C5STAT.setACKSTAT; inline;
  38029. begin
  38030. pTDefRegMap(@Self)^.&set := $00008000;
  38031. end;
  38032. procedure TI2C3A_I2C5STAT.clearACKSTAT; inline;
  38033. begin
  38034. pTDefRegMap(@Self)^.clr := $00008000;
  38035. end;
  38036. procedure TI2C3A_I2C5STAT.setACKSTAT(thebits : TBits_1); inline;
  38037. begin
  38038. if thebits = 0 then
  38039. pTDefRegMap(@Self)^.clr := $00008000
  38040. else
  38041. pTDefRegMap(@Self)^.&set := $00008000;
  38042. end;
  38043. function TI2C3A_I2C5STAT.getACKSTAT : TBits_1; inline;
  38044. begin
  38045. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38046. end;
  38047. procedure TI2C3A_I2C5STAT.setI2CPOV; inline;
  38048. begin
  38049. pTDefRegMap(@Self)^.&set := $00000040;
  38050. end;
  38051. procedure TI2C3A_I2C5STAT.clearI2CPOV; inline;
  38052. begin
  38053. pTDefRegMap(@Self)^.clr := $00000040;
  38054. end;
  38055. procedure TI2C3A_I2C5STAT.setI2CPOV(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 TI2C3A_I2C5STAT.getI2CPOV : TBits_1; inline;
  38063. begin
  38064. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38065. end;
  38066. procedure TI2C3A_I2C5STAT.setw(thebits : TBits_32); inline;
  38067. begin
  38068. pTDefRegMap(@Self)^.val := thebits;
  38069. end;
  38070. function TI2C3A_I2C5STAT.getw : TBits_32; inline;
  38071. begin
  38072. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38073. end;
  38074. procedure TI2C1_I2C1CON.setSEN; inline;
  38075. begin
  38076. pTDefRegMap(@Self)^.&set := $00000001;
  38077. end;
  38078. procedure TI2C1_I2C1CON.clearSEN; inline;
  38079. begin
  38080. pTDefRegMap(@Self)^.clr := $00000001;
  38081. end;
  38082. procedure TI2C1_I2C1CON.setSEN(thebits : TBits_1); inline;
  38083. begin
  38084. if thebits = 0 then
  38085. pTDefRegMap(@Self)^.clr := $00000001
  38086. else
  38087. pTDefRegMap(@Self)^.&set := $00000001;
  38088. end;
  38089. function TI2C1_I2C1CON.getSEN : TBits_1; inline;
  38090. begin
  38091. getSEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38092. end;
  38093. procedure TI2C1_I2C1CON.setRSEN; inline;
  38094. begin
  38095. pTDefRegMap(@Self)^.&set := $00000002;
  38096. end;
  38097. procedure TI2C1_I2C1CON.clearRSEN; inline;
  38098. begin
  38099. pTDefRegMap(@Self)^.clr := $00000002;
  38100. end;
  38101. procedure TI2C1_I2C1CON.setRSEN(thebits : TBits_1); inline;
  38102. begin
  38103. if thebits = 0 then
  38104. pTDefRegMap(@Self)^.clr := $00000002
  38105. else
  38106. pTDefRegMap(@Self)^.&set := $00000002;
  38107. end;
  38108. function TI2C1_I2C1CON.getRSEN : TBits_1; inline;
  38109. begin
  38110. getRSEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38111. end;
  38112. procedure TI2C1_I2C1CON.setPEN; inline;
  38113. begin
  38114. pTDefRegMap(@Self)^.&set := $00000004;
  38115. end;
  38116. procedure TI2C1_I2C1CON.clearPEN; inline;
  38117. begin
  38118. pTDefRegMap(@Self)^.clr := $00000004;
  38119. end;
  38120. procedure TI2C1_I2C1CON.setPEN(thebits : TBits_1); inline;
  38121. begin
  38122. if thebits = 0 then
  38123. pTDefRegMap(@Self)^.clr := $00000004
  38124. else
  38125. pTDefRegMap(@Self)^.&set := $00000004;
  38126. end;
  38127. function TI2C1_I2C1CON.getPEN : TBits_1; inline;
  38128. begin
  38129. getPEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38130. end;
  38131. procedure TI2C1_I2C1CON.setRCEN; inline;
  38132. begin
  38133. pTDefRegMap(@Self)^.&set := $00000008;
  38134. end;
  38135. procedure TI2C1_I2C1CON.clearRCEN; inline;
  38136. begin
  38137. pTDefRegMap(@Self)^.clr := $00000008;
  38138. end;
  38139. procedure TI2C1_I2C1CON.setRCEN(thebits : TBits_1); inline;
  38140. begin
  38141. if thebits = 0 then
  38142. pTDefRegMap(@Self)^.clr := $00000008
  38143. else
  38144. pTDefRegMap(@Self)^.&set := $00000008;
  38145. end;
  38146. function TI2C1_I2C1CON.getRCEN : TBits_1; inline;
  38147. begin
  38148. getRCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38149. end;
  38150. procedure TI2C1_I2C1CON.setACKEN; inline;
  38151. begin
  38152. pTDefRegMap(@Self)^.&set := $00000010;
  38153. end;
  38154. procedure TI2C1_I2C1CON.clearACKEN; inline;
  38155. begin
  38156. pTDefRegMap(@Self)^.clr := $00000010;
  38157. end;
  38158. procedure TI2C1_I2C1CON.setACKEN(thebits : TBits_1); inline;
  38159. begin
  38160. if thebits = 0 then
  38161. pTDefRegMap(@Self)^.clr := $00000010
  38162. else
  38163. pTDefRegMap(@Self)^.&set := $00000010;
  38164. end;
  38165. function TI2C1_I2C1CON.getACKEN : TBits_1; inline;
  38166. begin
  38167. getACKEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38168. end;
  38169. procedure TI2C1_I2C1CON.setACKDT; inline;
  38170. begin
  38171. pTDefRegMap(@Self)^.&set := $00000020;
  38172. end;
  38173. procedure TI2C1_I2C1CON.clearACKDT; inline;
  38174. begin
  38175. pTDefRegMap(@Self)^.clr := $00000020;
  38176. end;
  38177. procedure TI2C1_I2C1CON.setACKDT(thebits : TBits_1); inline;
  38178. begin
  38179. if thebits = 0 then
  38180. pTDefRegMap(@Self)^.clr := $00000020
  38181. else
  38182. pTDefRegMap(@Self)^.&set := $00000020;
  38183. end;
  38184. function TI2C1_I2C1CON.getACKDT : TBits_1; inline;
  38185. begin
  38186. getACKDT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38187. end;
  38188. procedure TI2C1_I2C1CON.setSTREN; inline;
  38189. begin
  38190. pTDefRegMap(@Self)^.&set := $00000040;
  38191. end;
  38192. procedure TI2C1_I2C1CON.clearSTREN; inline;
  38193. begin
  38194. pTDefRegMap(@Self)^.clr := $00000040;
  38195. end;
  38196. procedure TI2C1_I2C1CON.setSTREN(thebits : TBits_1); inline;
  38197. begin
  38198. if thebits = 0 then
  38199. pTDefRegMap(@Self)^.clr := $00000040
  38200. else
  38201. pTDefRegMap(@Self)^.&set := $00000040;
  38202. end;
  38203. function TI2C1_I2C1CON.getSTREN : TBits_1; inline;
  38204. begin
  38205. getSTREN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38206. end;
  38207. procedure TI2C1_I2C1CON.setGCEN; inline;
  38208. begin
  38209. pTDefRegMap(@Self)^.&set := $00000080;
  38210. end;
  38211. procedure TI2C1_I2C1CON.clearGCEN; inline;
  38212. begin
  38213. pTDefRegMap(@Self)^.clr := $00000080;
  38214. end;
  38215. procedure TI2C1_I2C1CON.setGCEN(thebits : TBits_1); inline;
  38216. begin
  38217. if thebits = 0 then
  38218. pTDefRegMap(@Self)^.clr := $00000080
  38219. else
  38220. pTDefRegMap(@Self)^.&set := $00000080;
  38221. end;
  38222. function TI2C1_I2C1CON.getGCEN : TBits_1; inline;
  38223. begin
  38224. getGCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38225. end;
  38226. procedure TI2C1_I2C1CON.setSMEN; inline;
  38227. begin
  38228. pTDefRegMap(@Self)^.&set := $00000100;
  38229. end;
  38230. procedure TI2C1_I2C1CON.clearSMEN; inline;
  38231. begin
  38232. pTDefRegMap(@Self)^.clr := $00000100;
  38233. end;
  38234. procedure TI2C1_I2C1CON.setSMEN(thebits : TBits_1); inline;
  38235. begin
  38236. if thebits = 0 then
  38237. pTDefRegMap(@Self)^.clr := $00000100
  38238. else
  38239. pTDefRegMap(@Self)^.&set := $00000100;
  38240. end;
  38241. function TI2C1_I2C1CON.getSMEN : TBits_1; inline;
  38242. begin
  38243. getSMEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38244. end;
  38245. procedure TI2C1_I2C1CON.setDISSLW; inline;
  38246. begin
  38247. pTDefRegMap(@Self)^.&set := $00000200;
  38248. end;
  38249. procedure TI2C1_I2C1CON.clearDISSLW; inline;
  38250. begin
  38251. pTDefRegMap(@Self)^.clr := $00000200;
  38252. end;
  38253. procedure TI2C1_I2C1CON.setDISSLW(thebits : TBits_1); inline;
  38254. begin
  38255. if thebits = 0 then
  38256. pTDefRegMap(@Self)^.clr := $00000200
  38257. else
  38258. pTDefRegMap(@Self)^.&set := $00000200;
  38259. end;
  38260. function TI2C1_I2C1CON.getDISSLW : TBits_1; inline;
  38261. begin
  38262. getDISSLW := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38263. end;
  38264. procedure TI2C1_I2C1CON.setA10M; inline;
  38265. begin
  38266. pTDefRegMap(@Self)^.&set := $00000400;
  38267. end;
  38268. procedure TI2C1_I2C1CON.clearA10M; inline;
  38269. begin
  38270. pTDefRegMap(@Self)^.clr := $00000400;
  38271. end;
  38272. procedure TI2C1_I2C1CON.setA10M(thebits : TBits_1); inline;
  38273. begin
  38274. if thebits = 0 then
  38275. pTDefRegMap(@Self)^.clr := $00000400
  38276. else
  38277. pTDefRegMap(@Self)^.&set := $00000400;
  38278. end;
  38279. function TI2C1_I2C1CON.getA10M : TBits_1; inline;
  38280. begin
  38281. getA10M := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38282. end;
  38283. procedure TI2C1_I2C1CON.setSTRICT; inline;
  38284. begin
  38285. pTDefRegMap(@Self)^.&set := $00000800;
  38286. end;
  38287. procedure TI2C1_I2C1CON.clearSTRICT; inline;
  38288. begin
  38289. pTDefRegMap(@Self)^.clr := $00000800;
  38290. end;
  38291. procedure TI2C1_I2C1CON.setSTRICT(thebits : TBits_1); inline;
  38292. begin
  38293. if thebits = 0 then
  38294. pTDefRegMap(@Self)^.clr := $00000800
  38295. else
  38296. pTDefRegMap(@Self)^.&set := $00000800;
  38297. end;
  38298. function TI2C1_I2C1CON.getSTRICT : TBits_1; inline;
  38299. begin
  38300. getSTRICT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38301. end;
  38302. procedure TI2C1_I2C1CON.setSCLREL; inline;
  38303. begin
  38304. pTDefRegMap(@Self)^.&set := $00001000;
  38305. end;
  38306. procedure TI2C1_I2C1CON.clearSCLREL; inline;
  38307. begin
  38308. pTDefRegMap(@Self)^.clr := $00001000;
  38309. end;
  38310. procedure TI2C1_I2C1CON.setSCLREL(thebits : TBits_1); inline;
  38311. begin
  38312. if thebits = 0 then
  38313. pTDefRegMap(@Self)^.clr := $00001000
  38314. else
  38315. pTDefRegMap(@Self)^.&set := $00001000;
  38316. end;
  38317. function TI2C1_I2C1CON.getSCLREL : TBits_1; inline;
  38318. begin
  38319. getSCLREL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38320. end;
  38321. procedure TI2C1_I2C1CON.setSIDL; inline;
  38322. begin
  38323. pTDefRegMap(@Self)^.&set := $00002000;
  38324. end;
  38325. procedure TI2C1_I2C1CON.clearSIDL; inline;
  38326. begin
  38327. pTDefRegMap(@Self)^.clr := $00002000;
  38328. end;
  38329. procedure TI2C1_I2C1CON.setSIDL(thebits : TBits_1); inline;
  38330. begin
  38331. if thebits = 0 then
  38332. pTDefRegMap(@Self)^.clr := $00002000
  38333. else
  38334. pTDefRegMap(@Self)^.&set := $00002000;
  38335. end;
  38336. function TI2C1_I2C1CON.getSIDL : TBits_1; inline;
  38337. begin
  38338. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38339. end;
  38340. procedure TI2C1_I2C1CON.setON; inline;
  38341. begin
  38342. pTDefRegMap(@Self)^.&set := $00008000;
  38343. end;
  38344. procedure TI2C1_I2C1CON.clearON; inline;
  38345. begin
  38346. pTDefRegMap(@Self)^.clr := $00008000;
  38347. end;
  38348. procedure TI2C1_I2C1CON.setON(thebits : TBits_1); inline;
  38349. begin
  38350. if thebits = 0 then
  38351. pTDefRegMap(@Self)^.clr := $00008000
  38352. else
  38353. pTDefRegMap(@Self)^.&set := $00008000;
  38354. end;
  38355. function TI2C1_I2C1CON.getON : TBits_1; inline;
  38356. begin
  38357. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38358. end;
  38359. procedure TI2C1_I2C1CON.setIPMIEN; inline;
  38360. begin
  38361. pTDefRegMap(@Self)^.&set := $00000800;
  38362. end;
  38363. procedure TI2C1_I2C1CON.clearIPMIEN; inline;
  38364. begin
  38365. pTDefRegMap(@Self)^.clr := $00000800;
  38366. end;
  38367. procedure TI2C1_I2C1CON.setIPMIEN(thebits : TBits_1); inline;
  38368. begin
  38369. if thebits = 0 then
  38370. pTDefRegMap(@Self)^.clr := $00000800
  38371. else
  38372. pTDefRegMap(@Self)^.&set := $00000800;
  38373. end;
  38374. function TI2C1_I2C1CON.getIPMIEN : TBits_1; inline;
  38375. begin
  38376. getIPMIEN := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38377. end;
  38378. procedure TI2C1_I2C1CON.setI2CSIDL; inline;
  38379. begin
  38380. pTDefRegMap(@Self)^.&set := $00002000;
  38381. end;
  38382. procedure TI2C1_I2C1CON.clearI2CSIDL; inline;
  38383. begin
  38384. pTDefRegMap(@Self)^.clr := $00002000;
  38385. end;
  38386. procedure TI2C1_I2C1CON.setI2CSIDL(thebits : TBits_1); inline;
  38387. begin
  38388. if thebits = 0 then
  38389. pTDefRegMap(@Self)^.clr := $00002000
  38390. else
  38391. pTDefRegMap(@Self)^.&set := $00002000;
  38392. end;
  38393. function TI2C1_I2C1CON.getI2CSIDL : TBits_1; inline;
  38394. begin
  38395. getI2CSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38396. end;
  38397. procedure TI2C1_I2C1CON.setI2CEN; inline;
  38398. begin
  38399. pTDefRegMap(@Self)^.&set := $00008000;
  38400. end;
  38401. procedure TI2C1_I2C1CON.clearI2CEN; inline;
  38402. begin
  38403. pTDefRegMap(@Self)^.clr := $00008000;
  38404. end;
  38405. procedure TI2C1_I2C1CON.setI2CEN(thebits : TBits_1); inline;
  38406. begin
  38407. if thebits = 0 then
  38408. pTDefRegMap(@Self)^.clr := $00008000
  38409. else
  38410. pTDefRegMap(@Self)^.&set := $00008000;
  38411. end;
  38412. function TI2C1_I2C1CON.getI2CEN : TBits_1; inline;
  38413. begin
  38414. getI2CEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38415. end;
  38416. procedure TI2C1_I2C1CON.setw(thebits : TBits_32); inline;
  38417. begin
  38418. pTDefRegMap(@Self)^.val := thebits;
  38419. end;
  38420. function TI2C1_I2C1CON.getw : TBits_32; inline;
  38421. begin
  38422. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38423. end;
  38424. procedure TI2C1_I2C1STAT.setTBF; inline;
  38425. begin
  38426. pTDefRegMap(@Self)^.&set := $00000001;
  38427. end;
  38428. procedure TI2C1_I2C1STAT.clearTBF; inline;
  38429. begin
  38430. pTDefRegMap(@Self)^.clr := $00000001;
  38431. end;
  38432. procedure TI2C1_I2C1STAT.setTBF(thebits : TBits_1); inline;
  38433. begin
  38434. if thebits = 0 then
  38435. pTDefRegMap(@Self)^.clr := $00000001
  38436. else
  38437. pTDefRegMap(@Self)^.&set := $00000001;
  38438. end;
  38439. function TI2C1_I2C1STAT.getTBF : TBits_1; inline;
  38440. begin
  38441. getTBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  38442. end;
  38443. procedure TI2C1_I2C1STAT.setRBF; inline;
  38444. begin
  38445. pTDefRegMap(@Self)^.&set := $00000002;
  38446. end;
  38447. procedure TI2C1_I2C1STAT.clearRBF; inline;
  38448. begin
  38449. pTDefRegMap(@Self)^.clr := $00000002;
  38450. end;
  38451. procedure TI2C1_I2C1STAT.setRBF(thebits : TBits_1); inline;
  38452. begin
  38453. if thebits = 0 then
  38454. pTDefRegMap(@Self)^.clr := $00000002
  38455. else
  38456. pTDefRegMap(@Self)^.&set := $00000002;
  38457. end;
  38458. function TI2C1_I2C1STAT.getRBF : TBits_1; inline;
  38459. begin
  38460. getRBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  38461. end;
  38462. procedure TI2C1_I2C1STAT.setR_W; inline;
  38463. begin
  38464. pTDefRegMap(@Self)^.&set := $00000004;
  38465. end;
  38466. procedure TI2C1_I2C1STAT.clearR_W; inline;
  38467. begin
  38468. pTDefRegMap(@Self)^.clr := $00000004;
  38469. end;
  38470. procedure TI2C1_I2C1STAT.setR_W(thebits : TBits_1); inline;
  38471. begin
  38472. if thebits = 0 then
  38473. pTDefRegMap(@Self)^.clr := $00000004
  38474. else
  38475. pTDefRegMap(@Self)^.&set := $00000004;
  38476. end;
  38477. function TI2C1_I2C1STAT.getR_W : TBits_1; inline;
  38478. begin
  38479. getR_W := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  38480. end;
  38481. procedure TI2C1_I2C1STAT.setS; inline;
  38482. begin
  38483. pTDefRegMap(@Self)^.&set := $00000008;
  38484. end;
  38485. procedure TI2C1_I2C1STAT.clearS; inline;
  38486. begin
  38487. pTDefRegMap(@Self)^.clr := $00000008;
  38488. end;
  38489. procedure TI2C1_I2C1STAT.setS(thebits : TBits_1); inline;
  38490. begin
  38491. if thebits = 0 then
  38492. pTDefRegMap(@Self)^.clr := $00000008
  38493. else
  38494. pTDefRegMap(@Self)^.&set := $00000008;
  38495. end;
  38496. function TI2C1_I2C1STAT.getS : TBits_1; inline;
  38497. begin
  38498. getS := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  38499. end;
  38500. procedure TI2C1_I2C1STAT.setP; inline;
  38501. begin
  38502. pTDefRegMap(@Self)^.&set := $00000010;
  38503. end;
  38504. procedure TI2C1_I2C1STAT.clearP; inline;
  38505. begin
  38506. pTDefRegMap(@Self)^.clr := $00000010;
  38507. end;
  38508. procedure TI2C1_I2C1STAT.setP(thebits : TBits_1); inline;
  38509. begin
  38510. if thebits = 0 then
  38511. pTDefRegMap(@Self)^.clr := $00000010
  38512. else
  38513. pTDefRegMap(@Self)^.&set := $00000010;
  38514. end;
  38515. function TI2C1_I2C1STAT.getP : TBits_1; inline;
  38516. begin
  38517. getP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  38518. end;
  38519. procedure TI2C1_I2C1STAT.setD_A; inline;
  38520. begin
  38521. pTDefRegMap(@Self)^.&set := $00000020;
  38522. end;
  38523. procedure TI2C1_I2C1STAT.clearD_A; inline;
  38524. begin
  38525. pTDefRegMap(@Self)^.clr := $00000020;
  38526. end;
  38527. procedure TI2C1_I2C1STAT.setD_A(thebits : TBits_1); inline;
  38528. begin
  38529. if thebits = 0 then
  38530. pTDefRegMap(@Self)^.clr := $00000020
  38531. else
  38532. pTDefRegMap(@Self)^.&set := $00000020;
  38533. end;
  38534. function TI2C1_I2C1STAT.getD_A : TBits_1; inline;
  38535. begin
  38536. getD_A := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38537. end;
  38538. procedure TI2C1_I2C1STAT.setI2COV; inline;
  38539. begin
  38540. pTDefRegMap(@Self)^.&set := $00000040;
  38541. end;
  38542. procedure TI2C1_I2C1STAT.clearI2COV; inline;
  38543. begin
  38544. pTDefRegMap(@Self)^.clr := $00000040;
  38545. end;
  38546. procedure TI2C1_I2C1STAT.setI2COV(thebits : TBits_1); inline;
  38547. begin
  38548. if thebits = 0 then
  38549. pTDefRegMap(@Self)^.clr := $00000040
  38550. else
  38551. pTDefRegMap(@Self)^.&set := $00000040;
  38552. end;
  38553. function TI2C1_I2C1STAT.getI2COV : TBits_1; inline;
  38554. begin
  38555. getI2COV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38556. end;
  38557. procedure TI2C1_I2C1STAT.setIWCOL; inline;
  38558. begin
  38559. pTDefRegMap(@Self)^.&set := $00000080;
  38560. end;
  38561. procedure TI2C1_I2C1STAT.clearIWCOL; inline;
  38562. begin
  38563. pTDefRegMap(@Self)^.clr := $00000080;
  38564. end;
  38565. procedure TI2C1_I2C1STAT.setIWCOL(thebits : TBits_1); inline;
  38566. begin
  38567. if thebits = 0 then
  38568. pTDefRegMap(@Self)^.clr := $00000080
  38569. else
  38570. pTDefRegMap(@Self)^.&set := $00000080;
  38571. end;
  38572. function TI2C1_I2C1STAT.getIWCOL : TBits_1; inline;
  38573. begin
  38574. getIWCOL := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38575. end;
  38576. procedure TI2C1_I2C1STAT.setADD10; inline;
  38577. begin
  38578. pTDefRegMap(@Self)^.&set := $00000100;
  38579. end;
  38580. procedure TI2C1_I2C1STAT.clearADD10; inline;
  38581. begin
  38582. pTDefRegMap(@Self)^.clr := $00000100;
  38583. end;
  38584. procedure TI2C1_I2C1STAT.setADD10(thebits : TBits_1); inline;
  38585. begin
  38586. if thebits = 0 then
  38587. pTDefRegMap(@Self)^.clr := $00000100
  38588. else
  38589. pTDefRegMap(@Self)^.&set := $00000100;
  38590. end;
  38591. function TI2C1_I2C1STAT.getADD10 : TBits_1; inline;
  38592. begin
  38593. getADD10 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38594. end;
  38595. procedure TI2C1_I2C1STAT.setGCSTAT; inline;
  38596. begin
  38597. pTDefRegMap(@Self)^.&set := $00000200;
  38598. end;
  38599. procedure TI2C1_I2C1STAT.clearGCSTAT; inline;
  38600. begin
  38601. pTDefRegMap(@Self)^.clr := $00000200;
  38602. end;
  38603. procedure TI2C1_I2C1STAT.setGCSTAT(thebits : TBits_1); inline;
  38604. begin
  38605. if thebits = 0 then
  38606. pTDefRegMap(@Self)^.clr := $00000200
  38607. else
  38608. pTDefRegMap(@Self)^.&set := $00000200;
  38609. end;
  38610. function TI2C1_I2C1STAT.getGCSTAT : TBits_1; inline;
  38611. begin
  38612. getGCSTAT := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38613. end;
  38614. procedure TI2C1_I2C1STAT.setBCL; inline;
  38615. begin
  38616. pTDefRegMap(@Self)^.&set := $00000400;
  38617. end;
  38618. procedure TI2C1_I2C1STAT.clearBCL; inline;
  38619. begin
  38620. pTDefRegMap(@Self)^.clr := $00000400;
  38621. end;
  38622. procedure TI2C1_I2C1STAT.setBCL(thebits : TBits_1); inline;
  38623. begin
  38624. if thebits = 0 then
  38625. pTDefRegMap(@Self)^.clr := $00000400
  38626. else
  38627. pTDefRegMap(@Self)^.&set := $00000400;
  38628. end;
  38629. function TI2C1_I2C1STAT.getBCL : TBits_1; inline;
  38630. begin
  38631. getBCL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38632. end;
  38633. procedure TI2C1_I2C1STAT.setTRSTAT; inline;
  38634. begin
  38635. pTDefRegMap(@Self)^.&set := $00004000;
  38636. end;
  38637. procedure TI2C1_I2C1STAT.clearTRSTAT; inline;
  38638. begin
  38639. pTDefRegMap(@Self)^.clr := $00004000;
  38640. end;
  38641. procedure TI2C1_I2C1STAT.setTRSTAT(thebits : TBits_1); inline;
  38642. begin
  38643. if thebits = 0 then
  38644. pTDefRegMap(@Self)^.clr := $00004000
  38645. else
  38646. pTDefRegMap(@Self)^.&set := $00004000;
  38647. end;
  38648. function TI2C1_I2C1STAT.getTRSTAT : TBits_1; inline;
  38649. begin
  38650. getTRSTAT := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  38651. end;
  38652. procedure TI2C1_I2C1STAT.setACKSTAT; inline;
  38653. begin
  38654. pTDefRegMap(@Self)^.&set := $00008000;
  38655. end;
  38656. procedure TI2C1_I2C1STAT.clearACKSTAT; inline;
  38657. begin
  38658. pTDefRegMap(@Self)^.clr := $00008000;
  38659. end;
  38660. procedure TI2C1_I2C1STAT.setACKSTAT(thebits : TBits_1); inline;
  38661. begin
  38662. if thebits = 0 then
  38663. pTDefRegMap(@Self)^.clr := $00008000
  38664. else
  38665. pTDefRegMap(@Self)^.&set := $00008000;
  38666. end;
  38667. function TI2C1_I2C1STAT.getACKSTAT : TBits_1; inline;
  38668. begin
  38669. getACKSTAT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38670. end;
  38671. procedure TI2C1_I2C1STAT.setI2CPOV; inline;
  38672. begin
  38673. pTDefRegMap(@Self)^.&set := $00000040;
  38674. end;
  38675. procedure TI2C1_I2C1STAT.clearI2CPOV; inline;
  38676. begin
  38677. pTDefRegMap(@Self)^.clr := $00000040;
  38678. end;
  38679. procedure TI2C1_I2C1STAT.setI2CPOV(thebits : TBits_1); inline;
  38680. begin
  38681. if thebits = 0 then
  38682. pTDefRegMap(@Self)^.clr := $00000040
  38683. else
  38684. pTDefRegMap(@Self)^.&set := $00000040;
  38685. end;
  38686. function TI2C1_I2C1STAT.getI2CPOV : TBits_1; inline;
  38687. begin
  38688. getI2CPOV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38689. end;
  38690. procedure TI2C1_I2C1STAT.setw(thebits : TBits_32); inline;
  38691. begin
  38692. pTDefRegMap(@Self)^.val := thebits;
  38693. end;
  38694. function TI2C1_I2C1STAT.getw : TBits_32; inline;
  38695. begin
  38696. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  38697. end;
  38698. procedure TSPI1A_SPI1ACON.setSRXISEL(thebits : TBits_2); inline;
  38699. begin
  38700. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  38701. end;
  38702. function TSPI1A_SPI1ACON.getSRXISEL : TBits_2; inline;
  38703. begin
  38704. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  38705. end;
  38706. procedure TSPI1A_SPI1ACON.setSTXISEL(thebits : TBits_2); inline;
  38707. begin
  38708. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  38709. end;
  38710. function TSPI1A_SPI1ACON.getSTXISEL : TBits_2; inline;
  38711. begin
  38712. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  38713. end;
  38714. procedure TSPI1A_SPI1ACON.setMSTEN; inline;
  38715. begin
  38716. pTDefRegMap(@Self)^.&set := $00000020;
  38717. end;
  38718. procedure TSPI1A_SPI1ACON.clearMSTEN; inline;
  38719. begin
  38720. pTDefRegMap(@Self)^.clr := $00000020;
  38721. end;
  38722. procedure TSPI1A_SPI1ACON.setMSTEN(thebits : TBits_1); inline;
  38723. begin
  38724. if thebits = 0 then
  38725. pTDefRegMap(@Self)^.clr := $00000020
  38726. else
  38727. pTDefRegMap(@Self)^.&set := $00000020;
  38728. end;
  38729. function TSPI1A_SPI1ACON.getMSTEN : TBits_1; inline;
  38730. begin
  38731. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  38732. end;
  38733. procedure TSPI1A_SPI1ACON.setCKP; inline;
  38734. begin
  38735. pTDefRegMap(@Self)^.&set := $00000040;
  38736. end;
  38737. procedure TSPI1A_SPI1ACON.clearCKP; inline;
  38738. begin
  38739. pTDefRegMap(@Self)^.clr := $00000040;
  38740. end;
  38741. procedure TSPI1A_SPI1ACON.setCKP(thebits : TBits_1); inline;
  38742. begin
  38743. if thebits = 0 then
  38744. pTDefRegMap(@Self)^.clr := $00000040
  38745. else
  38746. pTDefRegMap(@Self)^.&set := $00000040;
  38747. end;
  38748. function TSPI1A_SPI1ACON.getCKP : TBits_1; inline;
  38749. begin
  38750. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  38751. end;
  38752. procedure TSPI1A_SPI1ACON.setSSEN; inline;
  38753. begin
  38754. pTDefRegMap(@Self)^.&set := $00000080;
  38755. end;
  38756. procedure TSPI1A_SPI1ACON.clearSSEN; inline;
  38757. begin
  38758. pTDefRegMap(@Self)^.clr := $00000080;
  38759. end;
  38760. procedure TSPI1A_SPI1ACON.setSSEN(thebits : TBits_1); inline;
  38761. begin
  38762. if thebits = 0 then
  38763. pTDefRegMap(@Self)^.clr := $00000080
  38764. else
  38765. pTDefRegMap(@Self)^.&set := $00000080;
  38766. end;
  38767. function TSPI1A_SPI1ACON.getSSEN : TBits_1; inline;
  38768. begin
  38769. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  38770. end;
  38771. procedure TSPI1A_SPI1ACON.setCKE; inline;
  38772. begin
  38773. pTDefRegMap(@Self)^.&set := $00000100;
  38774. end;
  38775. procedure TSPI1A_SPI1ACON.clearCKE; inline;
  38776. begin
  38777. pTDefRegMap(@Self)^.clr := $00000100;
  38778. end;
  38779. procedure TSPI1A_SPI1ACON.setCKE(thebits : TBits_1); inline;
  38780. begin
  38781. if thebits = 0 then
  38782. pTDefRegMap(@Self)^.clr := $00000100
  38783. else
  38784. pTDefRegMap(@Self)^.&set := $00000100;
  38785. end;
  38786. function TSPI1A_SPI1ACON.getCKE : TBits_1; inline;
  38787. begin
  38788. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  38789. end;
  38790. procedure TSPI1A_SPI1ACON.setSMP; inline;
  38791. begin
  38792. pTDefRegMap(@Self)^.&set := $00000200;
  38793. end;
  38794. procedure TSPI1A_SPI1ACON.clearSMP; inline;
  38795. begin
  38796. pTDefRegMap(@Self)^.clr := $00000200;
  38797. end;
  38798. procedure TSPI1A_SPI1ACON.setSMP(thebits : TBits_1); inline;
  38799. begin
  38800. if thebits = 0 then
  38801. pTDefRegMap(@Self)^.clr := $00000200
  38802. else
  38803. pTDefRegMap(@Self)^.&set := $00000200;
  38804. end;
  38805. function TSPI1A_SPI1ACON.getSMP : TBits_1; inline;
  38806. begin
  38807. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  38808. end;
  38809. procedure TSPI1A_SPI1ACON.setMODE16; inline;
  38810. begin
  38811. pTDefRegMap(@Self)^.&set := $00000400;
  38812. end;
  38813. procedure TSPI1A_SPI1ACON.clearMODE16; inline;
  38814. begin
  38815. pTDefRegMap(@Self)^.clr := $00000400;
  38816. end;
  38817. procedure TSPI1A_SPI1ACON.setMODE16(thebits : TBits_1); inline;
  38818. begin
  38819. if thebits = 0 then
  38820. pTDefRegMap(@Self)^.clr := $00000400
  38821. else
  38822. pTDefRegMap(@Self)^.&set := $00000400;
  38823. end;
  38824. function TSPI1A_SPI1ACON.getMODE16 : TBits_1; inline;
  38825. begin
  38826. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  38827. end;
  38828. procedure TSPI1A_SPI1ACON.setMODE32; inline;
  38829. begin
  38830. pTDefRegMap(@Self)^.&set := $00000800;
  38831. end;
  38832. procedure TSPI1A_SPI1ACON.clearMODE32; inline;
  38833. begin
  38834. pTDefRegMap(@Self)^.clr := $00000800;
  38835. end;
  38836. procedure TSPI1A_SPI1ACON.setMODE32(thebits : TBits_1); inline;
  38837. begin
  38838. if thebits = 0 then
  38839. pTDefRegMap(@Self)^.clr := $00000800
  38840. else
  38841. pTDefRegMap(@Self)^.&set := $00000800;
  38842. end;
  38843. function TSPI1A_SPI1ACON.getMODE32 : TBits_1; inline;
  38844. begin
  38845. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  38846. end;
  38847. procedure TSPI1A_SPI1ACON.setDISSDO; inline;
  38848. begin
  38849. pTDefRegMap(@Self)^.&set := $00001000;
  38850. end;
  38851. procedure TSPI1A_SPI1ACON.clearDISSDO; inline;
  38852. begin
  38853. pTDefRegMap(@Self)^.clr := $00001000;
  38854. end;
  38855. procedure TSPI1A_SPI1ACON.setDISSDO(thebits : TBits_1); inline;
  38856. begin
  38857. if thebits = 0 then
  38858. pTDefRegMap(@Self)^.clr := $00001000
  38859. else
  38860. pTDefRegMap(@Self)^.&set := $00001000;
  38861. end;
  38862. function TSPI1A_SPI1ACON.getDISSDO : TBits_1; inline;
  38863. begin
  38864. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  38865. end;
  38866. procedure TSPI1A_SPI1ACON.setSIDL; inline;
  38867. begin
  38868. pTDefRegMap(@Self)^.&set := $00002000;
  38869. end;
  38870. procedure TSPI1A_SPI1ACON.clearSIDL; inline;
  38871. begin
  38872. pTDefRegMap(@Self)^.clr := $00002000;
  38873. end;
  38874. procedure TSPI1A_SPI1ACON.setSIDL(thebits : TBits_1); inline;
  38875. begin
  38876. if thebits = 0 then
  38877. pTDefRegMap(@Self)^.clr := $00002000
  38878. else
  38879. pTDefRegMap(@Self)^.&set := $00002000;
  38880. end;
  38881. function TSPI1A_SPI1ACON.getSIDL : TBits_1; inline;
  38882. begin
  38883. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  38884. end;
  38885. procedure TSPI1A_SPI1ACON.setON; inline;
  38886. begin
  38887. pTDefRegMap(@Self)^.&set := $00008000;
  38888. end;
  38889. procedure TSPI1A_SPI1ACON.clearON; inline;
  38890. begin
  38891. pTDefRegMap(@Self)^.clr := $00008000;
  38892. end;
  38893. procedure TSPI1A_SPI1ACON.setON(thebits : TBits_1); inline;
  38894. begin
  38895. if thebits = 0 then
  38896. pTDefRegMap(@Self)^.clr := $00008000
  38897. else
  38898. pTDefRegMap(@Self)^.&set := $00008000;
  38899. end;
  38900. function TSPI1A_SPI1ACON.getON : TBits_1; inline;
  38901. begin
  38902. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  38903. end;
  38904. procedure TSPI1A_SPI1ACON.setENHBUF; inline;
  38905. begin
  38906. pTDefRegMap(@Self)^.&set := $00010000;
  38907. end;
  38908. procedure TSPI1A_SPI1ACON.clearENHBUF; inline;
  38909. begin
  38910. pTDefRegMap(@Self)^.clr := $00010000;
  38911. end;
  38912. procedure TSPI1A_SPI1ACON.setENHBUF(thebits : TBits_1); inline;
  38913. begin
  38914. if thebits = 0 then
  38915. pTDefRegMap(@Self)^.clr := $00010000
  38916. else
  38917. pTDefRegMap(@Self)^.&set := $00010000;
  38918. end;
  38919. function TSPI1A_SPI1ACON.getENHBUF : TBits_1; inline;
  38920. begin
  38921. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  38922. end;
  38923. procedure TSPI1A_SPI1ACON.setSPIFE; inline;
  38924. begin
  38925. pTDefRegMap(@Self)^.&set := $00020000;
  38926. end;
  38927. procedure TSPI1A_SPI1ACON.clearSPIFE; inline;
  38928. begin
  38929. pTDefRegMap(@Self)^.clr := $00020000;
  38930. end;
  38931. procedure TSPI1A_SPI1ACON.setSPIFE(thebits : TBits_1); inline;
  38932. begin
  38933. if thebits = 0 then
  38934. pTDefRegMap(@Self)^.clr := $00020000
  38935. else
  38936. pTDefRegMap(@Self)^.&set := $00020000;
  38937. end;
  38938. function TSPI1A_SPI1ACON.getSPIFE : TBits_1; inline;
  38939. begin
  38940. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  38941. end;
  38942. procedure TSPI1A_SPI1ACON.setFRMCNT(thebits : TBits_3); inline;
  38943. begin
  38944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  38945. end;
  38946. function TSPI1A_SPI1ACON.getFRMCNT : TBits_3; inline;
  38947. begin
  38948. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  38949. end;
  38950. procedure TSPI1A_SPI1ACON.setFRMSYPW; inline;
  38951. begin
  38952. pTDefRegMap(@Self)^.&set := $08000000;
  38953. end;
  38954. procedure TSPI1A_SPI1ACON.clearFRMSYPW; inline;
  38955. begin
  38956. pTDefRegMap(@Self)^.clr := $08000000;
  38957. end;
  38958. procedure TSPI1A_SPI1ACON.setFRMSYPW(thebits : TBits_1); inline;
  38959. begin
  38960. if thebits = 0 then
  38961. pTDefRegMap(@Self)^.clr := $08000000
  38962. else
  38963. pTDefRegMap(@Self)^.&set := $08000000;
  38964. end;
  38965. function TSPI1A_SPI1ACON.getFRMSYPW : TBits_1; inline;
  38966. begin
  38967. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  38968. end;
  38969. procedure TSPI1A_SPI1ACON.setMSSEN; inline;
  38970. begin
  38971. pTDefRegMap(@Self)^.&set := $10000000;
  38972. end;
  38973. procedure TSPI1A_SPI1ACON.clearMSSEN; inline;
  38974. begin
  38975. pTDefRegMap(@Self)^.clr := $10000000;
  38976. end;
  38977. procedure TSPI1A_SPI1ACON.setMSSEN(thebits : TBits_1); inline;
  38978. begin
  38979. if thebits = 0 then
  38980. pTDefRegMap(@Self)^.clr := $10000000
  38981. else
  38982. pTDefRegMap(@Self)^.&set := $10000000;
  38983. end;
  38984. function TSPI1A_SPI1ACON.getMSSEN : TBits_1; inline;
  38985. begin
  38986. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  38987. end;
  38988. procedure TSPI1A_SPI1ACON.setFRMPOL; inline;
  38989. begin
  38990. pTDefRegMap(@Self)^.&set := $20000000;
  38991. end;
  38992. procedure TSPI1A_SPI1ACON.clearFRMPOL; inline;
  38993. begin
  38994. pTDefRegMap(@Self)^.clr := $20000000;
  38995. end;
  38996. procedure TSPI1A_SPI1ACON.setFRMPOL(thebits : TBits_1); inline;
  38997. begin
  38998. if thebits = 0 then
  38999. pTDefRegMap(@Self)^.clr := $20000000
  39000. else
  39001. pTDefRegMap(@Self)^.&set := $20000000;
  39002. end;
  39003. function TSPI1A_SPI1ACON.getFRMPOL : TBits_1; inline;
  39004. begin
  39005. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  39006. end;
  39007. procedure TSPI1A_SPI1ACON.setFRMSYNC; inline;
  39008. begin
  39009. pTDefRegMap(@Self)^.&set := $40000000;
  39010. end;
  39011. procedure TSPI1A_SPI1ACON.clearFRMSYNC; inline;
  39012. begin
  39013. pTDefRegMap(@Self)^.clr := $40000000;
  39014. end;
  39015. procedure TSPI1A_SPI1ACON.setFRMSYNC(thebits : TBits_1); inline;
  39016. begin
  39017. if thebits = 0 then
  39018. pTDefRegMap(@Self)^.clr := $40000000
  39019. else
  39020. pTDefRegMap(@Self)^.&set := $40000000;
  39021. end;
  39022. function TSPI1A_SPI1ACON.getFRMSYNC : TBits_1; inline;
  39023. begin
  39024. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  39025. end;
  39026. procedure TSPI1A_SPI1ACON.setFRMEN; inline;
  39027. begin
  39028. pTDefRegMap(@Self)^.&set := $80000000;
  39029. end;
  39030. procedure TSPI1A_SPI1ACON.clearFRMEN; inline;
  39031. begin
  39032. pTDefRegMap(@Self)^.clr := $80000000;
  39033. end;
  39034. procedure TSPI1A_SPI1ACON.setFRMEN(thebits : TBits_1); inline;
  39035. begin
  39036. if thebits = 0 then
  39037. pTDefRegMap(@Self)^.clr := $80000000
  39038. else
  39039. pTDefRegMap(@Self)^.&set := $80000000;
  39040. end;
  39041. function TSPI1A_SPI1ACON.getFRMEN : TBits_1; inline;
  39042. begin
  39043. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  39044. end;
  39045. procedure TSPI1A_SPI1ACON.setw(thebits : TBits_32); inline;
  39046. begin
  39047. pTDefRegMap(@Self)^.val := thebits;
  39048. end;
  39049. function TSPI1A_SPI1ACON.getw : TBits_32; inline;
  39050. begin
  39051. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39052. end;
  39053. procedure TSPI1A_SPI3CON.setSRXISEL(thebits : TBits_2); inline;
  39054. begin
  39055. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  39056. end;
  39057. function TSPI1A_SPI3CON.getSRXISEL : TBits_2; inline;
  39058. begin
  39059. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  39060. end;
  39061. procedure TSPI1A_SPI3CON.setSTXISEL(thebits : TBits_2); inline;
  39062. begin
  39063. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  39064. end;
  39065. function TSPI1A_SPI3CON.getSTXISEL : TBits_2; inline;
  39066. begin
  39067. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  39068. end;
  39069. procedure TSPI1A_SPI3CON.setMSTEN; inline;
  39070. begin
  39071. pTDefRegMap(@Self)^.&set := $00000020;
  39072. end;
  39073. procedure TSPI1A_SPI3CON.clearMSTEN; inline;
  39074. begin
  39075. pTDefRegMap(@Self)^.clr := $00000020;
  39076. end;
  39077. procedure TSPI1A_SPI3CON.setMSTEN(thebits : TBits_1); inline;
  39078. begin
  39079. if thebits = 0 then
  39080. pTDefRegMap(@Self)^.clr := $00000020
  39081. else
  39082. pTDefRegMap(@Self)^.&set := $00000020;
  39083. end;
  39084. function TSPI1A_SPI3CON.getMSTEN : TBits_1; inline;
  39085. begin
  39086. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39087. end;
  39088. procedure TSPI1A_SPI3CON.setCKP; inline;
  39089. begin
  39090. pTDefRegMap(@Self)^.&set := $00000040;
  39091. end;
  39092. procedure TSPI1A_SPI3CON.clearCKP; inline;
  39093. begin
  39094. pTDefRegMap(@Self)^.clr := $00000040;
  39095. end;
  39096. procedure TSPI1A_SPI3CON.setCKP(thebits : TBits_1); inline;
  39097. begin
  39098. if thebits = 0 then
  39099. pTDefRegMap(@Self)^.clr := $00000040
  39100. else
  39101. pTDefRegMap(@Self)^.&set := $00000040;
  39102. end;
  39103. function TSPI1A_SPI3CON.getCKP : TBits_1; inline;
  39104. begin
  39105. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39106. end;
  39107. procedure TSPI1A_SPI3CON.setSSEN; inline;
  39108. begin
  39109. pTDefRegMap(@Self)^.&set := $00000080;
  39110. end;
  39111. procedure TSPI1A_SPI3CON.clearSSEN; inline;
  39112. begin
  39113. pTDefRegMap(@Self)^.clr := $00000080;
  39114. end;
  39115. procedure TSPI1A_SPI3CON.setSSEN(thebits : TBits_1); inline;
  39116. begin
  39117. if thebits = 0 then
  39118. pTDefRegMap(@Self)^.clr := $00000080
  39119. else
  39120. pTDefRegMap(@Self)^.&set := $00000080;
  39121. end;
  39122. function TSPI1A_SPI3CON.getSSEN : TBits_1; inline;
  39123. begin
  39124. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39125. end;
  39126. procedure TSPI1A_SPI3CON.setCKE; inline;
  39127. begin
  39128. pTDefRegMap(@Self)^.&set := $00000100;
  39129. end;
  39130. procedure TSPI1A_SPI3CON.clearCKE; inline;
  39131. begin
  39132. pTDefRegMap(@Self)^.clr := $00000100;
  39133. end;
  39134. procedure TSPI1A_SPI3CON.setCKE(thebits : TBits_1); inline;
  39135. begin
  39136. if thebits = 0 then
  39137. pTDefRegMap(@Self)^.clr := $00000100
  39138. else
  39139. pTDefRegMap(@Self)^.&set := $00000100;
  39140. end;
  39141. function TSPI1A_SPI3CON.getCKE : TBits_1; inline;
  39142. begin
  39143. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39144. end;
  39145. procedure TSPI1A_SPI3CON.setSMP; inline;
  39146. begin
  39147. pTDefRegMap(@Self)^.&set := $00000200;
  39148. end;
  39149. procedure TSPI1A_SPI3CON.clearSMP; inline;
  39150. begin
  39151. pTDefRegMap(@Self)^.clr := $00000200;
  39152. end;
  39153. procedure TSPI1A_SPI3CON.setSMP(thebits : TBits_1); inline;
  39154. begin
  39155. if thebits = 0 then
  39156. pTDefRegMap(@Self)^.clr := $00000200
  39157. else
  39158. pTDefRegMap(@Self)^.&set := $00000200;
  39159. end;
  39160. function TSPI1A_SPI3CON.getSMP : TBits_1; inline;
  39161. begin
  39162. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39163. end;
  39164. procedure TSPI1A_SPI3CON.setMODE16; inline;
  39165. begin
  39166. pTDefRegMap(@Self)^.&set := $00000400;
  39167. end;
  39168. procedure TSPI1A_SPI3CON.clearMODE16; inline;
  39169. begin
  39170. pTDefRegMap(@Self)^.clr := $00000400;
  39171. end;
  39172. procedure TSPI1A_SPI3CON.setMODE16(thebits : TBits_1); inline;
  39173. begin
  39174. if thebits = 0 then
  39175. pTDefRegMap(@Self)^.clr := $00000400
  39176. else
  39177. pTDefRegMap(@Self)^.&set := $00000400;
  39178. end;
  39179. function TSPI1A_SPI3CON.getMODE16 : TBits_1; inline;
  39180. begin
  39181. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39182. end;
  39183. procedure TSPI1A_SPI3CON.setMODE32; inline;
  39184. begin
  39185. pTDefRegMap(@Self)^.&set := $00000800;
  39186. end;
  39187. procedure TSPI1A_SPI3CON.clearMODE32; inline;
  39188. begin
  39189. pTDefRegMap(@Self)^.clr := $00000800;
  39190. end;
  39191. procedure TSPI1A_SPI3CON.setMODE32(thebits : TBits_1); inline;
  39192. begin
  39193. if thebits = 0 then
  39194. pTDefRegMap(@Self)^.clr := $00000800
  39195. else
  39196. pTDefRegMap(@Self)^.&set := $00000800;
  39197. end;
  39198. function TSPI1A_SPI3CON.getMODE32 : TBits_1; inline;
  39199. begin
  39200. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39201. end;
  39202. procedure TSPI1A_SPI3CON.setDISSDO; inline;
  39203. begin
  39204. pTDefRegMap(@Self)^.&set := $00001000;
  39205. end;
  39206. procedure TSPI1A_SPI3CON.clearDISSDO; inline;
  39207. begin
  39208. pTDefRegMap(@Self)^.clr := $00001000;
  39209. end;
  39210. procedure TSPI1A_SPI3CON.setDISSDO(thebits : TBits_1); inline;
  39211. begin
  39212. if thebits = 0 then
  39213. pTDefRegMap(@Self)^.clr := $00001000
  39214. else
  39215. pTDefRegMap(@Self)^.&set := $00001000;
  39216. end;
  39217. function TSPI1A_SPI3CON.getDISSDO : TBits_1; inline;
  39218. begin
  39219. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39220. end;
  39221. procedure TSPI1A_SPI3CON.setSIDL; inline;
  39222. begin
  39223. pTDefRegMap(@Self)^.&set := $00002000;
  39224. end;
  39225. procedure TSPI1A_SPI3CON.clearSIDL; inline;
  39226. begin
  39227. pTDefRegMap(@Self)^.clr := $00002000;
  39228. end;
  39229. procedure TSPI1A_SPI3CON.setSIDL(thebits : TBits_1); inline;
  39230. begin
  39231. if thebits = 0 then
  39232. pTDefRegMap(@Self)^.clr := $00002000
  39233. else
  39234. pTDefRegMap(@Self)^.&set := $00002000;
  39235. end;
  39236. function TSPI1A_SPI3CON.getSIDL : TBits_1; inline;
  39237. begin
  39238. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39239. end;
  39240. procedure TSPI1A_SPI3CON.setON; inline;
  39241. begin
  39242. pTDefRegMap(@Self)^.&set := $00008000;
  39243. end;
  39244. procedure TSPI1A_SPI3CON.clearON; inline;
  39245. begin
  39246. pTDefRegMap(@Self)^.clr := $00008000;
  39247. end;
  39248. procedure TSPI1A_SPI3CON.setON(thebits : TBits_1); inline;
  39249. begin
  39250. if thebits = 0 then
  39251. pTDefRegMap(@Self)^.clr := $00008000
  39252. else
  39253. pTDefRegMap(@Self)^.&set := $00008000;
  39254. end;
  39255. function TSPI1A_SPI3CON.getON : TBits_1; inline;
  39256. begin
  39257. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39258. end;
  39259. procedure TSPI1A_SPI3CON.setENHBUF; inline;
  39260. begin
  39261. pTDefRegMap(@Self)^.&set := $00010000;
  39262. end;
  39263. procedure TSPI1A_SPI3CON.clearENHBUF; inline;
  39264. begin
  39265. pTDefRegMap(@Self)^.clr := $00010000;
  39266. end;
  39267. procedure TSPI1A_SPI3CON.setENHBUF(thebits : TBits_1); inline;
  39268. begin
  39269. if thebits = 0 then
  39270. pTDefRegMap(@Self)^.clr := $00010000
  39271. else
  39272. pTDefRegMap(@Self)^.&set := $00010000;
  39273. end;
  39274. function TSPI1A_SPI3CON.getENHBUF : TBits_1; inline;
  39275. begin
  39276. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  39277. end;
  39278. procedure TSPI1A_SPI3CON.setSPIFE; inline;
  39279. begin
  39280. pTDefRegMap(@Self)^.&set := $00020000;
  39281. end;
  39282. procedure TSPI1A_SPI3CON.clearSPIFE; inline;
  39283. begin
  39284. pTDefRegMap(@Self)^.clr := $00020000;
  39285. end;
  39286. procedure TSPI1A_SPI3CON.setSPIFE(thebits : TBits_1); inline;
  39287. begin
  39288. if thebits = 0 then
  39289. pTDefRegMap(@Self)^.clr := $00020000
  39290. else
  39291. pTDefRegMap(@Self)^.&set := $00020000;
  39292. end;
  39293. function TSPI1A_SPI3CON.getSPIFE : TBits_1; inline;
  39294. begin
  39295. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  39296. end;
  39297. procedure TSPI1A_SPI3CON.setFRMCNT(thebits : TBits_3); inline;
  39298. begin
  39299. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  39300. end;
  39301. function TSPI1A_SPI3CON.getFRMCNT : TBits_3; inline;
  39302. begin
  39303. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  39304. end;
  39305. procedure TSPI1A_SPI3CON.setFRMSYPW; inline;
  39306. begin
  39307. pTDefRegMap(@Self)^.&set := $08000000;
  39308. end;
  39309. procedure TSPI1A_SPI3CON.clearFRMSYPW; inline;
  39310. begin
  39311. pTDefRegMap(@Self)^.clr := $08000000;
  39312. end;
  39313. procedure TSPI1A_SPI3CON.setFRMSYPW(thebits : TBits_1); inline;
  39314. begin
  39315. if thebits = 0 then
  39316. pTDefRegMap(@Self)^.clr := $08000000
  39317. else
  39318. pTDefRegMap(@Self)^.&set := $08000000;
  39319. end;
  39320. function TSPI1A_SPI3CON.getFRMSYPW : TBits_1; inline;
  39321. begin
  39322. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  39323. end;
  39324. procedure TSPI1A_SPI3CON.setMSSEN; inline;
  39325. begin
  39326. pTDefRegMap(@Self)^.&set := $10000000;
  39327. end;
  39328. procedure TSPI1A_SPI3CON.clearMSSEN; inline;
  39329. begin
  39330. pTDefRegMap(@Self)^.clr := $10000000;
  39331. end;
  39332. procedure TSPI1A_SPI3CON.setMSSEN(thebits : TBits_1); inline;
  39333. begin
  39334. if thebits = 0 then
  39335. pTDefRegMap(@Self)^.clr := $10000000
  39336. else
  39337. pTDefRegMap(@Self)^.&set := $10000000;
  39338. end;
  39339. function TSPI1A_SPI3CON.getMSSEN : TBits_1; inline;
  39340. begin
  39341. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  39342. end;
  39343. procedure TSPI1A_SPI3CON.setFRMPOL; inline;
  39344. begin
  39345. pTDefRegMap(@Self)^.&set := $20000000;
  39346. end;
  39347. procedure TSPI1A_SPI3CON.clearFRMPOL; inline;
  39348. begin
  39349. pTDefRegMap(@Self)^.clr := $20000000;
  39350. end;
  39351. procedure TSPI1A_SPI3CON.setFRMPOL(thebits : TBits_1); inline;
  39352. begin
  39353. if thebits = 0 then
  39354. pTDefRegMap(@Self)^.clr := $20000000
  39355. else
  39356. pTDefRegMap(@Self)^.&set := $20000000;
  39357. end;
  39358. function TSPI1A_SPI3CON.getFRMPOL : TBits_1; inline;
  39359. begin
  39360. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  39361. end;
  39362. procedure TSPI1A_SPI3CON.setFRMSYNC; inline;
  39363. begin
  39364. pTDefRegMap(@Self)^.&set := $40000000;
  39365. end;
  39366. procedure TSPI1A_SPI3CON.clearFRMSYNC; inline;
  39367. begin
  39368. pTDefRegMap(@Self)^.clr := $40000000;
  39369. end;
  39370. procedure TSPI1A_SPI3CON.setFRMSYNC(thebits : TBits_1); inline;
  39371. begin
  39372. if thebits = 0 then
  39373. pTDefRegMap(@Self)^.clr := $40000000
  39374. else
  39375. pTDefRegMap(@Self)^.&set := $40000000;
  39376. end;
  39377. function TSPI1A_SPI3CON.getFRMSYNC : TBits_1; inline;
  39378. begin
  39379. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  39380. end;
  39381. procedure TSPI1A_SPI3CON.setFRMEN; inline;
  39382. begin
  39383. pTDefRegMap(@Self)^.&set := $80000000;
  39384. end;
  39385. procedure TSPI1A_SPI3CON.clearFRMEN; inline;
  39386. begin
  39387. pTDefRegMap(@Self)^.clr := $80000000;
  39388. end;
  39389. procedure TSPI1A_SPI3CON.setFRMEN(thebits : TBits_1); inline;
  39390. begin
  39391. if thebits = 0 then
  39392. pTDefRegMap(@Self)^.clr := $80000000
  39393. else
  39394. pTDefRegMap(@Self)^.&set := $80000000;
  39395. end;
  39396. function TSPI1A_SPI3CON.getFRMEN : TBits_1; inline;
  39397. begin
  39398. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  39399. end;
  39400. procedure TSPI1A_SPI3CON.setw(thebits : TBits_32); inline;
  39401. begin
  39402. pTDefRegMap(@Self)^.val := thebits;
  39403. end;
  39404. function TSPI1A_SPI3CON.getw : TBits_32; inline;
  39405. begin
  39406. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39407. end;
  39408. procedure TSPI1A_SPI1ASTAT.setSPIRBF; inline;
  39409. begin
  39410. pTDefRegMap(@Self)^.&set := $00000001;
  39411. end;
  39412. procedure TSPI1A_SPI1ASTAT.clearSPIRBF; inline;
  39413. begin
  39414. pTDefRegMap(@Self)^.clr := $00000001;
  39415. end;
  39416. procedure TSPI1A_SPI1ASTAT.setSPIRBF(thebits : TBits_1); inline;
  39417. begin
  39418. if thebits = 0 then
  39419. pTDefRegMap(@Self)^.clr := $00000001
  39420. else
  39421. pTDefRegMap(@Self)^.&set := $00000001;
  39422. end;
  39423. function TSPI1A_SPI1ASTAT.getSPIRBF : TBits_1; inline;
  39424. begin
  39425. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39426. end;
  39427. procedure TSPI1A_SPI1ASTAT.setSPITBF; inline;
  39428. begin
  39429. pTDefRegMap(@Self)^.&set := $00000002;
  39430. end;
  39431. procedure TSPI1A_SPI1ASTAT.clearSPITBF; inline;
  39432. begin
  39433. pTDefRegMap(@Self)^.clr := $00000002;
  39434. end;
  39435. procedure TSPI1A_SPI1ASTAT.setSPITBF(thebits : TBits_1); inline;
  39436. begin
  39437. if thebits = 0 then
  39438. pTDefRegMap(@Self)^.clr := $00000002
  39439. else
  39440. pTDefRegMap(@Self)^.&set := $00000002;
  39441. end;
  39442. function TSPI1A_SPI1ASTAT.getSPITBF : TBits_1; inline;
  39443. begin
  39444. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39445. end;
  39446. procedure TSPI1A_SPI1ASTAT.setSPITBE; inline;
  39447. begin
  39448. pTDefRegMap(@Self)^.&set := $00000008;
  39449. end;
  39450. procedure TSPI1A_SPI1ASTAT.clearSPITBE; inline;
  39451. begin
  39452. pTDefRegMap(@Self)^.clr := $00000008;
  39453. end;
  39454. procedure TSPI1A_SPI1ASTAT.setSPITBE(thebits : TBits_1); inline;
  39455. begin
  39456. if thebits = 0 then
  39457. pTDefRegMap(@Self)^.clr := $00000008
  39458. else
  39459. pTDefRegMap(@Self)^.&set := $00000008;
  39460. end;
  39461. function TSPI1A_SPI1ASTAT.getSPITBE : TBits_1; inline;
  39462. begin
  39463. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39464. end;
  39465. procedure TSPI1A_SPI1ASTAT.setSPIRBE; inline;
  39466. begin
  39467. pTDefRegMap(@Self)^.&set := $00000020;
  39468. end;
  39469. procedure TSPI1A_SPI1ASTAT.clearSPIRBE; inline;
  39470. begin
  39471. pTDefRegMap(@Self)^.clr := $00000020;
  39472. end;
  39473. procedure TSPI1A_SPI1ASTAT.setSPIRBE(thebits : TBits_1); inline;
  39474. begin
  39475. if thebits = 0 then
  39476. pTDefRegMap(@Self)^.clr := $00000020
  39477. else
  39478. pTDefRegMap(@Self)^.&set := $00000020;
  39479. end;
  39480. function TSPI1A_SPI1ASTAT.getSPIRBE : TBits_1; inline;
  39481. begin
  39482. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39483. end;
  39484. procedure TSPI1A_SPI1ASTAT.setSPIROV; inline;
  39485. begin
  39486. pTDefRegMap(@Self)^.&set := $00000040;
  39487. end;
  39488. procedure TSPI1A_SPI1ASTAT.clearSPIROV; inline;
  39489. begin
  39490. pTDefRegMap(@Self)^.clr := $00000040;
  39491. end;
  39492. procedure TSPI1A_SPI1ASTAT.setSPIROV(thebits : TBits_1); inline;
  39493. begin
  39494. if thebits = 0 then
  39495. pTDefRegMap(@Self)^.clr := $00000040
  39496. else
  39497. pTDefRegMap(@Self)^.&set := $00000040;
  39498. end;
  39499. function TSPI1A_SPI1ASTAT.getSPIROV : TBits_1; inline;
  39500. begin
  39501. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39502. end;
  39503. procedure TSPI1A_SPI1ASTAT.setSRMT; inline;
  39504. begin
  39505. pTDefRegMap(@Self)^.&set := $00000080;
  39506. end;
  39507. procedure TSPI1A_SPI1ASTAT.clearSRMT; inline;
  39508. begin
  39509. pTDefRegMap(@Self)^.clr := $00000080;
  39510. end;
  39511. procedure TSPI1A_SPI1ASTAT.setSRMT(thebits : TBits_1); inline;
  39512. begin
  39513. if thebits = 0 then
  39514. pTDefRegMap(@Self)^.clr := $00000080
  39515. else
  39516. pTDefRegMap(@Self)^.&set := $00000080;
  39517. end;
  39518. function TSPI1A_SPI1ASTAT.getSRMT : TBits_1; inline;
  39519. begin
  39520. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39521. end;
  39522. procedure TSPI1A_SPI1ASTAT.setSPITUR; inline;
  39523. begin
  39524. pTDefRegMap(@Self)^.&set := $00000100;
  39525. end;
  39526. procedure TSPI1A_SPI1ASTAT.clearSPITUR; inline;
  39527. begin
  39528. pTDefRegMap(@Self)^.clr := $00000100;
  39529. end;
  39530. procedure TSPI1A_SPI1ASTAT.setSPITUR(thebits : TBits_1); inline;
  39531. begin
  39532. if thebits = 0 then
  39533. pTDefRegMap(@Self)^.clr := $00000100
  39534. else
  39535. pTDefRegMap(@Self)^.&set := $00000100;
  39536. end;
  39537. function TSPI1A_SPI1ASTAT.getSPITUR : TBits_1; inline;
  39538. begin
  39539. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39540. end;
  39541. procedure TSPI1A_SPI1ASTAT.setSPIBUSY; inline;
  39542. begin
  39543. pTDefRegMap(@Self)^.&set := $00000800;
  39544. end;
  39545. procedure TSPI1A_SPI1ASTAT.clearSPIBUSY; inline;
  39546. begin
  39547. pTDefRegMap(@Self)^.clr := $00000800;
  39548. end;
  39549. procedure TSPI1A_SPI1ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  39550. begin
  39551. if thebits = 0 then
  39552. pTDefRegMap(@Self)^.clr := $00000800
  39553. else
  39554. pTDefRegMap(@Self)^.&set := $00000800;
  39555. end;
  39556. function TSPI1A_SPI1ASTAT.getSPIBUSY : TBits_1; inline;
  39557. begin
  39558. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39559. end;
  39560. procedure TSPI1A_SPI1ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  39561. begin
  39562. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  39563. end;
  39564. function TSPI1A_SPI1ASTAT.getTXBUFELM : TBits_5; inline;
  39565. begin
  39566. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  39567. end;
  39568. procedure TSPI1A_SPI1ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  39569. begin
  39570. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  39571. end;
  39572. function TSPI1A_SPI1ASTAT.getRXBUFELM : TBits_5; inline;
  39573. begin
  39574. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  39575. end;
  39576. procedure TSPI1A_SPI1ASTAT.setw(thebits : TBits_32); inline;
  39577. begin
  39578. pTDefRegMap(@Self)^.val := thebits;
  39579. end;
  39580. function TSPI1A_SPI1ASTAT.getw : TBits_32; inline;
  39581. begin
  39582. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39583. end;
  39584. procedure TSPI1A_SPI3STAT.setSPIRBF; inline;
  39585. begin
  39586. pTDefRegMap(@Self)^.&set := $00000001;
  39587. end;
  39588. procedure TSPI1A_SPI3STAT.clearSPIRBF; inline;
  39589. begin
  39590. pTDefRegMap(@Self)^.clr := $00000001;
  39591. end;
  39592. procedure TSPI1A_SPI3STAT.setSPIRBF(thebits : TBits_1); inline;
  39593. begin
  39594. if thebits = 0 then
  39595. pTDefRegMap(@Self)^.clr := $00000001
  39596. else
  39597. pTDefRegMap(@Self)^.&set := $00000001;
  39598. end;
  39599. function TSPI1A_SPI3STAT.getSPIRBF : TBits_1; inline;
  39600. begin
  39601. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  39602. end;
  39603. procedure TSPI1A_SPI3STAT.setSPITBF; inline;
  39604. begin
  39605. pTDefRegMap(@Self)^.&set := $00000002;
  39606. end;
  39607. procedure TSPI1A_SPI3STAT.clearSPITBF; inline;
  39608. begin
  39609. pTDefRegMap(@Self)^.clr := $00000002;
  39610. end;
  39611. procedure TSPI1A_SPI3STAT.setSPITBF(thebits : TBits_1); inline;
  39612. begin
  39613. if thebits = 0 then
  39614. pTDefRegMap(@Self)^.clr := $00000002
  39615. else
  39616. pTDefRegMap(@Self)^.&set := $00000002;
  39617. end;
  39618. function TSPI1A_SPI3STAT.getSPITBF : TBits_1; inline;
  39619. begin
  39620. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  39621. end;
  39622. procedure TSPI1A_SPI3STAT.setSPITBE; inline;
  39623. begin
  39624. pTDefRegMap(@Self)^.&set := $00000008;
  39625. end;
  39626. procedure TSPI1A_SPI3STAT.clearSPITBE; inline;
  39627. begin
  39628. pTDefRegMap(@Self)^.clr := $00000008;
  39629. end;
  39630. procedure TSPI1A_SPI3STAT.setSPITBE(thebits : TBits_1); inline;
  39631. begin
  39632. if thebits = 0 then
  39633. pTDefRegMap(@Self)^.clr := $00000008
  39634. else
  39635. pTDefRegMap(@Self)^.&set := $00000008;
  39636. end;
  39637. function TSPI1A_SPI3STAT.getSPITBE : TBits_1; inline;
  39638. begin
  39639. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  39640. end;
  39641. procedure TSPI1A_SPI3STAT.setSPIRBE; inline;
  39642. begin
  39643. pTDefRegMap(@Self)^.&set := $00000020;
  39644. end;
  39645. procedure TSPI1A_SPI3STAT.clearSPIRBE; inline;
  39646. begin
  39647. pTDefRegMap(@Self)^.clr := $00000020;
  39648. end;
  39649. procedure TSPI1A_SPI3STAT.setSPIRBE(thebits : TBits_1); inline;
  39650. begin
  39651. if thebits = 0 then
  39652. pTDefRegMap(@Self)^.clr := $00000020
  39653. else
  39654. pTDefRegMap(@Self)^.&set := $00000020;
  39655. end;
  39656. function TSPI1A_SPI3STAT.getSPIRBE : TBits_1; inline;
  39657. begin
  39658. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39659. end;
  39660. procedure TSPI1A_SPI3STAT.setSPIROV; inline;
  39661. begin
  39662. pTDefRegMap(@Self)^.&set := $00000040;
  39663. end;
  39664. procedure TSPI1A_SPI3STAT.clearSPIROV; inline;
  39665. begin
  39666. pTDefRegMap(@Self)^.clr := $00000040;
  39667. end;
  39668. procedure TSPI1A_SPI3STAT.setSPIROV(thebits : TBits_1); inline;
  39669. begin
  39670. if thebits = 0 then
  39671. pTDefRegMap(@Self)^.clr := $00000040
  39672. else
  39673. pTDefRegMap(@Self)^.&set := $00000040;
  39674. end;
  39675. function TSPI1A_SPI3STAT.getSPIROV : TBits_1; inline;
  39676. begin
  39677. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39678. end;
  39679. procedure TSPI1A_SPI3STAT.setSRMT; inline;
  39680. begin
  39681. pTDefRegMap(@Self)^.&set := $00000080;
  39682. end;
  39683. procedure TSPI1A_SPI3STAT.clearSRMT; inline;
  39684. begin
  39685. pTDefRegMap(@Self)^.clr := $00000080;
  39686. end;
  39687. procedure TSPI1A_SPI3STAT.setSRMT(thebits : TBits_1); inline;
  39688. begin
  39689. if thebits = 0 then
  39690. pTDefRegMap(@Self)^.clr := $00000080
  39691. else
  39692. pTDefRegMap(@Self)^.&set := $00000080;
  39693. end;
  39694. function TSPI1A_SPI3STAT.getSRMT : TBits_1; inline;
  39695. begin
  39696. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39697. end;
  39698. procedure TSPI1A_SPI3STAT.setSPITUR; inline;
  39699. begin
  39700. pTDefRegMap(@Self)^.&set := $00000100;
  39701. end;
  39702. procedure TSPI1A_SPI3STAT.clearSPITUR; inline;
  39703. begin
  39704. pTDefRegMap(@Self)^.clr := $00000100;
  39705. end;
  39706. procedure TSPI1A_SPI3STAT.setSPITUR(thebits : TBits_1); inline;
  39707. begin
  39708. if thebits = 0 then
  39709. pTDefRegMap(@Self)^.clr := $00000100
  39710. else
  39711. pTDefRegMap(@Self)^.&set := $00000100;
  39712. end;
  39713. function TSPI1A_SPI3STAT.getSPITUR : TBits_1; inline;
  39714. begin
  39715. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39716. end;
  39717. procedure TSPI1A_SPI3STAT.setSPIBUSY; inline;
  39718. begin
  39719. pTDefRegMap(@Self)^.&set := $00000800;
  39720. end;
  39721. procedure TSPI1A_SPI3STAT.clearSPIBUSY; inline;
  39722. begin
  39723. pTDefRegMap(@Self)^.clr := $00000800;
  39724. end;
  39725. procedure TSPI1A_SPI3STAT.setSPIBUSY(thebits : TBits_1); inline;
  39726. begin
  39727. if thebits = 0 then
  39728. pTDefRegMap(@Self)^.clr := $00000800
  39729. else
  39730. pTDefRegMap(@Self)^.&set := $00000800;
  39731. end;
  39732. function TSPI1A_SPI3STAT.getSPIBUSY : TBits_1; inline;
  39733. begin
  39734. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39735. end;
  39736. procedure TSPI1A_SPI3STAT.setTXBUFELM(thebits : TBits_5); inline;
  39737. begin
  39738. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  39739. end;
  39740. function TSPI1A_SPI3STAT.getTXBUFELM : TBits_5; inline;
  39741. begin
  39742. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  39743. end;
  39744. procedure TSPI1A_SPI3STAT.setRXBUFELM(thebits : TBits_5); inline;
  39745. begin
  39746. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  39747. end;
  39748. function TSPI1A_SPI3STAT.getRXBUFELM : TBits_5; inline;
  39749. begin
  39750. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  39751. end;
  39752. procedure TSPI1A_SPI3STAT.setw(thebits : TBits_32); inline;
  39753. begin
  39754. pTDefRegMap(@Self)^.val := thebits;
  39755. end;
  39756. function TSPI1A_SPI3STAT.getw : TBits_32; inline;
  39757. begin
  39758. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  39759. end;
  39760. procedure TSPI2_SPI2ACON.setSRXISEL(thebits : TBits_2); inline;
  39761. begin
  39762. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  39763. end;
  39764. function TSPI2_SPI2ACON.getSRXISEL : TBits_2; inline;
  39765. begin
  39766. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  39767. end;
  39768. procedure TSPI2_SPI2ACON.setSTXISEL(thebits : TBits_2); inline;
  39769. begin
  39770. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  39771. end;
  39772. function TSPI2_SPI2ACON.getSTXISEL : TBits_2; inline;
  39773. begin
  39774. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  39775. end;
  39776. procedure TSPI2_SPI2ACON.setMSTEN; inline;
  39777. begin
  39778. pTDefRegMap(@Self)^.&set := $00000020;
  39779. end;
  39780. procedure TSPI2_SPI2ACON.clearMSTEN; inline;
  39781. begin
  39782. pTDefRegMap(@Self)^.clr := $00000020;
  39783. end;
  39784. procedure TSPI2_SPI2ACON.setMSTEN(thebits : TBits_1); inline;
  39785. begin
  39786. if thebits = 0 then
  39787. pTDefRegMap(@Self)^.clr := $00000020
  39788. else
  39789. pTDefRegMap(@Self)^.&set := $00000020;
  39790. end;
  39791. function TSPI2_SPI2ACON.getMSTEN : TBits_1; inline;
  39792. begin
  39793. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  39794. end;
  39795. procedure TSPI2_SPI2ACON.setCKP; inline;
  39796. begin
  39797. pTDefRegMap(@Self)^.&set := $00000040;
  39798. end;
  39799. procedure TSPI2_SPI2ACON.clearCKP; inline;
  39800. begin
  39801. pTDefRegMap(@Self)^.clr := $00000040;
  39802. end;
  39803. procedure TSPI2_SPI2ACON.setCKP(thebits : TBits_1); inline;
  39804. begin
  39805. if thebits = 0 then
  39806. pTDefRegMap(@Self)^.clr := $00000040
  39807. else
  39808. pTDefRegMap(@Self)^.&set := $00000040;
  39809. end;
  39810. function TSPI2_SPI2ACON.getCKP : TBits_1; inline;
  39811. begin
  39812. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  39813. end;
  39814. procedure TSPI2_SPI2ACON.setSSEN; inline;
  39815. begin
  39816. pTDefRegMap(@Self)^.&set := $00000080;
  39817. end;
  39818. procedure TSPI2_SPI2ACON.clearSSEN; inline;
  39819. begin
  39820. pTDefRegMap(@Self)^.clr := $00000080;
  39821. end;
  39822. procedure TSPI2_SPI2ACON.setSSEN(thebits : TBits_1); inline;
  39823. begin
  39824. if thebits = 0 then
  39825. pTDefRegMap(@Self)^.clr := $00000080
  39826. else
  39827. pTDefRegMap(@Self)^.&set := $00000080;
  39828. end;
  39829. function TSPI2_SPI2ACON.getSSEN : TBits_1; inline;
  39830. begin
  39831. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  39832. end;
  39833. procedure TSPI2_SPI2ACON.setCKE; inline;
  39834. begin
  39835. pTDefRegMap(@Self)^.&set := $00000100;
  39836. end;
  39837. procedure TSPI2_SPI2ACON.clearCKE; inline;
  39838. begin
  39839. pTDefRegMap(@Self)^.clr := $00000100;
  39840. end;
  39841. procedure TSPI2_SPI2ACON.setCKE(thebits : TBits_1); inline;
  39842. begin
  39843. if thebits = 0 then
  39844. pTDefRegMap(@Self)^.clr := $00000100
  39845. else
  39846. pTDefRegMap(@Self)^.&set := $00000100;
  39847. end;
  39848. function TSPI2_SPI2ACON.getCKE : TBits_1; inline;
  39849. begin
  39850. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  39851. end;
  39852. procedure TSPI2_SPI2ACON.setSMP; inline;
  39853. begin
  39854. pTDefRegMap(@Self)^.&set := $00000200;
  39855. end;
  39856. procedure TSPI2_SPI2ACON.clearSMP; inline;
  39857. begin
  39858. pTDefRegMap(@Self)^.clr := $00000200;
  39859. end;
  39860. procedure TSPI2_SPI2ACON.setSMP(thebits : TBits_1); inline;
  39861. begin
  39862. if thebits = 0 then
  39863. pTDefRegMap(@Self)^.clr := $00000200
  39864. else
  39865. pTDefRegMap(@Self)^.&set := $00000200;
  39866. end;
  39867. function TSPI2_SPI2ACON.getSMP : TBits_1; inline;
  39868. begin
  39869. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  39870. end;
  39871. procedure TSPI2_SPI2ACON.setMODE16; inline;
  39872. begin
  39873. pTDefRegMap(@Self)^.&set := $00000400;
  39874. end;
  39875. procedure TSPI2_SPI2ACON.clearMODE16; inline;
  39876. begin
  39877. pTDefRegMap(@Self)^.clr := $00000400;
  39878. end;
  39879. procedure TSPI2_SPI2ACON.setMODE16(thebits : TBits_1); inline;
  39880. begin
  39881. if thebits = 0 then
  39882. pTDefRegMap(@Self)^.clr := $00000400
  39883. else
  39884. pTDefRegMap(@Self)^.&set := $00000400;
  39885. end;
  39886. function TSPI2_SPI2ACON.getMODE16 : TBits_1; inline;
  39887. begin
  39888. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  39889. end;
  39890. procedure TSPI2_SPI2ACON.setMODE32; inline;
  39891. begin
  39892. pTDefRegMap(@Self)^.&set := $00000800;
  39893. end;
  39894. procedure TSPI2_SPI2ACON.clearMODE32; inline;
  39895. begin
  39896. pTDefRegMap(@Self)^.clr := $00000800;
  39897. end;
  39898. procedure TSPI2_SPI2ACON.setMODE32(thebits : TBits_1); inline;
  39899. begin
  39900. if thebits = 0 then
  39901. pTDefRegMap(@Self)^.clr := $00000800
  39902. else
  39903. pTDefRegMap(@Self)^.&set := $00000800;
  39904. end;
  39905. function TSPI2_SPI2ACON.getMODE32 : TBits_1; inline;
  39906. begin
  39907. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  39908. end;
  39909. procedure TSPI2_SPI2ACON.setDISSDO; inline;
  39910. begin
  39911. pTDefRegMap(@Self)^.&set := $00001000;
  39912. end;
  39913. procedure TSPI2_SPI2ACON.clearDISSDO; inline;
  39914. begin
  39915. pTDefRegMap(@Self)^.clr := $00001000;
  39916. end;
  39917. procedure TSPI2_SPI2ACON.setDISSDO(thebits : TBits_1); inline;
  39918. begin
  39919. if thebits = 0 then
  39920. pTDefRegMap(@Self)^.clr := $00001000
  39921. else
  39922. pTDefRegMap(@Self)^.&set := $00001000;
  39923. end;
  39924. function TSPI2_SPI2ACON.getDISSDO : TBits_1; inline;
  39925. begin
  39926. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  39927. end;
  39928. procedure TSPI2_SPI2ACON.setSIDL; inline;
  39929. begin
  39930. pTDefRegMap(@Self)^.&set := $00002000;
  39931. end;
  39932. procedure TSPI2_SPI2ACON.clearSIDL; inline;
  39933. begin
  39934. pTDefRegMap(@Self)^.clr := $00002000;
  39935. end;
  39936. procedure TSPI2_SPI2ACON.setSIDL(thebits : TBits_1); inline;
  39937. begin
  39938. if thebits = 0 then
  39939. pTDefRegMap(@Self)^.clr := $00002000
  39940. else
  39941. pTDefRegMap(@Self)^.&set := $00002000;
  39942. end;
  39943. function TSPI2_SPI2ACON.getSIDL : TBits_1; inline;
  39944. begin
  39945. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  39946. end;
  39947. procedure TSPI2_SPI2ACON.setON; inline;
  39948. begin
  39949. pTDefRegMap(@Self)^.&set := $00008000;
  39950. end;
  39951. procedure TSPI2_SPI2ACON.clearON; inline;
  39952. begin
  39953. pTDefRegMap(@Self)^.clr := $00008000;
  39954. end;
  39955. procedure TSPI2_SPI2ACON.setON(thebits : TBits_1); inline;
  39956. begin
  39957. if thebits = 0 then
  39958. pTDefRegMap(@Self)^.clr := $00008000
  39959. else
  39960. pTDefRegMap(@Self)^.&set := $00008000;
  39961. end;
  39962. function TSPI2_SPI2ACON.getON : TBits_1; inline;
  39963. begin
  39964. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  39965. end;
  39966. procedure TSPI2_SPI2ACON.setENHBUF; inline;
  39967. begin
  39968. pTDefRegMap(@Self)^.&set := $00010000;
  39969. end;
  39970. procedure TSPI2_SPI2ACON.clearENHBUF; inline;
  39971. begin
  39972. pTDefRegMap(@Self)^.clr := $00010000;
  39973. end;
  39974. procedure TSPI2_SPI2ACON.setENHBUF(thebits : TBits_1); inline;
  39975. begin
  39976. if thebits = 0 then
  39977. pTDefRegMap(@Self)^.clr := $00010000
  39978. else
  39979. pTDefRegMap(@Self)^.&set := $00010000;
  39980. end;
  39981. function TSPI2_SPI2ACON.getENHBUF : TBits_1; inline;
  39982. begin
  39983. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  39984. end;
  39985. procedure TSPI2_SPI2ACON.setSPIFE; inline;
  39986. begin
  39987. pTDefRegMap(@Self)^.&set := $00020000;
  39988. end;
  39989. procedure TSPI2_SPI2ACON.clearSPIFE; inline;
  39990. begin
  39991. pTDefRegMap(@Self)^.clr := $00020000;
  39992. end;
  39993. procedure TSPI2_SPI2ACON.setSPIFE(thebits : TBits_1); inline;
  39994. begin
  39995. if thebits = 0 then
  39996. pTDefRegMap(@Self)^.clr := $00020000
  39997. else
  39998. pTDefRegMap(@Self)^.&set := $00020000;
  39999. end;
  40000. function TSPI2_SPI2ACON.getSPIFE : TBits_1; inline;
  40001. begin
  40002. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  40003. end;
  40004. procedure TSPI2_SPI2ACON.setFRMCNT(thebits : TBits_3); inline;
  40005. begin
  40006. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  40007. end;
  40008. function TSPI2_SPI2ACON.getFRMCNT : TBits_3; inline;
  40009. begin
  40010. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  40011. end;
  40012. procedure TSPI2_SPI2ACON.setFRMSYPW; inline;
  40013. begin
  40014. pTDefRegMap(@Self)^.&set := $08000000;
  40015. end;
  40016. procedure TSPI2_SPI2ACON.clearFRMSYPW; inline;
  40017. begin
  40018. pTDefRegMap(@Self)^.clr := $08000000;
  40019. end;
  40020. procedure TSPI2_SPI2ACON.setFRMSYPW(thebits : TBits_1); inline;
  40021. begin
  40022. if thebits = 0 then
  40023. pTDefRegMap(@Self)^.clr := $08000000
  40024. else
  40025. pTDefRegMap(@Self)^.&set := $08000000;
  40026. end;
  40027. function TSPI2_SPI2ACON.getFRMSYPW : TBits_1; inline;
  40028. begin
  40029. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  40030. end;
  40031. procedure TSPI2_SPI2ACON.setMSSEN; inline;
  40032. begin
  40033. pTDefRegMap(@Self)^.&set := $10000000;
  40034. end;
  40035. procedure TSPI2_SPI2ACON.clearMSSEN; inline;
  40036. begin
  40037. pTDefRegMap(@Self)^.clr := $10000000;
  40038. end;
  40039. procedure TSPI2_SPI2ACON.setMSSEN(thebits : TBits_1); inline;
  40040. begin
  40041. if thebits = 0 then
  40042. pTDefRegMap(@Self)^.clr := $10000000
  40043. else
  40044. pTDefRegMap(@Self)^.&set := $10000000;
  40045. end;
  40046. function TSPI2_SPI2ACON.getMSSEN : TBits_1; inline;
  40047. begin
  40048. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  40049. end;
  40050. procedure TSPI2_SPI2ACON.setFRMPOL; inline;
  40051. begin
  40052. pTDefRegMap(@Self)^.&set := $20000000;
  40053. end;
  40054. procedure TSPI2_SPI2ACON.clearFRMPOL; inline;
  40055. begin
  40056. pTDefRegMap(@Self)^.clr := $20000000;
  40057. end;
  40058. procedure TSPI2_SPI2ACON.setFRMPOL(thebits : TBits_1); inline;
  40059. begin
  40060. if thebits = 0 then
  40061. pTDefRegMap(@Self)^.clr := $20000000
  40062. else
  40063. pTDefRegMap(@Self)^.&set := $20000000;
  40064. end;
  40065. function TSPI2_SPI2ACON.getFRMPOL : TBits_1; inline;
  40066. begin
  40067. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  40068. end;
  40069. procedure TSPI2_SPI2ACON.setFRMSYNC; inline;
  40070. begin
  40071. pTDefRegMap(@Self)^.&set := $40000000;
  40072. end;
  40073. procedure TSPI2_SPI2ACON.clearFRMSYNC; inline;
  40074. begin
  40075. pTDefRegMap(@Self)^.clr := $40000000;
  40076. end;
  40077. procedure TSPI2_SPI2ACON.setFRMSYNC(thebits : TBits_1); inline;
  40078. begin
  40079. if thebits = 0 then
  40080. pTDefRegMap(@Self)^.clr := $40000000
  40081. else
  40082. pTDefRegMap(@Self)^.&set := $40000000;
  40083. end;
  40084. function TSPI2_SPI2ACON.getFRMSYNC : TBits_1; inline;
  40085. begin
  40086. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  40087. end;
  40088. procedure TSPI2_SPI2ACON.setFRMEN; inline;
  40089. begin
  40090. pTDefRegMap(@Self)^.&set := $80000000;
  40091. end;
  40092. procedure TSPI2_SPI2ACON.clearFRMEN; inline;
  40093. begin
  40094. pTDefRegMap(@Self)^.clr := $80000000;
  40095. end;
  40096. procedure TSPI2_SPI2ACON.setFRMEN(thebits : TBits_1); inline;
  40097. begin
  40098. if thebits = 0 then
  40099. pTDefRegMap(@Self)^.clr := $80000000
  40100. else
  40101. pTDefRegMap(@Self)^.&set := $80000000;
  40102. end;
  40103. function TSPI2_SPI2ACON.getFRMEN : TBits_1; inline;
  40104. begin
  40105. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  40106. end;
  40107. procedure TSPI2_SPI2ACON.setw(thebits : TBits_32); inline;
  40108. begin
  40109. pTDefRegMap(@Self)^.val := thebits;
  40110. end;
  40111. function TSPI2_SPI2ACON.getw : TBits_32; inline;
  40112. begin
  40113. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40114. end;
  40115. procedure TSPI2_SPI2CON.setSRXISEL(thebits : TBits_2); inline;
  40116. begin
  40117. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  40118. end;
  40119. function TSPI2_SPI2CON.getSRXISEL : TBits_2; inline;
  40120. begin
  40121. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  40122. end;
  40123. procedure TSPI2_SPI2CON.setSTXISEL(thebits : TBits_2); inline;
  40124. begin
  40125. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  40126. end;
  40127. function TSPI2_SPI2CON.getSTXISEL : TBits_2; inline;
  40128. begin
  40129. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  40130. end;
  40131. procedure TSPI2_SPI2CON.setMSTEN; inline;
  40132. begin
  40133. pTDefRegMap(@Self)^.&set := $00000020;
  40134. end;
  40135. procedure TSPI2_SPI2CON.clearMSTEN; inline;
  40136. begin
  40137. pTDefRegMap(@Self)^.clr := $00000020;
  40138. end;
  40139. procedure TSPI2_SPI2CON.setMSTEN(thebits : TBits_1); inline;
  40140. begin
  40141. if thebits = 0 then
  40142. pTDefRegMap(@Self)^.clr := $00000020
  40143. else
  40144. pTDefRegMap(@Self)^.&set := $00000020;
  40145. end;
  40146. function TSPI2_SPI2CON.getMSTEN : TBits_1; inline;
  40147. begin
  40148. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40149. end;
  40150. procedure TSPI2_SPI2CON.setCKP; inline;
  40151. begin
  40152. pTDefRegMap(@Self)^.&set := $00000040;
  40153. end;
  40154. procedure TSPI2_SPI2CON.clearCKP; inline;
  40155. begin
  40156. pTDefRegMap(@Self)^.clr := $00000040;
  40157. end;
  40158. procedure TSPI2_SPI2CON.setCKP(thebits : TBits_1); inline;
  40159. begin
  40160. if thebits = 0 then
  40161. pTDefRegMap(@Self)^.clr := $00000040
  40162. else
  40163. pTDefRegMap(@Self)^.&set := $00000040;
  40164. end;
  40165. function TSPI2_SPI2CON.getCKP : TBits_1; inline;
  40166. begin
  40167. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40168. end;
  40169. procedure TSPI2_SPI2CON.setSSEN; inline;
  40170. begin
  40171. pTDefRegMap(@Self)^.&set := $00000080;
  40172. end;
  40173. procedure TSPI2_SPI2CON.clearSSEN; inline;
  40174. begin
  40175. pTDefRegMap(@Self)^.clr := $00000080;
  40176. end;
  40177. procedure TSPI2_SPI2CON.setSSEN(thebits : TBits_1); inline;
  40178. begin
  40179. if thebits = 0 then
  40180. pTDefRegMap(@Self)^.clr := $00000080
  40181. else
  40182. pTDefRegMap(@Self)^.&set := $00000080;
  40183. end;
  40184. function TSPI2_SPI2CON.getSSEN : TBits_1; inline;
  40185. begin
  40186. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40187. end;
  40188. procedure TSPI2_SPI2CON.setCKE; inline;
  40189. begin
  40190. pTDefRegMap(@Self)^.&set := $00000100;
  40191. end;
  40192. procedure TSPI2_SPI2CON.clearCKE; inline;
  40193. begin
  40194. pTDefRegMap(@Self)^.clr := $00000100;
  40195. end;
  40196. procedure TSPI2_SPI2CON.setCKE(thebits : TBits_1); inline;
  40197. begin
  40198. if thebits = 0 then
  40199. pTDefRegMap(@Self)^.clr := $00000100
  40200. else
  40201. pTDefRegMap(@Self)^.&set := $00000100;
  40202. end;
  40203. function TSPI2_SPI2CON.getCKE : TBits_1; inline;
  40204. begin
  40205. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40206. end;
  40207. procedure TSPI2_SPI2CON.setSMP; inline;
  40208. begin
  40209. pTDefRegMap(@Self)^.&set := $00000200;
  40210. end;
  40211. procedure TSPI2_SPI2CON.clearSMP; inline;
  40212. begin
  40213. pTDefRegMap(@Self)^.clr := $00000200;
  40214. end;
  40215. procedure TSPI2_SPI2CON.setSMP(thebits : TBits_1); inline;
  40216. begin
  40217. if thebits = 0 then
  40218. pTDefRegMap(@Self)^.clr := $00000200
  40219. else
  40220. pTDefRegMap(@Self)^.&set := $00000200;
  40221. end;
  40222. function TSPI2_SPI2CON.getSMP : TBits_1; inline;
  40223. begin
  40224. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40225. end;
  40226. procedure TSPI2_SPI2CON.setMODE16; inline;
  40227. begin
  40228. pTDefRegMap(@Self)^.&set := $00000400;
  40229. end;
  40230. procedure TSPI2_SPI2CON.clearMODE16; inline;
  40231. begin
  40232. pTDefRegMap(@Self)^.clr := $00000400;
  40233. end;
  40234. procedure TSPI2_SPI2CON.setMODE16(thebits : TBits_1); inline;
  40235. begin
  40236. if thebits = 0 then
  40237. pTDefRegMap(@Self)^.clr := $00000400
  40238. else
  40239. pTDefRegMap(@Self)^.&set := $00000400;
  40240. end;
  40241. function TSPI2_SPI2CON.getMODE16 : TBits_1; inline;
  40242. begin
  40243. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40244. end;
  40245. procedure TSPI2_SPI2CON.setMODE32; inline;
  40246. begin
  40247. pTDefRegMap(@Self)^.&set := $00000800;
  40248. end;
  40249. procedure TSPI2_SPI2CON.clearMODE32; inline;
  40250. begin
  40251. pTDefRegMap(@Self)^.clr := $00000800;
  40252. end;
  40253. procedure TSPI2_SPI2CON.setMODE32(thebits : TBits_1); inline;
  40254. begin
  40255. if thebits = 0 then
  40256. pTDefRegMap(@Self)^.clr := $00000800
  40257. else
  40258. pTDefRegMap(@Self)^.&set := $00000800;
  40259. end;
  40260. function TSPI2_SPI2CON.getMODE32 : TBits_1; inline;
  40261. begin
  40262. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40263. end;
  40264. procedure TSPI2_SPI2CON.setDISSDO; inline;
  40265. begin
  40266. pTDefRegMap(@Self)^.&set := $00001000;
  40267. end;
  40268. procedure TSPI2_SPI2CON.clearDISSDO; inline;
  40269. begin
  40270. pTDefRegMap(@Self)^.clr := $00001000;
  40271. end;
  40272. procedure TSPI2_SPI2CON.setDISSDO(thebits : TBits_1); inline;
  40273. begin
  40274. if thebits = 0 then
  40275. pTDefRegMap(@Self)^.clr := $00001000
  40276. else
  40277. pTDefRegMap(@Self)^.&set := $00001000;
  40278. end;
  40279. function TSPI2_SPI2CON.getDISSDO : TBits_1; inline;
  40280. begin
  40281. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40282. end;
  40283. procedure TSPI2_SPI2CON.setSIDL; inline;
  40284. begin
  40285. pTDefRegMap(@Self)^.&set := $00002000;
  40286. end;
  40287. procedure TSPI2_SPI2CON.clearSIDL; inline;
  40288. begin
  40289. pTDefRegMap(@Self)^.clr := $00002000;
  40290. end;
  40291. procedure TSPI2_SPI2CON.setSIDL(thebits : TBits_1); inline;
  40292. begin
  40293. if thebits = 0 then
  40294. pTDefRegMap(@Self)^.clr := $00002000
  40295. else
  40296. pTDefRegMap(@Self)^.&set := $00002000;
  40297. end;
  40298. function TSPI2_SPI2CON.getSIDL : TBits_1; inline;
  40299. begin
  40300. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  40301. end;
  40302. procedure TSPI2_SPI2CON.setON; inline;
  40303. begin
  40304. pTDefRegMap(@Self)^.&set := $00008000;
  40305. end;
  40306. procedure TSPI2_SPI2CON.clearON; inline;
  40307. begin
  40308. pTDefRegMap(@Self)^.clr := $00008000;
  40309. end;
  40310. procedure TSPI2_SPI2CON.setON(thebits : TBits_1); inline;
  40311. begin
  40312. if thebits = 0 then
  40313. pTDefRegMap(@Self)^.clr := $00008000
  40314. else
  40315. pTDefRegMap(@Self)^.&set := $00008000;
  40316. end;
  40317. function TSPI2_SPI2CON.getON : TBits_1; inline;
  40318. begin
  40319. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  40320. end;
  40321. procedure TSPI2_SPI2CON.setENHBUF; inline;
  40322. begin
  40323. pTDefRegMap(@Self)^.&set := $00010000;
  40324. end;
  40325. procedure TSPI2_SPI2CON.clearENHBUF; inline;
  40326. begin
  40327. pTDefRegMap(@Self)^.clr := $00010000;
  40328. end;
  40329. procedure TSPI2_SPI2CON.setENHBUF(thebits : TBits_1); inline;
  40330. begin
  40331. if thebits = 0 then
  40332. pTDefRegMap(@Self)^.clr := $00010000
  40333. else
  40334. pTDefRegMap(@Self)^.&set := $00010000;
  40335. end;
  40336. function TSPI2_SPI2CON.getENHBUF : TBits_1; inline;
  40337. begin
  40338. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  40339. end;
  40340. procedure TSPI2_SPI2CON.setSPIFE; inline;
  40341. begin
  40342. pTDefRegMap(@Self)^.&set := $00020000;
  40343. end;
  40344. procedure TSPI2_SPI2CON.clearSPIFE; inline;
  40345. begin
  40346. pTDefRegMap(@Self)^.clr := $00020000;
  40347. end;
  40348. procedure TSPI2_SPI2CON.setSPIFE(thebits : TBits_1); inline;
  40349. begin
  40350. if thebits = 0 then
  40351. pTDefRegMap(@Self)^.clr := $00020000
  40352. else
  40353. pTDefRegMap(@Self)^.&set := $00020000;
  40354. end;
  40355. function TSPI2_SPI2CON.getSPIFE : TBits_1; inline;
  40356. begin
  40357. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  40358. end;
  40359. procedure TSPI2_SPI2CON.setFRMCNT(thebits : TBits_3); inline;
  40360. begin
  40361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  40362. end;
  40363. function TSPI2_SPI2CON.getFRMCNT : TBits_3; inline;
  40364. begin
  40365. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  40366. end;
  40367. procedure TSPI2_SPI2CON.setFRMSYPW; inline;
  40368. begin
  40369. pTDefRegMap(@Self)^.&set := $08000000;
  40370. end;
  40371. procedure TSPI2_SPI2CON.clearFRMSYPW; inline;
  40372. begin
  40373. pTDefRegMap(@Self)^.clr := $08000000;
  40374. end;
  40375. procedure TSPI2_SPI2CON.setFRMSYPW(thebits : TBits_1); inline;
  40376. begin
  40377. if thebits = 0 then
  40378. pTDefRegMap(@Self)^.clr := $08000000
  40379. else
  40380. pTDefRegMap(@Self)^.&set := $08000000;
  40381. end;
  40382. function TSPI2_SPI2CON.getFRMSYPW : TBits_1; inline;
  40383. begin
  40384. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  40385. end;
  40386. procedure TSPI2_SPI2CON.setMSSEN; inline;
  40387. begin
  40388. pTDefRegMap(@Self)^.&set := $10000000;
  40389. end;
  40390. procedure TSPI2_SPI2CON.clearMSSEN; inline;
  40391. begin
  40392. pTDefRegMap(@Self)^.clr := $10000000;
  40393. end;
  40394. procedure TSPI2_SPI2CON.setMSSEN(thebits : TBits_1); inline;
  40395. begin
  40396. if thebits = 0 then
  40397. pTDefRegMap(@Self)^.clr := $10000000
  40398. else
  40399. pTDefRegMap(@Self)^.&set := $10000000;
  40400. end;
  40401. function TSPI2_SPI2CON.getMSSEN : TBits_1; inline;
  40402. begin
  40403. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  40404. end;
  40405. procedure TSPI2_SPI2CON.setFRMPOL; inline;
  40406. begin
  40407. pTDefRegMap(@Self)^.&set := $20000000;
  40408. end;
  40409. procedure TSPI2_SPI2CON.clearFRMPOL; inline;
  40410. begin
  40411. pTDefRegMap(@Self)^.clr := $20000000;
  40412. end;
  40413. procedure TSPI2_SPI2CON.setFRMPOL(thebits : TBits_1); inline;
  40414. begin
  40415. if thebits = 0 then
  40416. pTDefRegMap(@Self)^.clr := $20000000
  40417. else
  40418. pTDefRegMap(@Self)^.&set := $20000000;
  40419. end;
  40420. function TSPI2_SPI2CON.getFRMPOL : TBits_1; inline;
  40421. begin
  40422. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  40423. end;
  40424. procedure TSPI2_SPI2CON.setFRMSYNC; inline;
  40425. begin
  40426. pTDefRegMap(@Self)^.&set := $40000000;
  40427. end;
  40428. procedure TSPI2_SPI2CON.clearFRMSYNC; inline;
  40429. begin
  40430. pTDefRegMap(@Self)^.clr := $40000000;
  40431. end;
  40432. procedure TSPI2_SPI2CON.setFRMSYNC(thebits : TBits_1); inline;
  40433. begin
  40434. if thebits = 0 then
  40435. pTDefRegMap(@Self)^.clr := $40000000
  40436. else
  40437. pTDefRegMap(@Self)^.&set := $40000000;
  40438. end;
  40439. function TSPI2_SPI2CON.getFRMSYNC : TBits_1; inline;
  40440. begin
  40441. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  40442. end;
  40443. procedure TSPI2_SPI2CON.setFRMEN; inline;
  40444. begin
  40445. pTDefRegMap(@Self)^.&set := $80000000;
  40446. end;
  40447. procedure TSPI2_SPI2CON.clearFRMEN; inline;
  40448. begin
  40449. pTDefRegMap(@Self)^.clr := $80000000;
  40450. end;
  40451. procedure TSPI2_SPI2CON.setFRMEN(thebits : TBits_1); inline;
  40452. begin
  40453. if thebits = 0 then
  40454. pTDefRegMap(@Self)^.clr := $80000000
  40455. else
  40456. pTDefRegMap(@Self)^.&set := $80000000;
  40457. end;
  40458. function TSPI2_SPI2CON.getFRMEN : TBits_1; inline;
  40459. begin
  40460. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  40461. end;
  40462. procedure TSPI2_SPI2CON.setw(thebits : TBits_32); inline;
  40463. begin
  40464. pTDefRegMap(@Self)^.val := thebits;
  40465. end;
  40466. function TSPI2_SPI2CON.getw : TBits_32; inline;
  40467. begin
  40468. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40469. end;
  40470. procedure TSPI2_SPI2ASTAT.setSPIRBF; inline;
  40471. begin
  40472. pTDefRegMap(@Self)^.&set := $00000001;
  40473. end;
  40474. procedure TSPI2_SPI2ASTAT.clearSPIRBF; inline;
  40475. begin
  40476. pTDefRegMap(@Self)^.clr := $00000001;
  40477. end;
  40478. procedure TSPI2_SPI2ASTAT.setSPIRBF(thebits : TBits_1); inline;
  40479. begin
  40480. if thebits = 0 then
  40481. pTDefRegMap(@Self)^.clr := $00000001
  40482. else
  40483. pTDefRegMap(@Self)^.&set := $00000001;
  40484. end;
  40485. function TSPI2_SPI2ASTAT.getSPIRBF : TBits_1; inline;
  40486. begin
  40487. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40488. end;
  40489. procedure TSPI2_SPI2ASTAT.setSPITBF; inline;
  40490. begin
  40491. pTDefRegMap(@Self)^.&set := $00000002;
  40492. end;
  40493. procedure TSPI2_SPI2ASTAT.clearSPITBF; inline;
  40494. begin
  40495. pTDefRegMap(@Self)^.clr := $00000002;
  40496. end;
  40497. procedure TSPI2_SPI2ASTAT.setSPITBF(thebits : TBits_1); inline;
  40498. begin
  40499. if thebits = 0 then
  40500. pTDefRegMap(@Self)^.clr := $00000002
  40501. else
  40502. pTDefRegMap(@Self)^.&set := $00000002;
  40503. end;
  40504. function TSPI2_SPI2ASTAT.getSPITBF : TBits_1; inline;
  40505. begin
  40506. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40507. end;
  40508. procedure TSPI2_SPI2ASTAT.setSPITBE; inline;
  40509. begin
  40510. pTDefRegMap(@Self)^.&set := $00000008;
  40511. end;
  40512. procedure TSPI2_SPI2ASTAT.clearSPITBE; inline;
  40513. begin
  40514. pTDefRegMap(@Self)^.clr := $00000008;
  40515. end;
  40516. procedure TSPI2_SPI2ASTAT.setSPITBE(thebits : TBits_1); inline;
  40517. begin
  40518. if thebits = 0 then
  40519. pTDefRegMap(@Self)^.clr := $00000008
  40520. else
  40521. pTDefRegMap(@Self)^.&set := $00000008;
  40522. end;
  40523. function TSPI2_SPI2ASTAT.getSPITBE : TBits_1; inline;
  40524. begin
  40525. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40526. end;
  40527. procedure TSPI2_SPI2ASTAT.setSPIRBE; inline;
  40528. begin
  40529. pTDefRegMap(@Self)^.&set := $00000020;
  40530. end;
  40531. procedure TSPI2_SPI2ASTAT.clearSPIRBE; inline;
  40532. begin
  40533. pTDefRegMap(@Self)^.clr := $00000020;
  40534. end;
  40535. procedure TSPI2_SPI2ASTAT.setSPIRBE(thebits : TBits_1); inline;
  40536. begin
  40537. if thebits = 0 then
  40538. pTDefRegMap(@Self)^.clr := $00000020
  40539. else
  40540. pTDefRegMap(@Self)^.&set := $00000020;
  40541. end;
  40542. function TSPI2_SPI2ASTAT.getSPIRBE : TBits_1; inline;
  40543. begin
  40544. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40545. end;
  40546. procedure TSPI2_SPI2ASTAT.setSPIROV; inline;
  40547. begin
  40548. pTDefRegMap(@Self)^.&set := $00000040;
  40549. end;
  40550. procedure TSPI2_SPI2ASTAT.clearSPIROV; inline;
  40551. begin
  40552. pTDefRegMap(@Self)^.clr := $00000040;
  40553. end;
  40554. procedure TSPI2_SPI2ASTAT.setSPIROV(thebits : TBits_1); inline;
  40555. begin
  40556. if thebits = 0 then
  40557. pTDefRegMap(@Self)^.clr := $00000040
  40558. else
  40559. pTDefRegMap(@Self)^.&set := $00000040;
  40560. end;
  40561. function TSPI2_SPI2ASTAT.getSPIROV : TBits_1; inline;
  40562. begin
  40563. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40564. end;
  40565. procedure TSPI2_SPI2ASTAT.setSRMT; inline;
  40566. begin
  40567. pTDefRegMap(@Self)^.&set := $00000080;
  40568. end;
  40569. procedure TSPI2_SPI2ASTAT.clearSRMT; inline;
  40570. begin
  40571. pTDefRegMap(@Self)^.clr := $00000080;
  40572. end;
  40573. procedure TSPI2_SPI2ASTAT.setSRMT(thebits : TBits_1); inline;
  40574. begin
  40575. if thebits = 0 then
  40576. pTDefRegMap(@Self)^.clr := $00000080
  40577. else
  40578. pTDefRegMap(@Self)^.&set := $00000080;
  40579. end;
  40580. function TSPI2_SPI2ASTAT.getSRMT : TBits_1; inline;
  40581. begin
  40582. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40583. end;
  40584. procedure TSPI2_SPI2ASTAT.setSPITUR; inline;
  40585. begin
  40586. pTDefRegMap(@Self)^.&set := $00000100;
  40587. end;
  40588. procedure TSPI2_SPI2ASTAT.clearSPITUR; inline;
  40589. begin
  40590. pTDefRegMap(@Self)^.clr := $00000100;
  40591. end;
  40592. procedure TSPI2_SPI2ASTAT.setSPITUR(thebits : TBits_1); inline;
  40593. begin
  40594. if thebits = 0 then
  40595. pTDefRegMap(@Self)^.clr := $00000100
  40596. else
  40597. pTDefRegMap(@Self)^.&set := $00000100;
  40598. end;
  40599. function TSPI2_SPI2ASTAT.getSPITUR : TBits_1; inline;
  40600. begin
  40601. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40602. end;
  40603. procedure TSPI2_SPI2ASTAT.setSPIBUSY; inline;
  40604. begin
  40605. pTDefRegMap(@Self)^.&set := $00000800;
  40606. end;
  40607. procedure TSPI2_SPI2ASTAT.clearSPIBUSY; inline;
  40608. begin
  40609. pTDefRegMap(@Self)^.clr := $00000800;
  40610. end;
  40611. procedure TSPI2_SPI2ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  40612. begin
  40613. if thebits = 0 then
  40614. pTDefRegMap(@Self)^.clr := $00000800
  40615. else
  40616. pTDefRegMap(@Self)^.&set := $00000800;
  40617. end;
  40618. function TSPI2_SPI2ASTAT.getSPIBUSY : TBits_1; inline;
  40619. begin
  40620. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40621. end;
  40622. procedure TSPI2_SPI2ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  40623. begin
  40624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  40625. end;
  40626. function TSPI2_SPI2ASTAT.getTXBUFELM : TBits_5; inline;
  40627. begin
  40628. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  40629. end;
  40630. procedure TSPI2_SPI2ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  40631. begin
  40632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  40633. end;
  40634. function TSPI2_SPI2ASTAT.getRXBUFELM : TBits_5; inline;
  40635. begin
  40636. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  40637. end;
  40638. procedure TSPI2_SPI2ASTAT.setw(thebits : TBits_32); inline;
  40639. begin
  40640. pTDefRegMap(@Self)^.val := thebits;
  40641. end;
  40642. function TSPI2_SPI2ASTAT.getw : TBits_32; inline;
  40643. begin
  40644. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40645. end;
  40646. procedure TSPI2_SPI2STAT.setSPIRBF; inline;
  40647. begin
  40648. pTDefRegMap(@Self)^.&set := $00000001;
  40649. end;
  40650. procedure TSPI2_SPI2STAT.clearSPIRBF; inline;
  40651. begin
  40652. pTDefRegMap(@Self)^.clr := $00000001;
  40653. end;
  40654. procedure TSPI2_SPI2STAT.setSPIRBF(thebits : TBits_1); inline;
  40655. begin
  40656. if thebits = 0 then
  40657. pTDefRegMap(@Self)^.clr := $00000001
  40658. else
  40659. pTDefRegMap(@Self)^.&set := $00000001;
  40660. end;
  40661. function TSPI2_SPI2STAT.getSPIRBF : TBits_1; inline;
  40662. begin
  40663. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  40664. end;
  40665. procedure TSPI2_SPI2STAT.setSPITBF; inline;
  40666. begin
  40667. pTDefRegMap(@Self)^.&set := $00000002;
  40668. end;
  40669. procedure TSPI2_SPI2STAT.clearSPITBF; inline;
  40670. begin
  40671. pTDefRegMap(@Self)^.clr := $00000002;
  40672. end;
  40673. procedure TSPI2_SPI2STAT.setSPITBF(thebits : TBits_1); inline;
  40674. begin
  40675. if thebits = 0 then
  40676. pTDefRegMap(@Self)^.clr := $00000002
  40677. else
  40678. pTDefRegMap(@Self)^.&set := $00000002;
  40679. end;
  40680. function TSPI2_SPI2STAT.getSPITBF : TBits_1; inline;
  40681. begin
  40682. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  40683. end;
  40684. procedure TSPI2_SPI2STAT.setSPITBE; inline;
  40685. begin
  40686. pTDefRegMap(@Self)^.&set := $00000008;
  40687. end;
  40688. procedure TSPI2_SPI2STAT.clearSPITBE; inline;
  40689. begin
  40690. pTDefRegMap(@Self)^.clr := $00000008;
  40691. end;
  40692. procedure TSPI2_SPI2STAT.setSPITBE(thebits : TBits_1); inline;
  40693. begin
  40694. if thebits = 0 then
  40695. pTDefRegMap(@Self)^.clr := $00000008
  40696. else
  40697. pTDefRegMap(@Self)^.&set := $00000008;
  40698. end;
  40699. function TSPI2_SPI2STAT.getSPITBE : TBits_1; inline;
  40700. begin
  40701. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  40702. end;
  40703. procedure TSPI2_SPI2STAT.setSPIRBE; inline;
  40704. begin
  40705. pTDefRegMap(@Self)^.&set := $00000020;
  40706. end;
  40707. procedure TSPI2_SPI2STAT.clearSPIRBE; inline;
  40708. begin
  40709. pTDefRegMap(@Self)^.clr := $00000020;
  40710. end;
  40711. procedure TSPI2_SPI2STAT.setSPIRBE(thebits : TBits_1); inline;
  40712. begin
  40713. if thebits = 0 then
  40714. pTDefRegMap(@Self)^.clr := $00000020
  40715. else
  40716. pTDefRegMap(@Self)^.&set := $00000020;
  40717. end;
  40718. function TSPI2_SPI2STAT.getSPIRBE : TBits_1; inline;
  40719. begin
  40720. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40721. end;
  40722. procedure TSPI2_SPI2STAT.setSPIROV; inline;
  40723. begin
  40724. pTDefRegMap(@Self)^.&set := $00000040;
  40725. end;
  40726. procedure TSPI2_SPI2STAT.clearSPIROV; inline;
  40727. begin
  40728. pTDefRegMap(@Self)^.clr := $00000040;
  40729. end;
  40730. procedure TSPI2_SPI2STAT.setSPIROV(thebits : TBits_1); inline;
  40731. begin
  40732. if thebits = 0 then
  40733. pTDefRegMap(@Self)^.clr := $00000040
  40734. else
  40735. pTDefRegMap(@Self)^.&set := $00000040;
  40736. end;
  40737. function TSPI2_SPI2STAT.getSPIROV : TBits_1; inline;
  40738. begin
  40739. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40740. end;
  40741. procedure TSPI2_SPI2STAT.setSRMT; inline;
  40742. begin
  40743. pTDefRegMap(@Self)^.&set := $00000080;
  40744. end;
  40745. procedure TSPI2_SPI2STAT.clearSRMT; inline;
  40746. begin
  40747. pTDefRegMap(@Self)^.clr := $00000080;
  40748. end;
  40749. procedure TSPI2_SPI2STAT.setSRMT(thebits : TBits_1); inline;
  40750. begin
  40751. if thebits = 0 then
  40752. pTDefRegMap(@Self)^.clr := $00000080
  40753. else
  40754. pTDefRegMap(@Self)^.&set := $00000080;
  40755. end;
  40756. function TSPI2_SPI2STAT.getSRMT : TBits_1; inline;
  40757. begin
  40758. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40759. end;
  40760. procedure TSPI2_SPI2STAT.setSPITUR; inline;
  40761. begin
  40762. pTDefRegMap(@Self)^.&set := $00000100;
  40763. end;
  40764. procedure TSPI2_SPI2STAT.clearSPITUR; inline;
  40765. begin
  40766. pTDefRegMap(@Self)^.clr := $00000100;
  40767. end;
  40768. procedure TSPI2_SPI2STAT.setSPITUR(thebits : TBits_1); inline;
  40769. begin
  40770. if thebits = 0 then
  40771. pTDefRegMap(@Self)^.clr := $00000100
  40772. else
  40773. pTDefRegMap(@Self)^.&set := $00000100;
  40774. end;
  40775. function TSPI2_SPI2STAT.getSPITUR : TBits_1; inline;
  40776. begin
  40777. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40778. end;
  40779. procedure TSPI2_SPI2STAT.setSPIBUSY; inline;
  40780. begin
  40781. pTDefRegMap(@Self)^.&set := $00000800;
  40782. end;
  40783. procedure TSPI2_SPI2STAT.clearSPIBUSY; inline;
  40784. begin
  40785. pTDefRegMap(@Self)^.clr := $00000800;
  40786. end;
  40787. procedure TSPI2_SPI2STAT.setSPIBUSY(thebits : TBits_1); inline;
  40788. begin
  40789. if thebits = 0 then
  40790. pTDefRegMap(@Self)^.clr := $00000800
  40791. else
  40792. pTDefRegMap(@Self)^.&set := $00000800;
  40793. end;
  40794. function TSPI2_SPI2STAT.getSPIBUSY : TBits_1; inline;
  40795. begin
  40796. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40797. end;
  40798. procedure TSPI2_SPI2STAT.setTXBUFELM(thebits : TBits_5); inline;
  40799. begin
  40800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  40801. end;
  40802. function TSPI2_SPI2STAT.getTXBUFELM : TBits_5; inline;
  40803. begin
  40804. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  40805. end;
  40806. procedure TSPI2_SPI2STAT.setRXBUFELM(thebits : TBits_5); inline;
  40807. begin
  40808. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  40809. end;
  40810. function TSPI2_SPI2STAT.getRXBUFELM : TBits_5; inline;
  40811. begin
  40812. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  40813. end;
  40814. procedure TSPI2_SPI2STAT.setw(thebits : TBits_32); inline;
  40815. begin
  40816. pTDefRegMap(@Self)^.val := thebits;
  40817. end;
  40818. function TSPI2_SPI2STAT.getw : TBits_32; inline;
  40819. begin
  40820. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  40821. end;
  40822. procedure TSPI4_SPI3ACON.setSRXISEL(thebits : TBits_2); inline;
  40823. begin
  40824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  40825. end;
  40826. function TSPI4_SPI3ACON.getSRXISEL : TBits_2; inline;
  40827. begin
  40828. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  40829. end;
  40830. procedure TSPI4_SPI3ACON.setSTXISEL(thebits : TBits_2); inline;
  40831. begin
  40832. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  40833. end;
  40834. function TSPI4_SPI3ACON.getSTXISEL : TBits_2; inline;
  40835. begin
  40836. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  40837. end;
  40838. procedure TSPI4_SPI3ACON.setMSTEN; inline;
  40839. begin
  40840. pTDefRegMap(@Self)^.&set := $00000020;
  40841. end;
  40842. procedure TSPI4_SPI3ACON.clearMSTEN; inline;
  40843. begin
  40844. pTDefRegMap(@Self)^.clr := $00000020;
  40845. end;
  40846. procedure TSPI4_SPI3ACON.setMSTEN(thebits : TBits_1); inline;
  40847. begin
  40848. if thebits = 0 then
  40849. pTDefRegMap(@Self)^.clr := $00000020
  40850. else
  40851. pTDefRegMap(@Self)^.&set := $00000020;
  40852. end;
  40853. function TSPI4_SPI3ACON.getMSTEN : TBits_1; inline;
  40854. begin
  40855. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  40856. end;
  40857. procedure TSPI4_SPI3ACON.setCKP; inline;
  40858. begin
  40859. pTDefRegMap(@Self)^.&set := $00000040;
  40860. end;
  40861. procedure TSPI4_SPI3ACON.clearCKP; inline;
  40862. begin
  40863. pTDefRegMap(@Self)^.clr := $00000040;
  40864. end;
  40865. procedure TSPI4_SPI3ACON.setCKP(thebits : TBits_1); inline;
  40866. begin
  40867. if thebits = 0 then
  40868. pTDefRegMap(@Self)^.clr := $00000040
  40869. else
  40870. pTDefRegMap(@Self)^.&set := $00000040;
  40871. end;
  40872. function TSPI4_SPI3ACON.getCKP : TBits_1; inline;
  40873. begin
  40874. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  40875. end;
  40876. procedure TSPI4_SPI3ACON.setSSEN; inline;
  40877. begin
  40878. pTDefRegMap(@Self)^.&set := $00000080;
  40879. end;
  40880. procedure TSPI4_SPI3ACON.clearSSEN; inline;
  40881. begin
  40882. pTDefRegMap(@Self)^.clr := $00000080;
  40883. end;
  40884. procedure TSPI4_SPI3ACON.setSSEN(thebits : TBits_1); inline;
  40885. begin
  40886. if thebits = 0 then
  40887. pTDefRegMap(@Self)^.clr := $00000080
  40888. else
  40889. pTDefRegMap(@Self)^.&set := $00000080;
  40890. end;
  40891. function TSPI4_SPI3ACON.getSSEN : TBits_1; inline;
  40892. begin
  40893. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  40894. end;
  40895. procedure TSPI4_SPI3ACON.setCKE; inline;
  40896. begin
  40897. pTDefRegMap(@Self)^.&set := $00000100;
  40898. end;
  40899. procedure TSPI4_SPI3ACON.clearCKE; inline;
  40900. begin
  40901. pTDefRegMap(@Self)^.clr := $00000100;
  40902. end;
  40903. procedure TSPI4_SPI3ACON.setCKE(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 TSPI4_SPI3ACON.getCKE : TBits_1; inline;
  40911. begin
  40912. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  40913. end;
  40914. procedure TSPI4_SPI3ACON.setSMP; inline;
  40915. begin
  40916. pTDefRegMap(@Self)^.&set := $00000200;
  40917. end;
  40918. procedure TSPI4_SPI3ACON.clearSMP; inline;
  40919. begin
  40920. pTDefRegMap(@Self)^.clr := $00000200;
  40921. end;
  40922. procedure TSPI4_SPI3ACON.setSMP(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 TSPI4_SPI3ACON.getSMP : TBits_1; inline;
  40930. begin
  40931. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  40932. end;
  40933. procedure TSPI4_SPI3ACON.setMODE16; inline;
  40934. begin
  40935. pTDefRegMap(@Self)^.&set := $00000400;
  40936. end;
  40937. procedure TSPI4_SPI3ACON.clearMODE16; inline;
  40938. begin
  40939. pTDefRegMap(@Self)^.clr := $00000400;
  40940. end;
  40941. procedure TSPI4_SPI3ACON.setMODE16(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 TSPI4_SPI3ACON.getMODE16 : TBits_1; inline;
  40949. begin
  40950. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  40951. end;
  40952. procedure TSPI4_SPI3ACON.setMODE32; inline;
  40953. begin
  40954. pTDefRegMap(@Self)^.&set := $00000800;
  40955. end;
  40956. procedure TSPI4_SPI3ACON.clearMODE32; inline;
  40957. begin
  40958. pTDefRegMap(@Self)^.clr := $00000800;
  40959. end;
  40960. procedure TSPI4_SPI3ACON.setMODE32(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 TSPI4_SPI3ACON.getMODE32 : TBits_1; inline;
  40968. begin
  40969. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  40970. end;
  40971. procedure TSPI4_SPI3ACON.setDISSDO; inline;
  40972. begin
  40973. pTDefRegMap(@Self)^.&set := $00001000;
  40974. end;
  40975. procedure TSPI4_SPI3ACON.clearDISSDO; inline;
  40976. begin
  40977. pTDefRegMap(@Self)^.clr := $00001000;
  40978. end;
  40979. procedure TSPI4_SPI3ACON.setDISSDO(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 TSPI4_SPI3ACON.getDISSDO : TBits_1; inline;
  40987. begin
  40988. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  40989. end;
  40990. procedure TSPI4_SPI3ACON.setSIDL; inline;
  40991. begin
  40992. pTDefRegMap(@Self)^.&set := $00002000;
  40993. end;
  40994. procedure TSPI4_SPI3ACON.clearSIDL; inline;
  40995. begin
  40996. pTDefRegMap(@Self)^.clr := $00002000;
  40997. end;
  40998. procedure TSPI4_SPI3ACON.setSIDL(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 TSPI4_SPI3ACON.getSIDL : TBits_1; inline;
  41006. begin
  41007. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41008. end;
  41009. procedure TSPI4_SPI3ACON.setON; inline;
  41010. begin
  41011. pTDefRegMap(@Self)^.&set := $00008000;
  41012. end;
  41013. procedure TSPI4_SPI3ACON.clearON; inline;
  41014. begin
  41015. pTDefRegMap(@Self)^.clr := $00008000;
  41016. end;
  41017. procedure TSPI4_SPI3ACON.setON(thebits : TBits_1); inline;
  41018. begin
  41019. if thebits = 0 then
  41020. pTDefRegMap(@Self)^.clr := $00008000
  41021. else
  41022. pTDefRegMap(@Self)^.&set := $00008000;
  41023. end;
  41024. function TSPI4_SPI3ACON.getON : TBits_1; inline;
  41025. begin
  41026. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41027. end;
  41028. procedure TSPI4_SPI3ACON.setENHBUF; inline;
  41029. begin
  41030. pTDefRegMap(@Self)^.&set := $00010000;
  41031. end;
  41032. procedure TSPI4_SPI3ACON.clearENHBUF; inline;
  41033. begin
  41034. pTDefRegMap(@Self)^.clr := $00010000;
  41035. end;
  41036. procedure TSPI4_SPI3ACON.setENHBUF(thebits : TBits_1); inline;
  41037. begin
  41038. if thebits = 0 then
  41039. pTDefRegMap(@Self)^.clr := $00010000
  41040. else
  41041. pTDefRegMap(@Self)^.&set := $00010000;
  41042. end;
  41043. function TSPI4_SPI3ACON.getENHBUF : TBits_1; inline;
  41044. begin
  41045. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  41046. end;
  41047. procedure TSPI4_SPI3ACON.setSPIFE; inline;
  41048. begin
  41049. pTDefRegMap(@Self)^.&set := $00020000;
  41050. end;
  41051. procedure TSPI4_SPI3ACON.clearSPIFE; inline;
  41052. begin
  41053. pTDefRegMap(@Self)^.clr := $00020000;
  41054. end;
  41055. procedure TSPI4_SPI3ACON.setSPIFE(thebits : TBits_1); inline;
  41056. begin
  41057. if thebits = 0 then
  41058. pTDefRegMap(@Self)^.clr := $00020000
  41059. else
  41060. pTDefRegMap(@Self)^.&set := $00020000;
  41061. end;
  41062. function TSPI4_SPI3ACON.getSPIFE : TBits_1; inline;
  41063. begin
  41064. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  41065. end;
  41066. procedure TSPI4_SPI3ACON.setFRMCNT(thebits : TBits_3); inline;
  41067. begin
  41068. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  41069. end;
  41070. function TSPI4_SPI3ACON.getFRMCNT : TBits_3; inline;
  41071. begin
  41072. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  41073. end;
  41074. procedure TSPI4_SPI3ACON.setFRMSYPW; inline;
  41075. begin
  41076. pTDefRegMap(@Self)^.&set := $08000000;
  41077. end;
  41078. procedure TSPI4_SPI3ACON.clearFRMSYPW; inline;
  41079. begin
  41080. pTDefRegMap(@Self)^.clr := $08000000;
  41081. end;
  41082. procedure TSPI4_SPI3ACON.setFRMSYPW(thebits : TBits_1); inline;
  41083. begin
  41084. if thebits = 0 then
  41085. pTDefRegMap(@Self)^.clr := $08000000
  41086. else
  41087. pTDefRegMap(@Self)^.&set := $08000000;
  41088. end;
  41089. function TSPI4_SPI3ACON.getFRMSYPW : TBits_1; inline;
  41090. begin
  41091. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  41092. end;
  41093. procedure TSPI4_SPI3ACON.setMSSEN; inline;
  41094. begin
  41095. pTDefRegMap(@Self)^.&set := $10000000;
  41096. end;
  41097. procedure TSPI4_SPI3ACON.clearMSSEN; inline;
  41098. begin
  41099. pTDefRegMap(@Self)^.clr := $10000000;
  41100. end;
  41101. procedure TSPI4_SPI3ACON.setMSSEN(thebits : TBits_1); inline;
  41102. begin
  41103. if thebits = 0 then
  41104. pTDefRegMap(@Self)^.clr := $10000000
  41105. else
  41106. pTDefRegMap(@Self)^.&set := $10000000;
  41107. end;
  41108. function TSPI4_SPI3ACON.getMSSEN : TBits_1; inline;
  41109. begin
  41110. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  41111. end;
  41112. procedure TSPI4_SPI3ACON.setFRMPOL; inline;
  41113. begin
  41114. pTDefRegMap(@Self)^.&set := $20000000;
  41115. end;
  41116. procedure TSPI4_SPI3ACON.clearFRMPOL; inline;
  41117. begin
  41118. pTDefRegMap(@Self)^.clr := $20000000;
  41119. end;
  41120. procedure TSPI4_SPI3ACON.setFRMPOL(thebits : TBits_1); inline;
  41121. begin
  41122. if thebits = 0 then
  41123. pTDefRegMap(@Self)^.clr := $20000000
  41124. else
  41125. pTDefRegMap(@Self)^.&set := $20000000;
  41126. end;
  41127. function TSPI4_SPI3ACON.getFRMPOL : TBits_1; inline;
  41128. begin
  41129. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  41130. end;
  41131. procedure TSPI4_SPI3ACON.setFRMSYNC; inline;
  41132. begin
  41133. pTDefRegMap(@Self)^.&set := $40000000;
  41134. end;
  41135. procedure TSPI4_SPI3ACON.clearFRMSYNC; inline;
  41136. begin
  41137. pTDefRegMap(@Self)^.clr := $40000000;
  41138. end;
  41139. procedure TSPI4_SPI3ACON.setFRMSYNC(thebits : TBits_1); inline;
  41140. begin
  41141. if thebits = 0 then
  41142. pTDefRegMap(@Self)^.clr := $40000000
  41143. else
  41144. pTDefRegMap(@Self)^.&set := $40000000;
  41145. end;
  41146. function TSPI4_SPI3ACON.getFRMSYNC : TBits_1; inline;
  41147. begin
  41148. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  41149. end;
  41150. procedure TSPI4_SPI3ACON.setFRMEN; inline;
  41151. begin
  41152. pTDefRegMap(@Self)^.&set := $80000000;
  41153. end;
  41154. procedure TSPI4_SPI3ACON.clearFRMEN; inline;
  41155. begin
  41156. pTDefRegMap(@Self)^.clr := $80000000;
  41157. end;
  41158. procedure TSPI4_SPI3ACON.setFRMEN(thebits : TBits_1); inline;
  41159. begin
  41160. if thebits = 0 then
  41161. pTDefRegMap(@Self)^.clr := $80000000
  41162. else
  41163. pTDefRegMap(@Self)^.&set := $80000000;
  41164. end;
  41165. function TSPI4_SPI3ACON.getFRMEN : TBits_1; inline;
  41166. begin
  41167. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  41168. end;
  41169. procedure TSPI4_SPI3ACON.setw(thebits : TBits_32); inline;
  41170. begin
  41171. pTDefRegMap(@Self)^.val := thebits;
  41172. end;
  41173. function TSPI4_SPI3ACON.getw : TBits_32; inline;
  41174. begin
  41175. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41176. end;
  41177. procedure TSPI4_SPI4CON.setSRXISEL(thebits : TBits_2); inline;
  41178. begin
  41179. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  41180. end;
  41181. function TSPI4_SPI4CON.getSRXISEL : TBits_2; inline;
  41182. begin
  41183. getSRXISEL := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  41184. end;
  41185. procedure TSPI4_SPI4CON.setSTXISEL(thebits : TBits_2); inline;
  41186. begin
  41187. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF3 or ( thebits shl 2 );
  41188. end;
  41189. function TSPI4_SPI4CON.getSTXISEL : TBits_2; inline;
  41190. begin
  41191. getSTXISEL := (pTDefRegMap(@Self)^.val and $0000000C) shr 2;
  41192. end;
  41193. procedure TSPI4_SPI4CON.setMSTEN; inline;
  41194. begin
  41195. pTDefRegMap(@Self)^.&set := $00000020;
  41196. end;
  41197. procedure TSPI4_SPI4CON.clearMSTEN; inline;
  41198. begin
  41199. pTDefRegMap(@Self)^.clr := $00000020;
  41200. end;
  41201. procedure TSPI4_SPI4CON.setMSTEN(thebits : TBits_1); inline;
  41202. begin
  41203. if thebits = 0 then
  41204. pTDefRegMap(@Self)^.clr := $00000020
  41205. else
  41206. pTDefRegMap(@Self)^.&set := $00000020;
  41207. end;
  41208. function TSPI4_SPI4CON.getMSTEN : TBits_1; inline;
  41209. begin
  41210. getMSTEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41211. end;
  41212. procedure TSPI4_SPI4CON.setCKP; inline;
  41213. begin
  41214. pTDefRegMap(@Self)^.&set := $00000040;
  41215. end;
  41216. procedure TSPI4_SPI4CON.clearCKP; inline;
  41217. begin
  41218. pTDefRegMap(@Self)^.clr := $00000040;
  41219. end;
  41220. procedure TSPI4_SPI4CON.setCKP(thebits : TBits_1); inline;
  41221. begin
  41222. if thebits = 0 then
  41223. pTDefRegMap(@Self)^.clr := $00000040
  41224. else
  41225. pTDefRegMap(@Self)^.&set := $00000040;
  41226. end;
  41227. function TSPI4_SPI4CON.getCKP : TBits_1; inline;
  41228. begin
  41229. getCKP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41230. end;
  41231. procedure TSPI4_SPI4CON.setSSEN; inline;
  41232. begin
  41233. pTDefRegMap(@Self)^.&set := $00000080;
  41234. end;
  41235. procedure TSPI4_SPI4CON.clearSSEN; inline;
  41236. begin
  41237. pTDefRegMap(@Self)^.clr := $00000080;
  41238. end;
  41239. procedure TSPI4_SPI4CON.setSSEN(thebits : TBits_1); inline;
  41240. begin
  41241. if thebits = 0 then
  41242. pTDefRegMap(@Self)^.clr := $00000080
  41243. else
  41244. pTDefRegMap(@Self)^.&set := $00000080;
  41245. end;
  41246. function TSPI4_SPI4CON.getSSEN : TBits_1; inline;
  41247. begin
  41248. getSSEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41249. end;
  41250. procedure TSPI4_SPI4CON.setCKE; inline;
  41251. begin
  41252. pTDefRegMap(@Self)^.&set := $00000100;
  41253. end;
  41254. procedure TSPI4_SPI4CON.clearCKE; inline;
  41255. begin
  41256. pTDefRegMap(@Self)^.clr := $00000100;
  41257. end;
  41258. procedure TSPI4_SPI4CON.setCKE(thebits : TBits_1); inline;
  41259. begin
  41260. if thebits = 0 then
  41261. pTDefRegMap(@Self)^.clr := $00000100
  41262. else
  41263. pTDefRegMap(@Self)^.&set := $00000100;
  41264. end;
  41265. function TSPI4_SPI4CON.getCKE : TBits_1; inline;
  41266. begin
  41267. getCKE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41268. end;
  41269. procedure TSPI4_SPI4CON.setSMP; inline;
  41270. begin
  41271. pTDefRegMap(@Self)^.&set := $00000200;
  41272. end;
  41273. procedure TSPI4_SPI4CON.clearSMP; inline;
  41274. begin
  41275. pTDefRegMap(@Self)^.clr := $00000200;
  41276. end;
  41277. procedure TSPI4_SPI4CON.setSMP(thebits : TBits_1); inline;
  41278. begin
  41279. if thebits = 0 then
  41280. pTDefRegMap(@Self)^.clr := $00000200
  41281. else
  41282. pTDefRegMap(@Self)^.&set := $00000200;
  41283. end;
  41284. function TSPI4_SPI4CON.getSMP : TBits_1; inline;
  41285. begin
  41286. getSMP := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  41287. end;
  41288. procedure TSPI4_SPI4CON.setMODE16; inline;
  41289. begin
  41290. pTDefRegMap(@Self)^.&set := $00000400;
  41291. end;
  41292. procedure TSPI4_SPI4CON.clearMODE16; inline;
  41293. begin
  41294. pTDefRegMap(@Self)^.clr := $00000400;
  41295. end;
  41296. procedure TSPI4_SPI4CON.setMODE16(thebits : TBits_1); inline;
  41297. begin
  41298. if thebits = 0 then
  41299. pTDefRegMap(@Self)^.clr := $00000400
  41300. else
  41301. pTDefRegMap(@Self)^.&set := $00000400;
  41302. end;
  41303. function TSPI4_SPI4CON.getMODE16 : TBits_1; inline;
  41304. begin
  41305. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  41306. end;
  41307. procedure TSPI4_SPI4CON.setMODE32; inline;
  41308. begin
  41309. pTDefRegMap(@Self)^.&set := $00000800;
  41310. end;
  41311. procedure TSPI4_SPI4CON.clearMODE32; inline;
  41312. begin
  41313. pTDefRegMap(@Self)^.clr := $00000800;
  41314. end;
  41315. procedure TSPI4_SPI4CON.setMODE32(thebits : TBits_1); inline;
  41316. begin
  41317. if thebits = 0 then
  41318. pTDefRegMap(@Self)^.clr := $00000800
  41319. else
  41320. pTDefRegMap(@Self)^.&set := $00000800;
  41321. end;
  41322. function TSPI4_SPI4CON.getMODE32 : TBits_1; inline;
  41323. begin
  41324. getMODE32 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41325. end;
  41326. procedure TSPI4_SPI4CON.setDISSDO; inline;
  41327. begin
  41328. pTDefRegMap(@Self)^.&set := $00001000;
  41329. end;
  41330. procedure TSPI4_SPI4CON.clearDISSDO; inline;
  41331. begin
  41332. pTDefRegMap(@Self)^.clr := $00001000;
  41333. end;
  41334. procedure TSPI4_SPI4CON.setDISSDO(thebits : TBits_1); inline;
  41335. begin
  41336. if thebits = 0 then
  41337. pTDefRegMap(@Self)^.clr := $00001000
  41338. else
  41339. pTDefRegMap(@Self)^.&set := $00001000;
  41340. end;
  41341. function TSPI4_SPI4CON.getDISSDO : TBits_1; inline;
  41342. begin
  41343. getDISSDO := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  41344. end;
  41345. procedure TSPI4_SPI4CON.setSIDL; inline;
  41346. begin
  41347. pTDefRegMap(@Self)^.&set := $00002000;
  41348. end;
  41349. procedure TSPI4_SPI4CON.clearSIDL; inline;
  41350. begin
  41351. pTDefRegMap(@Self)^.clr := $00002000;
  41352. end;
  41353. procedure TSPI4_SPI4CON.setSIDL(thebits : TBits_1); inline;
  41354. begin
  41355. if thebits = 0 then
  41356. pTDefRegMap(@Self)^.clr := $00002000
  41357. else
  41358. pTDefRegMap(@Self)^.&set := $00002000;
  41359. end;
  41360. function TSPI4_SPI4CON.getSIDL : TBits_1; inline;
  41361. begin
  41362. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  41363. end;
  41364. procedure TSPI4_SPI4CON.setON; inline;
  41365. begin
  41366. pTDefRegMap(@Self)^.&set := $00008000;
  41367. end;
  41368. procedure TSPI4_SPI4CON.clearON; inline;
  41369. begin
  41370. pTDefRegMap(@Self)^.clr := $00008000;
  41371. end;
  41372. procedure TSPI4_SPI4CON.setON(thebits : TBits_1); inline;
  41373. begin
  41374. if thebits = 0 then
  41375. pTDefRegMap(@Self)^.clr := $00008000
  41376. else
  41377. pTDefRegMap(@Self)^.&set := $00008000;
  41378. end;
  41379. function TSPI4_SPI4CON.getON : TBits_1; inline;
  41380. begin
  41381. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  41382. end;
  41383. procedure TSPI4_SPI4CON.setENHBUF; inline;
  41384. begin
  41385. pTDefRegMap(@Self)^.&set := $00010000;
  41386. end;
  41387. procedure TSPI4_SPI4CON.clearENHBUF; inline;
  41388. begin
  41389. pTDefRegMap(@Self)^.clr := $00010000;
  41390. end;
  41391. procedure TSPI4_SPI4CON.setENHBUF(thebits : TBits_1); inline;
  41392. begin
  41393. if thebits = 0 then
  41394. pTDefRegMap(@Self)^.clr := $00010000
  41395. else
  41396. pTDefRegMap(@Self)^.&set := $00010000;
  41397. end;
  41398. function TSPI4_SPI4CON.getENHBUF : TBits_1; inline;
  41399. begin
  41400. getENHBUF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  41401. end;
  41402. procedure TSPI4_SPI4CON.setSPIFE; inline;
  41403. begin
  41404. pTDefRegMap(@Self)^.&set := $00020000;
  41405. end;
  41406. procedure TSPI4_SPI4CON.clearSPIFE; inline;
  41407. begin
  41408. pTDefRegMap(@Self)^.clr := $00020000;
  41409. end;
  41410. procedure TSPI4_SPI4CON.setSPIFE(thebits : TBits_1); inline;
  41411. begin
  41412. if thebits = 0 then
  41413. pTDefRegMap(@Self)^.clr := $00020000
  41414. else
  41415. pTDefRegMap(@Self)^.&set := $00020000;
  41416. end;
  41417. function TSPI4_SPI4CON.getSPIFE : TBits_1; inline;
  41418. begin
  41419. getSPIFE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  41420. end;
  41421. procedure TSPI4_SPI4CON.setFRMCNT(thebits : TBits_3); inline;
  41422. begin
  41423. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  41424. end;
  41425. function TSPI4_SPI4CON.getFRMCNT : TBits_3; inline;
  41426. begin
  41427. getFRMCNT := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  41428. end;
  41429. procedure TSPI4_SPI4CON.setFRMSYPW; inline;
  41430. begin
  41431. pTDefRegMap(@Self)^.&set := $08000000;
  41432. end;
  41433. procedure TSPI4_SPI4CON.clearFRMSYPW; inline;
  41434. begin
  41435. pTDefRegMap(@Self)^.clr := $08000000;
  41436. end;
  41437. procedure TSPI4_SPI4CON.setFRMSYPW(thebits : TBits_1); inline;
  41438. begin
  41439. if thebits = 0 then
  41440. pTDefRegMap(@Self)^.clr := $08000000
  41441. else
  41442. pTDefRegMap(@Self)^.&set := $08000000;
  41443. end;
  41444. function TSPI4_SPI4CON.getFRMSYPW : TBits_1; inline;
  41445. begin
  41446. getFRMSYPW := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  41447. end;
  41448. procedure TSPI4_SPI4CON.setMSSEN; inline;
  41449. begin
  41450. pTDefRegMap(@Self)^.&set := $10000000;
  41451. end;
  41452. procedure TSPI4_SPI4CON.clearMSSEN; inline;
  41453. begin
  41454. pTDefRegMap(@Self)^.clr := $10000000;
  41455. end;
  41456. procedure TSPI4_SPI4CON.setMSSEN(thebits : TBits_1); inline;
  41457. begin
  41458. if thebits = 0 then
  41459. pTDefRegMap(@Self)^.clr := $10000000
  41460. else
  41461. pTDefRegMap(@Self)^.&set := $10000000;
  41462. end;
  41463. function TSPI4_SPI4CON.getMSSEN : TBits_1; inline;
  41464. begin
  41465. getMSSEN := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  41466. end;
  41467. procedure TSPI4_SPI4CON.setFRMPOL; inline;
  41468. begin
  41469. pTDefRegMap(@Self)^.&set := $20000000;
  41470. end;
  41471. procedure TSPI4_SPI4CON.clearFRMPOL; inline;
  41472. begin
  41473. pTDefRegMap(@Self)^.clr := $20000000;
  41474. end;
  41475. procedure TSPI4_SPI4CON.setFRMPOL(thebits : TBits_1); inline;
  41476. begin
  41477. if thebits = 0 then
  41478. pTDefRegMap(@Self)^.clr := $20000000
  41479. else
  41480. pTDefRegMap(@Self)^.&set := $20000000;
  41481. end;
  41482. function TSPI4_SPI4CON.getFRMPOL : TBits_1; inline;
  41483. begin
  41484. getFRMPOL := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  41485. end;
  41486. procedure TSPI4_SPI4CON.setFRMSYNC; inline;
  41487. begin
  41488. pTDefRegMap(@Self)^.&set := $40000000;
  41489. end;
  41490. procedure TSPI4_SPI4CON.clearFRMSYNC; inline;
  41491. begin
  41492. pTDefRegMap(@Self)^.clr := $40000000;
  41493. end;
  41494. procedure TSPI4_SPI4CON.setFRMSYNC(thebits : TBits_1); inline;
  41495. begin
  41496. if thebits = 0 then
  41497. pTDefRegMap(@Self)^.clr := $40000000
  41498. else
  41499. pTDefRegMap(@Self)^.&set := $40000000;
  41500. end;
  41501. function TSPI4_SPI4CON.getFRMSYNC : TBits_1; inline;
  41502. begin
  41503. getFRMSYNC := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  41504. end;
  41505. procedure TSPI4_SPI4CON.setFRMEN; inline;
  41506. begin
  41507. pTDefRegMap(@Self)^.&set := $80000000;
  41508. end;
  41509. procedure TSPI4_SPI4CON.clearFRMEN; inline;
  41510. begin
  41511. pTDefRegMap(@Self)^.clr := $80000000;
  41512. end;
  41513. procedure TSPI4_SPI4CON.setFRMEN(thebits : TBits_1); inline;
  41514. begin
  41515. if thebits = 0 then
  41516. pTDefRegMap(@Self)^.clr := $80000000
  41517. else
  41518. pTDefRegMap(@Self)^.&set := $80000000;
  41519. end;
  41520. function TSPI4_SPI4CON.getFRMEN : TBits_1; inline;
  41521. begin
  41522. getFRMEN := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  41523. end;
  41524. procedure TSPI4_SPI4CON.setw(thebits : TBits_32); inline;
  41525. begin
  41526. pTDefRegMap(@Self)^.val := thebits;
  41527. end;
  41528. function TSPI4_SPI4CON.getw : TBits_32; inline;
  41529. begin
  41530. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41531. end;
  41532. procedure TSPI4_SPI3ASTAT.setSPIRBF; inline;
  41533. begin
  41534. pTDefRegMap(@Self)^.&set := $00000001;
  41535. end;
  41536. procedure TSPI4_SPI3ASTAT.clearSPIRBF; inline;
  41537. begin
  41538. pTDefRegMap(@Self)^.clr := $00000001;
  41539. end;
  41540. procedure TSPI4_SPI3ASTAT.setSPIRBF(thebits : TBits_1); inline;
  41541. begin
  41542. if thebits = 0 then
  41543. pTDefRegMap(@Self)^.clr := $00000001
  41544. else
  41545. pTDefRegMap(@Self)^.&set := $00000001;
  41546. end;
  41547. function TSPI4_SPI3ASTAT.getSPIRBF : TBits_1; inline;
  41548. begin
  41549. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41550. end;
  41551. procedure TSPI4_SPI3ASTAT.setSPITBF; inline;
  41552. begin
  41553. pTDefRegMap(@Self)^.&set := $00000002;
  41554. end;
  41555. procedure TSPI4_SPI3ASTAT.clearSPITBF; inline;
  41556. begin
  41557. pTDefRegMap(@Self)^.clr := $00000002;
  41558. end;
  41559. procedure TSPI4_SPI3ASTAT.setSPITBF(thebits : TBits_1); inline;
  41560. begin
  41561. if thebits = 0 then
  41562. pTDefRegMap(@Self)^.clr := $00000002
  41563. else
  41564. pTDefRegMap(@Self)^.&set := $00000002;
  41565. end;
  41566. function TSPI4_SPI3ASTAT.getSPITBF : TBits_1; inline;
  41567. begin
  41568. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41569. end;
  41570. procedure TSPI4_SPI3ASTAT.setSPITBE; inline;
  41571. begin
  41572. pTDefRegMap(@Self)^.&set := $00000008;
  41573. end;
  41574. procedure TSPI4_SPI3ASTAT.clearSPITBE; inline;
  41575. begin
  41576. pTDefRegMap(@Self)^.clr := $00000008;
  41577. end;
  41578. procedure TSPI4_SPI3ASTAT.setSPITBE(thebits : TBits_1); inline;
  41579. begin
  41580. if thebits = 0 then
  41581. pTDefRegMap(@Self)^.clr := $00000008
  41582. else
  41583. pTDefRegMap(@Self)^.&set := $00000008;
  41584. end;
  41585. function TSPI4_SPI3ASTAT.getSPITBE : TBits_1; inline;
  41586. begin
  41587. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41588. end;
  41589. procedure TSPI4_SPI3ASTAT.setSPIRBE; inline;
  41590. begin
  41591. pTDefRegMap(@Self)^.&set := $00000020;
  41592. end;
  41593. procedure TSPI4_SPI3ASTAT.clearSPIRBE; inline;
  41594. begin
  41595. pTDefRegMap(@Self)^.clr := $00000020;
  41596. end;
  41597. procedure TSPI4_SPI3ASTAT.setSPIRBE(thebits : TBits_1); inline;
  41598. begin
  41599. if thebits = 0 then
  41600. pTDefRegMap(@Self)^.clr := $00000020
  41601. else
  41602. pTDefRegMap(@Self)^.&set := $00000020;
  41603. end;
  41604. function TSPI4_SPI3ASTAT.getSPIRBE : TBits_1; inline;
  41605. begin
  41606. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41607. end;
  41608. procedure TSPI4_SPI3ASTAT.setSPIROV; inline;
  41609. begin
  41610. pTDefRegMap(@Self)^.&set := $00000040;
  41611. end;
  41612. procedure TSPI4_SPI3ASTAT.clearSPIROV; inline;
  41613. begin
  41614. pTDefRegMap(@Self)^.clr := $00000040;
  41615. end;
  41616. procedure TSPI4_SPI3ASTAT.setSPIROV(thebits : TBits_1); inline;
  41617. begin
  41618. if thebits = 0 then
  41619. pTDefRegMap(@Self)^.clr := $00000040
  41620. else
  41621. pTDefRegMap(@Self)^.&set := $00000040;
  41622. end;
  41623. function TSPI4_SPI3ASTAT.getSPIROV : TBits_1; inline;
  41624. begin
  41625. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41626. end;
  41627. procedure TSPI4_SPI3ASTAT.setSRMT; inline;
  41628. begin
  41629. pTDefRegMap(@Self)^.&set := $00000080;
  41630. end;
  41631. procedure TSPI4_SPI3ASTAT.clearSRMT; inline;
  41632. begin
  41633. pTDefRegMap(@Self)^.clr := $00000080;
  41634. end;
  41635. procedure TSPI4_SPI3ASTAT.setSRMT(thebits : TBits_1); inline;
  41636. begin
  41637. if thebits = 0 then
  41638. pTDefRegMap(@Self)^.clr := $00000080
  41639. else
  41640. pTDefRegMap(@Self)^.&set := $00000080;
  41641. end;
  41642. function TSPI4_SPI3ASTAT.getSRMT : TBits_1; inline;
  41643. begin
  41644. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41645. end;
  41646. procedure TSPI4_SPI3ASTAT.setSPITUR; inline;
  41647. begin
  41648. pTDefRegMap(@Self)^.&set := $00000100;
  41649. end;
  41650. procedure TSPI4_SPI3ASTAT.clearSPITUR; inline;
  41651. begin
  41652. pTDefRegMap(@Self)^.clr := $00000100;
  41653. end;
  41654. procedure TSPI4_SPI3ASTAT.setSPITUR(thebits : TBits_1); inline;
  41655. begin
  41656. if thebits = 0 then
  41657. pTDefRegMap(@Self)^.clr := $00000100
  41658. else
  41659. pTDefRegMap(@Self)^.&set := $00000100;
  41660. end;
  41661. function TSPI4_SPI3ASTAT.getSPITUR : TBits_1; inline;
  41662. begin
  41663. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41664. end;
  41665. procedure TSPI4_SPI3ASTAT.setSPIBUSY; inline;
  41666. begin
  41667. pTDefRegMap(@Self)^.&set := $00000800;
  41668. end;
  41669. procedure TSPI4_SPI3ASTAT.clearSPIBUSY; inline;
  41670. begin
  41671. pTDefRegMap(@Self)^.clr := $00000800;
  41672. end;
  41673. procedure TSPI4_SPI3ASTAT.setSPIBUSY(thebits : TBits_1); inline;
  41674. begin
  41675. if thebits = 0 then
  41676. pTDefRegMap(@Self)^.clr := $00000800
  41677. else
  41678. pTDefRegMap(@Self)^.&set := $00000800;
  41679. end;
  41680. function TSPI4_SPI3ASTAT.getSPIBUSY : TBits_1; inline;
  41681. begin
  41682. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41683. end;
  41684. procedure TSPI4_SPI3ASTAT.setTXBUFELM(thebits : TBits_5); inline;
  41685. begin
  41686. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  41687. end;
  41688. function TSPI4_SPI3ASTAT.getTXBUFELM : TBits_5; inline;
  41689. begin
  41690. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  41691. end;
  41692. procedure TSPI4_SPI3ASTAT.setRXBUFELM(thebits : TBits_5); inline;
  41693. begin
  41694. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  41695. end;
  41696. function TSPI4_SPI3ASTAT.getRXBUFELM : TBits_5; inline;
  41697. begin
  41698. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  41699. end;
  41700. procedure TSPI4_SPI3ASTAT.setw(thebits : TBits_32); inline;
  41701. begin
  41702. pTDefRegMap(@Self)^.val := thebits;
  41703. end;
  41704. function TSPI4_SPI3ASTAT.getw : TBits_32; inline;
  41705. begin
  41706. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41707. end;
  41708. procedure TSPI4_SPI4STAT.setSPIRBF; inline;
  41709. begin
  41710. pTDefRegMap(@Self)^.&set := $00000001;
  41711. end;
  41712. procedure TSPI4_SPI4STAT.clearSPIRBF; inline;
  41713. begin
  41714. pTDefRegMap(@Self)^.clr := $00000001;
  41715. end;
  41716. procedure TSPI4_SPI4STAT.setSPIRBF(thebits : TBits_1); inline;
  41717. begin
  41718. if thebits = 0 then
  41719. pTDefRegMap(@Self)^.clr := $00000001
  41720. else
  41721. pTDefRegMap(@Self)^.&set := $00000001;
  41722. end;
  41723. function TSPI4_SPI4STAT.getSPIRBF : TBits_1; inline;
  41724. begin
  41725. getSPIRBF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41726. end;
  41727. procedure TSPI4_SPI4STAT.setSPITBF; inline;
  41728. begin
  41729. pTDefRegMap(@Self)^.&set := $00000002;
  41730. end;
  41731. procedure TSPI4_SPI4STAT.clearSPITBF; inline;
  41732. begin
  41733. pTDefRegMap(@Self)^.clr := $00000002;
  41734. end;
  41735. procedure TSPI4_SPI4STAT.setSPITBF(thebits : TBits_1); inline;
  41736. begin
  41737. if thebits = 0 then
  41738. pTDefRegMap(@Self)^.clr := $00000002
  41739. else
  41740. pTDefRegMap(@Self)^.&set := $00000002;
  41741. end;
  41742. function TSPI4_SPI4STAT.getSPITBF : TBits_1; inline;
  41743. begin
  41744. getSPITBF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  41745. end;
  41746. procedure TSPI4_SPI4STAT.setSPITBE; inline;
  41747. begin
  41748. pTDefRegMap(@Self)^.&set := $00000008;
  41749. end;
  41750. procedure TSPI4_SPI4STAT.clearSPITBE; inline;
  41751. begin
  41752. pTDefRegMap(@Self)^.clr := $00000008;
  41753. end;
  41754. procedure TSPI4_SPI4STAT.setSPITBE(thebits : TBits_1); inline;
  41755. begin
  41756. if thebits = 0 then
  41757. pTDefRegMap(@Self)^.clr := $00000008
  41758. else
  41759. pTDefRegMap(@Self)^.&set := $00000008;
  41760. end;
  41761. function TSPI4_SPI4STAT.getSPITBE : TBits_1; inline;
  41762. begin
  41763. getSPITBE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41764. end;
  41765. procedure TSPI4_SPI4STAT.setSPIRBE; inline;
  41766. begin
  41767. pTDefRegMap(@Self)^.&set := $00000020;
  41768. end;
  41769. procedure TSPI4_SPI4STAT.clearSPIRBE; inline;
  41770. begin
  41771. pTDefRegMap(@Self)^.clr := $00000020;
  41772. end;
  41773. procedure TSPI4_SPI4STAT.setSPIRBE(thebits : TBits_1); inline;
  41774. begin
  41775. if thebits = 0 then
  41776. pTDefRegMap(@Self)^.clr := $00000020
  41777. else
  41778. pTDefRegMap(@Self)^.&set := $00000020;
  41779. end;
  41780. function TSPI4_SPI4STAT.getSPIRBE : TBits_1; inline;
  41781. begin
  41782. getSPIRBE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41783. end;
  41784. procedure TSPI4_SPI4STAT.setSPIROV; inline;
  41785. begin
  41786. pTDefRegMap(@Self)^.&set := $00000040;
  41787. end;
  41788. procedure TSPI4_SPI4STAT.clearSPIROV; inline;
  41789. begin
  41790. pTDefRegMap(@Self)^.clr := $00000040;
  41791. end;
  41792. procedure TSPI4_SPI4STAT.setSPIROV(thebits : TBits_1); inline;
  41793. begin
  41794. if thebits = 0 then
  41795. pTDefRegMap(@Self)^.clr := $00000040
  41796. else
  41797. pTDefRegMap(@Self)^.&set := $00000040;
  41798. end;
  41799. function TSPI4_SPI4STAT.getSPIROV : TBits_1; inline;
  41800. begin
  41801. getSPIROV := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41802. end;
  41803. procedure TSPI4_SPI4STAT.setSRMT; inline;
  41804. begin
  41805. pTDefRegMap(@Self)^.&set := $00000080;
  41806. end;
  41807. procedure TSPI4_SPI4STAT.clearSRMT; inline;
  41808. begin
  41809. pTDefRegMap(@Self)^.clr := $00000080;
  41810. end;
  41811. procedure TSPI4_SPI4STAT.setSRMT(thebits : TBits_1); inline;
  41812. begin
  41813. if thebits = 0 then
  41814. pTDefRegMap(@Self)^.clr := $00000080
  41815. else
  41816. pTDefRegMap(@Self)^.&set := $00000080;
  41817. end;
  41818. function TSPI4_SPI4STAT.getSRMT : TBits_1; inline;
  41819. begin
  41820. getSRMT := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  41821. end;
  41822. procedure TSPI4_SPI4STAT.setSPITUR; inline;
  41823. begin
  41824. pTDefRegMap(@Self)^.&set := $00000100;
  41825. end;
  41826. procedure TSPI4_SPI4STAT.clearSPITUR; inline;
  41827. begin
  41828. pTDefRegMap(@Self)^.clr := $00000100;
  41829. end;
  41830. procedure TSPI4_SPI4STAT.setSPITUR(thebits : TBits_1); inline;
  41831. begin
  41832. if thebits = 0 then
  41833. pTDefRegMap(@Self)^.clr := $00000100
  41834. else
  41835. pTDefRegMap(@Self)^.&set := $00000100;
  41836. end;
  41837. function TSPI4_SPI4STAT.getSPITUR : TBits_1; inline;
  41838. begin
  41839. getSPITUR := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  41840. end;
  41841. procedure TSPI4_SPI4STAT.setSPIBUSY; inline;
  41842. begin
  41843. pTDefRegMap(@Self)^.&set := $00000800;
  41844. end;
  41845. procedure TSPI4_SPI4STAT.clearSPIBUSY; inline;
  41846. begin
  41847. pTDefRegMap(@Self)^.clr := $00000800;
  41848. end;
  41849. procedure TSPI4_SPI4STAT.setSPIBUSY(thebits : TBits_1); inline;
  41850. begin
  41851. if thebits = 0 then
  41852. pTDefRegMap(@Self)^.clr := $00000800
  41853. else
  41854. pTDefRegMap(@Self)^.&set := $00000800;
  41855. end;
  41856. function TSPI4_SPI4STAT.getSPIBUSY : TBits_1; inline;
  41857. begin
  41858. getSPIBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  41859. end;
  41860. procedure TSPI4_SPI4STAT.setTXBUFELM(thebits : TBits_5); inline;
  41861. begin
  41862. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  41863. end;
  41864. function TSPI4_SPI4STAT.getTXBUFELM : TBits_5; inline;
  41865. begin
  41866. getTXBUFELM := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  41867. end;
  41868. procedure TSPI4_SPI4STAT.setRXBUFELM(thebits : TBits_5); inline;
  41869. begin
  41870. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  41871. end;
  41872. function TSPI4_SPI4STAT.getRXBUFELM : TBits_5; inline;
  41873. begin
  41874. getRXBUFELM := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  41875. end;
  41876. procedure TSPI4_SPI4STAT.setw(thebits : TBits_32); inline;
  41877. begin
  41878. pTDefRegMap(@Self)^.val := thebits;
  41879. end;
  41880. function TSPI4_SPI4STAT.getw : TBits_32; inline;
  41881. begin
  41882. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  41883. end;
  41884. procedure TUART1A_U1AMODE.setSTSEL; inline;
  41885. begin
  41886. pTDefRegMap(@Self)^.&set := $00000001;
  41887. end;
  41888. procedure TUART1A_U1AMODE.clearSTSEL; inline;
  41889. begin
  41890. pTDefRegMap(@Self)^.clr := $00000001;
  41891. end;
  41892. procedure TUART1A_U1AMODE.setSTSEL(thebits : TBits_1); inline;
  41893. begin
  41894. if thebits = 0 then
  41895. pTDefRegMap(@Self)^.clr := $00000001
  41896. else
  41897. pTDefRegMap(@Self)^.&set := $00000001;
  41898. end;
  41899. function TUART1A_U1AMODE.getSTSEL : TBits_1; inline;
  41900. begin
  41901. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  41902. end;
  41903. procedure TUART1A_U1AMODE.setPDSEL(thebits : TBits_2); inline;
  41904. begin
  41905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  41906. end;
  41907. function TUART1A_U1AMODE.getPDSEL : TBits_2; inline;
  41908. begin
  41909. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  41910. end;
  41911. procedure TUART1A_U1AMODE.setBRGH; inline;
  41912. begin
  41913. pTDefRegMap(@Self)^.&set := $00000008;
  41914. end;
  41915. procedure TUART1A_U1AMODE.clearBRGH; inline;
  41916. begin
  41917. pTDefRegMap(@Self)^.clr := $00000008;
  41918. end;
  41919. procedure TUART1A_U1AMODE.setBRGH(thebits : TBits_1); inline;
  41920. begin
  41921. if thebits = 0 then
  41922. pTDefRegMap(@Self)^.clr := $00000008
  41923. else
  41924. pTDefRegMap(@Self)^.&set := $00000008;
  41925. end;
  41926. function TUART1A_U1AMODE.getBRGH : TBits_1; inline;
  41927. begin
  41928. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  41929. end;
  41930. procedure TUART1A_U1AMODE.setRXINV; inline;
  41931. begin
  41932. pTDefRegMap(@Self)^.&set := $00000010;
  41933. end;
  41934. procedure TUART1A_U1AMODE.clearRXINV; inline;
  41935. begin
  41936. pTDefRegMap(@Self)^.clr := $00000010;
  41937. end;
  41938. procedure TUART1A_U1AMODE.setRXINV(thebits : TBits_1); inline;
  41939. begin
  41940. if thebits = 0 then
  41941. pTDefRegMap(@Self)^.clr := $00000010
  41942. else
  41943. pTDefRegMap(@Self)^.&set := $00000010;
  41944. end;
  41945. function TUART1A_U1AMODE.getRXINV : TBits_1; inline;
  41946. begin
  41947. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  41948. end;
  41949. procedure TUART1A_U1AMODE.setABAUD; inline;
  41950. begin
  41951. pTDefRegMap(@Self)^.&set := $00000020;
  41952. end;
  41953. procedure TUART1A_U1AMODE.clearABAUD; inline;
  41954. begin
  41955. pTDefRegMap(@Self)^.clr := $00000020;
  41956. end;
  41957. procedure TUART1A_U1AMODE.setABAUD(thebits : TBits_1); inline;
  41958. begin
  41959. if thebits = 0 then
  41960. pTDefRegMap(@Self)^.clr := $00000020
  41961. else
  41962. pTDefRegMap(@Self)^.&set := $00000020;
  41963. end;
  41964. function TUART1A_U1AMODE.getABAUD : TBits_1; inline;
  41965. begin
  41966. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  41967. end;
  41968. procedure TUART1A_U1AMODE.setLPBACK; inline;
  41969. begin
  41970. pTDefRegMap(@Self)^.&set := $00000040;
  41971. end;
  41972. procedure TUART1A_U1AMODE.clearLPBACK; inline;
  41973. begin
  41974. pTDefRegMap(@Self)^.clr := $00000040;
  41975. end;
  41976. procedure TUART1A_U1AMODE.setLPBACK(thebits : TBits_1); inline;
  41977. begin
  41978. if thebits = 0 then
  41979. pTDefRegMap(@Self)^.clr := $00000040
  41980. else
  41981. pTDefRegMap(@Self)^.&set := $00000040;
  41982. end;
  41983. function TUART1A_U1AMODE.getLPBACK : TBits_1; inline;
  41984. begin
  41985. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  41986. end;
  41987. procedure TUART1A_U1AMODE.setWAKE; inline;
  41988. begin
  41989. pTDefRegMap(@Self)^.&set := $00000080;
  41990. end;
  41991. procedure TUART1A_U1AMODE.clearWAKE; inline;
  41992. begin
  41993. pTDefRegMap(@Self)^.clr := $00000080;
  41994. end;
  41995. procedure TUART1A_U1AMODE.setWAKE(thebits : TBits_1); inline;
  41996. begin
  41997. if thebits = 0 then
  41998. pTDefRegMap(@Self)^.clr := $00000080
  41999. else
  42000. pTDefRegMap(@Self)^.&set := $00000080;
  42001. end;
  42002. function TUART1A_U1AMODE.getWAKE : TBits_1; inline;
  42003. begin
  42004. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42005. end;
  42006. procedure TUART1A_U1AMODE.setUEN(thebits : TBits_2); inline;
  42007. begin
  42008. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  42009. end;
  42010. function TUART1A_U1AMODE.getUEN : TBits_2; inline;
  42011. begin
  42012. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  42013. end;
  42014. procedure TUART1A_U1AMODE.setRTSMD; inline;
  42015. begin
  42016. pTDefRegMap(@Self)^.&set := $00000800;
  42017. end;
  42018. procedure TUART1A_U1AMODE.clearRTSMD; inline;
  42019. begin
  42020. pTDefRegMap(@Self)^.clr := $00000800;
  42021. end;
  42022. procedure TUART1A_U1AMODE.setRTSMD(thebits : TBits_1); inline;
  42023. begin
  42024. if thebits = 0 then
  42025. pTDefRegMap(@Self)^.clr := $00000800
  42026. else
  42027. pTDefRegMap(@Self)^.&set := $00000800;
  42028. end;
  42029. function TUART1A_U1AMODE.getRTSMD : TBits_1; inline;
  42030. begin
  42031. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42032. end;
  42033. procedure TUART1A_U1AMODE.setIREN; inline;
  42034. begin
  42035. pTDefRegMap(@Self)^.&set := $00001000;
  42036. end;
  42037. procedure TUART1A_U1AMODE.clearIREN; inline;
  42038. begin
  42039. pTDefRegMap(@Self)^.clr := $00001000;
  42040. end;
  42041. procedure TUART1A_U1AMODE.setIREN(thebits : TBits_1); inline;
  42042. begin
  42043. if thebits = 0 then
  42044. pTDefRegMap(@Self)^.clr := $00001000
  42045. else
  42046. pTDefRegMap(@Self)^.&set := $00001000;
  42047. end;
  42048. function TUART1A_U1AMODE.getIREN : TBits_1; inline;
  42049. begin
  42050. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42051. end;
  42052. procedure TUART1A_U1AMODE.setSIDL; inline;
  42053. begin
  42054. pTDefRegMap(@Self)^.&set := $00002000;
  42055. end;
  42056. procedure TUART1A_U1AMODE.clearSIDL; inline;
  42057. begin
  42058. pTDefRegMap(@Self)^.clr := $00002000;
  42059. end;
  42060. procedure TUART1A_U1AMODE.setSIDL(thebits : TBits_1); inline;
  42061. begin
  42062. if thebits = 0 then
  42063. pTDefRegMap(@Self)^.clr := $00002000
  42064. else
  42065. pTDefRegMap(@Self)^.&set := $00002000;
  42066. end;
  42067. function TUART1A_U1AMODE.getSIDL : TBits_1; inline;
  42068. begin
  42069. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42070. end;
  42071. procedure TUART1A_U1AMODE.setON; inline;
  42072. begin
  42073. pTDefRegMap(@Self)^.&set := $00008000;
  42074. end;
  42075. procedure TUART1A_U1AMODE.clearON; inline;
  42076. begin
  42077. pTDefRegMap(@Self)^.clr := $00008000;
  42078. end;
  42079. procedure TUART1A_U1AMODE.setON(thebits : TBits_1); inline;
  42080. begin
  42081. if thebits = 0 then
  42082. pTDefRegMap(@Self)^.clr := $00008000
  42083. else
  42084. pTDefRegMap(@Self)^.&set := $00008000;
  42085. end;
  42086. function TUART1A_U1AMODE.getON : TBits_1; inline;
  42087. begin
  42088. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42089. end;
  42090. procedure TUART1A_U1AMODE.setPDSEL0; inline;
  42091. begin
  42092. pTDefRegMap(@Self)^.&set := $00000002;
  42093. end;
  42094. procedure TUART1A_U1AMODE.clearPDSEL0; inline;
  42095. begin
  42096. pTDefRegMap(@Self)^.clr := $00000002;
  42097. end;
  42098. procedure TUART1A_U1AMODE.setPDSEL0(thebits : TBits_1); inline;
  42099. begin
  42100. if thebits = 0 then
  42101. pTDefRegMap(@Self)^.clr := $00000002
  42102. else
  42103. pTDefRegMap(@Self)^.&set := $00000002;
  42104. end;
  42105. function TUART1A_U1AMODE.getPDSEL0 : TBits_1; inline;
  42106. begin
  42107. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42108. end;
  42109. procedure TUART1A_U1AMODE.setPDSEL1; inline;
  42110. begin
  42111. pTDefRegMap(@Self)^.&set := $00000004;
  42112. end;
  42113. procedure TUART1A_U1AMODE.clearPDSEL1; inline;
  42114. begin
  42115. pTDefRegMap(@Self)^.clr := $00000004;
  42116. end;
  42117. procedure TUART1A_U1AMODE.setPDSEL1(thebits : TBits_1); inline;
  42118. begin
  42119. if thebits = 0 then
  42120. pTDefRegMap(@Self)^.clr := $00000004
  42121. else
  42122. pTDefRegMap(@Self)^.&set := $00000004;
  42123. end;
  42124. function TUART1A_U1AMODE.getPDSEL1 : TBits_1; inline;
  42125. begin
  42126. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42127. end;
  42128. procedure TUART1A_U1AMODE.setUEN0; inline;
  42129. begin
  42130. pTDefRegMap(@Self)^.&set := $00000100;
  42131. end;
  42132. procedure TUART1A_U1AMODE.clearUEN0; inline;
  42133. begin
  42134. pTDefRegMap(@Self)^.clr := $00000100;
  42135. end;
  42136. procedure TUART1A_U1AMODE.setUEN0(thebits : TBits_1); inline;
  42137. begin
  42138. if thebits = 0 then
  42139. pTDefRegMap(@Self)^.clr := $00000100
  42140. else
  42141. pTDefRegMap(@Self)^.&set := $00000100;
  42142. end;
  42143. function TUART1A_U1AMODE.getUEN0 : TBits_1; inline;
  42144. begin
  42145. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42146. end;
  42147. procedure TUART1A_U1AMODE.setUEN1; inline;
  42148. begin
  42149. pTDefRegMap(@Self)^.&set := $00000200;
  42150. end;
  42151. procedure TUART1A_U1AMODE.clearUEN1; inline;
  42152. begin
  42153. pTDefRegMap(@Self)^.clr := $00000200;
  42154. end;
  42155. procedure TUART1A_U1AMODE.setUEN1(thebits : TBits_1); inline;
  42156. begin
  42157. if thebits = 0 then
  42158. pTDefRegMap(@Self)^.clr := $00000200
  42159. else
  42160. pTDefRegMap(@Self)^.&set := $00000200;
  42161. end;
  42162. function TUART1A_U1AMODE.getUEN1 : TBits_1; inline;
  42163. begin
  42164. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42165. end;
  42166. procedure TUART1A_U1AMODE.setUSIDL; inline;
  42167. begin
  42168. pTDefRegMap(@Self)^.&set := $00002000;
  42169. end;
  42170. procedure TUART1A_U1AMODE.clearUSIDL; inline;
  42171. begin
  42172. pTDefRegMap(@Self)^.clr := $00002000;
  42173. end;
  42174. procedure TUART1A_U1AMODE.setUSIDL(thebits : TBits_1); inline;
  42175. begin
  42176. if thebits = 0 then
  42177. pTDefRegMap(@Self)^.clr := $00002000
  42178. else
  42179. pTDefRegMap(@Self)^.&set := $00002000;
  42180. end;
  42181. function TUART1A_U1AMODE.getUSIDL : TBits_1; inline;
  42182. begin
  42183. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42184. end;
  42185. procedure TUART1A_U1AMODE.setUARTEN; inline;
  42186. begin
  42187. pTDefRegMap(@Self)^.&set := $00008000;
  42188. end;
  42189. procedure TUART1A_U1AMODE.clearUARTEN; inline;
  42190. begin
  42191. pTDefRegMap(@Self)^.clr := $00008000;
  42192. end;
  42193. procedure TUART1A_U1AMODE.setUARTEN(thebits : TBits_1); inline;
  42194. begin
  42195. if thebits = 0 then
  42196. pTDefRegMap(@Self)^.clr := $00008000
  42197. else
  42198. pTDefRegMap(@Self)^.&set := $00008000;
  42199. end;
  42200. function TUART1A_U1AMODE.getUARTEN : TBits_1; inline;
  42201. begin
  42202. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42203. end;
  42204. procedure TUART1A_U1AMODE.setw(thebits : TBits_32); inline;
  42205. begin
  42206. pTDefRegMap(@Self)^.val := thebits;
  42207. end;
  42208. function TUART1A_U1AMODE.getw : TBits_32; inline;
  42209. begin
  42210. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42211. end;
  42212. procedure TUART1A_U1MODE.setSTSEL; inline;
  42213. begin
  42214. pTDefRegMap(@Self)^.&set := $00000001;
  42215. end;
  42216. procedure TUART1A_U1MODE.clearSTSEL; inline;
  42217. begin
  42218. pTDefRegMap(@Self)^.clr := $00000001;
  42219. end;
  42220. procedure TUART1A_U1MODE.setSTSEL(thebits : TBits_1); inline;
  42221. begin
  42222. if thebits = 0 then
  42223. pTDefRegMap(@Self)^.clr := $00000001
  42224. else
  42225. pTDefRegMap(@Self)^.&set := $00000001;
  42226. end;
  42227. function TUART1A_U1MODE.getSTSEL : TBits_1; inline;
  42228. begin
  42229. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42230. end;
  42231. procedure TUART1A_U1MODE.setPDSEL(thebits : TBits_2); inline;
  42232. begin
  42233. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  42234. end;
  42235. function TUART1A_U1MODE.getPDSEL : TBits_2; inline;
  42236. begin
  42237. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  42238. end;
  42239. procedure TUART1A_U1MODE.setBRGH; inline;
  42240. begin
  42241. pTDefRegMap(@Self)^.&set := $00000008;
  42242. end;
  42243. procedure TUART1A_U1MODE.clearBRGH; inline;
  42244. begin
  42245. pTDefRegMap(@Self)^.clr := $00000008;
  42246. end;
  42247. procedure TUART1A_U1MODE.setBRGH(thebits : TBits_1); inline;
  42248. begin
  42249. if thebits = 0 then
  42250. pTDefRegMap(@Self)^.clr := $00000008
  42251. else
  42252. pTDefRegMap(@Self)^.&set := $00000008;
  42253. end;
  42254. function TUART1A_U1MODE.getBRGH : TBits_1; inline;
  42255. begin
  42256. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42257. end;
  42258. procedure TUART1A_U1MODE.setRXINV; inline;
  42259. begin
  42260. pTDefRegMap(@Self)^.&set := $00000010;
  42261. end;
  42262. procedure TUART1A_U1MODE.clearRXINV; inline;
  42263. begin
  42264. pTDefRegMap(@Self)^.clr := $00000010;
  42265. end;
  42266. procedure TUART1A_U1MODE.setRXINV(thebits : TBits_1); inline;
  42267. begin
  42268. if thebits = 0 then
  42269. pTDefRegMap(@Self)^.clr := $00000010
  42270. else
  42271. pTDefRegMap(@Self)^.&set := $00000010;
  42272. end;
  42273. function TUART1A_U1MODE.getRXINV : TBits_1; inline;
  42274. begin
  42275. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42276. end;
  42277. procedure TUART1A_U1MODE.setABAUD; inline;
  42278. begin
  42279. pTDefRegMap(@Self)^.&set := $00000020;
  42280. end;
  42281. procedure TUART1A_U1MODE.clearABAUD; inline;
  42282. begin
  42283. pTDefRegMap(@Self)^.clr := $00000020;
  42284. end;
  42285. procedure TUART1A_U1MODE.setABAUD(thebits : TBits_1); inline;
  42286. begin
  42287. if thebits = 0 then
  42288. pTDefRegMap(@Self)^.clr := $00000020
  42289. else
  42290. pTDefRegMap(@Self)^.&set := $00000020;
  42291. end;
  42292. function TUART1A_U1MODE.getABAUD : TBits_1; inline;
  42293. begin
  42294. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42295. end;
  42296. procedure TUART1A_U1MODE.setLPBACK; inline;
  42297. begin
  42298. pTDefRegMap(@Self)^.&set := $00000040;
  42299. end;
  42300. procedure TUART1A_U1MODE.clearLPBACK; inline;
  42301. begin
  42302. pTDefRegMap(@Self)^.clr := $00000040;
  42303. end;
  42304. procedure TUART1A_U1MODE.setLPBACK(thebits : TBits_1); inline;
  42305. begin
  42306. if thebits = 0 then
  42307. pTDefRegMap(@Self)^.clr := $00000040
  42308. else
  42309. pTDefRegMap(@Self)^.&set := $00000040;
  42310. end;
  42311. function TUART1A_U1MODE.getLPBACK : TBits_1; inline;
  42312. begin
  42313. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42314. end;
  42315. procedure TUART1A_U1MODE.setWAKE; inline;
  42316. begin
  42317. pTDefRegMap(@Self)^.&set := $00000080;
  42318. end;
  42319. procedure TUART1A_U1MODE.clearWAKE; inline;
  42320. begin
  42321. pTDefRegMap(@Self)^.clr := $00000080;
  42322. end;
  42323. procedure TUART1A_U1MODE.setWAKE(thebits : TBits_1); inline;
  42324. begin
  42325. if thebits = 0 then
  42326. pTDefRegMap(@Self)^.clr := $00000080
  42327. else
  42328. pTDefRegMap(@Self)^.&set := $00000080;
  42329. end;
  42330. function TUART1A_U1MODE.getWAKE : TBits_1; inline;
  42331. begin
  42332. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42333. end;
  42334. procedure TUART1A_U1MODE.setUEN(thebits : TBits_2); inline;
  42335. begin
  42336. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  42337. end;
  42338. function TUART1A_U1MODE.getUEN : TBits_2; inline;
  42339. begin
  42340. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  42341. end;
  42342. procedure TUART1A_U1MODE.setRTSMD; inline;
  42343. begin
  42344. pTDefRegMap(@Self)^.&set := $00000800;
  42345. end;
  42346. procedure TUART1A_U1MODE.clearRTSMD; inline;
  42347. begin
  42348. pTDefRegMap(@Self)^.clr := $00000800;
  42349. end;
  42350. procedure TUART1A_U1MODE.setRTSMD(thebits : TBits_1); inline;
  42351. begin
  42352. if thebits = 0 then
  42353. pTDefRegMap(@Self)^.clr := $00000800
  42354. else
  42355. pTDefRegMap(@Self)^.&set := $00000800;
  42356. end;
  42357. function TUART1A_U1MODE.getRTSMD : TBits_1; inline;
  42358. begin
  42359. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42360. end;
  42361. procedure TUART1A_U1MODE.setIREN; inline;
  42362. begin
  42363. pTDefRegMap(@Self)^.&set := $00001000;
  42364. end;
  42365. procedure TUART1A_U1MODE.clearIREN; inline;
  42366. begin
  42367. pTDefRegMap(@Self)^.clr := $00001000;
  42368. end;
  42369. procedure TUART1A_U1MODE.setIREN(thebits : TBits_1); inline;
  42370. begin
  42371. if thebits = 0 then
  42372. pTDefRegMap(@Self)^.clr := $00001000
  42373. else
  42374. pTDefRegMap(@Self)^.&set := $00001000;
  42375. end;
  42376. function TUART1A_U1MODE.getIREN : TBits_1; inline;
  42377. begin
  42378. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42379. end;
  42380. procedure TUART1A_U1MODE.setSIDL; inline;
  42381. begin
  42382. pTDefRegMap(@Self)^.&set := $00002000;
  42383. end;
  42384. procedure TUART1A_U1MODE.clearSIDL; inline;
  42385. begin
  42386. pTDefRegMap(@Self)^.clr := $00002000;
  42387. end;
  42388. procedure TUART1A_U1MODE.setSIDL(thebits : TBits_1); inline;
  42389. begin
  42390. if thebits = 0 then
  42391. pTDefRegMap(@Self)^.clr := $00002000
  42392. else
  42393. pTDefRegMap(@Self)^.&set := $00002000;
  42394. end;
  42395. function TUART1A_U1MODE.getSIDL : TBits_1; inline;
  42396. begin
  42397. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42398. end;
  42399. procedure TUART1A_U1MODE.setON; inline;
  42400. begin
  42401. pTDefRegMap(@Self)^.&set := $00008000;
  42402. end;
  42403. procedure TUART1A_U1MODE.clearON; inline;
  42404. begin
  42405. pTDefRegMap(@Self)^.clr := $00008000;
  42406. end;
  42407. procedure TUART1A_U1MODE.setON(thebits : TBits_1); inline;
  42408. begin
  42409. if thebits = 0 then
  42410. pTDefRegMap(@Self)^.clr := $00008000
  42411. else
  42412. pTDefRegMap(@Self)^.&set := $00008000;
  42413. end;
  42414. function TUART1A_U1MODE.getON : TBits_1; inline;
  42415. begin
  42416. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42417. end;
  42418. procedure TUART1A_U1MODE.setPDSEL0; inline;
  42419. begin
  42420. pTDefRegMap(@Self)^.&set := $00000002;
  42421. end;
  42422. procedure TUART1A_U1MODE.clearPDSEL0; inline;
  42423. begin
  42424. pTDefRegMap(@Self)^.clr := $00000002;
  42425. end;
  42426. procedure TUART1A_U1MODE.setPDSEL0(thebits : TBits_1); inline;
  42427. begin
  42428. if thebits = 0 then
  42429. pTDefRegMap(@Self)^.clr := $00000002
  42430. else
  42431. pTDefRegMap(@Self)^.&set := $00000002;
  42432. end;
  42433. function TUART1A_U1MODE.getPDSEL0 : TBits_1; inline;
  42434. begin
  42435. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42436. end;
  42437. procedure TUART1A_U1MODE.setPDSEL1; inline;
  42438. begin
  42439. pTDefRegMap(@Self)^.&set := $00000004;
  42440. end;
  42441. procedure TUART1A_U1MODE.clearPDSEL1; inline;
  42442. begin
  42443. pTDefRegMap(@Self)^.clr := $00000004;
  42444. end;
  42445. procedure TUART1A_U1MODE.setPDSEL1(thebits : TBits_1); inline;
  42446. begin
  42447. if thebits = 0 then
  42448. pTDefRegMap(@Self)^.clr := $00000004
  42449. else
  42450. pTDefRegMap(@Self)^.&set := $00000004;
  42451. end;
  42452. function TUART1A_U1MODE.getPDSEL1 : TBits_1; inline;
  42453. begin
  42454. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42455. end;
  42456. procedure TUART1A_U1MODE.setUEN0; inline;
  42457. begin
  42458. pTDefRegMap(@Self)^.&set := $00000100;
  42459. end;
  42460. procedure TUART1A_U1MODE.clearUEN0; inline;
  42461. begin
  42462. pTDefRegMap(@Self)^.clr := $00000100;
  42463. end;
  42464. procedure TUART1A_U1MODE.setUEN0(thebits : TBits_1); inline;
  42465. begin
  42466. if thebits = 0 then
  42467. pTDefRegMap(@Self)^.clr := $00000100
  42468. else
  42469. pTDefRegMap(@Self)^.&set := $00000100;
  42470. end;
  42471. function TUART1A_U1MODE.getUEN0 : TBits_1; inline;
  42472. begin
  42473. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42474. end;
  42475. procedure TUART1A_U1MODE.setUEN1; inline;
  42476. begin
  42477. pTDefRegMap(@Self)^.&set := $00000200;
  42478. end;
  42479. procedure TUART1A_U1MODE.clearUEN1; inline;
  42480. begin
  42481. pTDefRegMap(@Self)^.clr := $00000200;
  42482. end;
  42483. procedure TUART1A_U1MODE.setUEN1(thebits : TBits_1); inline;
  42484. begin
  42485. if thebits = 0 then
  42486. pTDefRegMap(@Self)^.clr := $00000200
  42487. else
  42488. pTDefRegMap(@Self)^.&set := $00000200;
  42489. end;
  42490. function TUART1A_U1MODE.getUEN1 : TBits_1; inline;
  42491. begin
  42492. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42493. end;
  42494. procedure TUART1A_U1MODE.setUSIDL; inline;
  42495. begin
  42496. pTDefRegMap(@Self)^.&set := $00002000;
  42497. end;
  42498. procedure TUART1A_U1MODE.clearUSIDL; inline;
  42499. begin
  42500. pTDefRegMap(@Self)^.clr := $00002000;
  42501. end;
  42502. procedure TUART1A_U1MODE.setUSIDL(thebits : TBits_1); inline;
  42503. begin
  42504. if thebits = 0 then
  42505. pTDefRegMap(@Self)^.clr := $00002000
  42506. else
  42507. pTDefRegMap(@Self)^.&set := $00002000;
  42508. end;
  42509. function TUART1A_U1MODE.getUSIDL : TBits_1; inline;
  42510. begin
  42511. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42512. end;
  42513. procedure TUART1A_U1MODE.setUARTEN; inline;
  42514. begin
  42515. pTDefRegMap(@Self)^.&set := $00008000;
  42516. end;
  42517. procedure TUART1A_U1MODE.clearUARTEN; inline;
  42518. begin
  42519. pTDefRegMap(@Self)^.clr := $00008000;
  42520. end;
  42521. procedure TUART1A_U1MODE.setUARTEN(thebits : TBits_1); inline;
  42522. begin
  42523. if thebits = 0 then
  42524. pTDefRegMap(@Self)^.clr := $00008000
  42525. else
  42526. pTDefRegMap(@Self)^.&set := $00008000;
  42527. end;
  42528. function TUART1A_U1MODE.getUARTEN : TBits_1; inline;
  42529. begin
  42530. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42531. end;
  42532. procedure TUART1A_U1MODE.setw(thebits : TBits_32); inline;
  42533. begin
  42534. pTDefRegMap(@Self)^.val := thebits;
  42535. end;
  42536. function TUART1A_U1MODE.getw : TBits_32; inline;
  42537. begin
  42538. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42539. end;
  42540. procedure TUART1A_U1ASTA.setURXDA; inline;
  42541. begin
  42542. pTDefRegMap(@Self)^.&set := $00000001;
  42543. end;
  42544. procedure TUART1A_U1ASTA.clearURXDA; inline;
  42545. begin
  42546. pTDefRegMap(@Self)^.clr := $00000001;
  42547. end;
  42548. procedure TUART1A_U1ASTA.setURXDA(thebits : TBits_1); inline;
  42549. begin
  42550. if thebits = 0 then
  42551. pTDefRegMap(@Self)^.clr := $00000001
  42552. else
  42553. pTDefRegMap(@Self)^.&set := $00000001;
  42554. end;
  42555. function TUART1A_U1ASTA.getURXDA : TBits_1; inline;
  42556. begin
  42557. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42558. end;
  42559. procedure TUART1A_U1ASTA.setOERR; inline;
  42560. begin
  42561. pTDefRegMap(@Self)^.&set := $00000002;
  42562. end;
  42563. procedure TUART1A_U1ASTA.clearOERR; inline;
  42564. begin
  42565. pTDefRegMap(@Self)^.clr := $00000002;
  42566. end;
  42567. procedure TUART1A_U1ASTA.setOERR(thebits : TBits_1); inline;
  42568. begin
  42569. if thebits = 0 then
  42570. pTDefRegMap(@Self)^.clr := $00000002
  42571. else
  42572. pTDefRegMap(@Self)^.&set := $00000002;
  42573. end;
  42574. function TUART1A_U1ASTA.getOERR : TBits_1; inline;
  42575. begin
  42576. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42577. end;
  42578. procedure TUART1A_U1ASTA.setFERR; inline;
  42579. begin
  42580. pTDefRegMap(@Self)^.&set := $00000004;
  42581. end;
  42582. procedure TUART1A_U1ASTA.clearFERR; inline;
  42583. begin
  42584. pTDefRegMap(@Self)^.clr := $00000004;
  42585. end;
  42586. procedure TUART1A_U1ASTA.setFERR(thebits : TBits_1); inline;
  42587. begin
  42588. if thebits = 0 then
  42589. pTDefRegMap(@Self)^.clr := $00000004
  42590. else
  42591. pTDefRegMap(@Self)^.&set := $00000004;
  42592. end;
  42593. function TUART1A_U1ASTA.getFERR : TBits_1; inline;
  42594. begin
  42595. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42596. end;
  42597. procedure TUART1A_U1ASTA.setPERR; inline;
  42598. begin
  42599. pTDefRegMap(@Self)^.&set := $00000008;
  42600. end;
  42601. procedure TUART1A_U1ASTA.clearPERR; inline;
  42602. begin
  42603. pTDefRegMap(@Self)^.clr := $00000008;
  42604. end;
  42605. procedure TUART1A_U1ASTA.setPERR(thebits : TBits_1); inline;
  42606. begin
  42607. if thebits = 0 then
  42608. pTDefRegMap(@Self)^.clr := $00000008
  42609. else
  42610. pTDefRegMap(@Self)^.&set := $00000008;
  42611. end;
  42612. function TUART1A_U1ASTA.getPERR : TBits_1; inline;
  42613. begin
  42614. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42615. end;
  42616. procedure TUART1A_U1ASTA.setRIDLE; inline;
  42617. begin
  42618. pTDefRegMap(@Self)^.&set := $00000010;
  42619. end;
  42620. procedure TUART1A_U1ASTA.clearRIDLE; inline;
  42621. begin
  42622. pTDefRegMap(@Self)^.clr := $00000010;
  42623. end;
  42624. procedure TUART1A_U1ASTA.setRIDLE(thebits : TBits_1); inline;
  42625. begin
  42626. if thebits = 0 then
  42627. pTDefRegMap(@Self)^.clr := $00000010
  42628. else
  42629. pTDefRegMap(@Self)^.&set := $00000010;
  42630. end;
  42631. function TUART1A_U1ASTA.getRIDLE : TBits_1; inline;
  42632. begin
  42633. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42634. end;
  42635. procedure TUART1A_U1ASTA.setADDEN; inline;
  42636. begin
  42637. pTDefRegMap(@Self)^.&set := $00000020;
  42638. end;
  42639. procedure TUART1A_U1ASTA.clearADDEN; inline;
  42640. begin
  42641. pTDefRegMap(@Self)^.clr := $00000020;
  42642. end;
  42643. procedure TUART1A_U1ASTA.setADDEN(thebits : TBits_1); inline;
  42644. begin
  42645. if thebits = 0 then
  42646. pTDefRegMap(@Self)^.clr := $00000020
  42647. else
  42648. pTDefRegMap(@Self)^.&set := $00000020;
  42649. end;
  42650. function TUART1A_U1ASTA.getADDEN : TBits_1; inline;
  42651. begin
  42652. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  42653. end;
  42654. procedure TUART1A_U1ASTA.setURXISEL(thebits : TBits_2); inline;
  42655. begin
  42656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  42657. end;
  42658. function TUART1A_U1ASTA.getURXISEL : TBits_2; inline;
  42659. begin
  42660. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  42661. end;
  42662. procedure TUART1A_U1ASTA.setTRMT; inline;
  42663. begin
  42664. pTDefRegMap(@Self)^.&set := $00000100;
  42665. end;
  42666. procedure TUART1A_U1ASTA.clearTRMT; inline;
  42667. begin
  42668. pTDefRegMap(@Self)^.clr := $00000100;
  42669. end;
  42670. procedure TUART1A_U1ASTA.setTRMT(thebits : TBits_1); inline;
  42671. begin
  42672. if thebits = 0 then
  42673. pTDefRegMap(@Self)^.clr := $00000100
  42674. else
  42675. pTDefRegMap(@Self)^.&set := $00000100;
  42676. end;
  42677. function TUART1A_U1ASTA.getTRMT : TBits_1; inline;
  42678. begin
  42679. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  42680. end;
  42681. procedure TUART1A_U1ASTA.setUTXBF; inline;
  42682. begin
  42683. pTDefRegMap(@Self)^.&set := $00000200;
  42684. end;
  42685. procedure TUART1A_U1ASTA.clearUTXBF; inline;
  42686. begin
  42687. pTDefRegMap(@Self)^.clr := $00000200;
  42688. end;
  42689. procedure TUART1A_U1ASTA.setUTXBF(thebits : TBits_1); inline;
  42690. begin
  42691. if thebits = 0 then
  42692. pTDefRegMap(@Self)^.clr := $00000200
  42693. else
  42694. pTDefRegMap(@Self)^.&set := $00000200;
  42695. end;
  42696. function TUART1A_U1ASTA.getUTXBF : TBits_1; inline;
  42697. begin
  42698. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  42699. end;
  42700. procedure TUART1A_U1ASTA.setUTXEN; inline;
  42701. begin
  42702. pTDefRegMap(@Self)^.&set := $00000400;
  42703. end;
  42704. procedure TUART1A_U1ASTA.clearUTXEN; inline;
  42705. begin
  42706. pTDefRegMap(@Self)^.clr := $00000400;
  42707. end;
  42708. procedure TUART1A_U1ASTA.setUTXEN(thebits : TBits_1); inline;
  42709. begin
  42710. if thebits = 0 then
  42711. pTDefRegMap(@Self)^.clr := $00000400
  42712. else
  42713. pTDefRegMap(@Self)^.&set := $00000400;
  42714. end;
  42715. function TUART1A_U1ASTA.getUTXEN : TBits_1; inline;
  42716. begin
  42717. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  42718. end;
  42719. procedure TUART1A_U1ASTA.setUTXBRK; inline;
  42720. begin
  42721. pTDefRegMap(@Self)^.&set := $00000800;
  42722. end;
  42723. procedure TUART1A_U1ASTA.clearUTXBRK; inline;
  42724. begin
  42725. pTDefRegMap(@Self)^.clr := $00000800;
  42726. end;
  42727. procedure TUART1A_U1ASTA.setUTXBRK(thebits : TBits_1); inline;
  42728. begin
  42729. if thebits = 0 then
  42730. pTDefRegMap(@Self)^.clr := $00000800
  42731. else
  42732. pTDefRegMap(@Self)^.&set := $00000800;
  42733. end;
  42734. function TUART1A_U1ASTA.getUTXBRK : TBits_1; inline;
  42735. begin
  42736. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  42737. end;
  42738. procedure TUART1A_U1ASTA.setURXEN; inline;
  42739. begin
  42740. pTDefRegMap(@Self)^.&set := $00001000;
  42741. end;
  42742. procedure TUART1A_U1ASTA.clearURXEN; inline;
  42743. begin
  42744. pTDefRegMap(@Self)^.clr := $00001000;
  42745. end;
  42746. procedure TUART1A_U1ASTA.setURXEN(thebits : TBits_1); inline;
  42747. begin
  42748. if thebits = 0 then
  42749. pTDefRegMap(@Self)^.clr := $00001000
  42750. else
  42751. pTDefRegMap(@Self)^.&set := $00001000;
  42752. end;
  42753. function TUART1A_U1ASTA.getURXEN : TBits_1; inline;
  42754. begin
  42755. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  42756. end;
  42757. procedure TUART1A_U1ASTA.setUTXINV; inline;
  42758. begin
  42759. pTDefRegMap(@Self)^.&set := $00002000;
  42760. end;
  42761. procedure TUART1A_U1ASTA.clearUTXINV; inline;
  42762. begin
  42763. pTDefRegMap(@Self)^.clr := $00002000;
  42764. end;
  42765. procedure TUART1A_U1ASTA.setUTXINV(thebits : TBits_1); inline;
  42766. begin
  42767. if thebits = 0 then
  42768. pTDefRegMap(@Self)^.clr := $00002000
  42769. else
  42770. pTDefRegMap(@Self)^.&set := $00002000;
  42771. end;
  42772. function TUART1A_U1ASTA.getUTXINV : TBits_1; inline;
  42773. begin
  42774. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  42775. end;
  42776. procedure TUART1A_U1ASTA.setUTXISEL(thebits : TBits_2); inline;
  42777. begin
  42778. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  42779. end;
  42780. function TUART1A_U1ASTA.getUTXISEL : TBits_2; inline;
  42781. begin
  42782. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  42783. end;
  42784. procedure TUART1A_U1ASTA.setADDR(thebits : TBits_8); inline;
  42785. begin
  42786. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  42787. end;
  42788. function TUART1A_U1ASTA.getADDR : TBits_8; inline;
  42789. begin
  42790. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  42791. end;
  42792. procedure TUART1A_U1ASTA.setADM_EN; inline;
  42793. begin
  42794. pTDefRegMap(@Self)^.&set := $01000000;
  42795. end;
  42796. procedure TUART1A_U1ASTA.clearADM_EN; inline;
  42797. begin
  42798. pTDefRegMap(@Self)^.clr := $01000000;
  42799. end;
  42800. procedure TUART1A_U1ASTA.setADM_EN(thebits : TBits_1); inline;
  42801. begin
  42802. if thebits = 0 then
  42803. pTDefRegMap(@Self)^.clr := $01000000
  42804. else
  42805. pTDefRegMap(@Self)^.&set := $01000000;
  42806. end;
  42807. function TUART1A_U1ASTA.getADM_EN : TBits_1; inline;
  42808. begin
  42809. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  42810. end;
  42811. procedure TUART1A_U1ASTA.setURXISEL0; inline;
  42812. begin
  42813. pTDefRegMap(@Self)^.&set := $00000040;
  42814. end;
  42815. procedure TUART1A_U1ASTA.clearURXISEL0; inline;
  42816. begin
  42817. pTDefRegMap(@Self)^.clr := $00000040;
  42818. end;
  42819. procedure TUART1A_U1ASTA.setURXISEL0(thebits : TBits_1); inline;
  42820. begin
  42821. if thebits = 0 then
  42822. pTDefRegMap(@Self)^.clr := $00000040
  42823. else
  42824. pTDefRegMap(@Self)^.&set := $00000040;
  42825. end;
  42826. function TUART1A_U1ASTA.getURXISEL0 : TBits_1; inline;
  42827. begin
  42828. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  42829. end;
  42830. procedure TUART1A_U1ASTA.setURXISEL1; inline;
  42831. begin
  42832. pTDefRegMap(@Self)^.&set := $00000080;
  42833. end;
  42834. procedure TUART1A_U1ASTA.clearURXISEL1; inline;
  42835. begin
  42836. pTDefRegMap(@Self)^.clr := $00000080;
  42837. end;
  42838. procedure TUART1A_U1ASTA.setURXISEL1(thebits : TBits_1); inline;
  42839. begin
  42840. if thebits = 0 then
  42841. pTDefRegMap(@Self)^.clr := $00000080
  42842. else
  42843. pTDefRegMap(@Self)^.&set := $00000080;
  42844. end;
  42845. function TUART1A_U1ASTA.getURXISEL1 : TBits_1; inline;
  42846. begin
  42847. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  42848. end;
  42849. procedure TUART1A_U1ASTA.setUTXISEL0; inline;
  42850. begin
  42851. pTDefRegMap(@Self)^.&set := $00004000;
  42852. end;
  42853. procedure TUART1A_U1ASTA.clearUTXISEL0; inline;
  42854. begin
  42855. pTDefRegMap(@Self)^.clr := $00004000;
  42856. end;
  42857. procedure TUART1A_U1ASTA.setUTXISEL0(thebits : TBits_1); inline;
  42858. begin
  42859. if thebits = 0 then
  42860. pTDefRegMap(@Self)^.clr := $00004000
  42861. else
  42862. pTDefRegMap(@Self)^.&set := $00004000;
  42863. end;
  42864. function TUART1A_U1ASTA.getUTXISEL0 : TBits_1; inline;
  42865. begin
  42866. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  42867. end;
  42868. procedure TUART1A_U1ASTA.setUTXISEL1; inline;
  42869. begin
  42870. pTDefRegMap(@Self)^.&set := $00008000;
  42871. end;
  42872. procedure TUART1A_U1ASTA.clearUTXISEL1; inline;
  42873. begin
  42874. pTDefRegMap(@Self)^.clr := $00008000;
  42875. end;
  42876. procedure TUART1A_U1ASTA.setUTXISEL1(thebits : TBits_1); inline;
  42877. begin
  42878. if thebits = 0 then
  42879. pTDefRegMap(@Self)^.clr := $00008000
  42880. else
  42881. pTDefRegMap(@Self)^.&set := $00008000;
  42882. end;
  42883. function TUART1A_U1ASTA.getUTXISEL1 : TBits_1; inline;
  42884. begin
  42885. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  42886. end;
  42887. procedure TUART1A_U1ASTA.setUTXSEL(thebits : TBits_2); inline;
  42888. begin
  42889. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  42890. end;
  42891. function TUART1A_U1ASTA.getUTXSEL : TBits_2; inline;
  42892. begin
  42893. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  42894. end;
  42895. procedure TUART1A_U1ASTA.setw(thebits : TBits_32); inline;
  42896. begin
  42897. pTDefRegMap(@Self)^.val := thebits;
  42898. end;
  42899. function TUART1A_U1ASTA.getw : TBits_32; inline;
  42900. begin
  42901. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  42902. end;
  42903. procedure TUART1A_U1STA.setURXDA; inline;
  42904. begin
  42905. pTDefRegMap(@Self)^.&set := $00000001;
  42906. end;
  42907. procedure TUART1A_U1STA.clearURXDA; inline;
  42908. begin
  42909. pTDefRegMap(@Self)^.clr := $00000001;
  42910. end;
  42911. procedure TUART1A_U1STA.setURXDA(thebits : TBits_1); inline;
  42912. begin
  42913. if thebits = 0 then
  42914. pTDefRegMap(@Self)^.clr := $00000001
  42915. else
  42916. pTDefRegMap(@Self)^.&set := $00000001;
  42917. end;
  42918. function TUART1A_U1STA.getURXDA : TBits_1; inline;
  42919. begin
  42920. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  42921. end;
  42922. procedure TUART1A_U1STA.setOERR; inline;
  42923. begin
  42924. pTDefRegMap(@Self)^.&set := $00000002;
  42925. end;
  42926. procedure TUART1A_U1STA.clearOERR; inline;
  42927. begin
  42928. pTDefRegMap(@Self)^.clr := $00000002;
  42929. end;
  42930. procedure TUART1A_U1STA.setOERR(thebits : TBits_1); inline;
  42931. begin
  42932. if thebits = 0 then
  42933. pTDefRegMap(@Self)^.clr := $00000002
  42934. else
  42935. pTDefRegMap(@Self)^.&set := $00000002;
  42936. end;
  42937. function TUART1A_U1STA.getOERR : TBits_1; inline;
  42938. begin
  42939. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  42940. end;
  42941. procedure TUART1A_U1STA.setFERR; inline;
  42942. begin
  42943. pTDefRegMap(@Self)^.&set := $00000004;
  42944. end;
  42945. procedure TUART1A_U1STA.clearFERR; inline;
  42946. begin
  42947. pTDefRegMap(@Self)^.clr := $00000004;
  42948. end;
  42949. procedure TUART1A_U1STA.setFERR(thebits : TBits_1); inline;
  42950. begin
  42951. if thebits = 0 then
  42952. pTDefRegMap(@Self)^.clr := $00000004
  42953. else
  42954. pTDefRegMap(@Self)^.&set := $00000004;
  42955. end;
  42956. function TUART1A_U1STA.getFERR : TBits_1; inline;
  42957. begin
  42958. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  42959. end;
  42960. procedure TUART1A_U1STA.setPERR; inline;
  42961. begin
  42962. pTDefRegMap(@Self)^.&set := $00000008;
  42963. end;
  42964. procedure TUART1A_U1STA.clearPERR; inline;
  42965. begin
  42966. pTDefRegMap(@Self)^.clr := $00000008;
  42967. end;
  42968. procedure TUART1A_U1STA.setPERR(thebits : TBits_1); inline;
  42969. begin
  42970. if thebits = 0 then
  42971. pTDefRegMap(@Self)^.clr := $00000008
  42972. else
  42973. pTDefRegMap(@Self)^.&set := $00000008;
  42974. end;
  42975. function TUART1A_U1STA.getPERR : TBits_1; inline;
  42976. begin
  42977. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  42978. end;
  42979. procedure TUART1A_U1STA.setRIDLE; inline;
  42980. begin
  42981. pTDefRegMap(@Self)^.&set := $00000010;
  42982. end;
  42983. procedure TUART1A_U1STA.clearRIDLE; inline;
  42984. begin
  42985. pTDefRegMap(@Self)^.clr := $00000010;
  42986. end;
  42987. procedure TUART1A_U1STA.setRIDLE(thebits : TBits_1); inline;
  42988. begin
  42989. if thebits = 0 then
  42990. pTDefRegMap(@Self)^.clr := $00000010
  42991. else
  42992. pTDefRegMap(@Self)^.&set := $00000010;
  42993. end;
  42994. function TUART1A_U1STA.getRIDLE : TBits_1; inline;
  42995. begin
  42996. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  42997. end;
  42998. procedure TUART1A_U1STA.setADDEN; inline;
  42999. begin
  43000. pTDefRegMap(@Self)^.&set := $00000020;
  43001. end;
  43002. procedure TUART1A_U1STA.clearADDEN; inline;
  43003. begin
  43004. pTDefRegMap(@Self)^.clr := $00000020;
  43005. end;
  43006. procedure TUART1A_U1STA.setADDEN(thebits : TBits_1); inline;
  43007. begin
  43008. if thebits = 0 then
  43009. pTDefRegMap(@Self)^.clr := $00000020
  43010. else
  43011. pTDefRegMap(@Self)^.&set := $00000020;
  43012. end;
  43013. function TUART1A_U1STA.getADDEN : TBits_1; inline;
  43014. begin
  43015. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43016. end;
  43017. procedure TUART1A_U1STA.setURXISEL(thebits : TBits_2); inline;
  43018. begin
  43019. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  43020. end;
  43021. function TUART1A_U1STA.getURXISEL : TBits_2; inline;
  43022. begin
  43023. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  43024. end;
  43025. procedure TUART1A_U1STA.setTRMT; inline;
  43026. begin
  43027. pTDefRegMap(@Self)^.&set := $00000100;
  43028. end;
  43029. procedure TUART1A_U1STA.clearTRMT; inline;
  43030. begin
  43031. pTDefRegMap(@Self)^.clr := $00000100;
  43032. end;
  43033. procedure TUART1A_U1STA.setTRMT(thebits : TBits_1); inline;
  43034. begin
  43035. if thebits = 0 then
  43036. pTDefRegMap(@Self)^.clr := $00000100
  43037. else
  43038. pTDefRegMap(@Self)^.&set := $00000100;
  43039. end;
  43040. function TUART1A_U1STA.getTRMT : TBits_1; inline;
  43041. begin
  43042. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43043. end;
  43044. procedure TUART1A_U1STA.setUTXBF; inline;
  43045. begin
  43046. pTDefRegMap(@Self)^.&set := $00000200;
  43047. end;
  43048. procedure TUART1A_U1STA.clearUTXBF; inline;
  43049. begin
  43050. pTDefRegMap(@Self)^.clr := $00000200;
  43051. end;
  43052. procedure TUART1A_U1STA.setUTXBF(thebits : TBits_1); inline;
  43053. begin
  43054. if thebits = 0 then
  43055. pTDefRegMap(@Self)^.clr := $00000200
  43056. else
  43057. pTDefRegMap(@Self)^.&set := $00000200;
  43058. end;
  43059. function TUART1A_U1STA.getUTXBF : TBits_1; inline;
  43060. begin
  43061. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43062. end;
  43063. procedure TUART1A_U1STA.setUTXEN; inline;
  43064. begin
  43065. pTDefRegMap(@Self)^.&set := $00000400;
  43066. end;
  43067. procedure TUART1A_U1STA.clearUTXEN; inline;
  43068. begin
  43069. pTDefRegMap(@Self)^.clr := $00000400;
  43070. end;
  43071. procedure TUART1A_U1STA.setUTXEN(thebits : TBits_1); inline;
  43072. begin
  43073. if thebits = 0 then
  43074. pTDefRegMap(@Self)^.clr := $00000400
  43075. else
  43076. pTDefRegMap(@Self)^.&set := $00000400;
  43077. end;
  43078. function TUART1A_U1STA.getUTXEN : TBits_1; inline;
  43079. begin
  43080. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43081. end;
  43082. procedure TUART1A_U1STA.setUTXBRK; inline;
  43083. begin
  43084. pTDefRegMap(@Self)^.&set := $00000800;
  43085. end;
  43086. procedure TUART1A_U1STA.clearUTXBRK; inline;
  43087. begin
  43088. pTDefRegMap(@Self)^.clr := $00000800;
  43089. end;
  43090. procedure TUART1A_U1STA.setUTXBRK(thebits : TBits_1); inline;
  43091. begin
  43092. if thebits = 0 then
  43093. pTDefRegMap(@Self)^.clr := $00000800
  43094. else
  43095. pTDefRegMap(@Self)^.&set := $00000800;
  43096. end;
  43097. function TUART1A_U1STA.getUTXBRK : TBits_1; inline;
  43098. begin
  43099. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43100. end;
  43101. procedure TUART1A_U1STA.setURXEN; inline;
  43102. begin
  43103. pTDefRegMap(@Self)^.&set := $00001000;
  43104. end;
  43105. procedure TUART1A_U1STA.clearURXEN; inline;
  43106. begin
  43107. pTDefRegMap(@Self)^.clr := $00001000;
  43108. end;
  43109. procedure TUART1A_U1STA.setURXEN(thebits : TBits_1); inline;
  43110. begin
  43111. if thebits = 0 then
  43112. pTDefRegMap(@Self)^.clr := $00001000
  43113. else
  43114. pTDefRegMap(@Self)^.&set := $00001000;
  43115. end;
  43116. function TUART1A_U1STA.getURXEN : TBits_1; inline;
  43117. begin
  43118. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43119. end;
  43120. procedure TUART1A_U1STA.setUTXINV; inline;
  43121. begin
  43122. pTDefRegMap(@Self)^.&set := $00002000;
  43123. end;
  43124. procedure TUART1A_U1STA.clearUTXINV; inline;
  43125. begin
  43126. pTDefRegMap(@Self)^.clr := $00002000;
  43127. end;
  43128. procedure TUART1A_U1STA.setUTXINV(thebits : TBits_1); inline;
  43129. begin
  43130. if thebits = 0 then
  43131. pTDefRegMap(@Self)^.clr := $00002000
  43132. else
  43133. pTDefRegMap(@Self)^.&set := $00002000;
  43134. end;
  43135. function TUART1A_U1STA.getUTXINV : TBits_1; inline;
  43136. begin
  43137. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43138. end;
  43139. procedure TUART1A_U1STA.setUTXISEL(thebits : TBits_2); inline;
  43140. begin
  43141. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  43142. end;
  43143. function TUART1A_U1STA.getUTXISEL : TBits_2; inline;
  43144. begin
  43145. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  43146. end;
  43147. procedure TUART1A_U1STA.setADDR(thebits : TBits_8); inline;
  43148. begin
  43149. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  43150. end;
  43151. function TUART1A_U1STA.getADDR : TBits_8; inline;
  43152. begin
  43153. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  43154. end;
  43155. procedure TUART1A_U1STA.setADM_EN; inline;
  43156. begin
  43157. pTDefRegMap(@Self)^.&set := $01000000;
  43158. end;
  43159. procedure TUART1A_U1STA.clearADM_EN; inline;
  43160. begin
  43161. pTDefRegMap(@Self)^.clr := $01000000;
  43162. end;
  43163. procedure TUART1A_U1STA.setADM_EN(thebits : TBits_1); inline;
  43164. begin
  43165. if thebits = 0 then
  43166. pTDefRegMap(@Self)^.clr := $01000000
  43167. else
  43168. pTDefRegMap(@Self)^.&set := $01000000;
  43169. end;
  43170. function TUART1A_U1STA.getADM_EN : TBits_1; inline;
  43171. begin
  43172. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  43173. end;
  43174. procedure TUART1A_U1STA.setURXISEL0; inline;
  43175. begin
  43176. pTDefRegMap(@Self)^.&set := $00000040;
  43177. end;
  43178. procedure TUART1A_U1STA.clearURXISEL0; inline;
  43179. begin
  43180. pTDefRegMap(@Self)^.clr := $00000040;
  43181. end;
  43182. procedure TUART1A_U1STA.setURXISEL0(thebits : TBits_1); inline;
  43183. begin
  43184. if thebits = 0 then
  43185. pTDefRegMap(@Self)^.clr := $00000040
  43186. else
  43187. pTDefRegMap(@Self)^.&set := $00000040;
  43188. end;
  43189. function TUART1A_U1STA.getURXISEL0 : TBits_1; inline;
  43190. begin
  43191. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43192. end;
  43193. procedure TUART1A_U1STA.setURXISEL1; inline;
  43194. begin
  43195. pTDefRegMap(@Self)^.&set := $00000080;
  43196. end;
  43197. procedure TUART1A_U1STA.clearURXISEL1; inline;
  43198. begin
  43199. pTDefRegMap(@Self)^.clr := $00000080;
  43200. end;
  43201. procedure TUART1A_U1STA.setURXISEL1(thebits : TBits_1); inline;
  43202. begin
  43203. if thebits = 0 then
  43204. pTDefRegMap(@Self)^.clr := $00000080
  43205. else
  43206. pTDefRegMap(@Self)^.&set := $00000080;
  43207. end;
  43208. function TUART1A_U1STA.getURXISEL1 : TBits_1; inline;
  43209. begin
  43210. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43211. end;
  43212. procedure TUART1A_U1STA.setUTXISEL0; inline;
  43213. begin
  43214. pTDefRegMap(@Self)^.&set := $00004000;
  43215. end;
  43216. procedure TUART1A_U1STA.clearUTXISEL0; inline;
  43217. begin
  43218. pTDefRegMap(@Self)^.clr := $00004000;
  43219. end;
  43220. procedure TUART1A_U1STA.setUTXISEL0(thebits : TBits_1); inline;
  43221. begin
  43222. if thebits = 0 then
  43223. pTDefRegMap(@Self)^.clr := $00004000
  43224. else
  43225. pTDefRegMap(@Self)^.&set := $00004000;
  43226. end;
  43227. function TUART1A_U1STA.getUTXISEL0 : TBits_1; inline;
  43228. begin
  43229. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  43230. end;
  43231. procedure TUART1A_U1STA.setUTXISEL1; inline;
  43232. begin
  43233. pTDefRegMap(@Self)^.&set := $00008000;
  43234. end;
  43235. procedure TUART1A_U1STA.clearUTXISEL1; inline;
  43236. begin
  43237. pTDefRegMap(@Self)^.clr := $00008000;
  43238. end;
  43239. procedure TUART1A_U1STA.setUTXISEL1(thebits : TBits_1); inline;
  43240. begin
  43241. if thebits = 0 then
  43242. pTDefRegMap(@Self)^.clr := $00008000
  43243. else
  43244. pTDefRegMap(@Self)^.&set := $00008000;
  43245. end;
  43246. function TUART1A_U1STA.getUTXISEL1 : TBits_1; inline;
  43247. begin
  43248. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43249. end;
  43250. procedure TUART1A_U1STA.setUTXSEL(thebits : TBits_2); inline;
  43251. begin
  43252. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  43253. end;
  43254. function TUART1A_U1STA.getUTXSEL : TBits_2; inline;
  43255. begin
  43256. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  43257. end;
  43258. procedure TUART1A_U1STA.setw(thebits : TBits_32); inline;
  43259. begin
  43260. pTDefRegMap(@Self)^.val := thebits;
  43261. end;
  43262. function TUART1A_U1STA.getw : TBits_32; inline;
  43263. begin
  43264. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43265. end;
  43266. procedure TUART1B_U1BMODE.setSTSEL; inline;
  43267. begin
  43268. pTDefRegMap(@Self)^.&set := $00000001;
  43269. end;
  43270. procedure TUART1B_U1BMODE.clearSTSEL; inline;
  43271. begin
  43272. pTDefRegMap(@Self)^.clr := $00000001;
  43273. end;
  43274. procedure TUART1B_U1BMODE.setSTSEL(thebits : TBits_1); inline;
  43275. begin
  43276. if thebits = 0 then
  43277. pTDefRegMap(@Self)^.clr := $00000001
  43278. else
  43279. pTDefRegMap(@Self)^.&set := $00000001;
  43280. end;
  43281. function TUART1B_U1BMODE.getSTSEL : TBits_1; inline;
  43282. begin
  43283. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43284. end;
  43285. procedure TUART1B_U1BMODE.setPDSEL(thebits : TBits_2); inline;
  43286. begin
  43287. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  43288. end;
  43289. function TUART1B_U1BMODE.getPDSEL : TBits_2; inline;
  43290. begin
  43291. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  43292. end;
  43293. procedure TUART1B_U1BMODE.setBRGH; inline;
  43294. begin
  43295. pTDefRegMap(@Self)^.&set := $00000008;
  43296. end;
  43297. procedure TUART1B_U1BMODE.clearBRGH; inline;
  43298. begin
  43299. pTDefRegMap(@Self)^.clr := $00000008;
  43300. end;
  43301. procedure TUART1B_U1BMODE.setBRGH(thebits : TBits_1); inline;
  43302. begin
  43303. if thebits = 0 then
  43304. pTDefRegMap(@Self)^.clr := $00000008
  43305. else
  43306. pTDefRegMap(@Self)^.&set := $00000008;
  43307. end;
  43308. function TUART1B_U1BMODE.getBRGH : TBits_1; inline;
  43309. begin
  43310. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43311. end;
  43312. procedure TUART1B_U1BMODE.setRXINV; inline;
  43313. begin
  43314. pTDefRegMap(@Self)^.&set := $00000010;
  43315. end;
  43316. procedure TUART1B_U1BMODE.clearRXINV; inline;
  43317. begin
  43318. pTDefRegMap(@Self)^.clr := $00000010;
  43319. end;
  43320. procedure TUART1B_U1BMODE.setRXINV(thebits : TBits_1); inline;
  43321. begin
  43322. if thebits = 0 then
  43323. pTDefRegMap(@Self)^.clr := $00000010
  43324. else
  43325. pTDefRegMap(@Self)^.&set := $00000010;
  43326. end;
  43327. function TUART1B_U1BMODE.getRXINV : TBits_1; inline;
  43328. begin
  43329. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43330. end;
  43331. procedure TUART1B_U1BMODE.setABAUD; inline;
  43332. begin
  43333. pTDefRegMap(@Self)^.&set := $00000020;
  43334. end;
  43335. procedure TUART1B_U1BMODE.clearABAUD; inline;
  43336. begin
  43337. pTDefRegMap(@Self)^.clr := $00000020;
  43338. end;
  43339. procedure TUART1B_U1BMODE.setABAUD(thebits : TBits_1); inline;
  43340. begin
  43341. if thebits = 0 then
  43342. pTDefRegMap(@Self)^.clr := $00000020
  43343. else
  43344. pTDefRegMap(@Self)^.&set := $00000020;
  43345. end;
  43346. function TUART1B_U1BMODE.getABAUD : TBits_1; inline;
  43347. begin
  43348. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43349. end;
  43350. procedure TUART1B_U1BMODE.setLPBACK; inline;
  43351. begin
  43352. pTDefRegMap(@Self)^.&set := $00000040;
  43353. end;
  43354. procedure TUART1B_U1BMODE.clearLPBACK; inline;
  43355. begin
  43356. pTDefRegMap(@Self)^.clr := $00000040;
  43357. end;
  43358. procedure TUART1B_U1BMODE.setLPBACK(thebits : TBits_1); inline;
  43359. begin
  43360. if thebits = 0 then
  43361. pTDefRegMap(@Self)^.clr := $00000040
  43362. else
  43363. pTDefRegMap(@Self)^.&set := $00000040;
  43364. end;
  43365. function TUART1B_U1BMODE.getLPBACK : TBits_1; inline;
  43366. begin
  43367. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43368. end;
  43369. procedure TUART1B_U1BMODE.setWAKE; inline;
  43370. begin
  43371. pTDefRegMap(@Self)^.&set := $00000080;
  43372. end;
  43373. procedure TUART1B_U1BMODE.clearWAKE; inline;
  43374. begin
  43375. pTDefRegMap(@Self)^.clr := $00000080;
  43376. end;
  43377. procedure TUART1B_U1BMODE.setWAKE(thebits : TBits_1); inline;
  43378. begin
  43379. if thebits = 0 then
  43380. pTDefRegMap(@Self)^.clr := $00000080
  43381. else
  43382. pTDefRegMap(@Self)^.&set := $00000080;
  43383. end;
  43384. function TUART1B_U1BMODE.getWAKE : TBits_1; inline;
  43385. begin
  43386. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43387. end;
  43388. procedure TUART1B_U1BMODE.setIREN; inline;
  43389. begin
  43390. pTDefRegMap(@Self)^.&set := $00001000;
  43391. end;
  43392. procedure TUART1B_U1BMODE.clearIREN; inline;
  43393. begin
  43394. pTDefRegMap(@Self)^.clr := $00001000;
  43395. end;
  43396. procedure TUART1B_U1BMODE.setIREN(thebits : TBits_1); inline;
  43397. begin
  43398. if thebits = 0 then
  43399. pTDefRegMap(@Self)^.clr := $00001000
  43400. else
  43401. pTDefRegMap(@Self)^.&set := $00001000;
  43402. end;
  43403. function TUART1B_U1BMODE.getIREN : TBits_1; inline;
  43404. begin
  43405. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43406. end;
  43407. procedure TUART1B_U1BMODE.setSIDL; inline;
  43408. begin
  43409. pTDefRegMap(@Self)^.&set := $00002000;
  43410. end;
  43411. procedure TUART1B_U1BMODE.clearSIDL; inline;
  43412. begin
  43413. pTDefRegMap(@Self)^.clr := $00002000;
  43414. end;
  43415. procedure TUART1B_U1BMODE.setSIDL(thebits : TBits_1); inline;
  43416. begin
  43417. if thebits = 0 then
  43418. pTDefRegMap(@Self)^.clr := $00002000
  43419. else
  43420. pTDefRegMap(@Self)^.&set := $00002000;
  43421. end;
  43422. function TUART1B_U1BMODE.getSIDL : TBits_1; inline;
  43423. begin
  43424. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43425. end;
  43426. procedure TUART1B_U1BMODE.setON; inline;
  43427. begin
  43428. pTDefRegMap(@Self)^.&set := $00008000;
  43429. end;
  43430. procedure TUART1B_U1BMODE.clearON; inline;
  43431. begin
  43432. pTDefRegMap(@Self)^.clr := $00008000;
  43433. end;
  43434. procedure TUART1B_U1BMODE.setON(thebits : TBits_1); inline;
  43435. begin
  43436. if thebits = 0 then
  43437. pTDefRegMap(@Self)^.clr := $00008000
  43438. else
  43439. pTDefRegMap(@Self)^.&set := $00008000;
  43440. end;
  43441. function TUART1B_U1BMODE.getON : TBits_1; inline;
  43442. begin
  43443. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43444. end;
  43445. procedure TUART1B_U1BMODE.setPDSEL0; inline;
  43446. begin
  43447. pTDefRegMap(@Self)^.&set := $00000002;
  43448. end;
  43449. procedure TUART1B_U1BMODE.clearPDSEL0; inline;
  43450. begin
  43451. pTDefRegMap(@Self)^.clr := $00000002;
  43452. end;
  43453. procedure TUART1B_U1BMODE.setPDSEL0(thebits : TBits_1); inline;
  43454. begin
  43455. if thebits = 0 then
  43456. pTDefRegMap(@Self)^.clr := $00000002
  43457. else
  43458. pTDefRegMap(@Self)^.&set := $00000002;
  43459. end;
  43460. function TUART1B_U1BMODE.getPDSEL0 : TBits_1; inline;
  43461. begin
  43462. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43463. end;
  43464. procedure TUART1B_U1BMODE.setPDSEL1; inline;
  43465. begin
  43466. pTDefRegMap(@Self)^.&set := $00000004;
  43467. end;
  43468. procedure TUART1B_U1BMODE.clearPDSEL1; inline;
  43469. begin
  43470. pTDefRegMap(@Self)^.clr := $00000004;
  43471. end;
  43472. procedure TUART1B_U1BMODE.setPDSEL1(thebits : TBits_1); inline;
  43473. begin
  43474. if thebits = 0 then
  43475. pTDefRegMap(@Self)^.clr := $00000004
  43476. else
  43477. pTDefRegMap(@Self)^.&set := $00000004;
  43478. end;
  43479. function TUART1B_U1BMODE.getPDSEL1 : TBits_1; inline;
  43480. begin
  43481. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43482. end;
  43483. procedure TUART1B_U1BMODE.setUSIDL; inline;
  43484. begin
  43485. pTDefRegMap(@Self)^.&set := $00002000;
  43486. end;
  43487. procedure TUART1B_U1BMODE.clearUSIDL; inline;
  43488. begin
  43489. pTDefRegMap(@Self)^.clr := $00002000;
  43490. end;
  43491. procedure TUART1B_U1BMODE.setUSIDL(thebits : TBits_1); inline;
  43492. begin
  43493. if thebits = 0 then
  43494. pTDefRegMap(@Self)^.clr := $00002000
  43495. else
  43496. pTDefRegMap(@Self)^.&set := $00002000;
  43497. end;
  43498. function TUART1B_U1BMODE.getUSIDL : TBits_1; inline;
  43499. begin
  43500. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43501. end;
  43502. procedure TUART1B_U1BMODE.setUARTEN; inline;
  43503. begin
  43504. pTDefRegMap(@Self)^.&set := $00008000;
  43505. end;
  43506. procedure TUART1B_U1BMODE.clearUARTEN; inline;
  43507. begin
  43508. pTDefRegMap(@Self)^.clr := $00008000;
  43509. end;
  43510. procedure TUART1B_U1BMODE.setUARTEN(thebits : TBits_1); inline;
  43511. begin
  43512. if thebits = 0 then
  43513. pTDefRegMap(@Self)^.clr := $00008000
  43514. else
  43515. pTDefRegMap(@Self)^.&set := $00008000;
  43516. end;
  43517. function TUART1B_U1BMODE.getUARTEN : TBits_1; inline;
  43518. begin
  43519. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43520. end;
  43521. procedure TUART1B_U1BMODE.setw(thebits : TBits_32); inline;
  43522. begin
  43523. pTDefRegMap(@Self)^.val := thebits;
  43524. end;
  43525. function TUART1B_U1BMODE.getw : TBits_32; inline;
  43526. begin
  43527. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43528. end;
  43529. procedure TUART1B_U4MODE.setSTSEL; inline;
  43530. begin
  43531. pTDefRegMap(@Self)^.&set := $00000001;
  43532. end;
  43533. procedure TUART1B_U4MODE.clearSTSEL; inline;
  43534. begin
  43535. pTDefRegMap(@Self)^.clr := $00000001;
  43536. end;
  43537. procedure TUART1B_U4MODE.setSTSEL(thebits : TBits_1); inline;
  43538. begin
  43539. if thebits = 0 then
  43540. pTDefRegMap(@Self)^.clr := $00000001
  43541. else
  43542. pTDefRegMap(@Self)^.&set := $00000001;
  43543. end;
  43544. function TUART1B_U4MODE.getSTSEL : TBits_1; inline;
  43545. begin
  43546. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43547. end;
  43548. procedure TUART1B_U4MODE.setPDSEL(thebits : TBits_2); inline;
  43549. begin
  43550. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  43551. end;
  43552. function TUART1B_U4MODE.getPDSEL : TBits_2; inline;
  43553. begin
  43554. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  43555. end;
  43556. procedure TUART1B_U4MODE.setBRGH; inline;
  43557. begin
  43558. pTDefRegMap(@Self)^.&set := $00000008;
  43559. end;
  43560. procedure TUART1B_U4MODE.clearBRGH; inline;
  43561. begin
  43562. pTDefRegMap(@Self)^.clr := $00000008;
  43563. end;
  43564. procedure TUART1B_U4MODE.setBRGH(thebits : TBits_1); inline;
  43565. begin
  43566. if thebits = 0 then
  43567. pTDefRegMap(@Self)^.clr := $00000008
  43568. else
  43569. pTDefRegMap(@Self)^.&set := $00000008;
  43570. end;
  43571. function TUART1B_U4MODE.getBRGH : TBits_1; inline;
  43572. begin
  43573. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43574. end;
  43575. procedure TUART1B_U4MODE.setRXINV; inline;
  43576. begin
  43577. pTDefRegMap(@Self)^.&set := $00000010;
  43578. end;
  43579. procedure TUART1B_U4MODE.clearRXINV; inline;
  43580. begin
  43581. pTDefRegMap(@Self)^.clr := $00000010;
  43582. end;
  43583. procedure TUART1B_U4MODE.setRXINV(thebits : TBits_1); inline;
  43584. begin
  43585. if thebits = 0 then
  43586. pTDefRegMap(@Self)^.clr := $00000010
  43587. else
  43588. pTDefRegMap(@Self)^.&set := $00000010;
  43589. end;
  43590. function TUART1B_U4MODE.getRXINV : TBits_1; inline;
  43591. begin
  43592. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43593. end;
  43594. procedure TUART1B_U4MODE.setABAUD; inline;
  43595. begin
  43596. pTDefRegMap(@Self)^.&set := $00000020;
  43597. end;
  43598. procedure TUART1B_U4MODE.clearABAUD; inline;
  43599. begin
  43600. pTDefRegMap(@Self)^.clr := $00000020;
  43601. end;
  43602. procedure TUART1B_U4MODE.setABAUD(thebits : TBits_1); inline;
  43603. begin
  43604. if thebits = 0 then
  43605. pTDefRegMap(@Self)^.clr := $00000020
  43606. else
  43607. pTDefRegMap(@Self)^.&set := $00000020;
  43608. end;
  43609. function TUART1B_U4MODE.getABAUD : TBits_1; inline;
  43610. begin
  43611. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43612. end;
  43613. procedure TUART1B_U4MODE.setLPBACK; inline;
  43614. begin
  43615. pTDefRegMap(@Self)^.&set := $00000040;
  43616. end;
  43617. procedure TUART1B_U4MODE.clearLPBACK; inline;
  43618. begin
  43619. pTDefRegMap(@Self)^.clr := $00000040;
  43620. end;
  43621. procedure TUART1B_U4MODE.setLPBACK(thebits : TBits_1); inline;
  43622. begin
  43623. if thebits = 0 then
  43624. pTDefRegMap(@Self)^.clr := $00000040
  43625. else
  43626. pTDefRegMap(@Self)^.&set := $00000040;
  43627. end;
  43628. function TUART1B_U4MODE.getLPBACK : TBits_1; inline;
  43629. begin
  43630. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  43631. end;
  43632. procedure TUART1B_U4MODE.setWAKE; inline;
  43633. begin
  43634. pTDefRegMap(@Self)^.&set := $00000080;
  43635. end;
  43636. procedure TUART1B_U4MODE.clearWAKE; inline;
  43637. begin
  43638. pTDefRegMap(@Self)^.clr := $00000080;
  43639. end;
  43640. procedure TUART1B_U4MODE.setWAKE(thebits : TBits_1); inline;
  43641. begin
  43642. if thebits = 0 then
  43643. pTDefRegMap(@Self)^.clr := $00000080
  43644. else
  43645. pTDefRegMap(@Self)^.&set := $00000080;
  43646. end;
  43647. function TUART1B_U4MODE.getWAKE : TBits_1; inline;
  43648. begin
  43649. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  43650. end;
  43651. procedure TUART1B_U4MODE.setIREN; inline;
  43652. begin
  43653. pTDefRegMap(@Self)^.&set := $00001000;
  43654. end;
  43655. procedure TUART1B_U4MODE.clearIREN; inline;
  43656. begin
  43657. pTDefRegMap(@Self)^.clr := $00001000;
  43658. end;
  43659. procedure TUART1B_U4MODE.setIREN(thebits : TBits_1); inline;
  43660. begin
  43661. if thebits = 0 then
  43662. pTDefRegMap(@Self)^.clr := $00001000
  43663. else
  43664. pTDefRegMap(@Self)^.&set := $00001000;
  43665. end;
  43666. function TUART1B_U4MODE.getIREN : TBits_1; inline;
  43667. begin
  43668. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  43669. end;
  43670. procedure TUART1B_U4MODE.setSIDL; inline;
  43671. begin
  43672. pTDefRegMap(@Self)^.&set := $00002000;
  43673. end;
  43674. procedure TUART1B_U4MODE.clearSIDL; inline;
  43675. begin
  43676. pTDefRegMap(@Self)^.clr := $00002000;
  43677. end;
  43678. procedure TUART1B_U4MODE.setSIDL(thebits : TBits_1); inline;
  43679. begin
  43680. if thebits = 0 then
  43681. pTDefRegMap(@Self)^.clr := $00002000
  43682. else
  43683. pTDefRegMap(@Self)^.&set := $00002000;
  43684. end;
  43685. function TUART1B_U4MODE.getSIDL : TBits_1; inline;
  43686. begin
  43687. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43688. end;
  43689. procedure TUART1B_U4MODE.setON; inline;
  43690. begin
  43691. pTDefRegMap(@Self)^.&set := $00008000;
  43692. end;
  43693. procedure TUART1B_U4MODE.clearON; inline;
  43694. begin
  43695. pTDefRegMap(@Self)^.clr := $00008000;
  43696. end;
  43697. procedure TUART1B_U4MODE.setON(thebits : TBits_1); inline;
  43698. begin
  43699. if thebits = 0 then
  43700. pTDefRegMap(@Self)^.clr := $00008000
  43701. else
  43702. pTDefRegMap(@Self)^.&set := $00008000;
  43703. end;
  43704. function TUART1B_U4MODE.getON : TBits_1; inline;
  43705. begin
  43706. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43707. end;
  43708. procedure TUART1B_U4MODE.setPDSEL0; inline;
  43709. begin
  43710. pTDefRegMap(@Self)^.&set := $00000002;
  43711. end;
  43712. procedure TUART1B_U4MODE.clearPDSEL0; inline;
  43713. begin
  43714. pTDefRegMap(@Self)^.clr := $00000002;
  43715. end;
  43716. procedure TUART1B_U4MODE.setPDSEL0(thebits : TBits_1); inline;
  43717. begin
  43718. if thebits = 0 then
  43719. pTDefRegMap(@Self)^.clr := $00000002
  43720. else
  43721. pTDefRegMap(@Self)^.&set := $00000002;
  43722. end;
  43723. function TUART1B_U4MODE.getPDSEL0 : TBits_1; inline;
  43724. begin
  43725. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43726. end;
  43727. procedure TUART1B_U4MODE.setPDSEL1; inline;
  43728. begin
  43729. pTDefRegMap(@Self)^.&set := $00000004;
  43730. end;
  43731. procedure TUART1B_U4MODE.clearPDSEL1; inline;
  43732. begin
  43733. pTDefRegMap(@Self)^.clr := $00000004;
  43734. end;
  43735. procedure TUART1B_U4MODE.setPDSEL1(thebits : TBits_1); inline;
  43736. begin
  43737. if thebits = 0 then
  43738. pTDefRegMap(@Self)^.clr := $00000004
  43739. else
  43740. pTDefRegMap(@Self)^.&set := $00000004;
  43741. end;
  43742. function TUART1B_U4MODE.getPDSEL1 : TBits_1; inline;
  43743. begin
  43744. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43745. end;
  43746. procedure TUART1B_U4MODE.setUSIDL; inline;
  43747. begin
  43748. pTDefRegMap(@Self)^.&set := $00002000;
  43749. end;
  43750. procedure TUART1B_U4MODE.clearUSIDL; inline;
  43751. begin
  43752. pTDefRegMap(@Self)^.clr := $00002000;
  43753. end;
  43754. procedure TUART1B_U4MODE.setUSIDL(thebits : TBits_1); inline;
  43755. begin
  43756. if thebits = 0 then
  43757. pTDefRegMap(@Self)^.clr := $00002000
  43758. else
  43759. pTDefRegMap(@Self)^.&set := $00002000;
  43760. end;
  43761. function TUART1B_U4MODE.getUSIDL : TBits_1; inline;
  43762. begin
  43763. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  43764. end;
  43765. procedure TUART1B_U4MODE.setUARTEN; inline;
  43766. begin
  43767. pTDefRegMap(@Self)^.&set := $00008000;
  43768. end;
  43769. procedure TUART1B_U4MODE.clearUARTEN; inline;
  43770. begin
  43771. pTDefRegMap(@Self)^.clr := $00008000;
  43772. end;
  43773. procedure TUART1B_U4MODE.setUARTEN(thebits : TBits_1); inline;
  43774. begin
  43775. if thebits = 0 then
  43776. pTDefRegMap(@Self)^.clr := $00008000
  43777. else
  43778. pTDefRegMap(@Self)^.&set := $00008000;
  43779. end;
  43780. function TUART1B_U4MODE.getUARTEN : TBits_1; inline;
  43781. begin
  43782. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  43783. end;
  43784. procedure TUART1B_U4MODE.setw(thebits : TBits_32); inline;
  43785. begin
  43786. pTDefRegMap(@Self)^.val := thebits;
  43787. end;
  43788. function TUART1B_U4MODE.getw : TBits_32; inline;
  43789. begin
  43790. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  43791. end;
  43792. procedure TUART1B_U1BSTA.setURXDA; inline;
  43793. begin
  43794. pTDefRegMap(@Self)^.&set := $00000001;
  43795. end;
  43796. procedure TUART1B_U1BSTA.clearURXDA; inline;
  43797. begin
  43798. pTDefRegMap(@Self)^.clr := $00000001;
  43799. end;
  43800. procedure TUART1B_U1BSTA.setURXDA(thebits : TBits_1); inline;
  43801. begin
  43802. if thebits = 0 then
  43803. pTDefRegMap(@Self)^.clr := $00000001
  43804. else
  43805. pTDefRegMap(@Self)^.&set := $00000001;
  43806. end;
  43807. function TUART1B_U1BSTA.getURXDA : TBits_1; inline;
  43808. begin
  43809. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  43810. end;
  43811. procedure TUART1B_U1BSTA.setOERR; inline;
  43812. begin
  43813. pTDefRegMap(@Self)^.&set := $00000002;
  43814. end;
  43815. procedure TUART1B_U1BSTA.clearOERR; inline;
  43816. begin
  43817. pTDefRegMap(@Self)^.clr := $00000002;
  43818. end;
  43819. procedure TUART1B_U1BSTA.setOERR(thebits : TBits_1); inline;
  43820. begin
  43821. if thebits = 0 then
  43822. pTDefRegMap(@Self)^.clr := $00000002
  43823. else
  43824. pTDefRegMap(@Self)^.&set := $00000002;
  43825. end;
  43826. function TUART1B_U1BSTA.getOERR : TBits_1; inline;
  43827. begin
  43828. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  43829. end;
  43830. procedure TUART1B_U1BSTA.setFERR; inline;
  43831. begin
  43832. pTDefRegMap(@Self)^.&set := $00000004;
  43833. end;
  43834. procedure TUART1B_U1BSTA.clearFERR; inline;
  43835. begin
  43836. pTDefRegMap(@Self)^.clr := $00000004;
  43837. end;
  43838. procedure TUART1B_U1BSTA.setFERR(thebits : TBits_1); inline;
  43839. begin
  43840. if thebits = 0 then
  43841. pTDefRegMap(@Self)^.clr := $00000004
  43842. else
  43843. pTDefRegMap(@Self)^.&set := $00000004;
  43844. end;
  43845. function TUART1B_U1BSTA.getFERR : TBits_1; inline;
  43846. begin
  43847. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  43848. end;
  43849. procedure TUART1B_U1BSTA.setPERR; inline;
  43850. begin
  43851. pTDefRegMap(@Self)^.&set := $00000008;
  43852. end;
  43853. procedure TUART1B_U1BSTA.clearPERR; inline;
  43854. begin
  43855. pTDefRegMap(@Self)^.clr := $00000008;
  43856. end;
  43857. procedure TUART1B_U1BSTA.setPERR(thebits : TBits_1); inline;
  43858. begin
  43859. if thebits = 0 then
  43860. pTDefRegMap(@Self)^.clr := $00000008
  43861. else
  43862. pTDefRegMap(@Self)^.&set := $00000008;
  43863. end;
  43864. function TUART1B_U1BSTA.getPERR : TBits_1; inline;
  43865. begin
  43866. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  43867. end;
  43868. procedure TUART1B_U1BSTA.setRIDLE; inline;
  43869. begin
  43870. pTDefRegMap(@Self)^.&set := $00000010;
  43871. end;
  43872. procedure TUART1B_U1BSTA.clearRIDLE; inline;
  43873. begin
  43874. pTDefRegMap(@Self)^.clr := $00000010;
  43875. end;
  43876. procedure TUART1B_U1BSTA.setRIDLE(thebits : TBits_1); inline;
  43877. begin
  43878. if thebits = 0 then
  43879. pTDefRegMap(@Self)^.clr := $00000010
  43880. else
  43881. pTDefRegMap(@Self)^.&set := $00000010;
  43882. end;
  43883. function TUART1B_U1BSTA.getRIDLE : TBits_1; inline;
  43884. begin
  43885. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  43886. end;
  43887. procedure TUART1B_U1BSTA.setADDEN; inline;
  43888. begin
  43889. pTDefRegMap(@Self)^.&set := $00000020;
  43890. end;
  43891. procedure TUART1B_U1BSTA.clearADDEN; inline;
  43892. begin
  43893. pTDefRegMap(@Self)^.clr := $00000020;
  43894. end;
  43895. procedure TUART1B_U1BSTA.setADDEN(thebits : TBits_1); inline;
  43896. begin
  43897. if thebits = 0 then
  43898. pTDefRegMap(@Self)^.clr := $00000020
  43899. else
  43900. pTDefRegMap(@Self)^.&set := $00000020;
  43901. end;
  43902. function TUART1B_U1BSTA.getADDEN : TBits_1; inline;
  43903. begin
  43904. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  43905. end;
  43906. procedure TUART1B_U1BSTA.setURXISEL(thebits : TBits_2); inline;
  43907. begin
  43908. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  43909. end;
  43910. function TUART1B_U1BSTA.getURXISEL : TBits_2; inline;
  43911. begin
  43912. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  43913. end;
  43914. procedure TUART1B_U1BSTA.setTRMT; inline;
  43915. begin
  43916. pTDefRegMap(@Self)^.&set := $00000100;
  43917. end;
  43918. procedure TUART1B_U1BSTA.clearTRMT; inline;
  43919. begin
  43920. pTDefRegMap(@Self)^.clr := $00000100;
  43921. end;
  43922. procedure TUART1B_U1BSTA.setTRMT(thebits : TBits_1); inline;
  43923. begin
  43924. if thebits = 0 then
  43925. pTDefRegMap(@Self)^.clr := $00000100
  43926. else
  43927. pTDefRegMap(@Self)^.&set := $00000100;
  43928. end;
  43929. function TUART1B_U1BSTA.getTRMT : TBits_1; inline;
  43930. begin
  43931. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  43932. end;
  43933. procedure TUART1B_U1BSTA.setUTXBF; inline;
  43934. begin
  43935. pTDefRegMap(@Self)^.&set := $00000200;
  43936. end;
  43937. procedure TUART1B_U1BSTA.clearUTXBF; inline;
  43938. begin
  43939. pTDefRegMap(@Self)^.clr := $00000200;
  43940. end;
  43941. procedure TUART1B_U1BSTA.setUTXBF(thebits : TBits_1); inline;
  43942. begin
  43943. if thebits = 0 then
  43944. pTDefRegMap(@Self)^.clr := $00000200
  43945. else
  43946. pTDefRegMap(@Self)^.&set := $00000200;
  43947. end;
  43948. function TUART1B_U1BSTA.getUTXBF : TBits_1; inline;
  43949. begin
  43950. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  43951. end;
  43952. procedure TUART1B_U1BSTA.setUTXEN; inline;
  43953. begin
  43954. pTDefRegMap(@Self)^.&set := $00000400;
  43955. end;
  43956. procedure TUART1B_U1BSTA.clearUTXEN; inline;
  43957. begin
  43958. pTDefRegMap(@Self)^.clr := $00000400;
  43959. end;
  43960. procedure TUART1B_U1BSTA.setUTXEN(thebits : TBits_1); inline;
  43961. begin
  43962. if thebits = 0 then
  43963. pTDefRegMap(@Self)^.clr := $00000400
  43964. else
  43965. pTDefRegMap(@Self)^.&set := $00000400;
  43966. end;
  43967. function TUART1B_U1BSTA.getUTXEN : TBits_1; inline;
  43968. begin
  43969. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  43970. end;
  43971. procedure TUART1B_U1BSTA.setUTXBRK; inline;
  43972. begin
  43973. pTDefRegMap(@Self)^.&set := $00000800;
  43974. end;
  43975. procedure TUART1B_U1BSTA.clearUTXBRK; inline;
  43976. begin
  43977. pTDefRegMap(@Self)^.clr := $00000800;
  43978. end;
  43979. procedure TUART1B_U1BSTA.setUTXBRK(thebits : TBits_1); inline;
  43980. begin
  43981. if thebits = 0 then
  43982. pTDefRegMap(@Self)^.clr := $00000800
  43983. else
  43984. pTDefRegMap(@Self)^.&set := $00000800;
  43985. end;
  43986. function TUART1B_U1BSTA.getUTXBRK : TBits_1; inline;
  43987. begin
  43988. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  43989. end;
  43990. procedure TUART1B_U1BSTA.setURXEN; inline;
  43991. begin
  43992. pTDefRegMap(@Self)^.&set := $00001000;
  43993. end;
  43994. procedure TUART1B_U1BSTA.clearURXEN; inline;
  43995. begin
  43996. pTDefRegMap(@Self)^.clr := $00001000;
  43997. end;
  43998. procedure TUART1B_U1BSTA.setURXEN(thebits : TBits_1); inline;
  43999. begin
  44000. if thebits = 0 then
  44001. pTDefRegMap(@Self)^.clr := $00001000
  44002. else
  44003. pTDefRegMap(@Self)^.&set := $00001000;
  44004. end;
  44005. function TUART1B_U1BSTA.getURXEN : TBits_1; inline;
  44006. begin
  44007. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44008. end;
  44009. procedure TUART1B_U1BSTA.setUTXINV; inline;
  44010. begin
  44011. pTDefRegMap(@Self)^.&set := $00002000;
  44012. end;
  44013. procedure TUART1B_U1BSTA.clearUTXINV; inline;
  44014. begin
  44015. pTDefRegMap(@Self)^.clr := $00002000;
  44016. end;
  44017. procedure TUART1B_U1BSTA.setUTXINV(thebits : TBits_1); inline;
  44018. begin
  44019. if thebits = 0 then
  44020. pTDefRegMap(@Self)^.clr := $00002000
  44021. else
  44022. pTDefRegMap(@Self)^.&set := $00002000;
  44023. end;
  44024. function TUART1B_U1BSTA.getUTXINV : TBits_1; inline;
  44025. begin
  44026. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44027. end;
  44028. procedure TUART1B_U1BSTA.setUTXISEL(thebits : TBits_2); inline;
  44029. begin
  44030. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  44031. end;
  44032. function TUART1B_U1BSTA.getUTXISEL : TBits_2; inline;
  44033. begin
  44034. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  44035. end;
  44036. procedure TUART1B_U1BSTA.setADDR(thebits : TBits_8); inline;
  44037. begin
  44038. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  44039. end;
  44040. function TUART1B_U1BSTA.getADDR : TBits_8; inline;
  44041. begin
  44042. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  44043. end;
  44044. procedure TUART1B_U1BSTA.setADM_EN; inline;
  44045. begin
  44046. pTDefRegMap(@Self)^.&set := $01000000;
  44047. end;
  44048. procedure TUART1B_U1BSTA.clearADM_EN; inline;
  44049. begin
  44050. pTDefRegMap(@Self)^.clr := $01000000;
  44051. end;
  44052. procedure TUART1B_U1BSTA.setADM_EN(thebits : TBits_1); inline;
  44053. begin
  44054. if thebits = 0 then
  44055. pTDefRegMap(@Self)^.clr := $01000000
  44056. else
  44057. pTDefRegMap(@Self)^.&set := $01000000;
  44058. end;
  44059. function TUART1B_U1BSTA.getADM_EN : TBits_1; inline;
  44060. begin
  44061. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  44062. end;
  44063. procedure TUART1B_U1BSTA.setURXISEL0; inline;
  44064. begin
  44065. pTDefRegMap(@Self)^.&set := $00000040;
  44066. end;
  44067. procedure TUART1B_U1BSTA.clearURXISEL0; inline;
  44068. begin
  44069. pTDefRegMap(@Self)^.clr := $00000040;
  44070. end;
  44071. procedure TUART1B_U1BSTA.setURXISEL0(thebits : TBits_1); inline;
  44072. begin
  44073. if thebits = 0 then
  44074. pTDefRegMap(@Self)^.clr := $00000040
  44075. else
  44076. pTDefRegMap(@Self)^.&set := $00000040;
  44077. end;
  44078. function TUART1B_U1BSTA.getURXISEL0 : TBits_1; inline;
  44079. begin
  44080. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44081. end;
  44082. procedure TUART1B_U1BSTA.setURXISEL1; inline;
  44083. begin
  44084. pTDefRegMap(@Self)^.&set := $00000080;
  44085. end;
  44086. procedure TUART1B_U1BSTA.clearURXISEL1; inline;
  44087. begin
  44088. pTDefRegMap(@Self)^.clr := $00000080;
  44089. end;
  44090. procedure TUART1B_U1BSTA.setURXISEL1(thebits : TBits_1); inline;
  44091. begin
  44092. if thebits = 0 then
  44093. pTDefRegMap(@Self)^.clr := $00000080
  44094. else
  44095. pTDefRegMap(@Self)^.&set := $00000080;
  44096. end;
  44097. function TUART1B_U1BSTA.getURXISEL1 : TBits_1; inline;
  44098. begin
  44099. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44100. end;
  44101. procedure TUART1B_U1BSTA.setUTXISEL0; inline;
  44102. begin
  44103. pTDefRegMap(@Self)^.&set := $00004000;
  44104. end;
  44105. procedure TUART1B_U1BSTA.clearUTXISEL0; inline;
  44106. begin
  44107. pTDefRegMap(@Self)^.clr := $00004000;
  44108. end;
  44109. procedure TUART1B_U1BSTA.setUTXISEL0(thebits : TBits_1); inline;
  44110. begin
  44111. if thebits = 0 then
  44112. pTDefRegMap(@Self)^.clr := $00004000
  44113. else
  44114. pTDefRegMap(@Self)^.&set := $00004000;
  44115. end;
  44116. function TUART1B_U1BSTA.getUTXISEL0 : TBits_1; inline;
  44117. begin
  44118. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44119. end;
  44120. procedure TUART1B_U1BSTA.setUTXISEL1; inline;
  44121. begin
  44122. pTDefRegMap(@Self)^.&set := $00008000;
  44123. end;
  44124. procedure TUART1B_U1BSTA.clearUTXISEL1; inline;
  44125. begin
  44126. pTDefRegMap(@Self)^.clr := $00008000;
  44127. end;
  44128. procedure TUART1B_U1BSTA.setUTXISEL1(thebits : TBits_1); inline;
  44129. begin
  44130. if thebits = 0 then
  44131. pTDefRegMap(@Self)^.clr := $00008000
  44132. else
  44133. pTDefRegMap(@Self)^.&set := $00008000;
  44134. end;
  44135. function TUART1B_U1BSTA.getUTXISEL1 : TBits_1; inline;
  44136. begin
  44137. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44138. end;
  44139. procedure TUART1B_U1BSTA.setUTXSEL(thebits : TBits_2); inline;
  44140. begin
  44141. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  44142. end;
  44143. function TUART1B_U1BSTA.getUTXSEL : TBits_2; inline;
  44144. begin
  44145. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  44146. end;
  44147. procedure TUART1B_U1BSTA.setw(thebits : TBits_32); inline;
  44148. begin
  44149. pTDefRegMap(@Self)^.val := thebits;
  44150. end;
  44151. function TUART1B_U1BSTA.getw : TBits_32; inline;
  44152. begin
  44153. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44154. end;
  44155. procedure TUART1B_U4STA.setURXDA; inline;
  44156. begin
  44157. pTDefRegMap(@Self)^.&set := $00000001;
  44158. end;
  44159. procedure TUART1B_U4STA.clearURXDA; inline;
  44160. begin
  44161. pTDefRegMap(@Self)^.clr := $00000001;
  44162. end;
  44163. procedure TUART1B_U4STA.setURXDA(thebits : TBits_1); inline;
  44164. begin
  44165. if thebits = 0 then
  44166. pTDefRegMap(@Self)^.clr := $00000001
  44167. else
  44168. pTDefRegMap(@Self)^.&set := $00000001;
  44169. end;
  44170. function TUART1B_U4STA.getURXDA : TBits_1; inline;
  44171. begin
  44172. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44173. end;
  44174. procedure TUART1B_U4STA.setOERR; inline;
  44175. begin
  44176. pTDefRegMap(@Self)^.&set := $00000002;
  44177. end;
  44178. procedure TUART1B_U4STA.clearOERR; inline;
  44179. begin
  44180. pTDefRegMap(@Self)^.clr := $00000002;
  44181. end;
  44182. procedure TUART1B_U4STA.setOERR(thebits : TBits_1); inline;
  44183. begin
  44184. if thebits = 0 then
  44185. pTDefRegMap(@Self)^.clr := $00000002
  44186. else
  44187. pTDefRegMap(@Self)^.&set := $00000002;
  44188. end;
  44189. function TUART1B_U4STA.getOERR : TBits_1; inline;
  44190. begin
  44191. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44192. end;
  44193. procedure TUART1B_U4STA.setFERR; inline;
  44194. begin
  44195. pTDefRegMap(@Self)^.&set := $00000004;
  44196. end;
  44197. procedure TUART1B_U4STA.clearFERR; inline;
  44198. begin
  44199. pTDefRegMap(@Self)^.clr := $00000004;
  44200. end;
  44201. procedure TUART1B_U4STA.setFERR(thebits : TBits_1); inline;
  44202. begin
  44203. if thebits = 0 then
  44204. pTDefRegMap(@Self)^.clr := $00000004
  44205. else
  44206. pTDefRegMap(@Self)^.&set := $00000004;
  44207. end;
  44208. function TUART1B_U4STA.getFERR : TBits_1; inline;
  44209. begin
  44210. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44211. end;
  44212. procedure TUART1B_U4STA.setPERR; inline;
  44213. begin
  44214. pTDefRegMap(@Self)^.&set := $00000008;
  44215. end;
  44216. procedure TUART1B_U4STA.clearPERR; inline;
  44217. begin
  44218. pTDefRegMap(@Self)^.clr := $00000008;
  44219. end;
  44220. procedure TUART1B_U4STA.setPERR(thebits : TBits_1); inline;
  44221. begin
  44222. if thebits = 0 then
  44223. pTDefRegMap(@Self)^.clr := $00000008
  44224. else
  44225. pTDefRegMap(@Self)^.&set := $00000008;
  44226. end;
  44227. function TUART1B_U4STA.getPERR : TBits_1; inline;
  44228. begin
  44229. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44230. end;
  44231. procedure TUART1B_U4STA.setRIDLE; inline;
  44232. begin
  44233. pTDefRegMap(@Self)^.&set := $00000010;
  44234. end;
  44235. procedure TUART1B_U4STA.clearRIDLE; inline;
  44236. begin
  44237. pTDefRegMap(@Self)^.clr := $00000010;
  44238. end;
  44239. procedure TUART1B_U4STA.setRIDLE(thebits : TBits_1); inline;
  44240. begin
  44241. if thebits = 0 then
  44242. pTDefRegMap(@Self)^.clr := $00000010
  44243. else
  44244. pTDefRegMap(@Self)^.&set := $00000010;
  44245. end;
  44246. function TUART1B_U4STA.getRIDLE : TBits_1; inline;
  44247. begin
  44248. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44249. end;
  44250. procedure TUART1B_U4STA.setADDEN; inline;
  44251. begin
  44252. pTDefRegMap(@Self)^.&set := $00000020;
  44253. end;
  44254. procedure TUART1B_U4STA.clearADDEN; inline;
  44255. begin
  44256. pTDefRegMap(@Self)^.clr := $00000020;
  44257. end;
  44258. procedure TUART1B_U4STA.setADDEN(thebits : TBits_1); inline;
  44259. begin
  44260. if thebits = 0 then
  44261. pTDefRegMap(@Self)^.clr := $00000020
  44262. else
  44263. pTDefRegMap(@Self)^.&set := $00000020;
  44264. end;
  44265. function TUART1B_U4STA.getADDEN : TBits_1; inline;
  44266. begin
  44267. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44268. end;
  44269. procedure TUART1B_U4STA.setURXISEL(thebits : TBits_2); inline;
  44270. begin
  44271. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  44272. end;
  44273. function TUART1B_U4STA.getURXISEL : TBits_2; inline;
  44274. begin
  44275. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  44276. end;
  44277. procedure TUART1B_U4STA.setTRMT; inline;
  44278. begin
  44279. pTDefRegMap(@Self)^.&set := $00000100;
  44280. end;
  44281. procedure TUART1B_U4STA.clearTRMT; inline;
  44282. begin
  44283. pTDefRegMap(@Self)^.clr := $00000100;
  44284. end;
  44285. procedure TUART1B_U4STA.setTRMT(thebits : TBits_1); inline;
  44286. begin
  44287. if thebits = 0 then
  44288. pTDefRegMap(@Self)^.clr := $00000100
  44289. else
  44290. pTDefRegMap(@Self)^.&set := $00000100;
  44291. end;
  44292. function TUART1B_U4STA.getTRMT : TBits_1; inline;
  44293. begin
  44294. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44295. end;
  44296. procedure TUART1B_U4STA.setUTXBF; inline;
  44297. begin
  44298. pTDefRegMap(@Self)^.&set := $00000200;
  44299. end;
  44300. procedure TUART1B_U4STA.clearUTXBF; inline;
  44301. begin
  44302. pTDefRegMap(@Self)^.clr := $00000200;
  44303. end;
  44304. procedure TUART1B_U4STA.setUTXBF(thebits : TBits_1); inline;
  44305. begin
  44306. if thebits = 0 then
  44307. pTDefRegMap(@Self)^.clr := $00000200
  44308. else
  44309. pTDefRegMap(@Self)^.&set := $00000200;
  44310. end;
  44311. function TUART1B_U4STA.getUTXBF : TBits_1; inline;
  44312. begin
  44313. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44314. end;
  44315. procedure TUART1B_U4STA.setUTXEN; inline;
  44316. begin
  44317. pTDefRegMap(@Self)^.&set := $00000400;
  44318. end;
  44319. procedure TUART1B_U4STA.clearUTXEN; inline;
  44320. begin
  44321. pTDefRegMap(@Self)^.clr := $00000400;
  44322. end;
  44323. procedure TUART1B_U4STA.setUTXEN(thebits : TBits_1); inline;
  44324. begin
  44325. if thebits = 0 then
  44326. pTDefRegMap(@Self)^.clr := $00000400
  44327. else
  44328. pTDefRegMap(@Self)^.&set := $00000400;
  44329. end;
  44330. function TUART1B_U4STA.getUTXEN : TBits_1; inline;
  44331. begin
  44332. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  44333. end;
  44334. procedure TUART1B_U4STA.setUTXBRK; inline;
  44335. begin
  44336. pTDefRegMap(@Self)^.&set := $00000800;
  44337. end;
  44338. procedure TUART1B_U4STA.clearUTXBRK; inline;
  44339. begin
  44340. pTDefRegMap(@Self)^.clr := $00000800;
  44341. end;
  44342. procedure TUART1B_U4STA.setUTXBRK(thebits : TBits_1); inline;
  44343. begin
  44344. if thebits = 0 then
  44345. pTDefRegMap(@Self)^.clr := $00000800
  44346. else
  44347. pTDefRegMap(@Self)^.&set := $00000800;
  44348. end;
  44349. function TUART1B_U4STA.getUTXBRK : TBits_1; inline;
  44350. begin
  44351. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44352. end;
  44353. procedure TUART1B_U4STA.setURXEN; inline;
  44354. begin
  44355. pTDefRegMap(@Self)^.&set := $00001000;
  44356. end;
  44357. procedure TUART1B_U4STA.clearURXEN; inline;
  44358. begin
  44359. pTDefRegMap(@Self)^.clr := $00001000;
  44360. end;
  44361. procedure TUART1B_U4STA.setURXEN(thebits : TBits_1); inline;
  44362. begin
  44363. if thebits = 0 then
  44364. pTDefRegMap(@Self)^.clr := $00001000
  44365. else
  44366. pTDefRegMap(@Self)^.&set := $00001000;
  44367. end;
  44368. function TUART1B_U4STA.getURXEN : TBits_1; inline;
  44369. begin
  44370. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44371. end;
  44372. procedure TUART1B_U4STA.setUTXINV; inline;
  44373. begin
  44374. pTDefRegMap(@Self)^.&set := $00002000;
  44375. end;
  44376. procedure TUART1B_U4STA.clearUTXINV; inline;
  44377. begin
  44378. pTDefRegMap(@Self)^.clr := $00002000;
  44379. end;
  44380. procedure TUART1B_U4STA.setUTXINV(thebits : TBits_1); inline;
  44381. begin
  44382. if thebits = 0 then
  44383. pTDefRegMap(@Self)^.clr := $00002000
  44384. else
  44385. pTDefRegMap(@Self)^.&set := $00002000;
  44386. end;
  44387. function TUART1B_U4STA.getUTXINV : TBits_1; inline;
  44388. begin
  44389. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44390. end;
  44391. procedure TUART1B_U4STA.setUTXISEL(thebits : TBits_2); inline;
  44392. begin
  44393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  44394. end;
  44395. function TUART1B_U4STA.getUTXISEL : TBits_2; inline;
  44396. begin
  44397. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  44398. end;
  44399. procedure TUART1B_U4STA.setADDR(thebits : TBits_8); inline;
  44400. begin
  44401. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  44402. end;
  44403. function TUART1B_U4STA.getADDR : TBits_8; inline;
  44404. begin
  44405. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  44406. end;
  44407. procedure TUART1B_U4STA.setADM_EN; inline;
  44408. begin
  44409. pTDefRegMap(@Self)^.&set := $01000000;
  44410. end;
  44411. procedure TUART1B_U4STA.clearADM_EN; inline;
  44412. begin
  44413. pTDefRegMap(@Self)^.clr := $01000000;
  44414. end;
  44415. procedure TUART1B_U4STA.setADM_EN(thebits : TBits_1); inline;
  44416. begin
  44417. if thebits = 0 then
  44418. pTDefRegMap(@Self)^.clr := $01000000
  44419. else
  44420. pTDefRegMap(@Self)^.&set := $01000000;
  44421. end;
  44422. function TUART1B_U4STA.getADM_EN : TBits_1; inline;
  44423. begin
  44424. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  44425. end;
  44426. procedure TUART1B_U4STA.setURXISEL0; inline;
  44427. begin
  44428. pTDefRegMap(@Self)^.&set := $00000040;
  44429. end;
  44430. procedure TUART1B_U4STA.clearURXISEL0; inline;
  44431. begin
  44432. pTDefRegMap(@Self)^.clr := $00000040;
  44433. end;
  44434. procedure TUART1B_U4STA.setURXISEL0(thebits : TBits_1); inline;
  44435. begin
  44436. if thebits = 0 then
  44437. pTDefRegMap(@Self)^.clr := $00000040
  44438. else
  44439. pTDefRegMap(@Self)^.&set := $00000040;
  44440. end;
  44441. function TUART1B_U4STA.getURXISEL0 : TBits_1; inline;
  44442. begin
  44443. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44444. end;
  44445. procedure TUART1B_U4STA.setURXISEL1; inline;
  44446. begin
  44447. pTDefRegMap(@Self)^.&set := $00000080;
  44448. end;
  44449. procedure TUART1B_U4STA.clearURXISEL1; inline;
  44450. begin
  44451. pTDefRegMap(@Self)^.clr := $00000080;
  44452. end;
  44453. procedure TUART1B_U4STA.setURXISEL1(thebits : TBits_1); inline;
  44454. begin
  44455. if thebits = 0 then
  44456. pTDefRegMap(@Self)^.clr := $00000080
  44457. else
  44458. pTDefRegMap(@Self)^.&set := $00000080;
  44459. end;
  44460. function TUART1B_U4STA.getURXISEL1 : TBits_1; inline;
  44461. begin
  44462. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44463. end;
  44464. procedure TUART1B_U4STA.setUTXISEL0; inline;
  44465. begin
  44466. pTDefRegMap(@Self)^.&set := $00004000;
  44467. end;
  44468. procedure TUART1B_U4STA.clearUTXISEL0; inline;
  44469. begin
  44470. pTDefRegMap(@Self)^.clr := $00004000;
  44471. end;
  44472. procedure TUART1B_U4STA.setUTXISEL0(thebits : TBits_1); inline;
  44473. begin
  44474. if thebits = 0 then
  44475. pTDefRegMap(@Self)^.clr := $00004000
  44476. else
  44477. pTDefRegMap(@Self)^.&set := $00004000;
  44478. end;
  44479. function TUART1B_U4STA.getUTXISEL0 : TBits_1; inline;
  44480. begin
  44481. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  44482. end;
  44483. procedure TUART1B_U4STA.setUTXISEL1; inline;
  44484. begin
  44485. pTDefRegMap(@Self)^.&set := $00008000;
  44486. end;
  44487. procedure TUART1B_U4STA.clearUTXISEL1; inline;
  44488. begin
  44489. pTDefRegMap(@Self)^.clr := $00008000;
  44490. end;
  44491. procedure TUART1B_U4STA.setUTXISEL1(thebits : TBits_1); inline;
  44492. begin
  44493. if thebits = 0 then
  44494. pTDefRegMap(@Self)^.clr := $00008000
  44495. else
  44496. pTDefRegMap(@Self)^.&set := $00008000;
  44497. end;
  44498. function TUART1B_U4STA.getUTXISEL1 : TBits_1; inline;
  44499. begin
  44500. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44501. end;
  44502. procedure TUART1B_U4STA.setUTXSEL(thebits : TBits_2); inline;
  44503. begin
  44504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  44505. end;
  44506. function TUART1B_U4STA.getUTXSEL : TBits_2; inline;
  44507. begin
  44508. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  44509. end;
  44510. procedure TUART1B_U4STA.setw(thebits : TBits_32); inline;
  44511. begin
  44512. pTDefRegMap(@Self)^.val := thebits;
  44513. end;
  44514. function TUART1B_U4STA.getw : TBits_32; inline;
  44515. begin
  44516. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44517. end;
  44518. procedure TUART3_U2AMODE.setSTSEL; inline;
  44519. begin
  44520. pTDefRegMap(@Self)^.&set := $00000001;
  44521. end;
  44522. procedure TUART3_U2AMODE.clearSTSEL; inline;
  44523. begin
  44524. pTDefRegMap(@Self)^.clr := $00000001;
  44525. end;
  44526. procedure TUART3_U2AMODE.setSTSEL(thebits : TBits_1); inline;
  44527. begin
  44528. if thebits = 0 then
  44529. pTDefRegMap(@Self)^.clr := $00000001
  44530. else
  44531. pTDefRegMap(@Self)^.&set := $00000001;
  44532. end;
  44533. function TUART3_U2AMODE.getSTSEL : TBits_1; inline;
  44534. begin
  44535. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44536. end;
  44537. procedure TUART3_U2AMODE.setPDSEL(thebits : TBits_2); inline;
  44538. begin
  44539. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  44540. end;
  44541. function TUART3_U2AMODE.getPDSEL : TBits_2; inline;
  44542. begin
  44543. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  44544. end;
  44545. procedure TUART3_U2AMODE.setBRGH; inline;
  44546. begin
  44547. pTDefRegMap(@Self)^.&set := $00000008;
  44548. end;
  44549. procedure TUART3_U2AMODE.clearBRGH; inline;
  44550. begin
  44551. pTDefRegMap(@Self)^.clr := $00000008;
  44552. end;
  44553. procedure TUART3_U2AMODE.setBRGH(thebits : TBits_1); inline;
  44554. begin
  44555. if thebits = 0 then
  44556. pTDefRegMap(@Self)^.clr := $00000008
  44557. else
  44558. pTDefRegMap(@Self)^.&set := $00000008;
  44559. end;
  44560. function TUART3_U2AMODE.getBRGH : TBits_1; inline;
  44561. begin
  44562. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44563. end;
  44564. procedure TUART3_U2AMODE.setRXINV; inline;
  44565. begin
  44566. pTDefRegMap(@Self)^.&set := $00000010;
  44567. end;
  44568. procedure TUART3_U2AMODE.clearRXINV; inline;
  44569. begin
  44570. pTDefRegMap(@Self)^.clr := $00000010;
  44571. end;
  44572. procedure TUART3_U2AMODE.setRXINV(thebits : TBits_1); inline;
  44573. begin
  44574. if thebits = 0 then
  44575. pTDefRegMap(@Self)^.clr := $00000010
  44576. else
  44577. pTDefRegMap(@Self)^.&set := $00000010;
  44578. end;
  44579. function TUART3_U2AMODE.getRXINV : TBits_1; inline;
  44580. begin
  44581. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44582. end;
  44583. procedure TUART3_U2AMODE.setABAUD; inline;
  44584. begin
  44585. pTDefRegMap(@Self)^.&set := $00000020;
  44586. end;
  44587. procedure TUART3_U2AMODE.clearABAUD; inline;
  44588. begin
  44589. pTDefRegMap(@Self)^.clr := $00000020;
  44590. end;
  44591. procedure TUART3_U2AMODE.setABAUD(thebits : TBits_1); inline;
  44592. begin
  44593. if thebits = 0 then
  44594. pTDefRegMap(@Self)^.clr := $00000020
  44595. else
  44596. pTDefRegMap(@Self)^.&set := $00000020;
  44597. end;
  44598. function TUART3_U2AMODE.getABAUD : TBits_1; inline;
  44599. begin
  44600. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44601. end;
  44602. procedure TUART3_U2AMODE.setLPBACK; inline;
  44603. begin
  44604. pTDefRegMap(@Self)^.&set := $00000040;
  44605. end;
  44606. procedure TUART3_U2AMODE.clearLPBACK; inline;
  44607. begin
  44608. pTDefRegMap(@Self)^.clr := $00000040;
  44609. end;
  44610. procedure TUART3_U2AMODE.setLPBACK(thebits : TBits_1); inline;
  44611. begin
  44612. if thebits = 0 then
  44613. pTDefRegMap(@Self)^.clr := $00000040
  44614. else
  44615. pTDefRegMap(@Self)^.&set := $00000040;
  44616. end;
  44617. function TUART3_U2AMODE.getLPBACK : TBits_1; inline;
  44618. begin
  44619. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44620. end;
  44621. procedure TUART3_U2AMODE.setWAKE; inline;
  44622. begin
  44623. pTDefRegMap(@Self)^.&set := $00000080;
  44624. end;
  44625. procedure TUART3_U2AMODE.clearWAKE; inline;
  44626. begin
  44627. pTDefRegMap(@Self)^.clr := $00000080;
  44628. end;
  44629. procedure TUART3_U2AMODE.setWAKE(thebits : TBits_1); inline;
  44630. begin
  44631. if thebits = 0 then
  44632. pTDefRegMap(@Self)^.clr := $00000080
  44633. else
  44634. pTDefRegMap(@Self)^.&set := $00000080;
  44635. end;
  44636. function TUART3_U2AMODE.getWAKE : TBits_1; inline;
  44637. begin
  44638. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44639. end;
  44640. procedure TUART3_U2AMODE.setUEN(thebits : TBits_2); inline;
  44641. begin
  44642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  44643. end;
  44644. function TUART3_U2AMODE.getUEN : TBits_2; inline;
  44645. begin
  44646. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  44647. end;
  44648. procedure TUART3_U2AMODE.setRTSMD; inline;
  44649. begin
  44650. pTDefRegMap(@Self)^.&set := $00000800;
  44651. end;
  44652. procedure TUART3_U2AMODE.clearRTSMD; inline;
  44653. begin
  44654. pTDefRegMap(@Self)^.clr := $00000800;
  44655. end;
  44656. procedure TUART3_U2AMODE.setRTSMD(thebits : TBits_1); inline;
  44657. begin
  44658. if thebits = 0 then
  44659. pTDefRegMap(@Self)^.clr := $00000800
  44660. else
  44661. pTDefRegMap(@Self)^.&set := $00000800;
  44662. end;
  44663. function TUART3_U2AMODE.getRTSMD : TBits_1; inline;
  44664. begin
  44665. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44666. end;
  44667. procedure TUART3_U2AMODE.setIREN; inline;
  44668. begin
  44669. pTDefRegMap(@Self)^.&set := $00001000;
  44670. end;
  44671. procedure TUART3_U2AMODE.clearIREN; inline;
  44672. begin
  44673. pTDefRegMap(@Self)^.clr := $00001000;
  44674. end;
  44675. procedure TUART3_U2AMODE.setIREN(thebits : TBits_1); inline;
  44676. begin
  44677. if thebits = 0 then
  44678. pTDefRegMap(@Self)^.clr := $00001000
  44679. else
  44680. pTDefRegMap(@Self)^.&set := $00001000;
  44681. end;
  44682. function TUART3_U2AMODE.getIREN : TBits_1; inline;
  44683. begin
  44684. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  44685. end;
  44686. procedure TUART3_U2AMODE.setSIDL; inline;
  44687. begin
  44688. pTDefRegMap(@Self)^.&set := $00002000;
  44689. end;
  44690. procedure TUART3_U2AMODE.clearSIDL; inline;
  44691. begin
  44692. pTDefRegMap(@Self)^.clr := $00002000;
  44693. end;
  44694. procedure TUART3_U2AMODE.setSIDL(thebits : TBits_1); inline;
  44695. begin
  44696. if thebits = 0 then
  44697. pTDefRegMap(@Self)^.clr := $00002000
  44698. else
  44699. pTDefRegMap(@Self)^.&set := $00002000;
  44700. end;
  44701. function TUART3_U2AMODE.getSIDL : TBits_1; inline;
  44702. begin
  44703. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44704. end;
  44705. procedure TUART3_U2AMODE.setON; inline;
  44706. begin
  44707. pTDefRegMap(@Self)^.&set := $00008000;
  44708. end;
  44709. procedure TUART3_U2AMODE.clearON; inline;
  44710. begin
  44711. pTDefRegMap(@Self)^.clr := $00008000;
  44712. end;
  44713. procedure TUART3_U2AMODE.setON(thebits : TBits_1); inline;
  44714. begin
  44715. if thebits = 0 then
  44716. pTDefRegMap(@Self)^.clr := $00008000
  44717. else
  44718. pTDefRegMap(@Self)^.&set := $00008000;
  44719. end;
  44720. function TUART3_U2AMODE.getON : TBits_1; inline;
  44721. begin
  44722. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44723. end;
  44724. procedure TUART3_U2AMODE.setPDSEL0; inline;
  44725. begin
  44726. pTDefRegMap(@Self)^.&set := $00000002;
  44727. end;
  44728. procedure TUART3_U2AMODE.clearPDSEL0; inline;
  44729. begin
  44730. pTDefRegMap(@Self)^.clr := $00000002;
  44731. end;
  44732. procedure TUART3_U2AMODE.setPDSEL0(thebits : TBits_1); inline;
  44733. begin
  44734. if thebits = 0 then
  44735. pTDefRegMap(@Self)^.clr := $00000002
  44736. else
  44737. pTDefRegMap(@Self)^.&set := $00000002;
  44738. end;
  44739. function TUART3_U2AMODE.getPDSEL0 : TBits_1; inline;
  44740. begin
  44741. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  44742. end;
  44743. procedure TUART3_U2AMODE.setPDSEL1; inline;
  44744. begin
  44745. pTDefRegMap(@Self)^.&set := $00000004;
  44746. end;
  44747. procedure TUART3_U2AMODE.clearPDSEL1; inline;
  44748. begin
  44749. pTDefRegMap(@Self)^.clr := $00000004;
  44750. end;
  44751. procedure TUART3_U2AMODE.setPDSEL1(thebits : TBits_1); inline;
  44752. begin
  44753. if thebits = 0 then
  44754. pTDefRegMap(@Self)^.clr := $00000004
  44755. else
  44756. pTDefRegMap(@Self)^.&set := $00000004;
  44757. end;
  44758. function TUART3_U2AMODE.getPDSEL1 : TBits_1; inline;
  44759. begin
  44760. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  44761. end;
  44762. procedure TUART3_U2AMODE.setUEN0; inline;
  44763. begin
  44764. pTDefRegMap(@Self)^.&set := $00000100;
  44765. end;
  44766. procedure TUART3_U2AMODE.clearUEN0; inline;
  44767. begin
  44768. pTDefRegMap(@Self)^.clr := $00000100;
  44769. end;
  44770. procedure TUART3_U2AMODE.setUEN0(thebits : TBits_1); inline;
  44771. begin
  44772. if thebits = 0 then
  44773. pTDefRegMap(@Self)^.clr := $00000100
  44774. else
  44775. pTDefRegMap(@Self)^.&set := $00000100;
  44776. end;
  44777. function TUART3_U2AMODE.getUEN0 : TBits_1; inline;
  44778. begin
  44779. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  44780. end;
  44781. procedure TUART3_U2AMODE.setUEN1; inline;
  44782. begin
  44783. pTDefRegMap(@Self)^.&set := $00000200;
  44784. end;
  44785. procedure TUART3_U2AMODE.clearUEN1; inline;
  44786. begin
  44787. pTDefRegMap(@Self)^.clr := $00000200;
  44788. end;
  44789. procedure TUART3_U2AMODE.setUEN1(thebits : TBits_1); inline;
  44790. begin
  44791. if thebits = 0 then
  44792. pTDefRegMap(@Self)^.clr := $00000200
  44793. else
  44794. pTDefRegMap(@Self)^.&set := $00000200;
  44795. end;
  44796. function TUART3_U2AMODE.getUEN1 : TBits_1; inline;
  44797. begin
  44798. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  44799. end;
  44800. procedure TUART3_U2AMODE.setUSIDL; inline;
  44801. begin
  44802. pTDefRegMap(@Self)^.&set := $00002000;
  44803. end;
  44804. procedure TUART3_U2AMODE.clearUSIDL; inline;
  44805. begin
  44806. pTDefRegMap(@Self)^.clr := $00002000;
  44807. end;
  44808. procedure TUART3_U2AMODE.setUSIDL(thebits : TBits_1); inline;
  44809. begin
  44810. if thebits = 0 then
  44811. pTDefRegMap(@Self)^.clr := $00002000
  44812. else
  44813. pTDefRegMap(@Self)^.&set := $00002000;
  44814. end;
  44815. function TUART3_U2AMODE.getUSIDL : TBits_1; inline;
  44816. begin
  44817. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  44818. end;
  44819. procedure TUART3_U2AMODE.setUARTEN; inline;
  44820. begin
  44821. pTDefRegMap(@Self)^.&set := $00008000;
  44822. end;
  44823. procedure TUART3_U2AMODE.clearUARTEN; inline;
  44824. begin
  44825. pTDefRegMap(@Self)^.clr := $00008000;
  44826. end;
  44827. procedure TUART3_U2AMODE.setUARTEN(thebits : TBits_1); inline;
  44828. begin
  44829. if thebits = 0 then
  44830. pTDefRegMap(@Self)^.clr := $00008000
  44831. else
  44832. pTDefRegMap(@Self)^.&set := $00008000;
  44833. end;
  44834. function TUART3_U2AMODE.getUARTEN : TBits_1; inline;
  44835. begin
  44836. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  44837. end;
  44838. procedure TUART3_U2AMODE.setw(thebits : TBits_32); inline;
  44839. begin
  44840. pTDefRegMap(@Self)^.val := thebits;
  44841. end;
  44842. function TUART3_U2AMODE.getw : TBits_32; inline;
  44843. begin
  44844. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  44845. end;
  44846. procedure TUART3_U3MODE.setSTSEL; inline;
  44847. begin
  44848. pTDefRegMap(@Self)^.&set := $00000001;
  44849. end;
  44850. procedure TUART3_U3MODE.clearSTSEL; inline;
  44851. begin
  44852. pTDefRegMap(@Self)^.clr := $00000001;
  44853. end;
  44854. procedure TUART3_U3MODE.setSTSEL(thebits : TBits_1); inline;
  44855. begin
  44856. if thebits = 0 then
  44857. pTDefRegMap(@Self)^.clr := $00000001
  44858. else
  44859. pTDefRegMap(@Self)^.&set := $00000001;
  44860. end;
  44861. function TUART3_U3MODE.getSTSEL : TBits_1; inline;
  44862. begin
  44863. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  44864. end;
  44865. procedure TUART3_U3MODE.setPDSEL(thebits : TBits_2); inline;
  44866. begin
  44867. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  44868. end;
  44869. function TUART3_U3MODE.getPDSEL : TBits_2; inline;
  44870. begin
  44871. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  44872. end;
  44873. procedure TUART3_U3MODE.setBRGH; inline;
  44874. begin
  44875. pTDefRegMap(@Self)^.&set := $00000008;
  44876. end;
  44877. procedure TUART3_U3MODE.clearBRGH; inline;
  44878. begin
  44879. pTDefRegMap(@Self)^.clr := $00000008;
  44880. end;
  44881. procedure TUART3_U3MODE.setBRGH(thebits : TBits_1); inline;
  44882. begin
  44883. if thebits = 0 then
  44884. pTDefRegMap(@Self)^.clr := $00000008
  44885. else
  44886. pTDefRegMap(@Self)^.&set := $00000008;
  44887. end;
  44888. function TUART3_U3MODE.getBRGH : TBits_1; inline;
  44889. begin
  44890. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  44891. end;
  44892. procedure TUART3_U3MODE.setRXINV; inline;
  44893. begin
  44894. pTDefRegMap(@Self)^.&set := $00000010;
  44895. end;
  44896. procedure TUART3_U3MODE.clearRXINV; inline;
  44897. begin
  44898. pTDefRegMap(@Self)^.clr := $00000010;
  44899. end;
  44900. procedure TUART3_U3MODE.setRXINV(thebits : TBits_1); inline;
  44901. begin
  44902. if thebits = 0 then
  44903. pTDefRegMap(@Self)^.clr := $00000010
  44904. else
  44905. pTDefRegMap(@Self)^.&set := $00000010;
  44906. end;
  44907. function TUART3_U3MODE.getRXINV : TBits_1; inline;
  44908. begin
  44909. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  44910. end;
  44911. procedure TUART3_U3MODE.setABAUD; inline;
  44912. begin
  44913. pTDefRegMap(@Self)^.&set := $00000020;
  44914. end;
  44915. procedure TUART3_U3MODE.clearABAUD; inline;
  44916. begin
  44917. pTDefRegMap(@Self)^.clr := $00000020;
  44918. end;
  44919. procedure TUART3_U3MODE.setABAUD(thebits : TBits_1); inline;
  44920. begin
  44921. if thebits = 0 then
  44922. pTDefRegMap(@Self)^.clr := $00000020
  44923. else
  44924. pTDefRegMap(@Self)^.&set := $00000020;
  44925. end;
  44926. function TUART3_U3MODE.getABAUD : TBits_1; inline;
  44927. begin
  44928. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  44929. end;
  44930. procedure TUART3_U3MODE.setLPBACK; inline;
  44931. begin
  44932. pTDefRegMap(@Self)^.&set := $00000040;
  44933. end;
  44934. procedure TUART3_U3MODE.clearLPBACK; inline;
  44935. begin
  44936. pTDefRegMap(@Self)^.clr := $00000040;
  44937. end;
  44938. procedure TUART3_U3MODE.setLPBACK(thebits : TBits_1); inline;
  44939. begin
  44940. if thebits = 0 then
  44941. pTDefRegMap(@Self)^.clr := $00000040
  44942. else
  44943. pTDefRegMap(@Self)^.&set := $00000040;
  44944. end;
  44945. function TUART3_U3MODE.getLPBACK : TBits_1; inline;
  44946. begin
  44947. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  44948. end;
  44949. procedure TUART3_U3MODE.setWAKE; inline;
  44950. begin
  44951. pTDefRegMap(@Self)^.&set := $00000080;
  44952. end;
  44953. procedure TUART3_U3MODE.clearWAKE; inline;
  44954. begin
  44955. pTDefRegMap(@Self)^.clr := $00000080;
  44956. end;
  44957. procedure TUART3_U3MODE.setWAKE(thebits : TBits_1); inline;
  44958. begin
  44959. if thebits = 0 then
  44960. pTDefRegMap(@Self)^.clr := $00000080
  44961. else
  44962. pTDefRegMap(@Self)^.&set := $00000080;
  44963. end;
  44964. function TUART3_U3MODE.getWAKE : TBits_1; inline;
  44965. begin
  44966. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  44967. end;
  44968. procedure TUART3_U3MODE.setUEN(thebits : TBits_2); inline;
  44969. begin
  44970. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  44971. end;
  44972. function TUART3_U3MODE.getUEN : TBits_2; inline;
  44973. begin
  44974. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  44975. end;
  44976. procedure TUART3_U3MODE.setRTSMD; inline;
  44977. begin
  44978. pTDefRegMap(@Self)^.&set := $00000800;
  44979. end;
  44980. procedure TUART3_U3MODE.clearRTSMD; inline;
  44981. begin
  44982. pTDefRegMap(@Self)^.clr := $00000800;
  44983. end;
  44984. procedure TUART3_U3MODE.setRTSMD(thebits : TBits_1); inline;
  44985. begin
  44986. if thebits = 0 then
  44987. pTDefRegMap(@Self)^.clr := $00000800
  44988. else
  44989. pTDefRegMap(@Self)^.&set := $00000800;
  44990. end;
  44991. function TUART3_U3MODE.getRTSMD : TBits_1; inline;
  44992. begin
  44993. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  44994. end;
  44995. procedure TUART3_U3MODE.setIREN; inline;
  44996. begin
  44997. pTDefRegMap(@Self)^.&set := $00001000;
  44998. end;
  44999. procedure TUART3_U3MODE.clearIREN; inline;
  45000. begin
  45001. pTDefRegMap(@Self)^.clr := $00001000;
  45002. end;
  45003. procedure TUART3_U3MODE.setIREN(thebits : TBits_1); inline;
  45004. begin
  45005. if thebits = 0 then
  45006. pTDefRegMap(@Self)^.clr := $00001000
  45007. else
  45008. pTDefRegMap(@Self)^.&set := $00001000;
  45009. end;
  45010. function TUART3_U3MODE.getIREN : TBits_1; inline;
  45011. begin
  45012. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45013. end;
  45014. procedure TUART3_U3MODE.setSIDL; inline;
  45015. begin
  45016. pTDefRegMap(@Self)^.&set := $00002000;
  45017. end;
  45018. procedure TUART3_U3MODE.clearSIDL; inline;
  45019. begin
  45020. pTDefRegMap(@Self)^.clr := $00002000;
  45021. end;
  45022. procedure TUART3_U3MODE.setSIDL(thebits : TBits_1); inline;
  45023. begin
  45024. if thebits = 0 then
  45025. pTDefRegMap(@Self)^.clr := $00002000
  45026. else
  45027. pTDefRegMap(@Self)^.&set := $00002000;
  45028. end;
  45029. function TUART3_U3MODE.getSIDL : TBits_1; inline;
  45030. begin
  45031. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45032. end;
  45033. procedure TUART3_U3MODE.setON; inline;
  45034. begin
  45035. pTDefRegMap(@Self)^.&set := $00008000;
  45036. end;
  45037. procedure TUART3_U3MODE.clearON; inline;
  45038. begin
  45039. pTDefRegMap(@Self)^.clr := $00008000;
  45040. end;
  45041. procedure TUART3_U3MODE.setON(thebits : TBits_1); inline;
  45042. begin
  45043. if thebits = 0 then
  45044. pTDefRegMap(@Self)^.clr := $00008000
  45045. else
  45046. pTDefRegMap(@Self)^.&set := $00008000;
  45047. end;
  45048. function TUART3_U3MODE.getON : TBits_1; inline;
  45049. begin
  45050. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45051. end;
  45052. procedure TUART3_U3MODE.setPDSEL0; inline;
  45053. begin
  45054. pTDefRegMap(@Self)^.&set := $00000002;
  45055. end;
  45056. procedure TUART3_U3MODE.clearPDSEL0; inline;
  45057. begin
  45058. pTDefRegMap(@Self)^.clr := $00000002;
  45059. end;
  45060. procedure TUART3_U3MODE.setPDSEL0(thebits : TBits_1); inline;
  45061. begin
  45062. if thebits = 0 then
  45063. pTDefRegMap(@Self)^.clr := $00000002
  45064. else
  45065. pTDefRegMap(@Self)^.&set := $00000002;
  45066. end;
  45067. function TUART3_U3MODE.getPDSEL0 : TBits_1; inline;
  45068. begin
  45069. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45070. end;
  45071. procedure TUART3_U3MODE.setPDSEL1; inline;
  45072. begin
  45073. pTDefRegMap(@Self)^.&set := $00000004;
  45074. end;
  45075. procedure TUART3_U3MODE.clearPDSEL1; inline;
  45076. begin
  45077. pTDefRegMap(@Self)^.clr := $00000004;
  45078. end;
  45079. procedure TUART3_U3MODE.setPDSEL1(thebits : TBits_1); inline;
  45080. begin
  45081. if thebits = 0 then
  45082. pTDefRegMap(@Self)^.clr := $00000004
  45083. else
  45084. pTDefRegMap(@Self)^.&set := $00000004;
  45085. end;
  45086. function TUART3_U3MODE.getPDSEL1 : TBits_1; inline;
  45087. begin
  45088. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45089. end;
  45090. procedure TUART3_U3MODE.setUEN0; inline;
  45091. begin
  45092. pTDefRegMap(@Self)^.&set := $00000100;
  45093. end;
  45094. procedure TUART3_U3MODE.clearUEN0; inline;
  45095. begin
  45096. pTDefRegMap(@Self)^.clr := $00000100;
  45097. end;
  45098. procedure TUART3_U3MODE.setUEN0(thebits : TBits_1); inline;
  45099. begin
  45100. if thebits = 0 then
  45101. pTDefRegMap(@Self)^.clr := $00000100
  45102. else
  45103. pTDefRegMap(@Self)^.&set := $00000100;
  45104. end;
  45105. function TUART3_U3MODE.getUEN0 : TBits_1; inline;
  45106. begin
  45107. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45108. end;
  45109. procedure TUART3_U3MODE.setUEN1; inline;
  45110. begin
  45111. pTDefRegMap(@Self)^.&set := $00000200;
  45112. end;
  45113. procedure TUART3_U3MODE.clearUEN1; inline;
  45114. begin
  45115. pTDefRegMap(@Self)^.clr := $00000200;
  45116. end;
  45117. procedure TUART3_U3MODE.setUEN1(thebits : TBits_1); inline;
  45118. begin
  45119. if thebits = 0 then
  45120. pTDefRegMap(@Self)^.clr := $00000200
  45121. else
  45122. pTDefRegMap(@Self)^.&set := $00000200;
  45123. end;
  45124. function TUART3_U3MODE.getUEN1 : TBits_1; inline;
  45125. begin
  45126. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45127. end;
  45128. procedure TUART3_U3MODE.setUSIDL; inline;
  45129. begin
  45130. pTDefRegMap(@Self)^.&set := $00002000;
  45131. end;
  45132. procedure TUART3_U3MODE.clearUSIDL; inline;
  45133. begin
  45134. pTDefRegMap(@Self)^.clr := $00002000;
  45135. end;
  45136. procedure TUART3_U3MODE.setUSIDL(thebits : TBits_1); inline;
  45137. begin
  45138. if thebits = 0 then
  45139. pTDefRegMap(@Self)^.clr := $00002000
  45140. else
  45141. pTDefRegMap(@Self)^.&set := $00002000;
  45142. end;
  45143. function TUART3_U3MODE.getUSIDL : TBits_1; inline;
  45144. begin
  45145. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45146. end;
  45147. procedure TUART3_U3MODE.setUARTEN; inline;
  45148. begin
  45149. pTDefRegMap(@Self)^.&set := $00008000;
  45150. end;
  45151. procedure TUART3_U3MODE.clearUARTEN; inline;
  45152. begin
  45153. pTDefRegMap(@Self)^.clr := $00008000;
  45154. end;
  45155. procedure TUART3_U3MODE.setUARTEN(thebits : TBits_1); inline;
  45156. begin
  45157. if thebits = 0 then
  45158. pTDefRegMap(@Self)^.clr := $00008000
  45159. else
  45160. pTDefRegMap(@Self)^.&set := $00008000;
  45161. end;
  45162. function TUART3_U3MODE.getUARTEN : TBits_1; inline;
  45163. begin
  45164. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45165. end;
  45166. procedure TUART3_U3MODE.setw(thebits : TBits_32); inline;
  45167. begin
  45168. pTDefRegMap(@Self)^.val := thebits;
  45169. end;
  45170. function TUART3_U3MODE.getw : TBits_32; inline;
  45171. begin
  45172. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45173. end;
  45174. procedure TUART3_U2ASTA.setURXDA; inline;
  45175. begin
  45176. pTDefRegMap(@Self)^.&set := $00000001;
  45177. end;
  45178. procedure TUART3_U2ASTA.clearURXDA; inline;
  45179. begin
  45180. pTDefRegMap(@Self)^.clr := $00000001;
  45181. end;
  45182. procedure TUART3_U2ASTA.setURXDA(thebits : TBits_1); inline;
  45183. begin
  45184. if thebits = 0 then
  45185. pTDefRegMap(@Self)^.clr := $00000001
  45186. else
  45187. pTDefRegMap(@Self)^.&set := $00000001;
  45188. end;
  45189. function TUART3_U2ASTA.getURXDA : TBits_1; inline;
  45190. begin
  45191. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45192. end;
  45193. procedure TUART3_U2ASTA.setOERR; inline;
  45194. begin
  45195. pTDefRegMap(@Self)^.&set := $00000002;
  45196. end;
  45197. procedure TUART3_U2ASTA.clearOERR; inline;
  45198. begin
  45199. pTDefRegMap(@Self)^.clr := $00000002;
  45200. end;
  45201. procedure TUART3_U2ASTA.setOERR(thebits : TBits_1); inline;
  45202. begin
  45203. if thebits = 0 then
  45204. pTDefRegMap(@Self)^.clr := $00000002
  45205. else
  45206. pTDefRegMap(@Self)^.&set := $00000002;
  45207. end;
  45208. function TUART3_U2ASTA.getOERR : TBits_1; inline;
  45209. begin
  45210. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45211. end;
  45212. procedure TUART3_U2ASTA.setFERR; inline;
  45213. begin
  45214. pTDefRegMap(@Self)^.&set := $00000004;
  45215. end;
  45216. procedure TUART3_U2ASTA.clearFERR; inline;
  45217. begin
  45218. pTDefRegMap(@Self)^.clr := $00000004;
  45219. end;
  45220. procedure TUART3_U2ASTA.setFERR(thebits : TBits_1); inline;
  45221. begin
  45222. if thebits = 0 then
  45223. pTDefRegMap(@Self)^.clr := $00000004
  45224. else
  45225. pTDefRegMap(@Self)^.&set := $00000004;
  45226. end;
  45227. function TUART3_U2ASTA.getFERR : TBits_1; inline;
  45228. begin
  45229. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45230. end;
  45231. procedure TUART3_U2ASTA.setPERR; inline;
  45232. begin
  45233. pTDefRegMap(@Self)^.&set := $00000008;
  45234. end;
  45235. procedure TUART3_U2ASTA.clearPERR; inline;
  45236. begin
  45237. pTDefRegMap(@Self)^.clr := $00000008;
  45238. end;
  45239. procedure TUART3_U2ASTA.setPERR(thebits : TBits_1); inline;
  45240. begin
  45241. if thebits = 0 then
  45242. pTDefRegMap(@Self)^.clr := $00000008
  45243. else
  45244. pTDefRegMap(@Self)^.&set := $00000008;
  45245. end;
  45246. function TUART3_U2ASTA.getPERR : TBits_1; inline;
  45247. begin
  45248. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45249. end;
  45250. procedure TUART3_U2ASTA.setRIDLE; inline;
  45251. begin
  45252. pTDefRegMap(@Self)^.&set := $00000010;
  45253. end;
  45254. procedure TUART3_U2ASTA.clearRIDLE; inline;
  45255. begin
  45256. pTDefRegMap(@Self)^.clr := $00000010;
  45257. end;
  45258. procedure TUART3_U2ASTA.setRIDLE(thebits : TBits_1); inline;
  45259. begin
  45260. if thebits = 0 then
  45261. pTDefRegMap(@Self)^.clr := $00000010
  45262. else
  45263. pTDefRegMap(@Self)^.&set := $00000010;
  45264. end;
  45265. function TUART3_U2ASTA.getRIDLE : TBits_1; inline;
  45266. begin
  45267. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45268. end;
  45269. procedure TUART3_U2ASTA.setADDEN; inline;
  45270. begin
  45271. pTDefRegMap(@Self)^.&set := $00000020;
  45272. end;
  45273. procedure TUART3_U2ASTA.clearADDEN; inline;
  45274. begin
  45275. pTDefRegMap(@Self)^.clr := $00000020;
  45276. end;
  45277. procedure TUART3_U2ASTA.setADDEN(thebits : TBits_1); inline;
  45278. begin
  45279. if thebits = 0 then
  45280. pTDefRegMap(@Self)^.clr := $00000020
  45281. else
  45282. pTDefRegMap(@Self)^.&set := $00000020;
  45283. end;
  45284. function TUART3_U2ASTA.getADDEN : TBits_1; inline;
  45285. begin
  45286. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45287. end;
  45288. procedure TUART3_U2ASTA.setURXISEL(thebits : TBits_2); inline;
  45289. begin
  45290. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  45291. end;
  45292. function TUART3_U2ASTA.getURXISEL : TBits_2; inline;
  45293. begin
  45294. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  45295. end;
  45296. procedure TUART3_U2ASTA.setTRMT; inline;
  45297. begin
  45298. pTDefRegMap(@Self)^.&set := $00000100;
  45299. end;
  45300. procedure TUART3_U2ASTA.clearTRMT; inline;
  45301. begin
  45302. pTDefRegMap(@Self)^.clr := $00000100;
  45303. end;
  45304. procedure TUART3_U2ASTA.setTRMT(thebits : TBits_1); inline;
  45305. begin
  45306. if thebits = 0 then
  45307. pTDefRegMap(@Self)^.clr := $00000100
  45308. else
  45309. pTDefRegMap(@Self)^.&set := $00000100;
  45310. end;
  45311. function TUART3_U2ASTA.getTRMT : TBits_1; inline;
  45312. begin
  45313. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45314. end;
  45315. procedure TUART3_U2ASTA.setUTXBF; inline;
  45316. begin
  45317. pTDefRegMap(@Self)^.&set := $00000200;
  45318. end;
  45319. procedure TUART3_U2ASTA.clearUTXBF; inline;
  45320. begin
  45321. pTDefRegMap(@Self)^.clr := $00000200;
  45322. end;
  45323. procedure TUART3_U2ASTA.setUTXBF(thebits : TBits_1); inline;
  45324. begin
  45325. if thebits = 0 then
  45326. pTDefRegMap(@Self)^.clr := $00000200
  45327. else
  45328. pTDefRegMap(@Self)^.&set := $00000200;
  45329. end;
  45330. function TUART3_U2ASTA.getUTXBF : TBits_1; inline;
  45331. begin
  45332. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45333. end;
  45334. procedure TUART3_U2ASTA.setUTXEN; inline;
  45335. begin
  45336. pTDefRegMap(@Self)^.&set := $00000400;
  45337. end;
  45338. procedure TUART3_U2ASTA.clearUTXEN; inline;
  45339. begin
  45340. pTDefRegMap(@Self)^.clr := $00000400;
  45341. end;
  45342. procedure TUART3_U2ASTA.setUTXEN(thebits : TBits_1); inline;
  45343. begin
  45344. if thebits = 0 then
  45345. pTDefRegMap(@Self)^.clr := $00000400
  45346. else
  45347. pTDefRegMap(@Self)^.&set := $00000400;
  45348. end;
  45349. function TUART3_U2ASTA.getUTXEN : TBits_1; inline;
  45350. begin
  45351. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45352. end;
  45353. procedure TUART3_U2ASTA.setUTXBRK; inline;
  45354. begin
  45355. pTDefRegMap(@Self)^.&set := $00000800;
  45356. end;
  45357. procedure TUART3_U2ASTA.clearUTXBRK; inline;
  45358. begin
  45359. pTDefRegMap(@Self)^.clr := $00000800;
  45360. end;
  45361. procedure TUART3_U2ASTA.setUTXBRK(thebits : TBits_1); inline;
  45362. begin
  45363. if thebits = 0 then
  45364. pTDefRegMap(@Self)^.clr := $00000800
  45365. else
  45366. pTDefRegMap(@Self)^.&set := $00000800;
  45367. end;
  45368. function TUART3_U2ASTA.getUTXBRK : TBits_1; inline;
  45369. begin
  45370. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  45371. end;
  45372. procedure TUART3_U2ASTA.setURXEN; inline;
  45373. begin
  45374. pTDefRegMap(@Self)^.&set := $00001000;
  45375. end;
  45376. procedure TUART3_U2ASTA.clearURXEN; inline;
  45377. begin
  45378. pTDefRegMap(@Self)^.clr := $00001000;
  45379. end;
  45380. procedure TUART3_U2ASTA.setURXEN(thebits : TBits_1); inline;
  45381. begin
  45382. if thebits = 0 then
  45383. pTDefRegMap(@Self)^.clr := $00001000
  45384. else
  45385. pTDefRegMap(@Self)^.&set := $00001000;
  45386. end;
  45387. function TUART3_U2ASTA.getURXEN : TBits_1; inline;
  45388. begin
  45389. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45390. end;
  45391. procedure TUART3_U2ASTA.setUTXINV; inline;
  45392. begin
  45393. pTDefRegMap(@Self)^.&set := $00002000;
  45394. end;
  45395. procedure TUART3_U2ASTA.clearUTXINV; inline;
  45396. begin
  45397. pTDefRegMap(@Self)^.clr := $00002000;
  45398. end;
  45399. procedure TUART3_U2ASTA.setUTXINV(thebits : TBits_1); inline;
  45400. begin
  45401. if thebits = 0 then
  45402. pTDefRegMap(@Self)^.clr := $00002000
  45403. else
  45404. pTDefRegMap(@Self)^.&set := $00002000;
  45405. end;
  45406. function TUART3_U2ASTA.getUTXINV : TBits_1; inline;
  45407. begin
  45408. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45409. end;
  45410. procedure TUART3_U2ASTA.setUTXISEL(thebits : TBits_2); inline;
  45411. begin
  45412. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45413. end;
  45414. function TUART3_U2ASTA.getUTXISEL : TBits_2; inline;
  45415. begin
  45416. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45417. end;
  45418. procedure TUART3_U2ASTA.setADDR(thebits : TBits_8); inline;
  45419. begin
  45420. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  45421. end;
  45422. function TUART3_U2ASTA.getADDR : TBits_8; inline;
  45423. begin
  45424. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  45425. end;
  45426. procedure TUART3_U2ASTA.setADM_EN; inline;
  45427. begin
  45428. pTDefRegMap(@Self)^.&set := $01000000;
  45429. end;
  45430. procedure TUART3_U2ASTA.clearADM_EN; inline;
  45431. begin
  45432. pTDefRegMap(@Self)^.clr := $01000000;
  45433. end;
  45434. procedure TUART3_U2ASTA.setADM_EN(thebits : TBits_1); inline;
  45435. begin
  45436. if thebits = 0 then
  45437. pTDefRegMap(@Self)^.clr := $01000000
  45438. else
  45439. pTDefRegMap(@Self)^.&set := $01000000;
  45440. end;
  45441. function TUART3_U2ASTA.getADM_EN : TBits_1; inline;
  45442. begin
  45443. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  45444. end;
  45445. procedure TUART3_U2ASTA.setURXISEL0; inline;
  45446. begin
  45447. pTDefRegMap(@Self)^.&set := $00000040;
  45448. end;
  45449. procedure TUART3_U2ASTA.clearURXISEL0; inline;
  45450. begin
  45451. pTDefRegMap(@Self)^.clr := $00000040;
  45452. end;
  45453. procedure TUART3_U2ASTA.setURXISEL0(thebits : TBits_1); inline;
  45454. begin
  45455. if thebits = 0 then
  45456. pTDefRegMap(@Self)^.clr := $00000040
  45457. else
  45458. pTDefRegMap(@Self)^.&set := $00000040;
  45459. end;
  45460. function TUART3_U2ASTA.getURXISEL0 : TBits_1; inline;
  45461. begin
  45462. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45463. end;
  45464. procedure TUART3_U2ASTA.setURXISEL1; inline;
  45465. begin
  45466. pTDefRegMap(@Self)^.&set := $00000080;
  45467. end;
  45468. procedure TUART3_U2ASTA.clearURXISEL1; inline;
  45469. begin
  45470. pTDefRegMap(@Self)^.clr := $00000080;
  45471. end;
  45472. procedure TUART3_U2ASTA.setURXISEL1(thebits : TBits_1); inline;
  45473. begin
  45474. if thebits = 0 then
  45475. pTDefRegMap(@Self)^.clr := $00000080
  45476. else
  45477. pTDefRegMap(@Self)^.&set := $00000080;
  45478. end;
  45479. function TUART3_U2ASTA.getURXISEL1 : TBits_1; inline;
  45480. begin
  45481. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45482. end;
  45483. procedure TUART3_U2ASTA.setUTXISEL0; inline;
  45484. begin
  45485. pTDefRegMap(@Self)^.&set := $00004000;
  45486. end;
  45487. procedure TUART3_U2ASTA.clearUTXISEL0; inline;
  45488. begin
  45489. pTDefRegMap(@Self)^.clr := $00004000;
  45490. end;
  45491. procedure TUART3_U2ASTA.setUTXISEL0(thebits : TBits_1); inline;
  45492. begin
  45493. if thebits = 0 then
  45494. pTDefRegMap(@Self)^.clr := $00004000
  45495. else
  45496. pTDefRegMap(@Self)^.&set := $00004000;
  45497. end;
  45498. function TUART3_U2ASTA.getUTXISEL0 : TBits_1; inline;
  45499. begin
  45500. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45501. end;
  45502. procedure TUART3_U2ASTA.setUTXISEL1; inline;
  45503. begin
  45504. pTDefRegMap(@Self)^.&set := $00008000;
  45505. end;
  45506. procedure TUART3_U2ASTA.clearUTXISEL1; inline;
  45507. begin
  45508. pTDefRegMap(@Self)^.clr := $00008000;
  45509. end;
  45510. procedure TUART3_U2ASTA.setUTXISEL1(thebits : TBits_1); inline;
  45511. begin
  45512. if thebits = 0 then
  45513. pTDefRegMap(@Self)^.clr := $00008000
  45514. else
  45515. pTDefRegMap(@Self)^.&set := $00008000;
  45516. end;
  45517. function TUART3_U2ASTA.getUTXISEL1 : TBits_1; inline;
  45518. begin
  45519. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45520. end;
  45521. procedure TUART3_U2ASTA.setUTXSEL(thebits : TBits_2); inline;
  45522. begin
  45523. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45524. end;
  45525. function TUART3_U2ASTA.getUTXSEL : TBits_2; inline;
  45526. begin
  45527. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45528. end;
  45529. procedure TUART3_U2ASTA.setw(thebits : TBits_32); inline;
  45530. begin
  45531. pTDefRegMap(@Self)^.val := thebits;
  45532. end;
  45533. function TUART3_U2ASTA.getw : TBits_32; inline;
  45534. begin
  45535. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45536. end;
  45537. procedure TUART3_U3STA.setURXDA; inline;
  45538. begin
  45539. pTDefRegMap(@Self)^.&set := $00000001;
  45540. end;
  45541. procedure TUART3_U3STA.clearURXDA; inline;
  45542. begin
  45543. pTDefRegMap(@Self)^.clr := $00000001;
  45544. end;
  45545. procedure TUART3_U3STA.setURXDA(thebits : TBits_1); inline;
  45546. begin
  45547. if thebits = 0 then
  45548. pTDefRegMap(@Self)^.clr := $00000001
  45549. else
  45550. pTDefRegMap(@Self)^.&set := $00000001;
  45551. end;
  45552. function TUART3_U3STA.getURXDA : TBits_1; inline;
  45553. begin
  45554. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45555. end;
  45556. procedure TUART3_U3STA.setOERR; inline;
  45557. begin
  45558. pTDefRegMap(@Self)^.&set := $00000002;
  45559. end;
  45560. procedure TUART3_U3STA.clearOERR; inline;
  45561. begin
  45562. pTDefRegMap(@Self)^.clr := $00000002;
  45563. end;
  45564. procedure TUART3_U3STA.setOERR(thebits : TBits_1); inline;
  45565. begin
  45566. if thebits = 0 then
  45567. pTDefRegMap(@Self)^.clr := $00000002
  45568. else
  45569. pTDefRegMap(@Self)^.&set := $00000002;
  45570. end;
  45571. function TUART3_U3STA.getOERR : TBits_1; inline;
  45572. begin
  45573. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  45574. end;
  45575. procedure TUART3_U3STA.setFERR; inline;
  45576. begin
  45577. pTDefRegMap(@Self)^.&set := $00000004;
  45578. end;
  45579. procedure TUART3_U3STA.clearFERR; inline;
  45580. begin
  45581. pTDefRegMap(@Self)^.clr := $00000004;
  45582. end;
  45583. procedure TUART3_U3STA.setFERR(thebits : TBits_1); inline;
  45584. begin
  45585. if thebits = 0 then
  45586. pTDefRegMap(@Self)^.clr := $00000004
  45587. else
  45588. pTDefRegMap(@Self)^.&set := $00000004;
  45589. end;
  45590. function TUART3_U3STA.getFERR : TBits_1; inline;
  45591. begin
  45592. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  45593. end;
  45594. procedure TUART3_U3STA.setPERR; inline;
  45595. begin
  45596. pTDefRegMap(@Self)^.&set := $00000008;
  45597. end;
  45598. procedure TUART3_U3STA.clearPERR; inline;
  45599. begin
  45600. pTDefRegMap(@Self)^.clr := $00000008;
  45601. end;
  45602. procedure TUART3_U3STA.setPERR(thebits : TBits_1); inline;
  45603. begin
  45604. if thebits = 0 then
  45605. pTDefRegMap(@Self)^.clr := $00000008
  45606. else
  45607. pTDefRegMap(@Self)^.&set := $00000008;
  45608. end;
  45609. function TUART3_U3STA.getPERR : TBits_1; inline;
  45610. begin
  45611. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45612. end;
  45613. procedure TUART3_U3STA.setRIDLE; inline;
  45614. begin
  45615. pTDefRegMap(@Self)^.&set := $00000010;
  45616. end;
  45617. procedure TUART3_U3STA.clearRIDLE; inline;
  45618. begin
  45619. pTDefRegMap(@Self)^.clr := $00000010;
  45620. end;
  45621. procedure TUART3_U3STA.setRIDLE(thebits : TBits_1); inline;
  45622. begin
  45623. if thebits = 0 then
  45624. pTDefRegMap(@Self)^.clr := $00000010
  45625. else
  45626. pTDefRegMap(@Self)^.&set := $00000010;
  45627. end;
  45628. function TUART3_U3STA.getRIDLE : TBits_1; inline;
  45629. begin
  45630. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45631. end;
  45632. procedure TUART3_U3STA.setADDEN; inline;
  45633. begin
  45634. pTDefRegMap(@Self)^.&set := $00000020;
  45635. end;
  45636. procedure TUART3_U3STA.clearADDEN; inline;
  45637. begin
  45638. pTDefRegMap(@Self)^.clr := $00000020;
  45639. end;
  45640. procedure TUART3_U3STA.setADDEN(thebits : TBits_1); inline;
  45641. begin
  45642. if thebits = 0 then
  45643. pTDefRegMap(@Self)^.clr := $00000020
  45644. else
  45645. pTDefRegMap(@Self)^.&set := $00000020;
  45646. end;
  45647. function TUART3_U3STA.getADDEN : TBits_1; inline;
  45648. begin
  45649. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45650. end;
  45651. procedure TUART3_U3STA.setURXISEL(thebits : TBits_2); inline;
  45652. begin
  45653. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  45654. end;
  45655. function TUART3_U3STA.getURXISEL : TBits_2; inline;
  45656. begin
  45657. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  45658. end;
  45659. procedure TUART3_U3STA.setTRMT; inline;
  45660. begin
  45661. pTDefRegMap(@Self)^.&set := $00000100;
  45662. end;
  45663. procedure TUART3_U3STA.clearTRMT; inline;
  45664. begin
  45665. pTDefRegMap(@Self)^.clr := $00000100;
  45666. end;
  45667. procedure TUART3_U3STA.setTRMT(thebits : TBits_1); inline;
  45668. begin
  45669. if thebits = 0 then
  45670. pTDefRegMap(@Self)^.clr := $00000100
  45671. else
  45672. pTDefRegMap(@Self)^.&set := $00000100;
  45673. end;
  45674. function TUART3_U3STA.getTRMT : TBits_1; inline;
  45675. begin
  45676. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  45677. end;
  45678. procedure TUART3_U3STA.setUTXBF; inline;
  45679. begin
  45680. pTDefRegMap(@Self)^.&set := $00000200;
  45681. end;
  45682. procedure TUART3_U3STA.clearUTXBF; inline;
  45683. begin
  45684. pTDefRegMap(@Self)^.clr := $00000200;
  45685. end;
  45686. procedure TUART3_U3STA.setUTXBF(thebits : TBits_1); inline;
  45687. begin
  45688. if thebits = 0 then
  45689. pTDefRegMap(@Self)^.clr := $00000200
  45690. else
  45691. pTDefRegMap(@Self)^.&set := $00000200;
  45692. end;
  45693. function TUART3_U3STA.getUTXBF : TBits_1; inline;
  45694. begin
  45695. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  45696. end;
  45697. procedure TUART3_U3STA.setUTXEN; inline;
  45698. begin
  45699. pTDefRegMap(@Self)^.&set := $00000400;
  45700. end;
  45701. procedure TUART3_U3STA.clearUTXEN; inline;
  45702. begin
  45703. pTDefRegMap(@Self)^.clr := $00000400;
  45704. end;
  45705. procedure TUART3_U3STA.setUTXEN(thebits : TBits_1); inline;
  45706. begin
  45707. if thebits = 0 then
  45708. pTDefRegMap(@Self)^.clr := $00000400
  45709. else
  45710. pTDefRegMap(@Self)^.&set := $00000400;
  45711. end;
  45712. function TUART3_U3STA.getUTXEN : TBits_1; inline;
  45713. begin
  45714. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  45715. end;
  45716. procedure TUART3_U3STA.setUTXBRK; inline;
  45717. begin
  45718. pTDefRegMap(@Self)^.&set := $00000800;
  45719. end;
  45720. procedure TUART3_U3STA.clearUTXBRK; inline;
  45721. begin
  45722. pTDefRegMap(@Self)^.clr := $00000800;
  45723. end;
  45724. procedure TUART3_U3STA.setUTXBRK(thebits : TBits_1); inline;
  45725. begin
  45726. if thebits = 0 then
  45727. pTDefRegMap(@Self)^.clr := $00000800
  45728. else
  45729. pTDefRegMap(@Self)^.&set := $00000800;
  45730. end;
  45731. function TUART3_U3STA.getUTXBRK : TBits_1; inline;
  45732. begin
  45733. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  45734. end;
  45735. procedure TUART3_U3STA.setURXEN; inline;
  45736. begin
  45737. pTDefRegMap(@Self)^.&set := $00001000;
  45738. end;
  45739. procedure TUART3_U3STA.clearURXEN; inline;
  45740. begin
  45741. pTDefRegMap(@Self)^.clr := $00001000;
  45742. end;
  45743. procedure TUART3_U3STA.setURXEN(thebits : TBits_1); inline;
  45744. begin
  45745. if thebits = 0 then
  45746. pTDefRegMap(@Self)^.clr := $00001000
  45747. else
  45748. pTDefRegMap(@Self)^.&set := $00001000;
  45749. end;
  45750. function TUART3_U3STA.getURXEN : TBits_1; inline;
  45751. begin
  45752. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  45753. end;
  45754. procedure TUART3_U3STA.setUTXINV; inline;
  45755. begin
  45756. pTDefRegMap(@Self)^.&set := $00002000;
  45757. end;
  45758. procedure TUART3_U3STA.clearUTXINV; inline;
  45759. begin
  45760. pTDefRegMap(@Self)^.clr := $00002000;
  45761. end;
  45762. procedure TUART3_U3STA.setUTXINV(thebits : TBits_1); inline;
  45763. begin
  45764. if thebits = 0 then
  45765. pTDefRegMap(@Self)^.clr := $00002000
  45766. else
  45767. pTDefRegMap(@Self)^.&set := $00002000;
  45768. end;
  45769. function TUART3_U3STA.getUTXINV : TBits_1; inline;
  45770. begin
  45771. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  45772. end;
  45773. procedure TUART3_U3STA.setUTXISEL(thebits : TBits_2); inline;
  45774. begin
  45775. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45776. end;
  45777. function TUART3_U3STA.getUTXISEL : TBits_2; inline;
  45778. begin
  45779. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45780. end;
  45781. procedure TUART3_U3STA.setADDR(thebits : TBits_8); inline;
  45782. begin
  45783. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  45784. end;
  45785. function TUART3_U3STA.getADDR : TBits_8; inline;
  45786. begin
  45787. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  45788. end;
  45789. procedure TUART3_U3STA.setADM_EN; inline;
  45790. begin
  45791. pTDefRegMap(@Self)^.&set := $01000000;
  45792. end;
  45793. procedure TUART3_U3STA.clearADM_EN; inline;
  45794. begin
  45795. pTDefRegMap(@Self)^.clr := $01000000;
  45796. end;
  45797. procedure TUART3_U3STA.setADM_EN(thebits : TBits_1); inline;
  45798. begin
  45799. if thebits = 0 then
  45800. pTDefRegMap(@Self)^.clr := $01000000
  45801. else
  45802. pTDefRegMap(@Self)^.&set := $01000000;
  45803. end;
  45804. function TUART3_U3STA.getADM_EN : TBits_1; inline;
  45805. begin
  45806. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  45807. end;
  45808. procedure TUART3_U3STA.setURXISEL0; inline;
  45809. begin
  45810. pTDefRegMap(@Self)^.&set := $00000040;
  45811. end;
  45812. procedure TUART3_U3STA.clearURXISEL0; inline;
  45813. begin
  45814. pTDefRegMap(@Self)^.clr := $00000040;
  45815. end;
  45816. procedure TUART3_U3STA.setURXISEL0(thebits : TBits_1); inline;
  45817. begin
  45818. if thebits = 0 then
  45819. pTDefRegMap(@Self)^.clr := $00000040
  45820. else
  45821. pTDefRegMap(@Self)^.&set := $00000040;
  45822. end;
  45823. function TUART3_U3STA.getURXISEL0 : TBits_1; inline;
  45824. begin
  45825. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  45826. end;
  45827. procedure TUART3_U3STA.setURXISEL1; inline;
  45828. begin
  45829. pTDefRegMap(@Self)^.&set := $00000080;
  45830. end;
  45831. procedure TUART3_U3STA.clearURXISEL1; inline;
  45832. begin
  45833. pTDefRegMap(@Self)^.clr := $00000080;
  45834. end;
  45835. procedure TUART3_U3STA.setURXISEL1(thebits : TBits_1); inline;
  45836. begin
  45837. if thebits = 0 then
  45838. pTDefRegMap(@Self)^.clr := $00000080
  45839. else
  45840. pTDefRegMap(@Self)^.&set := $00000080;
  45841. end;
  45842. function TUART3_U3STA.getURXISEL1 : TBits_1; inline;
  45843. begin
  45844. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  45845. end;
  45846. procedure TUART3_U3STA.setUTXISEL0; inline;
  45847. begin
  45848. pTDefRegMap(@Self)^.&set := $00004000;
  45849. end;
  45850. procedure TUART3_U3STA.clearUTXISEL0; inline;
  45851. begin
  45852. pTDefRegMap(@Self)^.clr := $00004000;
  45853. end;
  45854. procedure TUART3_U3STA.setUTXISEL0(thebits : TBits_1); inline;
  45855. begin
  45856. if thebits = 0 then
  45857. pTDefRegMap(@Self)^.clr := $00004000
  45858. else
  45859. pTDefRegMap(@Self)^.&set := $00004000;
  45860. end;
  45861. function TUART3_U3STA.getUTXISEL0 : TBits_1; inline;
  45862. begin
  45863. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  45864. end;
  45865. procedure TUART3_U3STA.setUTXISEL1; inline;
  45866. begin
  45867. pTDefRegMap(@Self)^.&set := $00008000;
  45868. end;
  45869. procedure TUART3_U3STA.clearUTXISEL1; inline;
  45870. begin
  45871. pTDefRegMap(@Self)^.clr := $00008000;
  45872. end;
  45873. procedure TUART3_U3STA.setUTXISEL1(thebits : TBits_1); inline;
  45874. begin
  45875. if thebits = 0 then
  45876. pTDefRegMap(@Self)^.clr := $00008000
  45877. else
  45878. pTDefRegMap(@Self)^.&set := $00008000;
  45879. end;
  45880. function TUART3_U3STA.getUTXISEL1 : TBits_1; inline;
  45881. begin
  45882. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  45883. end;
  45884. procedure TUART3_U3STA.setUTXSEL(thebits : TBits_2); inline;
  45885. begin
  45886. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  45887. end;
  45888. function TUART3_U3STA.getUTXSEL : TBits_2; inline;
  45889. begin
  45890. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  45891. end;
  45892. procedure TUART3_U3STA.setw(thebits : TBits_32); inline;
  45893. begin
  45894. pTDefRegMap(@Self)^.val := thebits;
  45895. end;
  45896. function TUART3_U3STA.getw : TBits_32; inline;
  45897. begin
  45898. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  45899. end;
  45900. procedure TUART2B_U2BMODE.setSTSEL; inline;
  45901. begin
  45902. pTDefRegMap(@Self)^.&set := $00000001;
  45903. end;
  45904. procedure TUART2B_U2BMODE.clearSTSEL; inline;
  45905. begin
  45906. pTDefRegMap(@Self)^.clr := $00000001;
  45907. end;
  45908. procedure TUART2B_U2BMODE.setSTSEL(thebits : TBits_1); inline;
  45909. begin
  45910. if thebits = 0 then
  45911. pTDefRegMap(@Self)^.clr := $00000001
  45912. else
  45913. pTDefRegMap(@Self)^.&set := $00000001;
  45914. end;
  45915. function TUART2B_U2BMODE.getSTSEL : TBits_1; inline;
  45916. begin
  45917. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  45918. end;
  45919. procedure TUART2B_U2BMODE.setPDSEL(thebits : TBits_2); inline;
  45920. begin
  45921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  45922. end;
  45923. function TUART2B_U2BMODE.getPDSEL : TBits_2; inline;
  45924. begin
  45925. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  45926. end;
  45927. procedure TUART2B_U2BMODE.setBRGH; inline;
  45928. begin
  45929. pTDefRegMap(@Self)^.&set := $00000008;
  45930. end;
  45931. procedure TUART2B_U2BMODE.clearBRGH; inline;
  45932. begin
  45933. pTDefRegMap(@Self)^.clr := $00000008;
  45934. end;
  45935. procedure TUART2B_U2BMODE.setBRGH(thebits : TBits_1); inline;
  45936. begin
  45937. if thebits = 0 then
  45938. pTDefRegMap(@Self)^.clr := $00000008
  45939. else
  45940. pTDefRegMap(@Self)^.&set := $00000008;
  45941. end;
  45942. function TUART2B_U2BMODE.getBRGH : TBits_1; inline;
  45943. begin
  45944. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  45945. end;
  45946. procedure TUART2B_U2BMODE.setRXINV; inline;
  45947. begin
  45948. pTDefRegMap(@Self)^.&set := $00000010;
  45949. end;
  45950. procedure TUART2B_U2BMODE.clearRXINV; inline;
  45951. begin
  45952. pTDefRegMap(@Self)^.clr := $00000010;
  45953. end;
  45954. procedure TUART2B_U2BMODE.setRXINV(thebits : TBits_1); inline;
  45955. begin
  45956. if thebits = 0 then
  45957. pTDefRegMap(@Self)^.clr := $00000010
  45958. else
  45959. pTDefRegMap(@Self)^.&set := $00000010;
  45960. end;
  45961. function TUART2B_U2BMODE.getRXINV : TBits_1; inline;
  45962. begin
  45963. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  45964. end;
  45965. procedure TUART2B_U2BMODE.setABAUD; inline;
  45966. begin
  45967. pTDefRegMap(@Self)^.&set := $00000020;
  45968. end;
  45969. procedure TUART2B_U2BMODE.clearABAUD; inline;
  45970. begin
  45971. pTDefRegMap(@Self)^.clr := $00000020;
  45972. end;
  45973. procedure TUART2B_U2BMODE.setABAUD(thebits : TBits_1); inline;
  45974. begin
  45975. if thebits = 0 then
  45976. pTDefRegMap(@Self)^.clr := $00000020
  45977. else
  45978. pTDefRegMap(@Self)^.&set := $00000020;
  45979. end;
  45980. function TUART2B_U2BMODE.getABAUD : TBits_1; inline;
  45981. begin
  45982. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  45983. end;
  45984. procedure TUART2B_U2BMODE.setLPBACK; inline;
  45985. begin
  45986. pTDefRegMap(@Self)^.&set := $00000040;
  45987. end;
  45988. procedure TUART2B_U2BMODE.clearLPBACK; inline;
  45989. begin
  45990. pTDefRegMap(@Self)^.clr := $00000040;
  45991. end;
  45992. procedure TUART2B_U2BMODE.setLPBACK(thebits : TBits_1); inline;
  45993. begin
  45994. if thebits = 0 then
  45995. pTDefRegMap(@Self)^.clr := $00000040
  45996. else
  45997. pTDefRegMap(@Self)^.&set := $00000040;
  45998. end;
  45999. function TUART2B_U2BMODE.getLPBACK : TBits_1; inline;
  46000. begin
  46001. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46002. end;
  46003. procedure TUART2B_U2BMODE.setWAKE; inline;
  46004. begin
  46005. pTDefRegMap(@Self)^.&set := $00000080;
  46006. end;
  46007. procedure TUART2B_U2BMODE.clearWAKE; inline;
  46008. begin
  46009. pTDefRegMap(@Self)^.clr := $00000080;
  46010. end;
  46011. procedure TUART2B_U2BMODE.setWAKE(thebits : TBits_1); inline;
  46012. begin
  46013. if thebits = 0 then
  46014. pTDefRegMap(@Self)^.clr := $00000080
  46015. else
  46016. pTDefRegMap(@Self)^.&set := $00000080;
  46017. end;
  46018. function TUART2B_U2BMODE.getWAKE : TBits_1; inline;
  46019. begin
  46020. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46021. end;
  46022. procedure TUART2B_U2BMODE.setIREN; inline;
  46023. begin
  46024. pTDefRegMap(@Self)^.&set := $00001000;
  46025. end;
  46026. procedure TUART2B_U2BMODE.clearIREN; inline;
  46027. begin
  46028. pTDefRegMap(@Self)^.clr := $00001000;
  46029. end;
  46030. procedure TUART2B_U2BMODE.setIREN(thebits : TBits_1); inline;
  46031. begin
  46032. if thebits = 0 then
  46033. pTDefRegMap(@Self)^.clr := $00001000
  46034. else
  46035. pTDefRegMap(@Self)^.&set := $00001000;
  46036. end;
  46037. function TUART2B_U2BMODE.getIREN : TBits_1; inline;
  46038. begin
  46039. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46040. end;
  46041. procedure TUART2B_U2BMODE.setSIDL; inline;
  46042. begin
  46043. pTDefRegMap(@Self)^.&set := $00002000;
  46044. end;
  46045. procedure TUART2B_U2BMODE.clearSIDL; inline;
  46046. begin
  46047. pTDefRegMap(@Self)^.clr := $00002000;
  46048. end;
  46049. procedure TUART2B_U2BMODE.setSIDL(thebits : TBits_1); inline;
  46050. begin
  46051. if thebits = 0 then
  46052. pTDefRegMap(@Self)^.clr := $00002000
  46053. else
  46054. pTDefRegMap(@Self)^.&set := $00002000;
  46055. end;
  46056. function TUART2B_U2BMODE.getSIDL : TBits_1; inline;
  46057. begin
  46058. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46059. end;
  46060. procedure TUART2B_U2BMODE.setON; inline;
  46061. begin
  46062. pTDefRegMap(@Self)^.&set := $00008000;
  46063. end;
  46064. procedure TUART2B_U2BMODE.clearON; inline;
  46065. begin
  46066. pTDefRegMap(@Self)^.clr := $00008000;
  46067. end;
  46068. procedure TUART2B_U2BMODE.setON(thebits : TBits_1); inline;
  46069. begin
  46070. if thebits = 0 then
  46071. pTDefRegMap(@Self)^.clr := $00008000
  46072. else
  46073. pTDefRegMap(@Self)^.&set := $00008000;
  46074. end;
  46075. function TUART2B_U2BMODE.getON : TBits_1; inline;
  46076. begin
  46077. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46078. end;
  46079. procedure TUART2B_U2BMODE.setPDSEL0; inline;
  46080. begin
  46081. pTDefRegMap(@Self)^.&set := $00000002;
  46082. end;
  46083. procedure TUART2B_U2BMODE.clearPDSEL0; inline;
  46084. begin
  46085. pTDefRegMap(@Self)^.clr := $00000002;
  46086. end;
  46087. procedure TUART2B_U2BMODE.setPDSEL0(thebits : TBits_1); inline;
  46088. begin
  46089. if thebits = 0 then
  46090. pTDefRegMap(@Self)^.clr := $00000002
  46091. else
  46092. pTDefRegMap(@Self)^.&set := $00000002;
  46093. end;
  46094. function TUART2B_U2BMODE.getPDSEL0 : TBits_1; inline;
  46095. begin
  46096. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46097. end;
  46098. procedure TUART2B_U2BMODE.setPDSEL1; inline;
  46099. begin
  46100. pTDefRegMap(@Self)^.&set := $00000004;
  46101. end;
  46102. procedure TUART2B_U2BMODE.clearPDSEL1; inline;
  46103. begin
  46104. pTDefRegMap(@Self)^.clr := $00000004;
  46105. end;
  46106. procedure TUART2B_U2BMODE.setPDSEL1(thebits : TBits_1); inline;
  46107. begin
  46108. if thebits = 0 then
  46109. pTDefRegMap(@Self)^.clr := $00000004
  46110. else
  46111. pTDefRegMap(@Self)^.&set := $00000004;
  46112. end;
  46113. function TUART2B_U2BMODE.getPDSEL1 : TBits_1; inline;
  46114. begin
  46115. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46116. end;
  46117. procedure TUART2B_U2BMODE.setUSIDL; inline;
  46118. begin
  46119. pTDefRegMap(@Self)^.&set := $00002000;
  46120. end;
  46121. procedure TUART2B_U2BMODE.clearUSIDL; inline;
  46122. begin
  46123. pTDefRegMap(@Self)^.clr := $00002000;
  46124. end;
  46125. procedure TUART2B_U2BMODE.setUSIDL(thebits : TBits_1); inline;
  46126. begin
  46127. if thebits = 0 then
  46128. pTDefRegMap(@Self)^.clr := $00002000
  46129. else
  46130. pTDefRegMap(@Self)^.&set := $00002000;
  46131. end;
  46132. function TUART2B_U2BMODE.getUSIDL : TBits_1; inline;
  46133. begin
  46134. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46135. end;
  46136. procedure TUART2B_U2BMODE.setUARTEN; inline;
  46137. begin
  46138. pTDefRegMap(@Self)^.&set := $00008000;
  46139. end;
  46140. procedure TUART2B_U2BMODE.clearUARTEN; inline;
  46141. begin
  46142. pTDefRegMap(@Self)^.clr := $00008000;
  46143. end;
  46144. procedure TUART2B_U2BMODE.setUARTEN(thebits : TBits_1); inline;
  46145. begin
  46146. if thebits = 0 then
  46147. pTDefRegMap(@Self)^.clr := $00008000
  46148. else
  46149. pTDefRegMap(@Self)^.&set := $00008000;
  46150. end;
  46151. function TUART2B_U2BMODE.getUARTEN : TBits_1; inline;
  46152. begin
  46153. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46154. end;
  46155. procedure TUART2B_U2BMODE.setw(thebits : TBits_32); inline;
  46156. begin
  46157. pTDefRegMap(@Self)^.val := thebits;
  46158. end;
  46159. function TUART2B_U2BMODE.getw : TBits_32; inline;
  46160. begin
  46161. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46162. end;
  46163. procedure TUART2B_U6MODE.setSTSEL; inline;
  46164. begin
  46165. pTDefRegMap(@Self)^.&set := $00000001;
  46166. end;
  46167. procedure TUART2B_U6MODE.clearSTSEL; inline;
  46168. begin
  46169. pTDefRegMap(@Self)^.clr := $00000001;
  46170. end;
  46171. procedure TUART2B_U6MODE.setSTSEL(thebits : TBits_1); inline;
  46172. begin
  46173. if thebits = 0 then
  46174. pTDefRegMap(@Self)^.clr := $00000001
  46175. else
  46176. pTDefRegMap(@Self)^.&set := $00000001;
  46177. end;
  46178. function TUART2B_U6MODE.getSTSEL : TBits_1; inline;
  46179. begin
  46180. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46181. end;
  46182. procedure TUART2B_U6MODE.setPDSEL(thebits : TBits_2); inline;
  46183. begin
  46184. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  46185. end;
  46186. function TUART2B_U6MODE.getPDSEL : TBits_2; inline;
  46187. begin
  46188. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  46189. end;
  46190. procedure TUART2B_U6MODE.setBRGH; inline;
  46191. begin
  46192. pTDefRegMap(@Self)^.&set := $00000008;
  46193. end;
  46194. procedure TUART2B_U6MODE.clearBRGH; inline;
  46195. begin
  46196. pTDefRegMap(@Self)^.clr := $00000008;
  46197. end;
  46198. procedure TUART2B_U6MODE.setBRGH(thebits : TBits_1); inline;
  46199. begin
  46200. if thebits = 0 then
  46201. pTDefRegMap(@Self)^.clr := $00000008
  46202. else
  46203. pTDefRegMap(@Self)^.&set := $00000008;
  46204. end;
  46205. function TUART2B_U6MODE.getBRGH : TBits_1; inline;
  46206. begin
  46207. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46208. end;
  46209. procedure TUART2B_U6MODE.setRXINV; inline;
  46210. begin
  46211. pTDefRegMap(@Self)^.&set := $00000010;
  46212. end;
  46213. procedure TUART2B_U6MODE.clearRXINV; inline;
  46214. begin
  46215. pTDefRegMap(@Self)^.clr := $00000010;
  46216. end;
  46217. procedure TUART2B_U6MODE.setRXINV(thebits : TBits_1); inline;
  46218. begin
  46219. if thebits = 0 then
  46220. pTDefRegMap(@Self)^.clr := $00000010
  46221. else
  46222. pTDefRegMap(@Self)^.&set := $00000010;
  46223. end;
  46224. function TUART2B_U6MODE.getRXINV : TBits_1; inline;
  46225. begin
  46226. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46227. end;
  46228. procedure TUART2B_U6MODE.setABAUD; inline;
  46229. begin
  46230. pTDefRegMap(@Self)^.&set := $00000020;
  46231. end;
  46232. procedure TUART2B_U6MODE.clearABAUD; inline;
  46233. begin
  46234. pTDefRegMap(@Self)^.clr := $00000020;
  46235. end;
  46236. procedure TUART2B_U6MODE.setABAUD(thebits : TBits_1); inline;
  46237. begin
  46238. if thebits = 0 then
  46239. pTDefRegMap(@Self)^.clr := $00000020
  46240. else
  46241. pTDefRegMap(@Self)^.&set := $00000020;
  46242. end;
  46243. function TUART2B_U6MODE.getABAUD : TBits_1; inline;
  46244. begin
  46245. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46246. end;
  46247. procedure TUART2B_U6MODE.setLPBACK; inline;
  46248. begin
  46249. pTDefRegMap(@Self)^.&set := $00000040;
  46250. end;
  46251. procedure TUART2B_U6MODE.clearLPBACK; inline;
  46252. begin
  46253. pTDefRegMap(@Self)^.clr := $00000040;
  46254. end;
  46255. procedure TUART2B_U6MODE.setLPBACK(thebits : TBits_1); inline;
  46256. begin
  46257. if thebits = 0 then
  46258. pTDefRegMap(@Self)^.clr := $00000040
  46259. else
  46260. pTDefRegMap(@Self)^.&set := $00000040;
  46261. end;
  46262. function TUART2B_U6MODE.getLPBACK : TBits_1; inline;
  46263. begin
  46264. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46265. end;
  46266. procedure TUART2B_U6MODE.setWAKE; inline;
  46267. begin
  46268. pTDefRegMap(@Self)^.&set := $00000080;
  46269. end;
  46270. procedure TUART2B_U6MODE.clearWAKE; inline;
  46271. begin
  46272. pTDefRegMap(@Self)^.clr := $00000080;
  46273. end;
  46274. procedure TUART2B_U6MODE.setWAKE(thebits : TBits_1); inline;
  46275. begin
  46276. if thebits = 0 then
  46277. pTDefRegMap(@Self)^.clr := $00000080
  46278. else
  46279. pTDefRegMap(@Self)^.&set := $00000080;
  46280. end;
  46281. function TUART2B_U6MODE.getWAKE : TBits_1; inline;
  46282. begin
  46283. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46284. end;
  46285. procedure TUART2B_U6MODE.setIREN; inline;
  46286. begin
  46287. pTDefRegMap(@Self)^.&set := $00001000;
  46288. end;
  46289. procedure TUART2B_U6MODE.clearIREN; inline;
  46290. begin
  46291. pTDefRegMap(@Self)^.clr := $00001000;
  46292. end;
  46293. procedure TUART2B_U6MODE.setIREN(thebits : TBits_1); inline;
  46294. begin
  46295. if thebits = 0 then
  46296. pTDefRegMap(@Self)^.clr := $00001000
  46297. else
  46298. pTDefRegMap(@Self)^.&set := $00001000;
  46299. end;
  46300. function TUART2B_U6MODE.getIREN : TBits_1; inline;
  46301. begin
  46302. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46303. end;
  46304. procedure TUART2B_U6MODE.setSIDL; inline;
  46305. begin
  46306. pTDefRegMap(@Self)^.&set := $00002000;
  46307. end;
  46308. procedure TUART2B_U6MODE.clearSIDL; inline;
  46309. begin
  46310. pTDefRegMap(@Self)^.clr := $00002000;
  46311. end;
  46312. procedure TUART2B_U6MODE.setSIDL(thebits : TBits_1); inline;
  46313. begin
  46314. if thebits = 0 then
  46315. pTDefRegMap(@Self)^.clr := $00002000
  46316. else
  46317. pTDefRegMap(@Self)^.&set := $00002000;
  46318. end;
  46319. function TUART2B_U6MODE.getSIDL : TBits_1; inline;
  46320. begin
  46321. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46322. end;
  46323. procedure TUART2B_U6MODE.setON; inline;
  46324. begin
  46325. pTDefRegMap(@Self)^.&set := $00008000;
  46326. end;
  46327. procedure TUART2B_U6MODE.clearON; inline;
  46328. begin
  46329. pTDefRegMap(@Self)^.clr := $00008000;
  46330. end;
  46331. procedure TUART2B_U6MODE.setON(thebits : TBits_1); inline;
  46332. begin
  46333. if thebits = 0 then
  46334. pTDefRegMap(@Self)^.clr := $00008000
  46335. else
  46336. pTDefRegMap(@Self)^.&set := $00008000;
  46337. end;
  46338. function TUART2B_U6MODE.getON : TBits_1; inline;
  46339. begin
  46340. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46341. end;
  46342. procedure TUART2B_U6MODE.setPDSEL0; inline;
  46343. begin
  46344. pTDefRegMap(@Self)^.&set := $00000002;
  46345. end;
  46346. procedure TUART2B_U6MODE.clearPDSEL0; inline;
  46347. begin
  46348. pTDefRegMap(@Self)^.clr := $00000002;
  46349. end;
  46350. procedure TUART2B_U6MODE.setPDSEL0(thebits : TBits_1); inline;
  46351. begin
  46352. if thebits = 0 then
  46353. pTDefRegMap(@Self)^.clr := $00000002
  46354. else
  46355. pTDefRegMap(@Self)^.&set := $00000002;
  46356. end;
  46357. function TUART2B_U6MODE.getPDSEL0 : TBits_1; inline;
  46358. begin
  46359. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46360. end;
  46361. procedure TUART2B_U6MODE.setPDSEL1; inline;
  46362. begin
  46363. pTDefRegMap(@Self)^.&set := $00000004;
  46364. end;
  46365. procedure TUART2B_U6MODE.clearPDSEL1; inline;
  46366. begin
  46367. pTDefRegMap(@Self)^.clr := $00000004;
  46368. end;
  46369. procedure TUART2B_U6MODE.setPDSEL1(thebits : TBits_1); inline;
  46370. begin
  46371. if thebits = 0 then
  46372. pTDefRegMap(@Self)^.clr := $00000004
  46373. else
  46374. pTDefRegMap(@Self)^.&set := $00000004;
  46375. end;
  46376. function TUART2B_U6MODE.getPDSEL1 : TBits_1; inline;
  46377. begin
  46378. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46379. end;
  46380. procedure TUART2B_U6MODE.setUSIDL; inline;
  46381. begin
  46382. pTDefRegMap(@Self)^.&set := $00002000;
  46383. end;
  46384. procedure TUART2B_U6MODE.clearUSIDL; inline;
  46385. begin
  46386. pTDefRegMap(@Self)^.clr := $00002000;
  46387. end;
  46388. procedure TUART2B_U6MODE.setUSIDL(thebits : TBits_1); inline;
  46389. begin
  46390. if thebits = 0 then
  46391. pTDefRegMap(@Self)^.clr := $00002000
  46392. else
  46393. pTDefRegMap(@Self)^.&set := $00002000;
  46394. end;
  46395. function TUART2B_U6MODE.getUSIDL : TBits_1; inline;
  46396. begin
  46397. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46398. end;
  46399. procedure TUART2B_U6MODE.setUARTEN; inline;
  46400. begin
  46401. pTDefRegMap(@Self)^.&set := $00008000;
  46402. end;
  46403. procedure TUART2B_U6MODE.clearUARTEN; inline;
  46404. begin
  46405. pTDefRegMap(@Self)^.clr := $00008000;
  46406. end;
  46407. procedure TUART2B_U6MODE.setUARTEN(thebits : TBits_1); inline;
  46408. begin
  46409. if thebits = 0 then
  46410. pTDefRegMap(@Self)^.clr := $00008000
  46411. else
  46412. pTDefRegMap(@Self)^.&set := $00008000;
  46413. end;
  46414. function TUART2B_U6MODE.getUARTEN : TBits_1; inline;
  46415. begin
  46416. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46417. end;
  46418. procedure TUART2B_U6MODE.setw(thebits : TBits_32); inline;
  46419. begin
  46420. pTDefRegMap(@Self)^.val := thebits;
  46421. end;
  46422. function TUART2B_U6MODE.getw : TBits_32; inline;
  46423. begin
  46424. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46425. end;
  46426. procedure TUART2B_U2BSTA.setURXDA; inline;
  46427. begin
  46428. pTDefRegMap(@Self)^.&set := $00000001;
  46429. end;
  46430. procedure TUART2B_U2BSTA.clearURXDA; inline;
  46431. begin
  46432. pTDefRegMap(@Self)^.clr := $00000001;
  46433. end;
  46434. procedure TUART2B_U2BSTA.setURXDA(thebits : TBits_1); inline;
  46435. begin
  46436. if thebits = 0 then
  46437. pTDefRegMap(@Self)^.clr := $00000001
  46438. else
  46439. pTDefRegMap(@Self)^.&set := $00000001;
  46440. end;
  46441. function TUART2B_U2BSTA.getURXDA : TBits_1; inline;
  46442. begin
  46443. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46444. end;
  46445. procedure TUART2B_U2BSTA.setOERR; inline;
  46446. begin
  46447. pTDefRegMap(@Self)^.&set := $00000002;
  46448. end;
  46449. procedure TUART2B_U2BSTA.clearOERR; inline;
  46450. begin
  46451. pTDefRegMap(@Self)^.clr := $00000002;
  46452. end;
  46453. procedure TUART2B_U2BSTA.setOERR(thebits : TBits_1); inline;
  46454. begin
  46455. if thebits = 0 then
  46456. pTDefRegMap(@Self)^.clr := $00000002
  46457. else
  46458. pTDefRegMap(@Self)^.&set := $00000002;
  46459. end;
  46460. function TUART2B_U2BSTA.getOERR : TBits_1; inline;
  46461. begin
  46462. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46463. end;
  46464. procedure TUART2B_U2BSTA.setFERR; inline;
  46465. begin
  46466. pTDefRegMap(@Self)^.&set := $00000004;
  46467. end;
  46468. procedure TUART2B_U2BSTA.clearFERR; inline;
  46469. begin
  46470. pTDefRegMap(@Self)^.clr := $00000004;
  46471. end;
  46472. procedure TUART2B_U2BSTA.setFERR(thebits : TBits_1); inline;
  46473. begin
  46474. if thebits = 0 then
  46475. pTDefRegMap(@Self)^.clr := $00000004
  46476. else
  46477. pTDefRegMap(@Self)^.&set := $00000004;
  46478. end;
  46479. function TUART2B_U2BSTA.getFERR : TBits_1; inline;
  46480. begin
  46481. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46482. end;
  46483. procedure TUART2B_U2BSTA.setPERR; inline;
  46484. begin
  46485. pTDefRegMap(@Self)^.&set := $00000008;
  46486. end;
  46487. procedure TUART2B_U2BSTA.clearPERR; inline;
  46488. begin
  46489. pTDefRegMap(@Self)^.clr := $00000008;
  46490. end;
  46491. procedure TUART2B_U2BSTA.setPERR(thebits : TBits_1); inline;
  46492. begin
  46493. if thebits = 0 then
  46494. pTDefRegMap(@Self)^.clr := $00000008
  46495. else
  46496. pTDefRegMap(@Self)^.&set := $00000008;
  46497. end;
  46498. function TUART2B_U2BSTA.getPERR : TBits_1; inline;
  46499. begin
  46500. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46501. end;
  46502. procedure TUART2B_U2BSTA.setRIDLE; inline;
  46503. begin
  46504. pTDefRegMap(@Self)^.&set := $00000010;
  46505. end;
  46506. procedure TUART2B_U2BSTA.clearRIDLE; inline;
  46507. begin
  46508. pTDefRegMap(@Self)^.clr := $00000010;
  46509. end;
  46510. procedure TUART2B_U2BSTA.setRIDLE(thebits : TBits_1); inline;
  46511. begin
  46512. if thebits = 0 then
  46513. pTDefRegMap(@Self)^.clr := $00000010
  46514. else
  46515. pTDefRegMap(@Self)^.&set := $00000010;
  46516. end;
  46517. function TUART2B_U2BSTA.getRIDLE : TBits_1; inline;
  46518. begin
  46519. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46520. end;
  46521. procedure TUART2B_U2BSTA.setADDEN; inline;
  46522. begin
  46523. pTDefRegMap(@Self)^.&set := $00000020;
  46524. end;
  46525. procedure TUART2B_U2BSTA.clearADDEN; inline;
  46526. begin
  46527. pTDefRegMap(@Self)^.clr := $00000020;
  46528. end;
  46529. procedure TUART2B_U2BSTA.setADDEN(thebits : TBits_1); inline;
  46530. begin
  46531. if thebits = 0 then
  46532. pTDefRegMap(@Self)^.clr := $00000020
  46533. else
  46534. pTDefRegMap(@Self)^.&set := $00000020;
  46535. end;
  46536. function TUART2B_U2BSTA.getADDEN : TBits_1; inline;
  46537. begin
  46538. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46539. end;
  46540. procedure TUART2B_U2BSTA.setURXISEL(thebits : TBits_2); inline;
  46541. begin
  46542. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  46543. end;
  46544. function TUART2B_U2BSTA.getURXISEL : TBits_2; inline;
  46545. begin
  46546. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  46547. end;
  46548. procedure TUART2B_U2BSTA.setTRMT; inline;
  46549. begin
  46550. pTDefRegMap(@Self)^.&set := $00000100;
  46551. end;
  46552. procedure TUART2B_U2BSTA.clearTRMT; inline;
  46553. begin
  46554. pTDefRegMap(@Self)^.clr := $00000100;
  46555. end;
  46556. procedure TUART2B_U2BSTA.setTRMT(thebits : TBits_1); inline;
  46557. begin
  46558. if thebits = 0 then
  46559. pTDefRegMap(@Self)^.clr := $00000100
  46560. else
  46561. pTDefRegMap(@Self)^.&set := $00000100;
  46562. end;
  46563. function TUART2B_U2BSTA.getTRMT : TBits_1; inline;
  46564. begin
  46565. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46566. end;
  46567. procedure TUART2B_U2BSTA.setUTXBF; inline;
  46568. begin
  46569. pTDefRegMap(@Self)^.&set := $00000200;
  46570. end;
  46571. procedure TUART2B_U2BSTA.clearUTXBF; inline;
  46572. begin
  46573. pTDefRegMap(@Self)^.clr := $00000200;
  46574. end;
  46575. procedure TUART2B_U2BSTA.setUTXBF(thebits : TBits_1); inline;
  46576. begin
  46577. if thebits = 0 then
  46578. pTDefRegMap(@Self)^.clr := $00000200
  46579. else
  46580. pTDefRegMap(@Self)^.&set := $00000200;
  46581. end;
  46582. function TUART2B_U2BSTA.getUTXBF : TBits_1; inline;
  46583. begin
  46584. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46585. end;
  46586. procedure TUART2B_U2BSTA.setUTXEN; inline;
  46587. begin
  46588. pTDefRegMap(@Self)^.&set := $00000400;
  46589. end;
  46590. procedure TUART2B_U2BSTA.clearUTXEN; inline;
  46591. begin
  46592. pTDefRegMap(@Self)^.clr := $00000400;
  46593. end;
  46594. procedure TUART2B_U2BSTA.setUTXEN(thebits : TBits_1); inline;
  46595. begin
  46596. if thebits = 0 then
  46597. pTDefRegMap(@Self)^.clr := $00000400
  46598. else
  46599. pTDefRegMap(@Self)^.&set := $00000400;
  46600. end;
  46601. function TUART2B_U2BSTA.getUTXEN : TBits_1; inline;
  46602. begin
  46603. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46604. end;
  46605. procedure TUART2B_U2BSTA.setUTXBRK; inline;
  46606. begin
  46607. pTDefRegMap(@Self)^.&set := $00000800;
  46608. end;
  46609. procedure TUART2B_U2BSTA.clearUTXBRK; inline;
  46610. begin
  46611. pTDefRegMap(@Self)^.clr := $00000800;
  46612. end;
  46613. procedure TUART2B_U2BSTA.setUTXBRK(thebits : TBits_1); inline;
  46614. begin
  46615. if thebits = 0 then
  46616. pTDefRegMap(@Self)^.clr := $00000800
  46617. else
  46618. pTDefRegMap(@Self)^.&set := $00000800;
  46619. end;
  46620. function TUART2B_U2BSTA.getUTXBRK : TBits_1; inline;
  46621. begin
  46622. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46623. end;
  46624. procedure TUART2B_U2BSTA.setURXEN; inline;
  46625. begin
  46626. pTDefRegMap(@Self)^.&set := $00001000;
  46627. end;
  46628. procedure TUART2B_U2BSTA.clearURXEN; inline;
  46629. begin
  46630. pTDefRegMap(@Self)^.clr := $00001000;
  46631. end;
  46632. procedure TUART2B_U2BSTA.setURXEN(thebits : TBits_1); inline;
  46633. begin
  46634. if thebits = 0 then
  46635. pTDefRegMap(@Self)^.clr := $00001000
  46636. else
  46637. pTDefRegMap(@Self)^.&set := $00001000;
  46638. end;
  46639. function TUART2B_U2BSTA.getURXEN : TBits_1; inline;
  46640. begin
  46641. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  46642. end;
  46643. procedure TUART2B_U2BSTA.setUTXINV; inline;
  46644. begin
  46645. pTDefRegMap(@Self)^.&set := $00002000;
  46646. end;
  46647. procedure TUART2B_U2BSTA.clearUTXINV; inline;
  46648. begin
  46649. pTDefRegMap(@Self)^.clr := $00002000;
  46650. end;
  46651. procedure TUART2B_U2BSTA.setUTXINV(thebits : TBits_1); inline;
  46652. begin
  46653. if thebits = 0 then
  46654. pTDefRegMap(@Self)^.clr := $00002000
  46655. else
  46656. pTDefRegMap(@Self)^.&set := $00002000;
  46657. end;
  46658. function TUART2B_U2BSTA.getUTXINV : TBits_1; inline;
  46659. begin
  46660. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  46661. end;
  46662. procedure TUART2B_U2BSTA.setUTXISEL(thebits : TBits_2); inline;
  46663. begin
  46664. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  46665. end;
  46666. function TUART2B_U2BSTA.getUTXISEL : TBits_2; inline;
  46667. begin
  46668. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  46669. end;
  46670. procedure TUART2B_U2BSTA.setADDR(thebits : TBits_8); inline;
  46671. begin
  46672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  46673. end;
  46674. function TUART2B_U2BSTA.getADDR : TBits_8; inline;
  46675. begin
  46676. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  46677. end;
  46678. procedure TUART2B_U2BSTA.setADM_EN; inline;
  46679. begin
  46680. pTDefRegMap(@Self)^.&set := $01000000;
  46681. end;
  46682. procedure TUART2B_U2BSTA.clearADM_EN; inline;
  46683. begin
  46684. pTDefRegMap(@Self)^.clr := $01000000;
  46685. end;
  46686. procedure TUART2B_U2BSTA.setADM_EN(thebits : TBits_1); inline;
  46687. begin
  46688. if thebits = 0 then
  46689. pTDefRegMap(@Self)^.clr := $01000000
  46690. else
  46691. pTDefRegMap(@Self)^.&set := $01000000;
  46692. end;
  46693. function TUART2B_U2BSTA.getADM_EN : TBits_1; inline;
  46694. begin
  46695. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  46696. end;
  46697. procedure TUART2B_U2BSTA.setURXISEL0; inline;
  46698. begin
  46699. pTDefRegMap(@Self)^.&set := $00000040;
  46700. end;
  46701. procedure TUART2B_U2BSTA.clearURXISEL0; inline;
  46702. begin
  46703. pTDefRegMap(@Self)^.clr := $00000040;
  46704. end;
  46705. procedure TUART2B_U2BSTA.setURXISEL0(thebits : TBits_1); inline;
  46706. begin
  46707. if thebits = 0 then
  46708. pTDefRegMap(@Self)^.clr := $00000040
  46709. else
  46710. pTDefRegMap(@Self)^.&set := $00000040;
  46711. end;
  46712. function TUART2B_U2BSTA.getURXISEL0 : TBits_1; inline;
  46713. begin
  46714. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  46715. end;
  46716. procedure TUART2B_U2BSTA.setURXISEL1; inline;
  46717. begin
  46718. pTDefRegMap(@Self)^.&set := $00000080;
  46719. end;
  46720. procedure TUART2B_U2BSTA.clearURXISEL1; inline;
  46721. begin
  46722. pTDefRegMap(@Self)^.clr := $00000080;
  46723. end;
  46724. procedure TUART2B_U2BSTA.setURXISEL1(thebits : TBits_1); inline;
  46725. begin
  46726. if thebits = 0 then
  46727. pTDefRegMap(@Self)^.clr := $00000080
  46728. else
  46729. pTDefRegMap(@Self)^.&set := $00000080;
  46730. end;
  46731. function TUART2B_U2BSTA.getURXISEL1 : TBits_1; inline;
  46732. begin
  46733. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  46734. end;
  46735. procedure TUART2B_U2BSTA.setUTXISEL0; inline;
  46736. begin
  46737. pTDefRegMap(@Self)^.&set := $00004000;
  46738. end;
  46739. procedure TUART2B_U2BSTA.clearUTXISEL0; inline;
  46740. begin
  46741. pTDefRegMap(@Self)^.clr := $00004000;
  46742. end;
  46743. procedure TUART2B_U2BSTA.setUTXISEL0(thebits : TBits_1); inline;
  46744. begin
  46745. if thebits = 0 then
  46746. pTDefRegMap(@Self)^.clr := $00004000
  46747. else
  46748. pTDefRegMap(@Self)^.&set := $00004000;
  46749. end;
  46750. function TUART2B_U2BSTA.getUTXISEL0 : TBits_1; inline;
  46751. begin
  46752. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  46753. end;
  46754. procedure TUART2B_U2BSTA.setUTXISEL1; inline;
  46755. begin
  46756. pTDefRegMap(@Self)^.&set := $00008000;
  46757. end;
  46758. procedure TUART2B_U2BSTA.clearUTXISEL1; inline;
  46759. begin
  46760. pTDefRegMap(@Self)^.clr := $00008000;
  46761. end;
  46762. procedure TUART2B_U2BSTA.setUTXISEL1(thebits : TBits_1); inline;
  46763. begin
  46764. if thebits = 0 then
  46765. pTDefRegMap(@Self)^.clr := $00008000
  46766. else
  46767. pTDefRegMap(@Self)^.&set := $00008000;
  46768. end;
  46769. function TUART2B_U2BSTA.getUTXISEL1 : TBits_1; inline;
  46770. begin
  46771. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  46772. end;
  46773. procedure TUART2B_U2BSTA.setUTXSEL(thebits : TBits_2); inline;
  46774. begin
  46775. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  46776. end;
  46777. function TUART2B_U2BSTA.getUTXSEL : TBits_2; inline;
  46778. begin
  46779. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  46780. end;
  46781. procedure TUART2B_U2BSTA.setw(thebits : TBits_32); inline;
  46782. begin
  46783. pTDefRegMap(@Self)^.val := thebits;
  46784. end;
  46785. function TUART2B_U2BSTA.getw : TBits_32; inline;
  46786. begin
  46787. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  46788. end;
  46789. procedure TUART2B_U6STA.setURXDA; inline;
  46790. begin
  46791. pTDefRegMap(@Self)^.&set := $00000001;
  46792. end;
  46793. procedure TUART2B_U6STA.clearURXDA; inline;
  46794. begin
  46795. pTDefRegMap(@Self)^.clr := $00000001;
  46796. end;
  46797. procedure TUART2B_U6STA.setURXDA(thebits : TBits_1); inline;
  46798. begin
  46799. if thebits = 0 then
  46800. pTDefRegMap(@Self)^.clr := $00000001
  46801. else
  46802. pTDefRegMap(@Self)^.&set := $00000001;
  46803. end;
  46804. function TUART2B_U6STA.getURXDA : TBits_1; inline;
  46805. begin
  46806. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  46807. end;
  46808. procedure TUART2B_U6STA.setOERR; inline;
  46809. begin
  46810. pTDefRegMap(@Self)^.&set := $00000002;
  46811. end;
  46812. procedure TUART2B_U6STA.clearOERR; inline;
  46813. begin
  46814. pTDefRegMap(@Self)^.clr := $00000002;
  46815. end;
  46816. procedure TUART2B_U6STA.setOERR(thebits : TBits_1); inline;
  46817. begin
  46818. if thebits = 0 then
  46819. pTDefRegMap(@Self)^.clr := $00000002
  46820. else
  46821. pTDefRegMap(@Self)^.&set := $00000002;
  46822. end;
  46823. function TUART2B_U6STA.getOERR : TBits_1; inline;
  46824. begin
  46825. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  46826. end;
  46827. procedure TUART2B_U6STA.setFERR; inline;
  46828. begin
  46829. pTDefRegMap(@Self)^.&set := $00000004;
  46830. end;
  46831. procedure TUART2B_U6STA.clearFERR; inline;
  46832. begin
  46833. pTDefRegMap(@Self)^.clr := $00000004;
  46834. end;
  46835. procedure TUART2B_U6STA.setFERR(thebits : TBits_1); inline;
  46836. begin
  46837. if thebits = 0 then
  46838. pTDefRegMap(@Self)^.clr := $00000004
  46839. else
  46840. pTDefRegMap(@Self)^.&set := $00000004;
  46841. end;
  46842. function TUART2B_U6STA.getFERR : TBits_1; inline;
  46843. begin
  46844. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  46845. end;
  46846. procedure TUART2B_U6STA.setPERR; inline;
  46847. begin
  46848. pTDefRegMap(@Self)^.&set := $00000008;
  46849. end;
  46850. procedure TUART2B_U6STA.clearPERR; inline;
  46851. begin
  46852. pTDefRegMap(@Self)^.clr := $00000008;
  46853. end;
  46854. procedure TUART2B_U6STA.setPERR(thebits : TBits_1); inline;
  46855. begin
  46856. if thebits = 0 then
  46857. pTDefRegMap(@Self)^.clr := $00000008
  46858. else
  46859. pTDefRegMap(@Self)^.&set := $00000008;
  46860. end;
  46861. function TUART2B_U6STA.getPERR : TBits_1; inline;
  46862. begin
  46863. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  46864. end;
  46865. procedure TUART2B_U6STA.setRIDLE; inline;
  46866. begin
  46867. pTDefRegMap(@Self)^.&set := $00000010;
  46868. end;
  46869. procedure TUART2B_U6STA.clearRIDLE; inline;
  46870. begin
  46871. pTDefRegMap(@Self)^.clr := $00000010;
  46872. end;
  46873. procedure TUART2B_U6STA.setRIDLE(thebits : TBits_1); inline;
  46874. begin
  46875. if thebits = 0 then
  46876. pTDefRegMap(@Self)^.clr := $00000010
  46877. else
  46878. pTDefRegMap(@Self)^.&set := $00000010;
  46879. end;
  46880. function TUART2B_U6STA.getRIDLE : TBits_1; inline;
  46881. begin
  46882. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  46883. end;
  46884. procedure TUART2B_U6STA.setADDEN; inline;
  46885. begin
  46886. pTDefRegMap(@Self)^.&set := $00000020;
  46887. end;
  46888. procedure TUART2B_U6STA.clearADDEN; inline;
  46889. begin
  46890. pTDefRegMap(@Self)^.clr := $00000020;
  46891. end;
  46892. procedure TUART2B_U6STA.setADDEN(thebits : TBits_1); inline;
  46893. begin
  46894. if thebits = 0 then
  46895. pTDefRegMap(@Self)^.clr := $00000020
  46896. else
  46897. pTDefRegMap(@Self)^.&set := $00000020;
  46898. end;
  46899. function TUART2B_U6STA.getADDEN : TBits_1; inline;
  46900. begin
  46901. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  46902. end;
  46903. procedure TUART2B_U6STA.setURXISEL(thebits : TBits_2); inline;
  46904. begin
  46905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  46906. end;
  46907. function TUART2B_U6STA.getURXISEL : TBits_2; inline;
  46908. begin
  46909. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  46910. end;
  46911. procedure TUART2B_U6STA.setTRMT; inline;
  46912. begin
  46913. pTDefRegMap(@Self)^.&set := $00000100;
  46914. end;
  46915. procedure TUART2B_U6STA.clearTRMT; inline;
  46916. begin
  46917. pTDefRegMap(@Self)^.clr := $00000100;
  46918. end;
  46919. procedure TUART2B_U6STA.setTRMT(thebits : TBits_1); inline;
  46920. begin
  46921. if thebits = 0 then
  46922. pTDefRegMap(@Self)^.clr := $00000100
  46923. else
  46924. pTDefRegMap(@Self)^.&set := $00000100;
  46925. end;
  46926. function TUART2B_U6STA.getTRMT : TBits_1; inline;
  46927. begin
  46928. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  46929. end;
  46930. procedure TUART2B_U6STA.setUTXBF; inline;
  46931. begin
  46932. pTDefRegMap(@Self)^.&set := $00000200;
  46933. end;
  46934. procedure TUART2B_U6STA.clearUTXBF; inline;
  46935. begin
  46936. pTDefRegMap(@Self)^.clr := $00000200;
  46937. end;
  46938. procedure TUART2B_U6STA.setUTXBF(thebits : TBits_1); inline;
  46939. begin
  46940. if thebits = 0 then
  46941. pTDefRegMap(@Self)^.clr := $00000200
  46942. else
  46943. pTDefRegMap(@Self)^.&set := $00000200;
  46944. end;
  46945. function TUART2B_U6STA.getUTXBF : TBits_1; inline;
  46946. begin
  46947. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  46948. end;
  46949. procedure TUART2B_U6STA.setUTXEN; inline;
  46950. begin
  46951. pTDefRegMap(@Self)^.&set := $00000400;
  46952. end;
  46953. procedure TUART2B_U6STA.clearUTXEN; inline;
  46954. begin
  46955. pTDefRegMap(@Self)^.clr := $00000400;
  46956. end;
  46957. procedure TUART2B_U6STA.setUTXEN(thebits : TBits_1); inline;
  46958. begin
  46959. if thebits = 0 then
  46960. pTDefRegMap(@Self)^.clr := $00000400
  46961. else
  46962. pTDefRegMap(@Self)^.&set := $00000400;
  46963. end;
  46964. function TUART2B_U6STA.getUTXEN : TBits_1; inline;
  46965. begin
  46966. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  46967. end;
  46968. procedure TUART2B_U6STA.setUTXBRK; inline;
  46969. begin
  46970. pTDefRegMap(@Self)^.&set := $00000800;
  46971. end;
  46972. procedure TUART2B_U6STA.clearUTXBRK; inline;
  46973. begin
  46974. pTDefRegMap(@Self)^.clr := $00000800;
  46975. end;
  46976. procedure TUART2B_U6STA.setUTXBRK(thebits : TBits_1); inline;
  46977. begin
  46978. if thebits = 0 then
  46979. pTDefRegMap(@Self)^.clr := $00000800
  46980. else
  46981. pTDefRegMap(@Self)^.&set := $00000800;
  46982. end;
  46983. function TUART2B_U6STA.getUTXBRK : TBits_1; inline;
  46984. begin
  46985. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  46986. end;
  46987. procedure TUART2B_U6STA.setURXEN; inline;
  46988. begin
  46989. pTDefRegMap(@Self)^.&set := $00001000;
  46990. end;
  46991. procedure TUART2B_U6STA.clearURXEN; inline;
  46992. begin
  46993. pTDefRegMap(@Self)^.clr := $00001000;
  46994. end;
  46995. procedure TUART2B_U6STA.setURXEN(thebits : TBits_1); inline;
  46996. begin
  46997. if thebits = 0 then
  46998. pTDefRegMap(@Self)^.clr := $00001000
  46999. else
  47000. pTDefRegMap(@Self)^.&set := $00001000;
  47001. end;
  47002. function TUART2B_U6STA.getURXEN : TBits_1; inline;
  47003. begin
  47004. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47005. end;
  47006. procedure TUART2B_U6STA.setUTXINV; inline;
  47007. begin
  47008. pTDefRegMap(@Self)^.&set := $00002000;
  47009. end;
  47010. procedure TUART2B_U6STA.clearUTXINV; inline;
  47011. begin
  47012. pTDefRegMap(@Self)^.clr := $00002000;
  47013. end;
  47014. procedure TUART2B_U6STA.setUTXINV(thebits : TBits_1); inline;
  47015. begin
  47016. if thebits = 0 then
  47017. pTDefRegMap(@Self)^.clr := $00002000
  47018. else
  47019. pTDefRegMap(@Self)^.&set := $00002000;
  47020. end;
  47021. function TUART2B_U6STA.getUTXINV : TBits_1; inline;
  47022. begin
  47023. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47024. end;
  47025. procedure TUART2B_U6STA.setUTXISEL(thebits : TBits_2); inline;
  47026. begin
  47027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  47028. end;
  47029. function TUART2B_U6STA.getUTXISEL : TBits_2; inline;
  47030. begin
  47031. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  47032. end;
  47033. procedure TUART2B_U6STA.setADDR(thebits : TBits_8); inline;
  47034. begin
  47035. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  47036. end;
  47037. function TUART2B_U6STA.getADDR : TBits_8; inline;
  47038. begin
  47039. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  47040. end;
  47041. procedure TUART2B_U6STA.setADM_EN; inline;
  47042. begin
  47043. pTDefRegMap(@Self)^.&set := $01000000;
  47044. end;
  47045. procedure TUART2B_U6STA.clearADM_EN; inline;
  47046. begin
  47047. pTDefRegMap(@Self)^.clr := $01000000;
  47048. end;
  47049. procedure TUART2B_U6STA.setADM_EN(thebits : TBits_1); inline;
  47050. begin
  47051. if thebits = 0 then
  47052. pTDefRegMap(@Self)^.clr := $01000000
  47053. else
  47054. pTDefRegMap(@Self)^.&set := $01000000;
  47055. end;
  47056. function TUART2B_U6STA.getADM_EN : TBits_1; inline;
  47057. begin
  47058. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  47059. end;
  47060. procedure TUART2B_U6STA.setURXISEL0; inline;
  47061. begin
  47062. pTDefRegMap(@Self)^.&set := $00000040;
  47063. end;
  47064. procedure TUART2B_U6STA.clearURXISEL0; inline;
  47065. begin
  47066. pTDefRegMap(@Self)^.clr := $00000040;
  47067. end;
  47068. procedure TUART2B_U6STA.setURXISEL0(thebits : TBits_1); inline;
  47069. begin
  47070. if thebits = 0 then
  47071. pTDefRegMap(@Self)^.clr := $00000040
  47072. else
  47073. pTDefRegMap(@Self)^.&set := $00000040;
  47074. end;
  47075. function TUART2B_U6STA.getURXISEL0 : TBits_1; inline;
  47076. begin
  47077. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47078. end;
  47079. procedure TUART2B_U6STA.setURXISEL1; inline;
  47080. begin
  47081. pTDefRegMap(@Self)^.&set := $00000080;
  47082. end;
  47083. procedure TUART2B_U6STA.clearURXISEL1; inline;
  47084. begin
  47085. pTDefRegMap(@Self)^.clr := $00000080;
  47086. end;
  47087. procedure TUART2B_U6STA.setURXISEL1(thebits : TBits_1); inline;
  47088. begin
  47089. if thebits = 0 then
  47090. pTDefRegMap(@Self)^.clr := $00000080
  47091. else
  47092. pTDefRegMap(@Self)^.&set := $00000080;
  47093. end;
  47094. function TUART2B_U6STA.getURXISEL1 : TBits_1; inline;
  47095. begin
  47096. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47097. end;
  47098. procedure TUART2B_U6STA.setUTXISEL0; inline;
  47099. begin
  47100. pTDefRegMap(@Self)^.&set := $00004000;
  47101. end;
  47102. procedure TUART2B_U6STA.clearUTXISEL0; inline;
  47103. begin
  47104. pTDefRegMap(@Self)^.clr := $00004000;
  47105. end;
  47106. procedure TUART2B_U6STA.setUTXISEL0(thebits : TBits_1); inline;
  47107. begin
  47108. if thebits = 0 then
  47109. pTDefRegMap(@Self)^.clr := $00004000
  47110. else
  47111. pTDefRegMap(@Self)^.&set := $00004000;
  47112. end;
  47113. function TUART2B_U6STA.getUTXISEL0 : TBits_1; inline;
  47114. begin
  47115. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  47116. end;
  47117. procedure TUART2B_U6STA.setUTXISEL1; inline;
  47118. begin
  47119. pTDefRegMap(@Self)^.&set := $00008000;
  47120. end;
  47121. procedure TUART2B_U6STA.clearUTXISEL1; inline;
  47122. begin
  47123. pTDefRegMap(@Self)^.clr := $00008000;
  47124. end;
  47125. procedure TUART2B_U6STA.setUTXISEL1(thebits : TBits_1); inline;
  47126. begin
  47127. if thebits = 0 then
  47128. pTDefRegMap(@Self)^.clr := $00008000
  47129. else
  47130. pTDefRegMap(@Self)^.&set := $00008000;
  47131. end;
  47132. function TUART2B_U6STA.getUTXISEL1 : TBits_1; inline;
  47133. begin
  47134. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47135. end;
  47136. procedure TUART2B_U6STA.setUTXSEL(thebits : TBits_2); inline;
  47137. begin
  47138. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  47139. end;
  47140. function TUART2B_U6STA.getUTXSEL : TBits_2; inline;
  47141. begin
  47142. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  47143. end;
  47144. procedure TUART2B_U6STA.setw(thebits : TBits_32); inline;
  47145. begin
  47146. pTDefRegMap(@Self)^.val := thebits;
  47147. end;
  47148. function TUART2B_U6STA.getw : TBits_32; inline;
  47149. begin
  47150. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47151. end;
  47152. procedure TUART2_U2MODE.setSTSEL; inline;
  47153. begin
  47154. pTDefRegMap(@Self)^.&set := $00000001;
  47155. end;
  47156. procedure TUART2_U2MODE.clearSTSEL; inline;
  47157. begin
  47158. pTDefRegMap(@Self)^.clr := $00000001;
  47159. end;
  47160. procedure TUART2_U2MODE.setSTSEL(thebits : TBits_1); inline;
  47161. begin
  47162. if thebits = 0 then
  47163. pTDefRegMap(@Self)^.clr := $00000001
  47164. else
  47165. pTDefRegMap(@Self)^.&set := $00000001;
  47166. end;
  47167. function TUART2_U2MODE.getSTSEL : TBits_1; inline;
  47168. begin
  47169. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47170. end;
  47171. procedure TUART2_U2MODE.setPDSEL(thebits : TBits_2); inline;
  47172. begin
  47173. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  47174. end;
  47175. function TUART2_U2MODE.getPDSEL : TBits_2; inline;
  47176. begin
  47177. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  47178. end;
  47179. procedure TUART2_U2MODE.setBRGH; inline;
  47180. begin
  47181. pTDefRegMap(@Self)^.&set := $00000008;
  47182. end;
  47183. procedure TUART2_U2MODE.clearBRGH; inline;
  47184. begin
  47185. pTDefRegMap(@Self)^.clr := $00000008;
  47186. end;
  47187. procedure TUART2_U2MODE.setBRGH(thebits : TBits_1); inline;
  47188. begin
  47189. if thebits = 0 then
  47190. pTDefRegMap(@Self)^.clr := $00000008
  47191. else
  47192. pTDefRegMap(@Self)^.&set := $00000008;
  47193. end;
  47194. function TUART2_U2MODE.getBRGH : TBits_1; inline;
  47195. begin
  47196. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47197. end;
  47198. procedure TUART2_U2MODE.setRXINV; inline;
  47199. begin
  47200. pTDefRegMap(@Self)^.&set := $00000010;
  47201. end;
  47202. procedure TUART2_U2MODE.clearRXINV; inline;
  47203. begin
  47204. pTDefRegMap(@Self)^.clr := $00000010;
  47205. end;
  47206. procedure TUART2_U2MODE.setRXINV(thebits : TBits_1); inline;
  47207. begin
  47208. if thebits = 0 then
  47209. pTDefRegMap(@Self)^.clr := $00000010
  47210. else
  47211. pTDefRegMap(@Self)^.&set := $00000010;
  47212. end;
  47213. function TUART2_U2MODE.getRXINV : TBits_1; inline;
  47214. begin
  47215. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47216. end;
  47217. procedure TUART2_U2MODE.setABAUD; inline;
  47218. begin
  47219. pTDefRegMap(@Self)^.&set := $00000020;
  47220. end;
  47221. procedure TUART2_U2MODE.clearABAUD; inline;
  47222. begin
  47223. pTDefRegMap(@Self)^.clr := $00000020;
  47224. end;
  47225. procedure TUART2_U2MODE.setABAUD(thebits : TBits_1); inline;
  47226. begin
  47227. if thebits = 0 then
  47228. pTDefRegMap(@Self)^.clr := $00000020
  47229. else
  47230. pTDefRegMap(@Self)^.&set := $00000020;
  47231. end;
  47232. function TUART2_U2MODE.getABAUD : TBits_1; inline;
  47233. begin
  47234. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47235. end;
  47236. procedure TUART2_U2MODE.setLPBACK; inline;
  47237. begin
  47238. pTDefRegMap(@Self)^.&set := $00000040;
  47239. end;
  47240. procedure TUART2_U2MODE.clearLPBACK; inline;
  47241. begin
  47242. pTDefRegMap(@Self)^.clr := $00000040;
  47243. end;
  47244. procedure TUART2_U2MODE.setLPBACK(thebits : TBits_1); inline;
  47245. begin
  47246. if thebits = 0 then
  47247. pTDefRegMap(@Self)^.clr := $00000040
  47248. else
  47249. pTDefRegMap(@Self)^.&set := $00000040;
  47250. end;
  47251. function TUART2_U2MODE.getLPBACK : TBits_1; inline;
  47252. begin
  47253. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47254. end;
  47255. procedure TUART2_U2MODE.setWAKE; inline;
  47256. begin
  47257. pTDefRegMap(@Self)^.&set := $00000080;
  47258. end;
  47259. procedure TUART2_U2MODE.clearWAKE; inline;
  47260. begin
  47261. pTDefRegMap(@Self)^.clr := $00000080;
  47262. end;
  47263. procedure TUART2_U2MODE.setWAKE(thebits : TBits_1); inline;
  47264. begin
  47265. if thebits = 0 then
  47266. pTDefRegMap(@Self)^.clr := $00000080
  47267. else
  47268. pTDefRegMap(@Self)^.&set := $00000080;
  47269. end;
  47270. function TUART2_U2MODE.getWAKE : TBits_1; inline;
  47271. begin
  47272. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47273. end;
  47274. procedure TUART2_U2MODE.setUEN(thebits : TBits_2); inline;
  47275. begin
  47276. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  47277. end;
  47278. function TUART2_U2MODE.getUEN : TBits_2; inline;
  47279. begin
  47280. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  47281. end;
  47282. procedure TUART2_U2MODE.setRTSMD; inline;
  47283. begin
  47284. pTDefRegMap(@Self)^.&set := $00000800;
  47285. end;
  47286. procedure TUART2_U2MODE.clearRTSMD; inline;
  47287. begin
  47288. pTDefRegMap(@Self)^.clr := $00000800;
  47289. end;
  47290. procedure TUART2_U2MODE.setRTSMD(thebits : TBits_1); inline;
  47291. begin
  47292. if thebits = 0 then
  47293. pTDefRegMap(@Self)^.clr := $00000800
  47294. else
  47295. pTDefRegMap(@Self)^.&set := $00000800;
  47296. end;
  47297. function TUART2_U2MODE.getRTSMD : TBits_1; inline;
  47298. begin
  47299. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47300. end;
  47301. procedure TUART2_U2MODE.setIREN; inline;
  47302. begin
  47303. pTDefRegMap(@Self)^.&set := $00001000;
  47304. end;
  47305. procedure TUART2_U2MODE.clearIREN; inline;
  47306. begin
  47307. pTDefRegMap(@Self)^.clr := $00001000;
  47308. end;
  47309. procedure TUART2_U2MODE.setIREN(thebits : TBits_1); inline;
  47310. begin
  47311. if thebits = 0 then
  47312. pTDefRegMap(@Self)^.clr := $00001000
  47313. else
  47314. pTDefRegMap(@Self)^.&set := $00001000;
  47315. end;
  47316. function TUART2_U2MODE.getIREN : TBits_1; inline;
  47317. begin
  47318. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47319. end;
  47320. procedure TUART2_U2MODE.setSIDL; inline;
  47321. begin
  47322. pTDefRegMap(@Self)^.&set := $00002000;
  47323. end;
  47324. procedure TUART2_U2MODE.clearSIDL; inline;
  47325. begin
  47326. pTDefRegMap(@Self)^.clr := $00002000;
  47327. end;
  47328. procedure TUART2_U2MODE.setSIDL(thebits : TBits_1); inline;
  47329. begin
  47330. if thebits = 0 then
  47331. pTDefRegMap(@Self)^.clr := $00002000
  47332. else
  47333. pTDefRegMap(@Self)^.&set := $00002000;
  47334. end;
  47335. function TUART2_U2MODE.getSIDL : TBits_1; inline;
  47336. begin
  47337. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47338. end;
  47339. procedure TUART2_U2MODE.setON; inline;
  47340. begin
  47341. pTDefRegMap(@Self)^.&set := $00008000;
  47342. end;
  47343. procedure TUART2_U2MODE.clearON; inline;
  47344. begin
  47345. pTDefRegMap(@Self)^.clr := $00008000;
  47346. end;
  47347. procedure TUART2_U2MODE.setON(thebits : TBits_1); inline;
  47348. begin
  47349. if thebits = 0 then
  47350. pTDefRegMap(@Self)^.clr := $00008000
  47351. else
  47352. pTDefRegMap(@Self)^.&set := $00008000;
  47353. end;
  47354. function TUART2_U2MODE.getON : TBits_1; inline;
  47355. begin
  47356. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47357. end;
  47358. procedure TUART2_U2MODE.setPDSEL0; inline;
  47359. begin
  47360. pTDefRegMap(@Self)^.&set := $00000002;
  47361. end;
  47362. procedure TUART2_U2MODE.clearPDSEL0; inline;
  47363. begin
  47364. pTDefRegMap(@Self)^.clr := $00000002;
  47365. end;
  47366. procedure TUART2_U2MODE.setPDSEL0(thebits : TBits_1); inline;
  47367. begin
  47368. if thebits = 0 then
  47369. pTDefRegMap(@Self)^.clr := $00000002
  47370. else
  47371. pTDefRegMap(@Self)^.&set := $00000002;
  47372. end;
  47373. function TUART2_U2MODE.getPDSEL0 : TBits_1; inline;
  47374. begin
  47375. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47376. end;
  47377. procedure TUART2_U2MODE.setPDSEL1; inline;
  47378. begin
  47379. pTDefRegMap(@Self)^.&set := $00000004;
  47380. end;
  47381. procedure TUART2_U2MODE.clearPDSEL1; inline;
  47382. begin
  47383. pTDefRegMap(@Self)^.clr := $00000004;
  47384. end;
  47385. procedure TUART2_U2MODE.setPDSEL1(thebits : TBits_1); inline;
  47386. begin
  47387. if thebits = 0 then
  47388. pTDefRegMap(@Self)^.clr := $00000004
  47389. else
  47390. pTDefRegMap(@Self)^.&set := $00000004;
  47391. end;
  47392. function TUART2_U2MODE.getPDSEL1 : TBits_1; inline;
  47393. begin
  47394. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47395. end;
  47396. procedure TUART2_U2MODE.setUEN0; inline;
  47397. begin
  47398. pTDefRegMap(@Self)^.&set := $00000100;
  47399. end;
  47400. procedure TUART2_U2MODE.clearUEN0; inline;
  47401. begin
  47402. pTDefRegMap(@Self)^.clr := $00000100;
  47403. end;
  47404. procedure TUART2_U2MODE.setUEN0(thebits : TBits_1); inline;
  47405. begin
  47406. if thebits = 0 then
  47407. pTDefRegMap(@Self)^.clr := $00000100
  47408. else
  47409. pTDefRegMap(@Self)^.&set := $00000100;
  47410. end;
  47411. function TUART2_U2MODE.getUEN0 : TBits_1; inline;
  47412. begin
  47413. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47414. end;
  47415. procedure TUART2_U2MODE.setUEN1; inline;
  47416. begin
  47417. pTDefRegMap(@Self)^.&set := $00000200;
  47418. end;
  47419. procedure TUART2_U2MODE.clearUEN1; inline;
  47420. begin
  47421. pTDefRegMap(@Self)^.clr := $00000200;
  47422. end;
  47423. procedure TUART2_U2MODE.setUEN1(thebits : TBits_1); inline;
  47424. begin
  47425. if thebits = 0 then
  47426. pTDefRegMap(@Self)^.clr := $00000200
  47427. else
  47428. pTDefRegMap(@Self)^.&set := $00000200;
  47429. end;
  47430. function TUART2_U2MODE.getUEN1 : TBits_1; inline;
  47431. begin
  47432. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47433. end;
  47434. procedure TUART2_U2MODE.setUSIDL; inline;
  47435. begin
  47436. pTDefRegMap(@Self)^.&set := $00002000;
  47437. end;
  47438. procedure TUART2_U2MODE.clearUSIDL; inline;
  47439. begin
  47440. pTDefRegMap(@Self)^.clr := $00002000;
  47441. end;
  47442. procedure TUART2_U2MODE.setUSIDL(thebits : TBits_1); inline;
  47443. begin
  47444. if thebits = 0 then
  47445. pTDefRegMap(@Self)^.clr := $00002000
  47446. else
  47447. pTDefRegMap(@Self)^.&set := $00002000;
  47448. end;
  47449. function TUART2_U2MODE.getUSIDL : TBits_1; inline;
  47450. begin
  47451. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47452. end;
  47453. procedure TUART2_U2MODE.setUARTEN; inline;
  47454. begin
  47455. pTDefRegMap(@Self)^.&set := $00008000;
  47456. end;
  47457. procedure TUART2_U2MODE.clearUARTEN; inline;
  47458. begin
  47459. pTDefRegMap(@Self)^.clr := $00008000;
  47460. end;
  47461. procedure TUART2_U2MODE.setUARTEN(thebits : TBits_1); inline;
  47462. begin
  47463. if thebits = 0 then
  47464. pTDefRegMap(@Self)^.clr := $00008000
  47465. else
  47466. pTDefRegMap(@Self)^.&set := $00008000;
  47467. end;
  47468. function TUART2_U2MODE.getUARTEN : TBits_1; inline;
  47469. begin
  47470. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47471. end;
  47472. procedure TUART2_U2MODE.setw(thebits : TBits_32); inline;
  47473. begin
  47474. pTDefRegMap(@Self)^.val := thebits;
  47475. end;
  47476. function TUART2_U2MODE.getw : TBits_32; inline;
  47477. begin
  47478. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47479. end;
  47480. procedure TUART2_U3AMODE.setSTSEL; inline;
  47481. begin
  47482. pTDefRegMap(@Self)^.&set := $00000001;
  47483. end;
  47484. procedure TUART2_U3AMODE.clearSTSEL; inline;
  47485. begin
  47486. pTDefRegMap(@Self)^.clr := $00000001;
  47487. end;
  47488. procedure TUART2_U3AMODE.setSTSEL(thebits : TBits_1); inline;
  47489. begin
  47490. if thebits = 0 then
  47491. pTDefRegMap(@Self)^.clr := $00000001
  47492. else
  47493. pTDefRegMap(@Self)^.&set := $00000001;
  47494. end;
  47495. function TUART2_U3AMODE.getSTSEL : TBits_1; inline;
  47496. begin
  47497. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47498. end;
  47499. procedure TUART2_U3AMODE.setPDSEL(thebits : TBits_2); inline;
  47500. begin
  47501. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  47502. end;
  47503. function TUART2_U3AMODE.getPDSEL : TBits_2; inline;
  47504. begin
  47505. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  47506. end;
  47507. procedure TUART2_U3AMODE.setBRGH; inline;
  47508. begin
  47509. pTDefRegMap(@Self)^.&set := $00000008;
  47510. end;
  47511. procedure TUART2_U3AMODE.clearBRGH; inline;
  47512. begin
  47513. pTDefRegMap(@Self)^.clr := $00000008;
  47514. end;
  47515. procedure TUART2_U3AMODE.setBRGH(thebits : TBits_1); inline;
  47516. begin
  47517. if thebits = 0 then
  47518. pTDefRegMap(@Self)^.clr := $00000008
  47519. else
  47520. pTDefRegMap(@Self)^.&set := $00000008;
  47521. end;
  47522. function TUART2_U3AMODE.getBRGH : TBits_1; inline;
  47523. begin
  47524. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47525. end;
  47526. procedure TUART2_U3AMODE.setRXINV; inline;
  47527. begin
  47528. pTDefRegMap(@Self)^.&set := $00000010;
  47529. end;
  47530. procedure TUART2_U3AMODE.clearRXINV; inline;
  47531. begin
  47532. pTDefRegMap(@Self)^.clr := $00000010;
  47533. end;
  47534. procedure TUART2_U3AMODE.setRXINV(thebits : TBits_1); inline;
  47535. begin
  47536. if thebits = 0 then
  47537. pTDefRegMap(@Self)^.clr := $00000010
  47538. else
  47539. pTDefRegMap(@Self)^.&set := $00000010;
  47540. end;
  47541. function TUART2_U3AMODE.getRXINV : TBits_1; inline;
  47542. begin
  47543. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47544. end;
  47545. procedure TUART2_U3AMODE.setABAUD; inline;
  47546. begin
  47547. pTDefRegMap(@Self)^.&set := $00000020;
  47548. end;
  47549. procedure TUART2_U3AMODE.clearABAUD; inline;
  47550. begin
  47551. pTDefRegMap(@Self)^.clr := $00000020;
  47552. end;
  47553. procedure TUART2_U3AMODE.setABAUD(thebits : TBits_1); inline;
  47554. begin
  47555. if thebits = 0 then
  47556. pTDefRegMap(@Self)^.clr := $00000020
  47557. else
  47558. pTDefRegMap(@Self)^.&set := $00000020;
  47559. end;
  47560. function TUART2_U3AMODE.getABAUD : TBits_1; inline;
  47561. begin
  47562. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47563. end;
  47564. procedure TUART2_U3AMODE.setLPBACK; inline;
  47565. begin
  47566. pTDefRegMap(@Self)^.&set := $00000040;
  47567. end;
  47568. procedure TUART2_U3AMODE.clearLPBACK; inline;
  47569. begin
  47570. pTDefRegMap(@Self)^.clr := $00000040;
  47571. end;
  47572. procedure TUART2_U3AMODE.setLPBACK(thebits : TBits_1); inline;
  47573. begin
  47574. if thebits = 0 then
  47575. pTDefRegMap(@Self)^.clr := $00000040
  47576. else
  47577. pTDefRegMap(@Self)^.&set := $00000040;
  47578. end;
  47579. function TUART2_U3AMODE.getLPBACK : TBits_1; inline;
  47580. begin
  47581. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  47582. end;
  47583. procedure TUART2_U3AMODE.setWAKE; inline;
  47584. begin
  47585. pTDefRegMap(@Self)^.&set := $00000080;
  47586. end;
  47587. procedure TUART2_U3AMODE.clearWAKE; inline;
  47588. begin
  47589. pTDefRegMap(@Self)^.clr := $00000080;
  47590. end;
  47591. procedure TUART2_U3AMODE.setWAKE(thebits : TBits_1); inline;
  47592. begin
  47593. if thebits = 0 then
  47594. pTDefRegMap(@Self)^.clr := $00000080
  47595. else
  47596. pTDefRegMap(@Self)^.&set := $00000080;
  47597. end;
  47598. function TUART2_U3AMODE.getWAKE : TBits_1; inline;
  47599. begin
  47600. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  47601. end;
  47602. procedure TUART2_U3AMODE.setUEN(thebits : TBits_2); inline;
  47603. begin
  47604. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  47605. end;
  47606. function TUART2_U3AMODE.getUEN : TBits_2; inline;
  47607. begin
  47608. getUEN := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  47609. end;
  47610. procedure TUART2_U3AMODE.setRTSMD; inline;
  47611. begin
  47612. pTDefRegMap(@Self)^.&set := $00000800;
  47613. end;
  47614. procedure TUART2_U3AMODE.clearRTSMD; inline;
  47615. begin
  47616. pTDefRegMap(@Self)^.clr := $00000800;
  47617. end;
  47618. procedure TUART2_U3AMODE.setRTSMD(thebits : TBits_1); inline;
  47619. begin
  47620. if thebits = 0 then
  47621. pTDefRegMap(@Self)^.clr := $00000800
  47622. else
  47623. pTDefRegMap(@Self)^.&set := $00000800;
  47624. end;
  47625. function TUART2_U3AMODE.getRTSMD : TBits_1; inline;
  47626. begin
  47627. getRTSMD := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  47628. end;
  47629. procedure TUART2_U3AMODE.setIREN; inline;
  47630. begin
  47631. pTDefRegMap(@Self)^.&set := $00001000;
  47632. end;
  47633. procedure TUART2_U3AMODE.clearIREN; inline;
  47634. begin
  47635. pTDefRegMap(@Self)^.clr := $00001000;
  47636. end;
  47637. procedure TUART2_U3AMODE.setIREN(thebits : TBits_1); inline;
  47638. begin
  47639. if thebits = 0 then
  47640. pTDefRegMap(@Self)^.clr := $00001000
  47641. else
  47642. pTDefRegMap(@Self)^.&set := $00001000;
  47643. end;
  47644. function TUART2_U3AMODE.getIREN : TBits_1; inline;
  47645. begin
  47646. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  47647. end;
  47648. procedure TUART2_U3AMODE.setSIDL; inline;
  47649. begin
  47650. pTDefRegMap(@Self)^.&set := $00002000;
  47651. end;
  47652. procedure TUART2_U3AMODE.clearSIDL; inline;
  47653. begin
  47654. pTDefRegMap(@Self)^.clr := $00002000;
  47655. end;
  47656. procedure TUART2_U3AMODE.setSIDL(thebits : TBits_1); inline;
  47657. begin
  47658. if thebits = 0 then
  47659. pTDefRegMap(@Self)^.clr := $00002000
  47660. else
  47661. pTDefRegMap(@Self)^.&set := $00002000;
  47662. end;
  47663. function TUART2_U3AMODE.getSIDL : TBits_1; inline;
  47664. begin
  47665. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47666. end;
  47667. procedure TUART2_U3AMODE.setON; inline;
  47668. begin
  47669. pTDefRegMap(@Self)^.&set := $00008000;
  47670. end;
  47671. procedure TUART2_U3AMODE.clearON; inline;
  47672. begin
  47673. pTDefRegMap(@Self)^.clr := $00008000;
  47674. end;
  47675. procedure TUART2_U3AMODE.setON(thebits : TBits_1); inline;
  47676. begin
  47677. if thebits = 0 then
  47678. pTDefRegMap(@Self)^.clr := $00008000
  47679. else
  47680. pTDefRegMap(@Self)^.&set := $00008000;
  47681. end;
  47682. function TUART2_U3AMODE.getON : TBits_1; inline;
  47683. begin
  47684. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47685. end;
  47686. procedure TUART2_U3AMODE.setPDSEL0; inline;
  47687. begin
  47688. pTDefRegMap(@Self)^.&set := $00000002;
  47689. end;
  47690. procedure TUART2_U3AMODE.clearPDSEL0; inline;
  47691. begin
  47692. pTDefRegMap(@Self)^.clr := $00000002;
  47693. end;
  47694. procedure TUART2_U3AMODE.setPDSEL0(thebits : TBits_1); inline;
  47695. begin
  47696. if thebits = 0 then
  47697. pTDefRegMap(@Self)^.clr := $00000002
  47698. else
  47699. pTDefRegMap(@Self)^.&set := $00000002;
  47700. end;
  47701. function TUART2_U3AMODE.getPDSEL0 : TBits_1; inline;
  47702. begin
  47703. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47704. end;
  47705. procedure TUART2_U3AMODE.setPDSEL1; inline;
  47706. begin
  47707. pTDefRegMap(@Self)^.&set := $00000004;
  47708. end;
  47709. procedure TUART2_U3AMODE.clearPDSEL1; inline;
  47710. begin
  47711. pTDefRegMap(@Self)^.clr := $00000004;
  47712. end;
  47713. procedure TUART2_U3AMODE.setPDSEL1(thebits : TBits_1); inline;
  47714. begin
  47715. if thebits = 0 then
  47716. pTDefRegMap(@Self)^.clr := $00000004
  47717. else
  47718. pTDefRegMap(@Self)^.&set := $00000004;
  47719. end;
  47720. function TUART2_U3AMODE.getPDSEL1 : TBits_1; inline;
  47721. begin
  47722. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47723. end;
  47724. procedure TUART2_U3AMODE.setUEN0; inline;
  47725. begin
  47726. pTDefRegMap(@Self)^.&set := $00000100;
  47727. end;
  47728. procedure TUART2_U3AMODE.clearUEN0; inline;
  47729. begin
  47730. pTDefRegMap(@Self)^.clr := $00000100;
  47731. end;
  47732. procedure TUART2_U3AMODE.setUEN0(thebits : TBits_1); inline;
  47733. begin
  47734. if thebits = 0 then
  47735. pTDefRegMap(@Self)^.clr := $00000100
  47736. else
  47737. pTDefRegMap(@Self)^.&set := $00000100;
  47738. end;
  47739. function TUART2_U3AMODE.getUEN0 : TBits_1; inline;
  47740. begin
  47741. getUEN0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47742. end;
  47743. procedure TUART2_U3AMODE.setUEN1; inline;
  47744. begin
  47745. pTDefRegMap(@Self)^.&set := $00000200;
  47746. end;
  47747. procedure TUART2_U3AMODE.clearUEN1; inline;
  47748. begin
  47749. pTDefRegMap(@Self)^.clr := $00000200;
  47750. end;
  47751. procedure TUART2_U3AMODE.setUEN1(thebits : TBits_1); inline;
  47752. begin
  47753. if thebits = 0 then
  47754. pTDefRegMap(@Self)^.clr := $00000200
  47755. else
  47756. pTDefRegMap(@Self)^.&set := $00000200;
  47757. end;
  47758. function TUART2_U3AMODE.getUEN1 : TBits_1; inline;
  47759. begin
  47760. getUEN1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47761. end;
  47762. procedure TUART2_U3AMODE.setUSIDL; inline;
  47763. begin
  47764. pTDefRegMap(@Self)^.&set := $00002000;
  47765. end;
  47766. procedure TUART2_U3AMODE.clearUSIDL; inline;
  47767. begin
  47768. pTDefRegMap(@Self)^.clr := $00002000;
  47769. end;
  47770. procedure TUART2_U3AMODE.setUSIDL(thebits : TBits_1); inline;
  47771. begin
  47772. if thebits = 0 then
  47773. pTDefRegMap(@Self)^.clr := $00002000
  47774. else
  47775. pTDefRegMap(@Self)^.&set := $00002000;
  47776. end;
  47777. function TUART2_U3AMODE.getUSIDL : TBits_1; inline;
  47778. begin
  47779. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  47780. end;
  47781. procedure TUART2_U3AMODE.setUARTEN; inline;
  47782. begin
  47783. pTDefRegMap(@Self)^.&set := $00008000;
  47784. end;
  47785. procedure TUART2_U3AMODE.clearUARTEN; inline;
  47786. begin
  47787. pTDefRegMap(@Self)^.clr := $00008000;
  47788. end;
  47789. procedure TUART2_U3AMODE.setUARTEN(thebits : TBits_1); inline;
  47790. begin
  47791. if thebits = 0 then
  47792. pTDefRegMap(@Self)^.clr := $00008000
  47793. else
  47794. pTDefRegMap(@Self)^.&set := $00008000;
  47795. end;
  47796. function TUART2_U3AMODE.getUARTEN : TBits_1; inline;
  47797. begin
  47798. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  47799. end;
  47800. procedure TUART2_U3AMODE.setw(thebits : TBits_32); inline;
  47801. begin
  47802. pTDefRegMap(@Self)^.val := thebits;
  47803. end;
  47804. function TUART2_U3AMODE.getw : TBits_32; inline;
  47805. begin
  47806. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  47807. end;
  47808. procedure TUART2_U2STA.setURXDA; inline;
  47809. begin
  47810. pTDefRegMap(@Self)^.&set := $00000001;
  47811. end;
  47812. procedure TUART2_U2STA.clearURXDA; inline;
  47813. begin
  47814. pTDefRegMap(@Self)^.clr := $00000001;
  47815. end;
  47816. procedure TUART2_U2STA.setURXDA(thebits : TBits_1); inline;
  47817. begin
  47818. if thebits = 0 then
  47819. pTDefRegMap(@Self)^.clr := $00000001
  47820. else
  47821. pTDefRegMap(@Self)^.&set := $00000001;
  47822. end;
  47823. function TUART2_U2STA.getURXDA : TBits_1; inline;
  47824. begin
  47825. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  47826. end;
  47827. procedure TUART2_U2STA.setOERR; inline;
  47828. begin
  47829. pTDefRegMap(@Self)^.&set := $00000002;
  47830. end;
  47831. procedure TUART2_U2STA.clearOERR; inline;
  47832. begin
  47833. pTDefRegMap(@Self)^.clr := $00000002;
  47834. end;
  47835. procedure TUART2_U2STA.setOERR(thebits : TBits_1); inline;
  47836. begin
  47837. if thebits = 0 then
  47838. pTDefRegMap(@Self)^.clr := $00000002
  47839. else
  47840. pTDefRegMap(@Self)^.&set := $00000002;
  47841. end;
  47842. function TUART2_U2STA.getOERR : TBits_1; inline;
  47843. begin
  47844. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  47845. end;
  47846. procedure TUART2_U2STA.setFERR; inline;
  47847. begin
  47848. pTDefRegMap(@Self)^.&set := $00000004;
  47849. end;
  47850. procedure TUART2_U2STA.clearFERR; inline;
  47851. begin
  47852. pTDefRegMap(@Self)^.clr := $00000004;
  47853. end;
  47854. procedure TUART2_U2STA.setFERR(thebits : TBits_1); inline;
  47855. begin
  47856. if thebits = 0 then
  47857. pTDefRegMap(@Self)^.clr := $00000004
  47858. else
  47859. pTDefRegMap(@Self)^.&set := $00000004;
  47860. end;
  47861. function TUART2_U2STA.getFERR : TBits_1; inline;
  47862. begin
  47863. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  47864. end;
  47865. procedure TUART2_U2STA.setPERR; inline;
  47866. begin
  47867. pTDefRegMap(@Self)^.&set := $00000008;
  47868. end;
  47869. procedure TUART2_U2STA.clearPERR; inline;
  47870. begin
  47871. pTDefRegMap(@Self)^.clr := $00000008;
  47872. end;
  47873. procedure TUART2_U2STA.setPERR(thebits : TBits_1); inline;
  47874. begin
  47875. if thebits = 0 then
  47876. pTDefRegMap(@Self)^.clr := $00000008
  47877. else
  47878. pTDefRegMap(@Self)^.&set := $00000008;
  47879. end;
  47880. function TUART2_U2STA.getPERR : TBits_1; inline;
  47881. begin
  47882. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  47883. end;
  47884. procedure TUART2_U2STA.setRIDLE; inline;
  47885. begin
  47886. pTDefRegMap(@Self)^.&set := $00000010;
  47887. end;
  47888. procedure TUART2_U2STA.clearRIDLE; inline;
  47889. begin
  47890. pTDefRegMap(@Self)^.clr := $00000010;
  47891. end;
  47892. procedure TUART2_U2STA.setRIDLE(thebits : TBits_1); inline;
  47893. begin
  47894. if thebits = 0 then
  47895. pTDefRegMap(@Self)^.clr := $00000010
  47896. else
  47897. pTDefRegMap(@Self)^.&set := $00000010;
  47898. end;
  47899. function TUART2_U2STA.getRIDLE : TBits_1; inline;
  47900. begin
  47901. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  47902. end;
  47903. procedure TUART2_U2STA.setADDEN; inline;
  47904. begin
  47905. pTDefRegMap(@Self)^.&set := $00000020;
  47906. end;
  47907. procedure TUART2_U2STA.clearADDEN; inline;
  47908. begin
  47909. pTDefRegMap(@Self)^.clr := $00000020;
  47910. end;
  47911. procedure TUART2_U2STA.setADDEN(thebits : TBits_1); inline;
  47912. begin
  47913. if thebits = 0 then
  47914. pTDefRegMap(@Self)^.clr := $00000020
  47915. else
  47916. pTDefRegMap(@Self)^.&set := $00000020;
  47917. end;
  47918. function TUART2_U2STA.getADDEN : TBits_1; inline;
  47919. begin
  47920. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  47921. end;
  47922. procedure TUART2_U2STA.setURXISEL(thebits : TBits_2); inline;
  47923. begin
  47924. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  47925. end;
  47926. function TUART2_U2STA.getURXISEL : TBits_2; inline;
  47927. begin
  47928. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  47929. end;
  47930. procedure TUART2_U2STA.setTRMT; inline;
  47931. begin
  47932. pTDefRegMap(@Self)^.&set := $00000100;
  47933. end;
  47934. procedure TUART2_U2STA.clearTRMT; inline;
  47935. begin
  47936. pTDefRegMap(@Self)^.clr := $00000100;
  47937. end;
  47938. procedure TUART2_U2STA.setTRMT(thebits : TBits_1); inline;
  47939. begin
  47940. if thebits = 0 then
  47941. pTDefRegMap(@Self)^.clr := $00000100
  47942. else
  47943. pTDefRegMap(@Self)^.&set := $00000100;
  47944. end;
  47945. function TUART2_U2STA.getTRMT : TBits_1; inline;
  47946. begin
  47947. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  47948. end;
  47949. procedure TUART2_U2STA.setUTXBF; inline;
  47950. begin
  47951. pTDefRegMap(@Self)^.&set := $00000200;
  47952. end;
  47953. procedure TUART2_U2STA.clearUTXBF; inline;
  47954. begin
  47955. pTDefRegMap(@Self)^.clr := $00000200;
  47956. end;
  47957. procedure TUART2_U2STA.setUTXBF(thebits : TBits_1); inline;
  47958. begin
  47959. if thebits = 0 then
  47960. pTDefRegMap(@Self)^.clr := $00000200
  47961. else
  47962. pTDefRegMap(@Self)^.&set := $00000200;
  47963. end;
  47964. function TUART2_U2STA.getUTXBF : TBits_1; inline;
  47965. begin
  47966. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  47967. end;
  47968. procedure TUART2_U2STA.setUTXEN; inline;
  47969. begin
  47970. pTDefRegMap(@Self)^.&set := $00000400;
  47971. end;
  47972. procedure TUART2_U2STA.clearUTXEN; inline;
  47973. begin
  47974. pTDefRegMap(@Self)^.clr := $00000400;
  47975. end;
  47976. procedure TUART2_U2STA.setUTXEN(thebits : TBits_1); inline;
  47977. begin
  47978. if thebits = 0 then
  47979. pTDefRegMap(@Self)^.clr := $00000400
  47980. else
  47981. pTDefRegMap(@Self)^.&set := $00000400;
  47982. end;
  47983. function TUART2_U2STA.getUTXEN : TBits_1; inline;
  47984. begin
  47985. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  47986. end;
  47987. procedure TUART2_U2STA.setUTXBRK; inline;
  47988. begin
  47989. pTDefRegMap(@Self)^.&set := $00000800;
  47990. end;
  47991. procedure TUART2_U2STA.clearUTXBRK; inline;
  47992. begin
  47993. pTDefRegMap(@Self)^.clr := $00000800;
  47994. end;
  47995. procedure TUART2_U2STA.setUTXBRK(thebits : TBits_1); inline;
  47996. begin
  47997. if thebits = 0 then
  47998. pTDefRegMap(@Self)^.clr := $00000800
  47999. else
  48000. pTDefRegMap(@Self)^.&set := $00000800;
  48001. end;
  48002. function TUART2_U2STA.getUTXBRK : TBits_1; inline;
  48003. begin
  48004. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48005. end;
  48006. procedure TUART2_U2STA.setURXEN; inline;
  48007. begin
  48008. pTDefRegMap(@Self)^.&set := $00001000;
  48009. end;
  48010. procedure TUART2_U2STA.clearURXEN; inline;
  48011. begin
  48012. pTDefRegMap(@Self)^.clr := $00001000;
  48013. end;
  48014. procedure TUART2_U2STA.setURXEN(thebits : TBits_1); inline;
  48015. begin
  48016. if thebits = 0 then
  48017. pTDefRegMap(@Self)^.clr := $00001000
  48018. else
  48019. pTDefRegMap(@Self)^.&set := $00001000;
  48020. end;
  48021. function TUART2_U2STA.getURXEN : TBits_1; inline;
  48022. begin
  48023. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48024. end;
  48025. procedure TUART2_U2STA.setUTXINV; inline;
  48026. begin
  48027. pTDefRegMap(@Self)^.&set := $00002000;
  48028. end;
  48029. procedure TUART2_U2STA.clearUTXINV; inline;
  48030. begin
  48031. pTDefRegMap(@Self)^.clr := $00002000;
  48032. end;
  48033. procedure TUART2_U2STA.setUTXINV(thebits : TBits_1); inline;
  48034. begin
  48035. if thebits = 0 then
  48036. pTDefRegMap(@Self)^.clr := $00002000
  48037. else
  48038. pTDefRegMap(@Self)^.&set := $00002000;
  48039. end;
  48040. function TUART2_U2STA.getUTXINV : TBits_1; inline;
  48041. begin
  48042. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48043. end;
  48044. procedure TUART2_U2STA.setUTXISEL(thebits : TBits_2); inline;
  48045. begin
  48046. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  48047. end;
  48048. function TUART2_U2STA.getUTXISEL : TBits_2; inline;
  48049. begin
  48050. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  48051. end;
  48052. procedure TUART2_U2STA.setADDR(thebits : TBits_8); inline;
  48053. begin
  48054. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  48055. end;
  48056. function TUART2_U2STA.getADDR : TBits_8; inline;
  48057. begin
  48058. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  48059. end;
  48060. procedure TUART2_U2STA.setADM_EN; inline;
  48061. begin
  48062. pTDefRegMap(@Self)^.&set := $01000000;
  48063. end;
  48064. procedure TUART2_U2STA.clearADM_EN; inline;
  48065. begin
  48066. pTDefRegMap(@Self)^.clr := $01000000;
  48067. end;
  48068. procedure TUART2_U2STA.setADM_EN(thebits : TBits_1); inline;
  48069. begin
  48070. if thebits = 0 then
  48071. pTDefRegMap(@Self)^.clr := $01000000
  48072. else
  48073. pTDefRegMap(@Self)^.&set := $01000000;
  48074. end;
  48075. function TUART2_U2STA.getADM_EN : TBits_1; inline;
  48076. begin
  48077. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  48078. end;
  48079. procedure TUART2_U2STA.setURXISEL0; inline;
  48080. begin
  48081. pTDefRegMap(@Self)^.&set := $00000040;
  48082. end;
  48083. procedure TUART2_U2STA.clearURXISEL0; inline;
  48084. begin
  48085. pTDefRegMap(@Self)^.clr := $00000040;
  48086. end;
  48087. procedure TUART2_U2STA.setURXISEL0(thebits : TBits_1); inline;
  48088. begin
  48089. if thebits = 0 then
  48090. pTDefRegMap(@Self)^.clr := $00000040
  48091. else
  48092. pTDefRegMap(@Self)^.&set := $00000040;
  48093. end;
  48094. function TUART2_U2STA.getURXISEL0 : TBits_1; inline;
  48095. begin
  48096. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48097. end;
  48098. procedure TUART2_U2STA.setURXISEL1; inline;
  48099. begin
  48100. pTDefRegMap(@Self)^.&set := $00000080;
  48101. end;
  48102. procedure TUART2_U2STA.clearURXISEL1; inline;
  48103. begin
  48104. pTDefRegMap(@Self)^.clr := $00000080;
  48105. end;
  48106. procedure TUART2_U2STA.setURXISEL1(thebits : TBits_1); inline;
  48107. begin
  48108. if thebits = 0 then
  48109. pTDefRegMap(@Self)^.clr := $00000080
  48110. else
  48111. pTDefRegMap(@Self)^.&set := $00000080;
  48112. end;
  48113. function TUART2_U2STA.getURXISEL1 : TBits_1; inline;
  48114. begin
  48115. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48116. end;
  48117. procedure TUART2_U2STA.setUTXISEL0; inline;
  48118. begin
  48119. pTDefRegMap(@Self)^.&set := $00004000;
  48120. end;
  48121. procedure TUART2_U2STA.clearUTXISEL0; inline;
  48122. begin
  48123. pTDefRegMap(@Self)^.clr := $00004000;
  48124. end;
  48125. procedure TUART2_U2STA.setUTXISEL0(thebits : TBits_1); inline;
  48126. begin
  48127. if thebits = 0 then
  48128. pTDefRegMap(@Self)^.clr := $00004000
  48129. else
  48130. pTDefRegMap(@Self)^.&set := $00004000;
  48131. end;
  48132. function TUART2_U2STA.getUTXISEL0 : TBits_1; inline;
  48133. begin
  48134. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  48135. end;
  48136. procedure TUART2_U2STA.setUTXISEL1; inline;
  48137. begin
  48138. pTDefRegMap(@Self)^.&set := $00008000;
  48139. end;
  48140. procedure TUART2_U2STA.clearUTXISEL1; inline;
  48141. begin
  48142. pTDefRegMap(@Self)^.clr := $00008000;
  48143. end;
  48144. procedure TUART2_U2STA.setUTXISEL1(thebits : TBits_1); inline;
  48145. begin
  48146. if thebits = 0 then
  48147. pTDefRegMap(@Self)^.clr := $00008000
  48148. else
  48149. pTDefRegMap(@Self)^.&set := $00008000;
  48150. end;
  48151. function TUART2_U2STA.getUTXISEL1 : TBits_1; inline;
  48152. begin
  48153. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48154. end;
  48155. procedure TUART2_U2STA.setUTXSEL(thebits : TBits_2); inline;
  48156. begin
  48157. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  48158. end;
  48159. function TUART2_U2STA.getUTXSEL : TBits_2; inline;
  48160. begin
  48161. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  48162. end;
  48163. procedure TUART2_U2STA.setw(thebits : TBits_32); inline;
  48164. begin
  48165. pTDefRegMap(@Self)^.val := thebits;
  48166. end;
  48167. function TUART2_U2STA.getw : TBits_32; inline;
  48168. begin
  48169. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48170. end;
  48171. procedure TUART2_U3ASTA.setURXDA; inline;
  48172. begin
  48173. pTDefRegMap(@Self)^.&set := $00000001;
  48174. end;
  48175. procedure TUART2_U3ASTA.clearURXDA; inline;
  48176. begin
  48177. pTDefRegMap(@Self)^.clr := $00000001;
  48178. end;
  48179. procedure TUART2_U3ASTA.setURXDA(thebits : TBits_1); inline;
  48180. begin
  48181. if thebits = 0 then
  48182. pTDefRegMap(@Self)^.clr := $00000001
  48183. else
  48184. pTDefRegMap(@Self)^.&set := $00000001;
  48185. end;
  48186. function TUART2_U3ASTA.getURXDA : TBits_1; inline;
  48187. begin
  48188. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48189. end;
  48190. procedure TUART2_U3ASTA.setOERR; inline;
  48191. begin
  48192. pTDefRegMap(@Self)^.&set := $00000002;
  48193. end;
  48194. procedure TUART2_U3ASTA.clearOERR; inline;
  48195. begin
  48196. pTDefRegMap(@Self)^.clr := $00000002;
  48197. end;
  48198. procedure TUART2_U3ASTA.setOERR(thebits : TBits_1); inline;
  48199. begin
  48200. if thebits = 0 then
  48201. pTDefRegMap(@Self)^.clr := $00000002
  48202. else
  48203. pTDefRegMap(@Self)^.&set := $00000002;
  48204. end;
  48205. function TUART2_U3ASTA.getOERR : TBits_1; inline;
  48206. begin
  48207. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48208. end;
  48209. procedure TUART2_U3ASTA.setFERR; inline;
  48210. begin
  48211. pTDefRegMap(@Self)^.&set := $00000004;
  48212. end;
  48213. procedure TUART2_U3ASTA.clearFERR; inline;
  48214. begin
  48215. pTDefRegMap(@Self)^.clr := $00000004;
  48216. end;
  48217. procedure TUART2_U3ASTA.setFERR(thebits : TBits_1); inline;
  48218. begin
  48219. if thebits = 0 then
  48220. pTDefRegMap(@Self)^.clr := $00000004
  48221. else
  48222. pTDefRegMap(@Self)^.&set := $00000004;
  48223. end;
  48224. function TUART2_U3ASTA.getFERR : TBits_1; inline;
  48225. begin
  48226. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48227. end;
  48228. procedure TUART2_U3ASTA.setPERR; inline;
  48229. begin
  48230. pTDefRegMap(@Self)^.&set := $00000008;
  48231. end;
  48232. procedure TUART2_U3ASTA.clearPERR; inline;
  48233. begin
  48234. pTDefRegMap(@Self)^.clr := $00000008;
  48235. end;
  48236. procedure TUART2_U3ASTA.setPERR(thebits : TBits_1); inline;
  48237. begin
  48238. if thebits = 0 then
  48239. pTDefRegMap(@Self)^.clr := $00000008
  48240. else
  48241. pTDefRegMap(@Self)^.&set := $00000008;
  48242. end;
  48243. function TUART2_U3ASTA.getPERR : TBits_1; inline;
  48244. begin
  48245. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48246. end;
  48247. procedure TUART2_U3ASTA.setRIDLE; inline;
  48248. begin
  48249. pTDefRegMap(@Self)^.&set := $00000010;
  48250. end;
  48251. procedure TUART2_U3ASTA.clearRIDLE; inline;
  48252. begin
  48253. pTDefRegMap(@Self)^.clr := $00000010;
  48254. end;
  48255. procedure TUART2_U3ASTA.setRIDLE(thebits : TBits_1); inline;
  48256. begin
  48257. if thebits = 0 then
  48258. pTDefRegMap(@Self)^.clr := $00000010
  48259. else
  48260. pTDefRegMap(@Self)^.&set := $00000010;
  48261. end;
  48262. function TUART2_U3ASTA.getRIDLE : TBits_1; inline;
  48263. begin
  48264. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48265. end;
  48266. procedure TUART2_U3ASTA.setADDEN; inline;
  48267. begin
  48268. pTDefRegMap(@Self)^.&set := $00000020;
  48269. end;
  48270. procedure TUART2_U3ASTA.clearADDEN; inline;
  48271. begin
  48272. pTDefRegMap(@Self)^.clr := $00000020;
  48273. end;
  48274. procedure TUART2_U3ASTA.setADDEN(thebits : TBits_1); inline;
  48275. begin
  48276. if thebits = 0 then
  48277. pTDefRegMap(@Self)^.clr := $00000020
  48278. else
  48279. pTDefRegMap(@Self)^.&set := $00000020;
  48280. end;
  48281. function TUART2_U3ASTA.getADDEN : TBits_1; inline;
  48282. begin
  48283. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48284. end;
  48285. procedure TUART2_U3ASTA.setURXISEL(thebits : TBits_2); inline;
  48286. begin
  48287. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  48288. end;
  48289. function TUART2_U3ASTA.getURXISEL : TBits_2; inline;
  48290. begin
  48291. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  48292. end;
  48293. procedure TUART2_U3ASTA.setTRMT; inline;
  48294. begin
  48295. pTDefRegMap(@Self)^.&set := $00000100;
  48296. end;
  48297. procedure TUART2_U3ASTA.clearTRMT; inline;
  48298. begin
  48299. pTDefRegMap(@Self)^.clr := $00000100;
  48300. end;
  48301. procedure TUART2_U3ASTA.setTRMT(thebits : TBits_1); inline;
  48302. begin
  48303. if thebits = 0 then
  48304. pTDefRegMap(@Self)^.clr := $00000100
  48305. else
  48306. pTDefRegMap(@Self)^.&set := $00000100;
  48307. end;
  48308. function TUART2_U3ASTA.getTRMT : TBits_1; inline;
  48309. begin
  48310. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  48311. end;
  48312. procedure TUART2_U3ASTA.setUTXBF; inline;
  48313. begin
  48314. pTDefRegMap(@Self)^.&set := $00000200;
  48315. end;
  48316. procedure TUART2_U3ASTA.clearUTXBF; inline;
  48317. begin
  48318. pTDefRegMap(@Self)^.clr := $00000200;
  48319. end;
  48320. procedure TUART2_U3ASTA.setUTXBF(thebits : TBits_1); inline;
  48321. begin
  48322. if thebits = 0 then
  48323. pTDefRegMap(@Self)^.clr := $00000200
  48324. else
  48325. pTDefRegMap(@Self)^.&set := $00000200;
  48326. end;
  48327. function TUART2_U3ASTA.getUTXBF : TBits_1; inline;
  48328. begin
  48329. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  48330. end;
  48331. procedure TUART2_U3ASTA.setUTXEN; inline;
  48332. begin
  48333. pTDefRegMap(@Self)^.&set := $00000400;
  48334. end;
  48335. procedure TUART2_U3ASTA.clearUTXEN; inline;
  48336. begin
  48337. pTDefRegMap(@Self)^.clr := $00000400;
  48338. end;
  48339. procedure TUART2_U3ASTA.setUTXEN(thebits : TBits_1); inline;
  48340. begin
  48341. if thebits = 0 then
  48342. pTDefRegMap(@Self)^.clr := $00000400
  48343. else
  48344. pTDefRegMap(@Self)^.&set := $00000400;
  48345. end;
  48346. function TUART2_U3ASTA.getUTXEN : TBits_1; inline;
  48347. begin
  48348. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  48349. end;
  48350. procedure TUART2_U3ASTA.setUTXBRK; inline;
  48351. begin
  48352. pTDefRegMap(@Self)^.&set := $00000800;
  48353. end;
  48354. procedure TUART2_U3ASTA.clearUTXBRK; inline;
  48355. begin
  48356. pTDefRegMap(@Self)^.clr := $00000800;
  48357. end;
  48358. procedure TUART2_U3ASTA.setUTXBRK(thebits : TBits_1); inline;
  48359. begin
  48360. if thebits = 0 then
  48361. pTDefRegMap(@Self)^.clr := $00000800
  48362. else
  48363. pTDefRegMap(@Self)^.&set := $00000800;
  48364. end;
  48365. function TUART2_U3ASTA.getUTXBRK : TBits_1; inline;
  48366. begin
  48367. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  48368. end;
  48369. procedure TUART2_U3ASTA.setURXEN; inline;
  48370. begin
  48371. pTDefRegMap(@Self)^.&set := $00001000;
  48372. end;
  48373. procedure TUART2_U3ASTA.clearURXEN; inline;
  48374. begin
  48375. pTDefRegMap(@Self)^.clr := $00001000;
  48376. end;
  48377. procedure TUART2_U3ASTA.setURXEN(thebits : TBits_1); inline;
  48378. begin
  48379. if thebits = 0 then
  48380. pTDefRegMap(@Self)^.clr := $00001000
  48381. else
  48382. pTDefRegMap(@Self)^.&set := $00001000;
  48383. end;
  48384. function TUART2_U3ASTA.getURXEN : TBits_1; inline;
  48385. begin
  48386. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48387. end;
  48388. procedure TUART2_U3ASTA.setUTXINV; inline;
  48389. begin
  48390. pTDefRegMap(@Self)^.&set := $00002000;
  48391. end;
  48392. procedure TUART2_U3ASTA.clearUTXINV; inline;
  48393. begin
  48394. pTDefRegMap(@Self)^.clr := $00002000;
  48395. end;
  48396. procedure TUART2_U3ASTA.setUTXINV(thebits : TBits_1); inline;
  48397. begin
  48398. if thebits = 0 then
  48399. pTDefRegMap(@Self)^.clr := $00002000
  48400. else
  48401. pTDefRegMap(@Self)^.&set := $00002000;
  48402. end;
  48403. function TUART2_U3ASTA.getUTXINV : TBits_1; inline;
  48404. begin
  48405. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48406. end;
  48407. procedure TUART2_U3ASTA.setUTXISEL(thebits : TBits_2); inline;
  48408. begin
  48409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  48410. end;
  48411. function TUART2_U3ASTA.getUTXISEL : TBits_2; inline;
  48412. begin
  48413. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  48414. end;
  48415. procedure TUART2_U3ASTA.setADDR(thebits : TBits_8); inline;
  48416. begin
  48417. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  48418. end;
  48419. function TUART2_U3ASTA.getADDR : TBits_8; inline;
  48420. begin
  48421. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  48422. end;
  48423. procedure TUART2_U3ASTA.setADM_EN; inline;
  48424. begin
  48425. pTDefRegMap(@Self)^.&set := $01000000;
  48426. end;
  48427. procedure TUART2_U3ASTA.clearADM_EN; inline;
  48428. begin
  48429. pTDefRegMap(@Self)^.clr := $01000000;
  48430. end;
  48431. procedure TUART2_U3ASTA.setADM_EN(thebits : TBits_1); inline;
  48432. begin
  48433. if thebits = 0 then
  48434. pTDefRegMap(@Self)^.clr := $01000000
  48435. else
  48436. pTDefRegMap(@Self)^.&set := $01000000;
  48437. end;
  48438. function TUART2_U3ASTA.getADM_EN : TBits_1; inline;
  48439. begin
  48440. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  48441. end;
  48442. procedure TUART2_U3ASTA.setURXISEL0; inline;
  48443. begin
  48444. pTDefRegMap(@Self)^.&set := $00000040;
  48445. end;
  48446. procedure TUART2_U3ASTA.clearURXISEL0; inline;
  48447. begin
  48448. pTDefRegMap(@Self)^.clr := $00000040;
  48449. end;
  48450. procedure TUART2_U3ASTA.setURXISEL0(thebits : TBits_1); inline;
  48451. begin
  48452. if thebits = 0 then
  48453. pTDefRegMap(@Self)^.clr := $00000040
  48454. else
  48455. pTDefRegMap(@Self)^.&set := $00000040;
  48456. end;
  48457. function TUART2_U3ASTA.getURXISEL0 : TBits_1; inline;
  48458. begin
  48459. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48460. end;
  48461. procedure TUART2_U3ASTA.setURXISEL1; inline;
  48462. begin
  48463. pTDefRegMap(@Self)^.&set := $00000080;
  48464. end;
  48465. procedure TUART2_U3ASTA.clearURXISEL1; inline;
  48466. begin
  48467. pTDefRegMap(@Self)^.clr := $00000080;
  48468. end;
  48469. procedure TUART2_U3ASTA.setURXISEL1(thebits : TBits_1); inline;
  48470. begin
  48471. if thebits = 0 then
  48472. pTDefRegMap(@Self)^.clr := $00000080
  48473. else
  48474. pTDefRegMap(@Self)^.&set := $00000080;
  48475. end;
  48476. function TUART2_U3ASTA.getURXISEL1 : TBits_1; inline;
  48477. begin
  48478. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48479. end;
  48480. procedure TUART2_U3ASTA.setUTXISEL0; inline;
  48481. begin
  48482. pTDefRegMap(@Self)^.&set := $00004000;
  48483. end;
  48484. procedure TUART2_U3ASTA.clearUTXISEL0; inline;
  48485. begin
  48486. pTDefRegMap(@Self)^.clr := $00004000;
  48487. end;
  48488. procedure TUART2_U3ASTA.setUTXISEL0(thebits : TBits_1); inline;
  48489. begin
  48490. if thebits = 0 then
  48491. pTDefRegMap(@Self)^.clr := $00004000
  48492. else
  48493. pTDefRegMap(@Self)^.&set := $00004000;
  48494. end;
  48495. function TUART2_U3ASTA.getUTXISEL0 : TBits_1; inline;
  48496. begin
  48497. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  48498. end;
  48499. procedure TUART2_U3ASTA.setUTXISEL1; inline;
  48500. begin
  48501. pTDefRegMap(@Self)^.&set := $00008000;
  48502. end;
  48503. procedure TUART2_U3ASTA.clearUTXISEL1; inline;
  48504. begin
  48505. pTDefRegMap(@Self)^.clr := $00008000;
  48506. end;
  48507. procedure TUART2_U3ASTA.setUTXISEL1(thebits : TBits_1); inline;
  48508. begin
  48509. if thebits = 0 then
  48510. pTDefRegMap(@Self)^.clr := $00008000
  48511. else
  48512. pTDefRegMap(@Self)^.&set := $00008000;
  48513. end;
  48514. function TUART2_U3ASTA.getUTXISEL1 : TBits_1; inline;
  48515. begin
  48516. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48517. end;
  48518. procedure TUART2_U3ASTA.setUTXSEL(thebits : TBits_2); inline;
  48519. begin
  48520. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  48521. end;
  48522. function TUART2_U3ASTA.getUTXSEL : TBits_2; inline;
  48523. begin
  48524. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  48525. end;
  48526. procedure TUART2_U3ASTA.setw(thebits : TBits_32); inline;
  48527. begin
  48528. pTDefRegMap(@Self)^.val := thebits;
  48529. end;
  48530. function TUART2_U3ASTA.getw : TBits_32; inline;
  48531. begin
  48532. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48533. end;
  48534. procedure TUART3B_U3BMODE.setSTSEL; inline;
  48535. begin
  48536. pTDefRegMap(@Self)^.&set := $00000001;
  48537. end;
  48538. procedure TUART3B_U3BMODE.clearSTSEL; inline;
  48539. begin
  48540. pTDefRegMap(@Self)^.clr := $00000001;
  48541. end;
  48542. procedure TUART3B_U3BMODE.setSTSEL(thebits : TBits_1); inline;
  48543. begin
  48544. if thebits = 0 then
  48545. pTDefRegMap(@Self)^.clr := $00000001
  48546. else
  48547. pTDefRegMap(@Self)^.&set := $00000001;
  48548. end;
  48549. function TUART3B_U3BMODE.getSTSEL : TBits_1; inline;
  48550. begin
  48551. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48552. end;
  48553. procedure TUART3B_U3BMODE.setPDSEL(thebits : TBits_2); inline;
  48554. begin
  48555. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  48556. end;
  48557. function TUART3B_U3BMODE.getPDSEL : TBits_2; inline;
  48558. begin
  48559. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  48560. end;
  48561. procedure TUART3B_U3BMODE.setBRGH; inline;
  48562. begin
  48563. pTDefRegMap(@Self)^.&set := $00000008;
  48564. end;
  48565. procedure TUART3B_U3BMODE.clearBRGH; inline;
  48566. begin
  48567. pTDefRegMap(@Self)^.clr := $00000008;
  48568. end;
  48569. procedure TUART3B_U3BMODE.setBRGH(thebits : TBits_1); inline;
  48570. begin
  48571. if thebits = 0 then
  48572. pTDefRegMap(@Self)^.clr := $00000008
  48573. else
  48574. pTDefRegMap(@Self)^.&set := $00000008;
  48575. end;
  48576. function TUART3B_U3BMODE.getBRGH : TBits_1; inline;
  48577. begin
  48578. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48579. end;
  48580. procedure TUART3B_U3BMODE.setRXINV; inline;
  48581. begin
  48582. pTDefRegMap(@Self)^.&set := $00000010;
  48583. end;
  48584. procedure TUART3B_U3BMODE.clearRXINV; inline;
  48585. begin
  48586. pTDefRegMap(@Self)^.clr := $00000010;
  48587. end;
  48588. procedure TUART3B_U3BMODE.setRXINV(thebits : TBits_1); inline;
  48589. begin
  48590. if thebits = 0 then
  48591. pTDefRegMap(@Self)^.clr := $00000010
  48592. else
  48593. pTDefRegMap(@Self)^.&set := $00000010;
  48594. end;
  48595. function TUART3B_U3BMODE.getRXINV : TBits_1; inline;
  48596. begin
  48597. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48598. end;
  48599. procedure TUART3B_U3BMODE.setABAUD; inline;
  48600. begin
  48601. pTDefRegMap(@Self)^.&set := $00000020;
  48602. end;
  48603. procedure TUART3B_U3BMODE.clearABAUD; inline;
  48604. begin
  48605. pTDefRegMap(@Self)^.clr := $00000020;
  48606. end;
  48607. procedure TUART3B_U3BMODE.setABAUD(thebits : TBits_1); inline;
  48608. begin
  48609. if thebits = 0 then
  48610. pTDefRegMap(@Self)^.clr := $00000020
  48611. else
  48612. pTDefRegMap(@Self)^.&set := $00000020;
  48613. end;
  48614. function TUART3B_U3BMODE.getABAUD : TBits_1; inline;
  48615. begin
  48616. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48617. end;
  48618. procedure TUART3B_U3BMODE.setLPBACK; inline;
  48619. begin
  48620. pTDefRegMap(@Self)^.&set := $00000040;
  48621. end;
  48622. procedure TUART3B_U3BMODE.clearLPBACK; inline;
  48623. begin
  48624. pTDefRegMap(@Self)^.clr := $00000040;
  48625. end;
  48626. procedure TUART3B_U3BMODE.setLPBACK(thebits : TBits_1); inline;
  48627. begin
  48628. if thebits = 0 then
  48629. pTDefRegMap(@Self)^.clr := $00000040
  48630. else
  48631. pTDefRegMap(@Self)^.&set := $00000040;
  48632. end;
  48633. function TUART3B_U3BMODE.getLPBACK : TBits_1; inline;
  48634. begin
  48635. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48636. end;
  48637. procedure TUART3B_U3BMODE.setWAKE; inline;
  48638. begin
  48639. pTDefRegMap(@Self)^.&set := $00000080;
  48640. end;
  48641. procedure TUART3B_U3BMODE.clearWAKE; inline;
  48642. begin
  48643. pTDefRegMap(@Self)^.clr := $00000080;
  48644. end;
  48645. procedure TUART3B_U3BMODE.setWAKE(thebits : TBits_1); inline;
  48646. begin
  48647. if thebits = 0 then
  48648. pTDefRegMap(@Self)^.clr := $00000080
  48649. else
  48650. pTDefRegMap(@Self)^.&set := $00000080;
  48651. end;
  48652. function TUART3B_U3BMODE.getWAKE : TBits_1; inline;
  48653. begin
  48654. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48655. end;
  48656. procedure TUART3B_U3BMODE.setIREN; inline;
  48657. begin
  48658. pTDefRegMap(@Self)^.&set := $00001000;
  48659. end;
  48660. procedure TUART3B_U3BMODE.clearIREN; inline;
  48661. begin
  48662. pTDefRegMap(@Self)^.clr := $00001000;
  48663. end;
  48664. procedure TUART3B_U3BMODE.setIREN(thebits : TBits_1); inline;
  48665. begin
  48666. if thebits = 0 then
  48667. pTDefRegMap(@Self)^.clr := $00001000
  48668. else
  48669. pTDefRegMap(@Self)^.&set := $00001000;
  48670. end;
  48671. function TUART3B_U3BMODE.getIREN : TBits_1; inline;
  48672. begin
  48673. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48674. end;
  48675. procedure TUART3B_U3BMODE.setSIDL; inline;
  48676. begin
  48677. pTDefRegMap(@Self)^.&set := $00002000;
  48678. end;
  48679. procedure TUART3B_U3BMODE.clearSIDL; inline;
  48680. begin
  48681. pTDefRegMap(@Self)^.clr := $00002000;
  48682. end;
  48683. procedure TUART3B_U3BMODE.setSIDL(thebits : TBits_1); inline;
  48684. begin
  48685. if thebits = 0 then
  48686. pTDefRegMap(@Self)^.clr := $00002000
  48687. else
  48688. pTDefRegMap(@Self)^.&set := $00002000;
  48689. end;
  48690. function TUART3B_U3BMODE.getSIDL : TBits_1; inline;
  48691. begin
  48692. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48693. end;
  48694. procedure TUART3B_U3BMODE.setON; inline;
  48695. begin
  48696. pTDefRegMap(@Self)^.&set := $00008000;
  48697. end;
  48698. procedure TUART3B_U3BMODE.clearON; inline;
  48699. begin
  48700. pTDefRegMap(@Self)^.clr := $00008000;
  48701. end;
  48702. procedure TUART3B_U3BMODE.setON(thebits : TBits_1); inline;
  48703. begin
  48704. if thebits = 0 then
  48705. pTDefRegMap(@Self)^.clr := $00008000
  48706. else
  48707. pTDefRegMap(@Self)^.&set := $00008000;
  48708. end;
  48709. function TUART3B_U3BMODE.getON : TBits_1; inline;
  48710. begin
  48711. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48712. end;
  48713. procedure TUART3B_U3BMODE.setPDSEL0; inline;
  48714. begin
  48715. pTDefRegMap(@Self)^.&set := $00000002;
  48716. end;
  48717. procedure TUART3B_U3BMODE.clearPDSEL0; inline;
  48718. begin
  48719. pTDefRegMap(@Self)^.clr := $00000002;
  48720. end;
  48721. procedure TUART3B_U3BMODE.setPDSEL0(thebits : TBits_1); inline;
  48722. begin
  48723. if thebits = 0 then
  48724. pTDefRegMap(@Self)^.clr := $00000002
  48725. else
  48726. pTDefRegMap(@Self)^.&set := $00000002;
  48727. end;
  48728. function TUART3B_U3BMODE.getPDSEL0 : TBits_1; inline;
  48729. begin
  48730. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48731. end;
  48732. procedure TUART3B_U3BMODE.setPDSEL1; inline;
  48733. begin
  48734. pTDefRegMap(@Self)^.&set := $00000004;
  48735. end;
  48736. procedure TUART3B_U3BMODE.clearPDSEL1; inline;
  48737. begin
  48738. pTDefRegMap(@Self)^.clr := $00000004;
  48739. end;
  48740. procedure TUART3B_U3BMODE.setPDSEL1(thebits : TBits_1); inline;
  48741. begin
  48742. if thebits = 0 then
  48743. pTDefRegMap(@Self)^.clr := $00000004
  48744. else
  48745. pTDefRegMap(@Self)^.&set := $00000004;
  48746. end;
  48747. function TUART3B_U3BMODE.getPDSEL1 : TBits_1; inline;
  48748. begin
  48749. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  48750. end;
  48751. procedure TUART3B_U3BMODE.setUSIDL; inline;
  48752. begin
  48753. pTDefRegMap(@Self)^.&set := $00002000;
  48754. end;
  48755. procedure TUART3B_U3BMODE.clearUSIDL; inline;
  48756. begin
  48757. pTDefRegMap(@Self)^.clr := $00002000;
  48758. end;
  48759. procedure TUART3B_U3BMODE.setUSIDL(thebits : TBits_1); inline;
  48760. begin
  48761. if thebits = 0 then
  48762. pTDefRegMap(@Self)^.clr := $00002000
  48763. else
  48764. pTDefRegMap(@Self)^.&set := $00002000;
  48765. end;
  48766. function TUART3B_U3BMODE.getUSIDL : TBits_1; inline;
  48767. begin
  48768. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48769. end;
  48770. procedure TUART3B_U3BMODE.setUARTEN; inline;
  48771. begin
  48772. pTDefRegMap(@Self)^.&set := $00008000;
  48773. end;
  48774. procedure TUART3B_U3BMODE.clearUARTEN; inline;
  48775. begin
  48776. pTDefRegMap(@Self)^.clr := $00008000;
  48777. end;
  48778. procedure TUART3B_U3BMODE.setUARTEN(thebits : TBits_1); inline;
  48779. begin
  48780. if thebits = 0 then
  48781. pTDefRegMap(@Self)^.clr := $00008000
  48782. else
  48783. pTDefRegMap(@Self)^.&set := $00008000;
  48784. end;
  48785. function TUART3B_U3BMODE.getUARTEN : TBits_1; inline;
  48786. begin
  48787. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48788. end;
  48789. procedure TUART3B_U3BMODE.setw(thebits : TBits_32); inline;
  48790. begin
  48791. pTDefRegMap(@Self)^.val := thebits;
  48792. end;
  48793. function TUART3B_U3BMODE.getw : TBits_32; inline;
  48794. begin
  48795. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  48796. end;
  48797. procedure TUART3B_U5MODE.setSTSEL; inline;
  48798. begin
  48799. pTDefRegMap(@Self)^.&set := $00000001;
  48800. end;
  48801. procedure TUART3B_U5MODE.clearSTSEL; inline;
  48802. begin
  48803. pTDefRegMap(@Self)^.clr := $00000001;
  48804. end;
  48805. procedure TUART3B_U5MODE.setSTSEL(thebits : TBits_1); inline;
  48806. begin
  48807. if thebits = 0 then
  48808. pTDefRegMap(@Self)^.clr := $00000001
  48809. else
  48810. pTDefRegMap(@Self)^.&set := $00000001;
  48811. end;
  48812. function TUART3B_U5MODE.getSTSEL : TBits_1; inline;
  48813. begin
  48814. getSTSEL := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  48815. end;
  48816. procedure TUART3B_U5MODE.setPDSEL(thebits : TBits_2); inline;
  48817. begin
  48818. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF9 or ( thebits shl 1 );
  48819. end;
  48820. function TUART3B_U5MODE.getPDSEL : TBits_2; inline;
  48821. begin
  48822. getPDSEL := (pTDefRegMap(@Self)^.val and $00000006) shr 1;
  48823. end;
  48824. procedure TUART3B_U5MODE.setBRGH; inline;
  48825. begin
  48826. pTDefRegMap(@Self)^.&set := $00000008;
  48827. end;
  48828. procedure TUART3B_U5MODE.clearBRGH; inline;
  48829. begin
  48830. pTDefRegMap(@Self)^.clr := $00000008;
  48831. end;
  48832. procedure TUART3B_U5MODE.setBRGH(thebits : TBits_1); inline;
  48833. begin
  48834. if thebits = 0 then
  48835. pTDefRegMap(@Self)^.clr := $00000008
  48836. else
  48837. pTDefRegMap(@Self)^.&set := $00000008;
  48838. end;
  48839. function TUART3B_U5MODE.getBRGH : TBits_1; inline;
  48840. begin
  48841. getBRGH := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  48842. end;
  48843. procedure TUART3B_U5MODE.setRXINV; inline;
  48844. begin
  48845. pTDefRegMap(@Self)^.&set := $00000010;
  48846. end;
  48847. procedure TUART3B_U5MODE.clearRXINV; inline;
  48848. begin
  48849. pTDefRegMap(@Self)^.clr := $00000010;
  48850. end;
  48851. procedure TUART3B_U5MODE.setRXINV(thebits : TBits_1); inline;
  48852. begin
  48853. if thebits = 0 then
  48854. pTDefRegMap(@Self)^.clr := $00000010
  48855. else
  48856. pTDefRegMap(@Self)^.&set := $00000010;
  48857. end;
  48858. function TUART3B_U5MODE.getRXINV : TBits_1; inline;
  48859. begin
  48860. getRXINV := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  48861. end;
  48862. procedure TUART3B_U5MODE.setABAUD; inline;
  48863. begin
  48864. pTDefRegMap(@Self)^.&set := $00000020;
  48865. end;
  48866. procedure TUART3B_U5MODE.clearABAUD; inline;
  48867. begin
  48868. pTDefRegMap(@Self)^.clr := $00000020;
  48869. end;
  48870. procedure TUART3B_U5MODE.setABAUD(thebits : TBits_1); inline;
  48871. begin
  48872. if thebits = 0 then
  48873. pTDefRegMap(@Self)^.clr := $00000020
  48874. else
  48875. pTDefRegMap(@Self)^.&set := $00000020;
  48876. end;
  48877. function TUART3B_U5MODE.getABAUD : TBits_1; inline;
  48878. begin
  48879. getABAUD := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  48880. end;
  48881. procedure TUART3B_U5MODE.setLPBACK; inline;
  48882. begin
  48883. pTDefRegMap(@Self)^.&set := $00000040;
  48884. end;
  48885. procedure TUART3B_U5MODE.clearLPBACK; inline;
  48886. begin
  48887. pTDefRegMap(@Self)^.clr := $00000040;
  48888. end;
  48889. procedure TUART3B_U5MODE.setLPBACK(thebits : TBits_1); inline;
  48890. begin
  48891. if thebits = 0 then
  48892. pTDefRegMap(@Self)^.clr := $00000040
  48893. else
  48894. pTDefRegMap(@Self)^.&set := $00000040;
  48895. end;
  48896. function TUART3B_U5MODE.getLPBACK : TBits_1; inline;
  48897. begin
  48898. getLPBACK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  48899. end;
  48900. procedure TUART3B_U5MODE.setWAKE; inline;
  48901. begin
  48902. pTDefRegMap(@Self)^.&set := $00000080;
  48903. end;
  48904. procedure TUART3B_U5MODE.clearWAKE; inline;
  48905. begin
  48906. pTDefRegMap(@Self)^.clr := $00000080;
  48907. end;
  48908. procedure TUART3B_U5MODE.setWAKE(thebits : TBits_1); inline;
  48909. begin
  48910. if thebits = 0 then
  48911. pTDefRegMap(@Self)^.clr := $00000080
  48912. else
  48913. pTDefRegMap(@Self)^.&set := $00000080;
  48914. end;
  48915. function TUART3B_U5MODE.getWAKE : TBits_1; inline;
  48916. begin
  48917. getWAKE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  48918. end;
  48919. procedure TUART3B_U5MODE.setIREN; inline;
  48920. begin
  48921. pTDefRegMap(@Self)^.&set := $00001000;
  48922. end;
  48923. procedure TUART3B_U5MODE.clearIREN; inline;
  48924. begin
  48925. pTDefRegMap(@Self)^.clr := $00001000;
  48926. end;
  48927. procedure TUART3B_U5MODE.setIREN(thebits : TBits_1); inline;
  48928. begin
  48929. if thebits = 0 then
  48930. pTDefRegMap(@Self)^.clr := $00001000
  48931. else
  48932. pTDefRegMap(@Self)^.&set := $00001000;
  48933. end;
  48934. function TUART3B_U5MODE.getIREN : TBits_1; inline;
  48935. begin
  48936. getIREN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  48937. end;
  48938. procedure TUART3B_U5MODE.setSIDL; inline;
  48939. begin
  48940. pTDefRegMap(@Self)^.&set := $00002000;
  48941. end;
  48942. procedure TUART3B_U5MODE.clearSIDL; inline;
  48943. begin
  48944. pTDefRegMap(@Self)^.clr := $00002000;
  48945. end;
  48946. procedure TUART3B_U5MODE.setSIDL(thebits : TBits_1); inline;
  48947. begin
  48948. if thebits = 0 then
  48949. pTDefRegMap(@Self)^.clr := $00002000
  48950. else
  48951. pTDefRegMap(@Self)^.&set := $00002000;
  48952. end;
  48953. function TUART3B_U5MODE.getSIDL : TBits_1; inline;
  48954. begin
  48955. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  48956. end;
  48957. procedure TUART3B_U5MODE.setON; inline;
  48958. begin
  48959. pTDefRegMap(@Self)^.&set := $00008000;
  48960. end;
  48961. procedure TUART3B_U5MODE.clearON; inline;
  48962. begin
  48963. pTDefRegMap(@Self)^.clr := $00008000;
  48964. end;
  48965. procedure TUART3B_U5MODE.setON(thebits : TBits_1); inline;
  48966. begin
  48967. if thebits = 0 then
  48968. pTDefRegMap(@Self)^.clr := $00008000
  48969. else
  48970. pTDefRegMap(@Self)^.&set := $00008000;
  48971. end;
  48972. function TUART3B_U5MODE.getON : TBits_1; inline;
  48973. begin
  48974. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  48975. end;
  48976. procedure TUART3B_U5MODE.setPDSEL0; inline;
  48977. begin
  48978. pTDefRegMap(@Self)^.&set := $00000002;
  48979. end;
  48980. procedure TUART3B_U5MODE.clearPDSEL0; inline;
  48981. begin
  48982. pTDefRegMap(@Self)^.clr := $00000002;
  48983. end;
  48984. procedure TUART3B_U5MODE.setPDSEL0(thebits : TBits_1); inline;
  48985. begin
  48986. if thebits = 0 then
  48987. pTDefRegMap(@Self)^.clr := $00000002
  48988. else
  48989. pTDefRegMap(@Self)^.&set := $00000002;
  48990. end;
  48991. function TUART3B_U5MODE.getPDSEL0 : TBits_1; inline;
  48992. begin
  48993. getPDSEL0 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  48994. end;
  48995. procedure TUART3B_U5MODE.setPDSEL1; inline;
  48996. begin
  48997. pTDefRegMap(@Self)^.&set := $00000004;
  48998. end;
  48999. procedure TUART3B_U5MODE.clearPDSEL1; inline;
  49000. begin
  49001. pTDefRegMap(@Self)^.clr := $00000004;
  49002. end;
  49003. procedure TUART3B_U5MODE.setPDSEL1(thebits : TBits_1); inline;
  49004. begin
  49005. if thebits = 0 then
  49006. pTDefRegMap(@Self)^.clr := $00000004
  49007. else
  49008. pTDefRegMap(@Self)^.&set := $00000004;
  49009. end;
  49010. function TUART3B_U5MODE.getPDSEL1 : TBits_1; inline;
  49011. begin
  49012. getPDSEL1 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49013. end;
  49014. procedure TUART3B_U5MODE.setUSIDL; inline;
  49015. begin
  49016. pTDefRegMap(@Self)^.&set := $00002000;
  49017. end;
  49018. procedure TUART3B_U5MODE.clearUSIDL; inline;
  49019. begin
  49020. pTDefRegMap(@Self)^.clr := $00002000;
  49021. end;
  49022. procedure TUART3B_U5MODE.setUSIDL(thebits : TBits_1); inline;
  49023. begin
  49024. if thebits = 0 then
  49025. pTDefRegMap(@Self)^.clr := $00002000
  49026. else
  49027. pTDefRegMap(@Self)^.&set := $00002000;
  49028. end;
  49029. function TUART3B_U5MODE.getUSIDL : TBits_1; inline;
  49030. begin
  49031. getUSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49032. end;
  49033. procedure TUART3B_U5MODE.setUARTEN; inline;
  49034. begin
  49035. pTDefRegMap(@Self)^.&set := $00008000;
  49036. end;
  49037. procedure TUART3B_U5MODE.clearUARTEN; inline;
  49038. begin
  49039. pTDefRegMap(@Self)^.clr := $00008000;
  49040. end;
  49041. procedure TUART3B_U5MODE.setUARTEN(thebits : TBits_1); inline;
  49042. begin
  49043. if thebits = 0 then
  49044. pTDefRegMap(@Self)^.clr := $00008000
  49045. else
  49046. pTDefRegMap(@Self)^.&set := $00008000;
  49047. end;
  49048. function TUART3B_U5MODE.getUARTEN : TBits_1; inline;
  49049. begin
  49050. getUARTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49051. end;
  49052. procedure TUART3B_U5MODE.setw(thebits : TBits_32); inline;
  49053. begin
  49054. pTDefRegMap(@Self)^.val := thebits;
  49055. end;
  49056. function TUART3B_U5MODE.getw : TBits_32; inline;
  49057. begin
  49058. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49059. end;
  49060. procedure TUART3B_U3BSTA.setURXDA; inline;
  49061. begin
  49062. pTDefRegMap(@Self)^.&set := $00000001;
  49063. end;
  49064. procedure TUART3B_U3BSTA.clearURXDA; inline;
  49065. begin
  49066. pTDefRegMap(@Self)^.clr := $00000001;
  49067. end;
  49068. procedure TUART3B_U3BSTA.setURXDA(thebits : TBits_1); inline;
  49069. begin
  49070. if thebits = 0 then
  49071. pTDefRegMap(@Self)^.clr := $00000001
  49072. else
  49073. pTDefRegMap(@Self)^.&set := $00000001;
  49074. end;
  49075. function TUART3B_U3BSTA.getURXDA : TBits_1; inline;
  49076. begin
  49077. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49078. end;
  49079. procedure TUART3B_U3BSTA.setOERR; inline;
  49080. begin
  49081. pTDefRegMap(@Self)^.&set := $00000002;
  49082. end;
  49083. procedure TUART3B_U3BSTA.clearOERR; inline;
  49084. begin
  49085. pTDefRegMap(@Self)^.clr := $00000002;
  49086. end;
  49087. procedure TUART3B_U3BSTA.setOERR(thebits : TBits_1); inline;
  49088. begin
  49089. if thebits = 0 then
  49090. pTDefRegMap(@Self)^.clr := $00000002
  49091. else
  49092. pTDefRegMap(@Self)^.&set := $00000002;
  49093. end;
  49094. function TUART3B_U3BSTA.getOERR : TBits_1; inline;
  49095. begin
  49096. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49097. end;
  49098. procedure TUART3B_U3BSTA.setFERR; inline;
  49099. begin
  49100. pTDefRegMap(@Self)^.&set := $00000004;
  49101. end;
  49102. procedure TUART3B_U3BSTA.clearFERR; inline;
  49103. begin
  49104. pTDefRegMap(@Self)^.clr := $00000004;
  49105. end;
  49106. procedure TUART3B_U3BSTA.setFERR(thebits : TBits_1); inline;
  49107. begin
  49108. if thebits = 0 then
  49109. pTDefRegMap(@Self)^.clr := $00000004
  49110. else
  49111. pTDefRegMap(@Self)^.&set := $00000004;
  49112. end;
  49113. function TUART3B_U3BSTA.getFERR : TBits_1; inline;
  49114. begin
  49115. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49116. end;
  49117. procedure TUART3B_U3BSTA.setPERR; inline;
  49118. begin
  49119. pTDefRegMap(@Self)^.&set := $00000008;
  49120. end;
  49121. procedure TUART3B_U3BSTA.clearPERR; inline;
  49122. begin
  49123. pTDefRegMap(@Self)^.clr := $00000008;
  49124. end;
  49125. procedure TUART3B_U3BSTA.setPERR(thebits : TBits_1); inline;
  49126. begin
  49127. if thebits = 0 then
  49128. pTDefRegMap(@Self)^.clr := $00000008
  49129. else
  49130. pTDefRegMap(@Self)^.&set := $00000008;
  49131. end;
  49132. function TUART3B_U3BSTA.getPERR : TBits_1; inline;
  49133. begin
  49134. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49135. end;
  49136. procedure TUART3B_U3BSTA.setRIDLE; inline;
  49137. begin
  49138. pTDefRegMap(@Self)^.&set := $00000010;
  49139. end;
  49140. procedure TUART3B_U3BSTA.clearRIDLE; inline;
  49141. begin
  49142. pTDefRegMap(@Self)^.clr := $00000010;
  49143. end;
  49144. procedure TUART3B_U3BSTA.setRIDLE(thebits : TBits_1); inline;
  49145. begin
  49146. if thebits = 0 then
  49147. pTDefRegMap(@Self)^.clr := $00000010
  49148. else
  49149. pTDefRegMap(@Self)^.&set := $00000010;
  49150. end;
  49151. function TUART3B_U3BSTA.getRIDLE : TBits_1; inline;
  49152. begin
  49153. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49154. end;
  49155. procedure TUART3B_U3BSTA.setADDEN; inline;
  49156. begin
  49157. pTDefRegMap(@Self)^.&set := $00000020;
  49158. end;
  49159. procedure TUART3B_U3BSTA.clearADDEN; inline;
  49160. begin
  49161. pTDefRegMap(@Self)^.clr := $00000020;
  49162. end;
  49163. procedure TUART3B_U3BSTA.setADDEN(thebits : TBits_1); inline;
  49164. begin
  49165. if thebits = 0 then
  49166. pTDefRegMap(@Self)^.clr := $00000020
  49167. else
  49168. pTDefRegMap(@Self)^.&set := $00000020;
  49169. end;
  49170. function TUART3B_U3BSTA.getADDEN : TBits_1; inline;
  49171. begin
  49172. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49173. end;
  49174. procedure TUART3B_U3BSTA.setURXISEL(thebits : TBits_2); inline;
  49175. begin
  49176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  49177. end;
  49178. function TUART3B_U3BSTA.getURXISEL : TBits_2; inline;
  49179. begin
  49180. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  49181. end;
  49182. procedure TUART3B_U3BSTA.setTRMT; inline;
  49183. begin
  49184. pTDefRegMap(@Self)^.&set := $00000100;
  49185. end;
  49186. procedure TUART3B_U3BSTA.clearTRMT; inline;
  49187. begin
  49188. pTDefRegMap(@Self)^.clr := $00000100;
  49189. end;
  49190. procedure TUART3B_U3BSTA.setTRMT(thebits : TBits_1); inline;
  49191. begin
  49192. if thebits = 0 then
  49193. pTDefRegMap(@Self)^.clr := $00000100
  49194. else
  49195. pTDefRegMap(@Self)^.&set := $00000100;
  49196. end;
  49197. function TUART3B_U3BSTA.getTRMT : TBits_1; inline;
  49198. begin
  49199. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49200. end;
  49201. procedure TUART3B_U3BSTA.setUTXBF; inline;
  49202. begin
  49203. pTDefRegMap(@Self)^.&set := $00000200;
  49204. end;
  49205. procedure TUART3B_U3BSTA.clearUTXBF; inline;
  49206. begin
  49207. pTDefRegMap(@Self)^.clr := $00000200;
  49208. end;
  49209. procedure TUART3B_U3BSTA.setUTXBF(thebits : TBits_1); inline;
  49210. begin
  49211. if thebits = 0 then
  49212. pTDefRegMap(@Self)^.clr := $00000200
  49213. else
  49214. pTDefRegMap(@Self)^.&set := $00000200;
  49215. end;
  49216. function TUART3B_U3BSTA.getUTXBF : TBits_1; inline;
  49217. begin
  49218. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49219. end;
  49220. procedure TUART3B_U3BSTA.setUTXEN; inline;
  49221. begin
  49222. pTDefRegMap(@Self)^.&set := $00000400;
  49223. end;
  49224. procedure TUART3B_U3BSTA.clearUTXEN; inline;
  49225. begin
  49226. pTDefRegMap(@Self)^.clr := $00000400;
  49227. end;
  49228. procedure TUART3B_U3BSTA.setUTXEN(thebits : TBits_1); inline;
  49229. begin
  49230. if thebits = 0 then
  49231. pTDefRegMap(@Self)^.clr := $00000400
  49232. else
  49233. pTDefRegMap(@Self)^.&set := $00000400;
  49234. end;
  49235. function TUART3B_U3BSTA.getUTXEN : TBits_1; inline;
  49236. begin
  49237. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49238. end;
  49239. procedure TUART3B_U3BSTA.setUTXBRK; inline;
  49240. begin
  49241. pTDefRegMap(@Self)^.&set := $00000800;
  49242. end;
  49243. procedure TUART3B_U3BSTA.clearUTXBRK; inline;
  49244. begin
  49245. pTDefRegMap(@Self)^.clr := $00000800;
  49246. end;
  49247. procedure TUART3B_U3BSTA.setUTXBRK(thebits : TBits_1); inline;
  49248. begin
  49249. if thebits = 0 then
  49250. pTDefRegMap(@Self)^.clr := $00000800
  49251. else
  49252. pTDefRegMap(@Self)^.&set := $00000800;
  49253. end;
  49254. function TUART3B_U3BSTA.getUTXBRK : TBits_1; inline;
  49255. begin
  49256. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49257. end;
  49258. procedure TUART3B_U3BSTA.setURXEN; inline;
  49259. begin
  49260. pTDefRegMap(@Self)^.&set := $00001000;
  49261. end;
  49262. procedure TUART3B_U3BSTA.clearURXEN; inline;
  49263. begin
  49264. pTDefRegMap(@Self)^.clr := $00001000;
  49265. end;
  49266. procedure TUART3B_U3BSTA.setURXEN(thebits : TBits_1); inline;
  49267. begin
  49268. if thebits = 0 then
  49269. pTDefRegMap(@Self)^.clr := $00001000
  49270. else
  49271. pTDefRegMap(@Self)^.&set := $00001000;
  49272. end;
  49273. function TUART3B_U3BSTA.getURXEN : TBits_1; inline;
  49274. begin
  49275. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  49276. end;
  49277. procedure TUART3B_U3BSTA.setUTXINV; inline;
  49278. begin
  49279. pTDefRegMap(@Self)^.&set := $00002000;
  49280. end;
  49281. procedure TUART3B_U3BSTA.clearUTXINV; inline;
  49282. begin
  49283. pTDefRegMap(@Self)^.clr := $00002000;
  49284. end;
  49285. procedure TUART3B_U3BSTA.setUTXINV(thebits : TBits_1); inline;
  49286. begin
  49287. if thebits = 0 then
  49288. pTDefRegMap(@Self)^.clr := $00002000
  49289. else
  49290. pTDefRegMap(@Self)^.&set := $00002000;
  49291. end;
  49292. function TUART3B_U3BSTA.getUTXINV : TBits_1; inline;
  49293. begin
  49294. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49295. end;
  49296. procedure TUART3B_U3BSTA.setUTXISEL(thebits : TBits_2); inline;
  49297. begin
  49298. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49299. end;
  49300. function TUART3B_U3BSTA.getUTXISEL : TBits_2; inline;
  49301. begin
  49302. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49303. end;
  49304. procedure TUART3B_U3BSTA.setADDR(thebits : TBits_8); inline;
  49305. begin
  49306. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  49307. end;
  49308. function TUART3B_U3BSTA.getADDR : TBits_8; inline;
  49309. begin
  49310. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  49311. end;
  49312. procedure TUART3B_U3BSTA.setADM_EN; inline;
  49313. begin
  49314. pTDefRegMap(@Self)^.&set := $01000000;
  49315. end;
  49316. procedure TUART3B_U3BSTA.clearADM_EN; inline;
  49317. begin
  49318. pTDefRegMap(@Self)^.clr := $01000000;
  49319. end;
  49320. procedure TUART3B_U3BSTA.setADM_EN(thebits : TBits_1); inline;
  49321. begin
  49322. if thebits = 0 then
  49323. pTDefRegMap(@Self)^.clr := $01000000
  49324. else
  49325. pTDefRegMap(@Self)^.&set := $01000000;
  49326. end;
  49327. function TUART3B_U3BSTA.getADM_EN : TBits_1; inline;
  49328. begin
  49329. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  49330. end;
  49331. procedure TUART3B_U3BSTA.setURXISEL0; inline;
  49332. begin
  49333. pTDefRegMap(@Self)^.&set := $00000040;
  49334. end;
  49335. procedure TUART3B_U3BSTA.clearURXISEL0; inline;
  49336. begin
  49337. pTDefRegMap(@Self)^.clr := $00000040;
  49338. end;
  49339. procedure TUART3B_U3BSTA.setURXISEL0(thebits : TBits_1); inline;
  49340. begin
  49341. if thebits = 0 then
  49342. pTDefRegMap(@Self)^.clr := $00000040
  49343. else
  49344. pTDefRegMap(@Self)^.&set := $00000040;
  49345. end;
  49346. function TUART3B_U3BSTA.getURXISEL0 : TBits_1; inline;
  49347. begin
  49348. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49349. end;
  49350. procedure TUART3B_U3BSTA.setURXISEL1; inline;
  49351. begin
  49352. pTDefRegMap(@Self)^.&set := $00000080;
  49353. end;
  49354. procedure TUART3B_U3BSTA.clearURXISEL1; inline;
  49355. begin
  49356. pTDefRegMap(@Self)^.clr := $00000080;
  49357. end;
  49358. procedure TUART3B_U3BSTA.setURXISEL1(thebits : TBits_1); inline;
  49359. begin
  49360. if thebits = 0 then
  49361. pTDefRegMap(@Self)^.clr := $00000080
  49362. else
  49363. pTDefRegMap(@Self)^.&set := $00000080;
  49364. end;
  49365. function TUART3B_U3BSTA.getURXISEL1 : TBits_1; inline;
  49366. begin
  49367. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49368. end;
  49369. procedure TUART3B_U3BSTA.setUTXISEL0; inline;
  49370. begin
  49371. pTDefRegMap(@Self)^.&set := $00004000;
  49372. end;
  49373. procedure TUART3B_U3BSTA.clearUTXISEL0; inline;
  49374. begin
  49375. pTDefRegMap(@Self)^.clr := $00004000;
  49376. end;
  49377. procedure TUART3B_U3BSTA.setUTXISEL0(thebits : TBits_1); inline;
  49378. begin
  49379. if thebits = 0 then
  49380. pTDefRegMap(@Self)^.clr := $00004000
  49381. else
  49382. pTDefRegMap(@Self)^.&set := $00004000;
  49383. end;
  49384. function TUART3B_U3BSTA.getUTXISEL0 : TBits_1; inline;
  49385. begin
  49386. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  49387. end;
  49388. procedure TUART3B_U3BSTA.setUTXISEL1; inline;
  49389. begin
  49390. pTDefRegMap(@Self)^.&set := $00008000;
  49391. end;
  49392. procedure TUART3B_U3BSTA.clearUTXISEL1; inline;
  49393. begin
  49394. pTDefRegMap(@Self)^.clr := $00008000;
  49395. end;
  49396. procedure TUART3B_U3BSTA.setUTXISEL1(thebits : TBits_1); inline;
  49397. begin
  49398. if thebits = 0 then
  49399. pTDefRegMap(@Self)^.clr := $00008000
  49400. else
  49401. pTDefRegMap(@Self)^.&set := $00008000;
  49402. end;
  49403. function TUART3B_U3BSTA.getUTXISEL1 : TBits_1; inline;
  49404. begin
  49405. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49406. end;
  49407. procedure TUART3B_U3BSTA.setUTXSEL(thebits : TBits_2); inline;
  49408. begin
  49409. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49410. end;
  49411. function TUART3B_U3BSTA.getUTXSEL : TBits_2; inline;
  49412. begin
  49413. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49414. end;
  49415. procedure TUART3B_U3BSTA.setw(thebits : TBits_32); inline;
  49416. begin
  49417. pTDefRegMap(@Self)^.val := thebits;
  49418. end;
  49419. function TUART3B_U3BSTA.getw : TBits_32; inline;
  49420. begin
  49421. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49422. end;
  49423. procedure TUART3B_U5STA.setURXDA; inline;
  49424. begin
  49425. pTDefRegMap(@Self)^.&set := $00000001;
  49426. end;
  49427. procedure TUART3B_U5STA.clearURXDA; inline;
  49428. begin
  49429. pTDefRegMap(@Self)^.clr := $00000001;
  49430. end;
  49431. procedure TUART3B_U5STA.setURXDA(thebits : TBits_1); inline;
  49432. begin
  49433. if thebits = 0 then
  49434. pTDefRegMap(@Self)^.clr := $00000001
  49435. else
  49436. pTDefRegMap(@Self)^.&set := $00000001;
  49437. end;
  49438. function TUART3B_U5STA.getURXDA : TBits_1; inline;
  49439. begin
  49440. getURXDA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49441. end;
  49442. procedure TUART3B_U5STA.setOERR; inline;
  49443. begin
  49444. pTDefRegMap(@Self)^.&set := $00000002;
  49445. end;
  49446. procedure TUART3B_U5STA.clearOERR; inline;
  49447. begin
  49448. pTDefRegMap(@Self)^.clr := $00000002;
  49449. end;
  49450. procedure TUART3B_U5STA.setOERR(thebits : TBits_1); inline;
  49451. begin
  49452. if thebits = 0 then
  49453. pTDefRegMap(@Self)^.clr := $00000002
  49454. else
  49455. pTDefRegMap(@Self)^.&set := $00000002;
  49456. end;
  49457. function TUART3B_U5STA.getOERR : TBits_1; inline;
  49458. begin
  49459. getOERR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49460. end;
  49461. procedure TUART3B_U5STA.setFERR; inline;
  49462. begin
  49463. pTDefRegMap(@Self)^.&set := $00000004;
  49464. end;
  49465. procedure TUART3B_U5STA.clearFERR; inline;
  49466. begin
  49467. pTDefRegMap(@Self)^.clr := $00000004;
  49468. end;
  49469. procedure TUART3B_U5STA.setFERR(thebits : TBits_1); inline;
  49470. begin
  49471. if thebits = 0 then
  49472. pTDefRegMap(@Self)^.clr := $00000004
  49473. else
  49474. pTDefRegMap(@Self)^.&set := $00000004;
  49475. end;
  49476. function TUART3B_U5STA.getFERR : TBits_1; inline;
  49477. begin
  49478. getFERR := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  49479. end;
  49480. procedure TUART3B_U5STA.setPERR; inline;
  49481. begin
  49482. pTDefRegMap(@Self)^.&set := $00000008;
  49483. end;
  49484. procedure TUART3B_U5STA.clearPERR; inline;
  49485. begin
  49486. pTDefRegMap(@Self)^.clr := $00000008;
  49487. end;
  49488. procedure TUART3B_U5STA.setPERR(thebits : TBits_1); inline;
  49489. begin
  49490. if thebits = 0 then
  49491. pTDefRegMap(@Self)^.clr := $00000008
  49492. else
  49493. pTDefRegMap(@Self)^.&set := $00000008;
  49494. end;
  49495. function TUART3B_U5STA.getPERR : TBits_1; inline;
  49496. begin
  49497. getPERR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49498. end;
  49499. procedure TUART3B_U5STA.setRIDLE; inline;
  49500. begin
  49501. pTDefRegMap(@Self)^.&set := $00000010;
  49502. end;
  49503. procedure TUART3B_U5STA.clearRIDLE; inline;
  49504. begin
  49505. pTDefRegMap(@Self)^.clr := $00000010;
  49506. end;
  49507. procedure TUART3B_U5STA.setRIDLE(thebits : TBits_1); inline;
  49508. begin
  49509. if thebits = 0 then
  49510. pTDefRegMap(@Self)^.clr := $00000010
  49511. else
  49512. pTDefRegMap(@Self)^.&set := $00000010;
  49513. end;
  49514. function TUART3B_U5STA.getRIDLE : TBits_1; inline;
  49515. begin
  49516. getRIDLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49517. end;
  49518. procedure TUART3B_U5STA.setADDEN; inline;
  49519. begin
  49520. pTDefRegMap(@Self)^.&set := $00000020;
  49521. end;
  49522. procedure TUART3B_U5STA.clearADDEN; inline;
  49523. begin
  49524. pTDefRegMap(@Self)^.clr := $00000020;
  49525. end;
  49526. procedure TUART3B_U5STA.setADDEN(thebits : TBits_1); inline;
  49527. begin
  49528. if thebits = 0 then
  49529. pTDefRegMap(@Self)^.clr := $00000020
  49530. else
  49531. pTDefRegMap(@Self)^.&set := $00000020;
  49532. end;
  49533. function TUART3B_U5STA.getADDEN : TBits_1; inline;
  49534. begin
  49535. getADDEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49536. end;
  49537. procedure TUART3B_U5STA.setURXISEL(thebits : TBits_2); inline;
  49538. begin
  49539. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  49540. end;
  49541. function TUART3B_U5STA.getURXISEL : TBits_2; inline;
  49542. begin
  49543. getURXISEL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  49544. end;
  49545. procedure TUART3B_U5STA.setTRMT; inline;
  49546. begin
  49547. pTDefRegMap(@Self)^.&set := $00000100;
  49548. end;
  49549. procedure TUART3B_U5STA.clearTRMT; inline;
  49550. begin
  49551. pTDefRegMap(@Self)^.clr := $00000100;
  49552. end;
  49553. procedure TUART3B_U5STA.setTRMT(thebits : TBits_1); inline;
  49554. begin
  49555. if thebits = 0 then
  49556. pTDefRegMap(@Self)^.clr := $00000100
  49557. else
  49558. pTDefRegMap(@Self)^.&set := $00000100;
  49559. end;
  49560. function TUART3B_U5STA.getTRMT : TBits_1; inline;
  49561. begin
  49562. getTRMT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49563. end;
  49564. procedure TUART3B_U5STA.setUTXBF; inline;
  49565. begin
  49566. pTDefRegMap(@Self)^.&set := $00000200;
  49567. end;
  49568. procedure TUART3B_U5STA.clearUTXBF; inline;
  49569. begin
  49570. pTDefRegMap(@Self)^.clr := $00000200;
  49571. end;
  49572. procedure TUART3B_U5STA.setUTXBF(thebits : TBits_1); inline;
  49573. begin
  49574. if thebits = 0 then
  49575. pTDefRegMap(@Self)^.clr := $00000200
  49576. else
  49577. pTDefRegMap(@Self)^.&set := $00000200;
  49578. end;
  49579. function TUART3B_U5STA.getUTXBF : TBits_1; inline;
  49580. begin
  49581. getUTXBF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49582. end;
  49583. procedure TUART3B_U5STA.setUTXEN; inline;
  49584. begin
  49585. pTDefRegMap(@Self)^.&set := $00000400;
  49586. end;
  49587. procedure TUART3B_U5STA.clearUTXEN; inline;
  49588. begin
  49589. pTDefRegMap(@Self)^.clr := $00000400;
  49590. end;
  49591. procedure TUART3B_U5STA.setUTXEN(thebits : TBits_1); inline;
  49592. begin
  49593. if thebits = 0 then
  49594. pTDefRegMap(@Self)^.clr := $00000400
  49595. else
  49596. pTDefRegMap(@Self)^.&set := $00000400;
  49597. end;
  49598. function TUART3B_U5STA.getUTXEN : TBits_1; inline;
  49599. begin
  49600. getUTXEN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49601. end;
  49602. procedure TUART3B_U5STA.setUTXBRK; inline;
  49603. begin
  49604. pTDefRegMap(@Self)^.&set := $00000800;
  49605. end;
  49606. procedure TUART3B_U5STA.clearUTXBRK; inline;
  49607. begin
  49608. pTDefRegMap(@Self)^.clr := $00000800;
  49609. end;
  49610. procedure TUART3B_U5STA.setUTXBRK(thebits : TBits_1); inline;
  49611. begin
  49612. if thebits = 0 then
  49613. pTDefRegMap(@Self)^.clr := $00000800
  49614. else
  49615. pTDefRegMap(@Self)^.&set := $00000800;
  49616. end;
  49617. function TUART3B_U5STA.getUTXBRK : TBits_1; inline;
  49618. begin
  49619. getUTXBRK := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  49620. end;
  49621. procedure TUART3B_U5STA.setURXEN; inline;
  49622. begin
  49623. pTDefRegMap(@Self)^.&set := $00001000;
  49624. end;
  49625. procedure TUART3B_U5STA.clearURXEN; inline;
  49626. begin
  49627. pTDefRegMap(@Self)^.clr := $00001000;
  49628. end;
  49629. procedure TUART3B_U5STA.setURXEN(thebits : TBits_1); inline;
  49630. begin
  49631. if thebits = 0 then
  49632. pTDefRegMap(@Self)^.clr := $00001000
  49633. else
  49634. pTDefRegMap(@Self)^.&set := $00001000;
  49635. end;
  49636. function TUART3B_U5STA.getURXEN : TBits_1; inline;
  49637. begin
  49638. getURXEN := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  49639. end;
  49640. procedure TUART3B_U5STA.setUTXINV; inline;
  49641. begin
  49642. pTDefRegMap(@Self)^.&set := $00002000;
  49643. end;
  49644. procedure TUART3B_U5STA.clearUTXINV; inline;
  49645. begin
  49646. pTDefRegMap(@Self)^.clr := $00002000;
  49647. end;
  49648. procedure TUART3B_U5STA.setUTXINV(thebits : TBits_1); inline;
  49649. begin
  49650. if thebits = 0 then
  49651. pTDefRegMap(@Self)^.clr := $00002000
  49652. else
  49653. pTDefRegMap(@Self)^.&set := $00002000;
  49654. end;
  49655. function TUART3B_U5STA.getUTXINV : TBits_1; inline;
  49656. begin
  49657. getUTXINV := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49658. end;
  49659. procedure TUART3B_U5STA.setUTXISEL(thebits : TBits_2); inline;
  49660. begin
  49661. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49662. end;
  49663. function TUART3B_U5STA.getUTXISEL : TBits_2; inline;
  49664. begin
  49665. getUTXISEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49666. end;
  49667. procedure TUART3B_U5STA.setADDR(thebits : TBits_8); inline;
  49668. begin
  49669. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  49670. end;
  49671. function TUART3B_U5STA.getADDR : TBits_8; inline;
  49672. begin
  49673. getADDR := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  49674. end;
  49675. procedure TUART3B_U5STA.setADM_EN; inline;
  49676. begin
  49677. pTDefRegMap(@Self)^.&set := $01000000;
  49678. end;
  49679. procedure TUART3B_U5STA.clearADM_EN; inline;
  49680. begin
  49681. pTDefRegMap(@Self)^.clr := $01000000;
  49682. end;
  49683. procedure TUART3B_U5STA.setADM_EN(thebits : TBits_1); inline;
  49684. begin
  49685. if thebits = 0 then
  49686. pTDefRegMap(@Self)^.clr := $01000000
  49687. else
  49688. pTDefRegMap(@Self)^.&set := $01000000;
  49689. end;
  49690. function TUART3B_U5STA.getADM_EN : TBits_1; inline;
  49691. begin
  49692. getADM_EN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  49693. end;
  49694. procedure TUART3B_U5STA.setURXISEL0; inline;
  49695. begin
  49696. pTDefRegMap(@Self)^.&set := $00000040;
  49697. end;
  49698. procedure TUART3B_U5STA.clearURXISEL0; inline;
  49699. begin
  49700. pTDefRegMap(@Self)^.clr := $00000040;
  49701. end;
  49702. procedure TUART3B_U5STA.setURXISEL0(thebits : TBits_1); inline;
  49703. begin
  49704. if thebits = 0 then
  49705. pTDefRegMap(@Self)^.clr := $00000040
  49706. else
  49707. pTDefRegMap(@Self)^.&set := $00000040;
  49708. end;
  49709. function TUART3B_U5STA.getURXISEL0 : TBits_1; inline;
  49710. begin
  49711. getURXISEL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  49712. end;
  49713. procedure TUART3B_U5STA.setURXISEL1; inline;
  49714. begin
  49715. pTDefRegMap(@Self)^.&set := $00000080;
  49716. end;
  49717. procedure TUART3B_U5STA.clearURXISEL1; inline;
  49718. begin
  49719. pTDefRegMap(@Self)^.clr := $00000080;
  49720. end;
  49721. procedure TUART3B_U5STA.setURXISEL1(thebits : TBits_1); inline;
  49722. begin
  49723. if thebits = 0 then
  49724. pTDefRegMap(@Self)^.clr := $00000080
  49725. else
  49726. pTDefRegMap(@Self)^.&set := $00000080;
  49727. end;
  49728. function TUART3B_U5STA.getURXISEL1 : TBits_1; inline;
  49729. begin
  49730. getURXISEL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  49731. end;
  49732. procedure TUART3B_U5STA.setUTXISEL0; inline;
  49733. begin
  49734. pTDefRegMap(@Self)^.&set := $00004000;
  49735. end;
  49736. procedure TUART3B_U5STA.clearUTXISEL0; inline;
  49737. begin
  49738. pTDefRegMap(@Self)^.clr := $00004000;
  49739. end;
  49740. procedure TUART3B_U5STA.setUTXISEL0(thebits : TBits_1); inline;
  49741. begin
  49742. if thebits = 0 then
  49743. pTDefRegMap(@Self)^.clr := $00004000
  49744. else
  49745. pTDefRegMap(@Self)^.&set := $00004000;
  49746. end;
  49747. function TUART3B_U5STA.getUTXISEL0 : TBits_1; inline;
  49748. begin
  49749. getUTXISEL0 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  49750. end;
  49751. procedure TUART3B_U5STA.setUTXISEL1; inline;
  49752. begin
  49753. pTDefRegMap(@Self)^.&set := $00008000;
  49754. end;
  49755. procedure TUART3B_U5STA.clearUTXISEL1; inline;
  49756. begin
  49757. pTDefRegMap(@Self)^.clr := $00008000;
  49758. end;
  49759. procedure TUART3B_U5STA.setUTXISEL1(thebits : TBits_1); inline;
  49760. begin
  49761. if thebits = 0 then
  49762. pTDefRegMap(@Self)^.clr := $00008000
  49763. else
  49764. pTDefRegMap(@Self)^.&set := $00008000;
  49765. end;
  49766. function TUART3B_U5STA.getUTXISEL1 : TBits_1; inline;
  49767. begin
  49768. getUTXISEL1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49769. end;
  49770. procedure TUART3B_U5STA.setUTXSEL(thebits : TBits_2); inline;
  49771. begin
  49772. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  49773. end;
  49774. function TUART3B_U5STA.getUTXSEL : TBits_2; inline;
  49775. begin
  49776. getUTXSEL := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  49777. end;
  49778. procedure TUART3B_U5STA.setw(thebits : TBits_32); inline;
  49779. begin
  49780. pTDefRegMap(@Self)^.val := thebits;
  49781. end;
  49782. function TUART3B_U5STA.getw : TBits_32; inline;
  49783. begin
  49784. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  49785. end;
  49786. procedure TPMP_PMCON.setRDSP; inline;
  49787. begin
  49788. pTDefRegMap(@Self)^.&set := $00000001;
  49789. end;
  49790. procedure TPMP_PMCON.clearRDSP; inline;
  49791. begin
  49792. pTDefRegMap(@Self)^.clr := $00000001;
  49793. end;
  49794. procedure TPMP_PMCON.setRDSP(thebits : TBits_1); inline;
  49795. begin
  49796. if thebits = 0 then
  49797. pTDefRegMap(@Self)^.clr := $00000001
  49798. else
  49799. pTDefRegMap(@Self)^.&set := $00000001;
  49800. end;
  49801. function TPMP_PMCON.getRDSP : TBits_1; inline;
  49802. begin
  49803. getRDSP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  49804. end;
  49805. procedure TPMP_PMCON.setWRSP; inline;
  49806. begin
  49807. pTDefRegMap(@Self)^.&set := $00000002;
  49808. end;
  49809. procedure TPMP_PMCON.clearWRSP; inline;
  49810. begin
  49811. pTDefRegMap(@Self)^.clr := $00000002;
  49812. end;
  49813. procedure TPMP_PMCON.setWRSP(thebits : TBits_1); inline;
  49814. begin
  49815. if thebits = 0 then
  49816. pTDefRegMap(@Self)^.clr := $00000002
  49817. else
  49818. pTDefRegMap(@Self)^.&set := $00000002;
  49819. end;
  49820. function TPMP_PMCON.getWRSP : TBits_1; inline;
  49821. begin
  49822. getWRSP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  49823. end;
  49824. procedure TPMP_PMCON.setCS1P; inline;
  49825. begin
  49826. pTDefRegMap(@Self)^.&set := $00000008;
  49827. end;
  49828. procedure TPMP_PMCON.clearCS1P; inline;
  49829. begin
  49830. pTDefRegMap(@Self)^.clr := $00000008;
  49831. end;
  49832. procedure TPMP_PMCON.setCS1P(thebits : TBits_1); inline;
  49833. begin
  49834. if thebits = 0 then
  49835. pTDefRegMap(@Self)^.clr := $00000008
  49836. else
  49837. pTDefRegMap(@Self)^.&set := $00000008;
  49838. end;
  49839. function TPMP_PMCON.getCS1P : TBits_1; inline;
  49840. begin
  49841. getCS1P := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  49842. end;
  49843. procedure TPMP_PMCON.setCS2P; inline;
  49844. begin
  49845. pTDefRegMap(@Self)^.&set := $00000010;
  49846. end;
  49847. procedure TPMP_PMCON.clearCS2P; inline;
  49848. begin
  49849. pTDefRegMap(@Self)^.clr := $00000010;
  49850. end;
  49851. procedure TPMP_PMCON.setCS2P(thebits : TBits_1); inline;
  49852. begin
  49853. if thebits = 0 then
  49854. pTDefRegMap(@Self)^.clr := $00000010
  49855. else
  49856. pTDefRegMap(@Self)^.&set := $00000010;
  49857. end;
  49858. function TPMP_PMCON.getCS2P : TBits_1; inline;
  49859. begin
  49860. getCS2P := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  49861. end;
  49862. procedure TPMP_PMCON.setALP; inline;
  49863. begin
  49864. pTDefRegMap(@Self)^.&set := $00000020;
  49865. end;
  49866. procedure TPMP_PMCON.clearALP; inline;
  49867. begin
  49868. pTDefRegMap(@Self)^.clr := $00000020;
  49869. end;
  49870. procedure TPMP_PMCON.setALP(thebits : TBits_1); inline;
  49871. begin
  49872. if thebits = 0 then
  49873. pTDefRegMap(@Self)^.clr := $00000020
  49874. else
  49875. pTDefRegMap(@Self)^.&set := $00000020;
  49876. end;
  49877. function TPMP_PMCON.getALP : TBits_1; inline;
  49878. begin
  49879. getALP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  49880. end;
  49881. procedure TPMP_PMCON.setCSF(thebits : TBits_2); inline;
  49882. begin
  49883. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  49884. end;
  49885. function TPMP_PMCON.getCSF : TBits_2; inline;
  49886. begin
  49887. getCSF := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  49888. end;
  49889. procedure TPMP_PMCON.setPTRDEN; inline;
  49890. begin
  49891. pTDefRegMap(@Self)^.&set := $00000100;
  49892. end;
  49893. procedure TPMP_PMCON.clearPTRDEN; inline;
  49894. begin
  49895. pTDefRegMap(@Self)^.clr := $00000100;
  49896. end;
  49897. procedure TPMP_PMCON.setPTRDEN(thebits : TBits_1); inline;
  49898. begin
  49899. if thebits = 0 then
  49900. pTDefRegMap(@Self)^.clr := $00000100
  49901. else
  49902. pTDefRegMap(@Self)^.&set := $00000100;
  49903. end;
  49904. function TPMP_PMCON.getPTRDEN : TBits_1; inline;
  49905. begin
  49906. getPTRDEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  49907. end;
  49908. procedure TPMP_PMCON.setPTWREN; inline;
  49909. begin
  49910. pTDefRegMap(@Self)^.&set := $00000200;
  49911. end;
  49912. procedure TPMP_PMCON.clearPTWREN; inline;
  49913. begin
  49914. pTDefRegMap(@Self)^.clr := $00000200;
  49915. end;
  49916. procedure TPMP_PMCON.setPTWREN(thebits : TBits_1); inline;
  49917. begin
  49918. if thebits = 0 then
  49919. pTDefRegMap(@Self)^.clr := $00000200
  49920. else
  49921. pTDefRegMap(@Self)^.&set := $00000200;
  49922. end;
  49923. function TPMP_PMCON.getPTWREN : TBits_1; inline;
  49924. begin
  49925. getPTWREN := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  49926. end;
  49927. procedure TPMP_PMCON.setPMPTTL; inline;
  49928. begin
  49929. pTDefRegMap(@Self)^.&set := $00000400;
  49930. end;
  49931. procedure TPMP_PMCON.clearPMPTTL; inline;
  49932. begin
  49933. pTDefRegMap(@Self)^.clr := $00000400;
  49934. end;
  49935. procedure TPMP_PMCON.setPMPTTL(thebits : TBits_1); inline;
  49936. begin
  49937. if thebits = 0 then
  49938. pTDefRegMap(@Self)^.clr := $00000400
  49939. else
  49940. pTDefRegMap(@Self)^.&set := $00000400;
  49941. end;
  49942. function TPMP_PMCON.getPMPTTL : TBits_1; inline;
  49943. begin
  49944. getPMPTTL := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  49945. end;
  49946. procedure TPMP_PMCON.setADRMUX(thebits : TBits_2); inline;
  49947. begin
  49948. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  49949. end;
  49950. function TPMP_PMCON.getADRMUX : TBits_2; inline;
  49951. begin
  49952. getADRMUX := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  49953. end;
  49954. procedure TPMP_PMCON.setSIDL; inline;
  49955. begin
  49956. pTDefRegMap(@Self)^.&set := $00002000;
  49957. end;
  49958. procedure TPMP_PMCON.clearSIDL; inline;
  49959. begin
  49960. pTDefRegMap(@Self)^.clr := $00002000;
  49961. end;
  49962. procedure TPMP_PMCON.setSIDL(thebits : TBits_1); inline;
  49963. begin
  49964. if thebits = 0 then
  49965. pTDefRegMap(@Self)^.clr := $00002000
  49966. else
  49967. pTDefRegMap(@Self)^.&set := $00002000;
  49968. end;
  49969. function TPMP_PMCON.getSIDL : TBits_1; inline;
  49970. begin
  49971. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  49972. end;
  49973. procedure TPMP_PMCON.setON; inline;
  49974. begin
  49975. pTDefRegMap(@Self)^.&set := $00008000;
  49976. end;
  49977. procedure TPMP_PMCON.clearON; inline;
  49978. begin
  49979. pTDefRegMap(@Self)^.clr := $00008000;
  49980. end;
  49981. procedure TPMP_PMCON.setON(thebits : TBits_1); inline;
  49982. begin
  49983. if thebits = 0 then
  49984. pTDefRegMap(@Self)^.clr := $00008000
  49985. else
  49986. pTDefRegMap(@Self)^.&set := $00008000;
  49987. end;
  49988. function TPMP_PMCON.getON : TBits_1; inline;
  49989. begin
  49990. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  49991. end;
  49992. procedure TPMP_PMCON.setCSF0; inline;
  49993. begin
  49994. pTDefRegMap(@Self)^.&set := $00000040;
  49995. end;
  49996. procedure TPMP_PMCON.clearCSF0; inline;
  49997. begin
  49998. pTDefRegMap(@Self)^.clr := $00000040;
  49999. end;
  50000. procedure TPMP_PMCON.setCSF0(thebits : TBits_1); inline;
  50001. begin
  50002. if thebits = 0 then
  50003. pTDefRegMap(@Self)^.clr := $00000040
  50004. else
  50005. pTDefRegMap(@Self)^.&set := $00000040;
  50006. end;
  50007. function TPMP_PMCON.getCSF0 : TBits_1; inline;
  50008. begin
  50009. getCSF0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50010. end;
  50011. procedure TPMP_PMCON.setCSF1; inline;
  50012. begin
  50013. pTDefRegMap(@Self)^.&set := $00000080;
  50014. end;
  50015. procedure TPMP_PMCON.clearCSF1; inline;
  50016. begin
  50017. pTDefRegMap(@Self)^.clr := $00000080;
  50018. end;
  50019. procedure TPMP_PMCON.setCSF1(thebits : TBits_1); inline;
  50020. begin
  50021. if thebits = 0 then
  50022. pTDefRegMap(@Self)^.clr := $00000080
  50023. else
  50024. pTDefRegMap(@Self)^.&set := $00000080;
  50025. end;
  50026. function TPMP_PMCON.getCSF1 : TBits_1; inline;
  50027. begin
  50028. getCSF1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50029. end;
  50030. procedure TPMP_PMCON.setADRMUX0; inline;
  50031. begin
  50032. pTDefRegMap(@Self)^.&set := $00000800;
  50033. end;
  50034. procedure TPMP_PMCON.clearADRMUX0; inline;
  50035. begin
  50036. pTDefRegMap(@Self)^.clr := $00000800;
  50037. end;
  50038. procedure TPMP_PMCON.setADRMUX0(thebits : TBits_1); inline;
  50039. begin
  50040. if thebits = 0 then
  50041. pTDefRegMap(@Self)^.clr := $00000800
  50042. else
  50043. pTDefRegMap(@Self)^.&set := $00000800;
  50044. end;
  50045. function TPMP_PMCON.getADRMUX0 : TBits_1; inline;
  50046. begin
  50047. getADRMUX0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50048. end;
  50049. procedure TPMP_PMCON.setADRMUX1; inline;
  50050. begin
  50051. pTDefRegMap(@Self)^.&set := $00001000;
  50052. end;
  50053. procedure TPMP_PMCON.clearADRMUX1; inline;
  50054. begin
  50055. pTDefRegMap(@Self)^.clr := $00001000;
  50056. end;
  50057. procedure TPMP_PMCON.setADRMUX1(thebits : TBits_1); inline;
  50058. begin
  50059. if thebits = 0 then
  50060. pTDefRegMap(@Self)^.clr := $00001000
  50061. else
  50062. pTDefRegMap(@Self)^.&set := $00001000;
  50063. end;
  50064. function TPMP_PMCON.getADRMUX1 : TBits_1; inline;
  50065. begin
  50066. getADRMUX1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  50067. end;
  50068. procedure TPMP_PMCON.setPSIDL; inline;
  50069. begin
  50070. pTDefRegMap(@Self)^.&set := $00002000;
  50071. end;
  50072. procedure TPMP_PMCON.clearPSIDL; inline;
  50073. begin
  50074. pTDefRegMap(@Self)^.clr := $00002000;
  50075. end;
  50076. procedure TPMP_PMCON.setPSIDL(thebits : TBits_1); inline;
  50077. begin
  50078. if thebits = 0 then
  50079. pTDefRegMap(@Self)^.clr := $00002000
  50080. else
  50081. pTDefRegMap(@Self)^.&set := $00002000;
  50082. end;
  50083. function TPMP_PMCON.getPSIDL : TBits_1; inline;
  50084. begin
  50085. getPSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50086. end;
  50087. procedure TPMP_PMCON.setPMPEN; inline;
  50088. begin
  50089. pTDefRegMap(@Self)^.&set := $00008000;
  50090. end;
  50091. procedure TPMP_PMCON.clearPMPEN; inline;
  50092. begin
  50093. pTDefRegMap(@Self)^.clr := $00008000;
  50094. end;
  50095. procedure TPMP_PMCON.setPMPEN(thebits : TBits_1); inline;
  50096. begin
  50097. if thebits = 0 then
  50098. pTDefRegMap(@Self)^.clr := $00008000
  50099. else
  50100. pTDefRegMap(@Self)^.&set := $00008000;
  50101. end;
  50102. function TPMP_PMCON.getPMPEN : TBits_1; inline;
  50103. begin
  50104. getPMPEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50105. end;
  50106. procedure TPMP_PMCON.setw(thebits : TBits_32); inline;
  50107. begin
  50108. pTDefRegMap(@Self)^.val := thebits;
  50109. end;
  50110. function TPMP_PMCON.getw : TBits_32; inline;
  50111. begin
  50112. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50113. end;
  50114. procedure TPMP_PMMODE.setWAITE(thebits : TBits_2); inline;
  50115. begin
  50116. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  50117. end;
  50118. function TPMP_PMMODE.getWAITE : TBits_2; inline;
  50119. begin
  50120. getWAITE := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  50121. end;
  50122. procedure TPMP_PMMODE.setWAITM(thebits : TBits_4); inline;
  50123. begin
  50124. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  50125. end;
  50126. function TPMP_PMMODE.getWAITM : TBits_4; inline;
  50127. begin
  50128. getWAITM := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  50129. end;
  50130. procedure TPMP_PMMODE.setWAITB(thebits : TBits_2); inline;
  50131. begin
  50132. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  50133. end;
  50134. function TPMP_PMMODE.getWAITB : TBits_2; inline;
  50135. begin
  50136. getWAITB := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  50137. end;
  50138. procedure TPMP_PMMODE.setMODE(thebits : TBits_2); inline;
  50139. begin
  50140. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  50141. end;
  50142. function TPMP_PMMODE.getMODE : TBits_2; inline;
  50143. begin
  50144. getMODE := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  50145. end;
  50146. procedure TPMP_PMMODE.setMODE16; inline;
  50147. begin
  50148. pTDefRegMap(@Self)^.&set := $00000400;
  50149. end;
  50150. procedure TPMP_PMMODE.clearMODE16; inline;
  50151. begin
  50152. pTDefRegMap(@Self)^.clr := $00000400;
  50153. end;
  50154. procedure TPMP_PMMODE.setMODE16(thebits : TBits_1); inline;
  50155. begin
  50156. if thebits = 0 then
  50157. pTDefRegMap(@Self)^.clr := $00000400
  50158. else
  50159. pTDefRegMap(@Self)^.&set := $00000400;
  50160. end;
  50161. function TPMP_PMMODE.getMODE16 : TBits_1; inline;
  50162. begin
  50163. getMODE16 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50164. end;
  50165. procedure TPMP_PMMODE.setINCM(thebits : TBits_2); inline;
  50166. begin
  50167. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE7FF or ( thebits shl 11 );
  50168. end;
  50169. function TPMP_PMMODE.getINCM : TBits_2; inline;
  50170. begin
  50171. getINCM := (pTDefRegMap(@Self)^.val and $00001800) shr 11;
  50172. end;
  50173. procedure TPMP_PMMODE.setIRQM(thebits : TBits_2); inline;
  50174. begin
  50175. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  50176. end;
  50177. function TPMP_PMMODE.getIRQM : TBits_2; inline;
  50178. begin
  50179. getIRQM := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  50180. end;
  50181. procedure TPMP_PMMODE.setBUSY; inline;
  50182. begin
  50183. pTDefRegMap(@Self)^.&set := $00008000;
  50184. end;
  50185. procedure TPMP_PMMODE.clearBUSY; inline;
  50186. begin
  50187. pTDefRegMap(@Self)^.clr := $00008000;
  50188. end;
  50189. procedure TPMP_PMMODE.setBUSY(thebits : TBits_1); inline;
  50190. begin
  50191. if thebits = 0 then
  50192. pTDefRegMap(@Self)^.clr := $00008000
  50193. else
  50194. pTDefRegMap(@Self)^.&set := $00008000;
  50195. end;
  50196. function TPMP_PMMODE.getBUSY : TBits_1; inline;
  50197. begin
  50198. getBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50199. end;
  50200. procedure TPMP_PMMODE.setWAITE0; inline;
  50201. begin
  50202. pTDefRegMap(@Self)^.&set := $00000001;
  50203. end;
  50204. procedure TPMP_PMMODE.clearWAITE0; inline;
  50205. begin
  50206. pTDefRegMap(@Self)^.clr := $00000001;
  50207. end;
  50208. procedure TPMP_PMMODE.setWAITE0(thebits : TBits_1); inline;
  50209. begin
  50210. if thebits = 0 then
  50211. pTDefRegMap(@Self)^.clr := $00000001
  50212. else
  50213. pTDefRegMap(@Self)^.&set := $00000001;
  50214. end;
  50215. function TPMP_PMMODE.getWAITE0 : TBits_1; inline;
  50216. begin
  50217. getWAITE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50218. end;
  50219. procedure TPMP_PMMODE.setWAITE1; inline;
  50220. begin
  50221. pTDefRegMap(@Self)^.&set := $00000002;
  50222. end;
  50223. procedure TPMP_PMMODE.clearWAITE1; inline;
  50224. begin
  50225. pTDefRegMap(@Self)^.clr := $00000002;
  50226. end;
  50227. procedure TPMP_PMMODE.setWAITE1(thebits : TBits_1); inline;
  50228. begin
  50229. if thebits = 0 then
  50230. pTDefRegMap(@Self)^.clr := $00000002
  50231. else
  50232. pTDefRegMap(@Self)^.&set := $00000002;
  50233. end;
  50234. function TPMP_PMMODE.getWAITE1 : TBits_1; inline;
  50235. begin
  50236. getWAITE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50237. end;
  50238. procedure TPMP_PMMODE.setWAITM0; inline;
  50239. begin
  50240. pTDefRegMap(@Self)^.&set := $00000004;
  50241. end;
  50242. procedure TPMP_PMMODE.clearWAITM0; inline;
  50243. begin
  50244. pTDefRegMap(@Self)^.clr := $00000004;
  50245. end;
  50246. procedure TPMP_PMMODE.setWAITM0(thebits : TBits_1); inline;
  50247. begin
  50248. if thebits = 0 then
  50249. pTDefRegMap(@Self)^.clr := $00000004
  50250. else
  50251. pTDefRegMap(@Self)^.&set := $00000004;
  50252. end;
  50253. function TPMP_PMMODE.getWAITM0 : TBits_1; inline;
  50254. begin
  50255. getWAITM0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50256. end;
  50257. procedure TPMP_PMMODE.setWAITM1; inline;
  50258. begin
  50259. pTDefRegMap(@Self)^.&set := $00000008;
  50260. end;
  50261. procedure TPMP_PMMODE.clearWAITM1; inline;
  50262. begin
  50263. pTDefRegMap(@Self)^.clr := $00000008;
  50264. end;
  50265. procedure TPMP_PMMODE.setWAITM1(thebits : TBits_1); inline;
  50266. begin
  50267. if thebits = 0 then
  50268. pTDefRegMap(@Self)^.clr := $00000008
  50269. else
  50270. pTDefRegMap(@Self)^.&set := $00000008;
  50271. end;
  50272. function TPMP_PMMODE.getWAITM1 : TBits_1; inline;
  50273. begin
  50274. getWAITM1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50275. end;
  50276. procedure TPMP_PMMODE.setWAITM2; inline;
  50277. begin
  50278. pTDefRegMap(@Self)^.&set := $00000010;
  50279. end;
  50280. procedure TPMP_PMMODE.clearWAITM2; inline;
  50281. begin
  50282. pTDefRegMap(@Self)^.clr := $00000010;
  50283. end;
  50284. procedure TPMP_PMMODE.setWAITM2(thebits : TBits_1); inline;
  50285. begin
  50286. if thebits = 0 then
  50287. pTDefRegMap(@Self)^.clr := $00000010
  50288. else
  50289. pTDefRegMap(@Self)^.&set := $00000010;
  50290. end;
  50291. function TPMP_PMMODE.getWAITM2 : TBits_1; inline;
  50292. begin
  50293. getWAITM2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50294. end;
  50295. procedure TPMP_PMMODE.setWAITM3; inline;
  50296. begin
  50297. pTDefRegMap(@Self)^.&set := $00000020;
  50298. end;
  50299. procedure TPMP_PMMODE.clearWAITM3; inline;
  50300. begin
  50301. pTDefRegMap(@Self)^.clr := $00000020;
  50302. end;
  50303. procedure TPMP_PMMODE.setWAITM3(thebits : TBits_1); inline;
  50304. begin
  50305. if thebits = 0 then
  50306. pTDefRegMap(@Self)^.clr := $00000020
  50307. else
  50308. pTDefRegMap(@Self)^.&set := $00000020;
  50309. end;
  50310. function TPMP_PMMODE.getWAITM3 : TBits_1; inline;
  50311. begin
  50312. getWAITM3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50313. end;
  50314. procedure TPMP_PMMODE.setWAITB0; inline;
  50315. begin
  50316. pTDefRegMap(@Self)^.&set := $00000040;
  50317. end;
  50318. procedure TPMP_PMMODE.clearWAITB0; inline;
  50319. begin
  50320. pTDefRegMap(@Self)^.clr := $00000040;
  50321. end;
  50322. procedure TPMP_PMMODE.setWAITB0(thebits : TBits_1); inline;
  50323. begin
  50324. if thebits = 0 then
  50325. pTDefRegMap(@Self)^.clr := $00000040
  50326. else
  50327. pTDefRegMap(@Self)^.&set := $00000040;
  50328. end;
  50329. function TPMP_PMMODE.getWAITB0 : TBits_1; inline;
  50330. begin
  50331. getWAITB0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50332. end;
  50333. procedure TPMP_PMMODE.setWAITB1; inline;
  50334. begin
  50335. pTDefRegMap(@Self)^.&set := $00000080;
  50336. end;
  50337. procedure TPMP_PMMODE.clearWAITB1; inline;
  50338. begin
  50339. pTDefRegMap(@Self)^.clr := $00000080;
  50340. end;
  50341. procedure TPMP_PMMODE.setWAITB1(thebits : TBits_1); inline;
  50342. begin
  50343. if thebits = 0 then
  50344. pTDefRegMap(@Self)^.clr := $00000080
  50345. else
  50346. pTDefRegMap(@Self)^.&set := $00000080;
  50347. end;
  50348. function TPMP_PMMODE.getWAITB1 : TBits_1; inline;
  50349. begin
  50350. getWAITB1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50351. end;
  50352. procedure TPMP_PMMODE.setMODE0; inline;
  50353. begin
  50354. pTDefRegMap(@Self)^.&set := $00000100;
  50355. end;
  50356. procedure TPMP_PMMODE.clearMODE0; inline;
  50357. begin
  50358. pTDefRegMap(@Self)^.clr := $00000100;
  50359. end;
  50360. procedure TPMP_PMMODE.setMODE0(thebits : TBits_1); inline;
  50361. begin
  50362. if thebits = 0 then
  50363. pTDefRegMap(@Self)^.clr := $00000100
  50364. else
  50365. pTDefRegMap(@Self)^.&set := $00000100;
  50366. end;
  50367. function TPMP_PMMODE.getMODE0 : TBits_1; inline;
  50368. begin
  50369. getMODE0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50370. end;
  50371. procedure TPMP_PMMODE.setMODE1; inline;
  50372. begin
  50373. pTDefRegMap(@Self)^.&set := $00000200;
  50374. end;
  50375. procedure TPMP_PMMODE.clearMODE1; inline;
  50376. begin
  50377. pTDefRegMap(@Self)^.clr := $00000200;
  50378. end;
  50379. procedure TPMP_PMMODE.setMODE1(thebits : TBits_1); inline;
  50380. begin
  50381. if thebits = 0 then
  50382. pTDefRegMap(@Self)^.clr := $00000200
  50383. else
  50384. pTDefRegMap(@Self)^.&set := $00000200;
  50385. end;
  50386. function TPMP_PMMODE.getMODE1 : TBits_1; inline;
  50387. begin
  50388. getMODE1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50389. end;
  50390. procedure TPMP_PMMODE.setINCM0; inline;
  50391. begin
  50392. pTDefRegMap(@Self)^.&set := $00000800;
  50393. end;
  50394. procedure TPMP_PMMODE.clearINCM0; inline;
  50395. begin
  50396. pTDefRegMap(@Self)^.clr := $00000800;
  50397. end;
  50398. procedure TPMP_PMMODE.setINCM0(thebits : TBits_1); inline;
  50399. begin
  50400. if thebits = 0 then
  50401. pTDefRegMap(@Self)^.clr := $00000800
  50402. else
  50403. pTDefRegMap(@Self)^.&set := $00000800;
  50404. end;
  50405. function TPMP_PMMODE.getINCM0 : TBits_1; inline;
  50406. begin
  50407. getINCM0 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50408. end;
  50409. procedure TPMP_PMMODE.setINCM1; inline;
  50410. begin
  50411. pTDefRegMap(@Self)^.&set := $00001000;
  50412. end;
  50413. procedure TPMP_PMMODE.clearINCM1; inline;
  50414. begin
  50415. pTDefRegMap(@Self)^.clr := $00001000;
  50416. end;
  50417. procedure TPMP_PMMODE.setINCM1(thebits : TBits_1); inline;
  50418. begin
  50419. if thebits = 0 then
  50420. pTDefRegMap(@Self)^.clr := $00001000
  50421. else
  50422. pTDefRegMap(@Self)^.&set := $00001000;
  50423. end;
  50424. function TPMP_PMMODE.getINCM1 : TBits_1; inline;
  50425. begin
  50426. getINCM1 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  50427. end;
  50428. procedure TPMP_PMMODE.setIRQM0; inline;
  50429. begin
  50430. pTDefRegMap(@Self)^.&set := $00002000;
  50431. end;
  50432. procedure TPMP_PMMODE.clearIRQM0; inline;
  50433. begin
  50434. pTDefRegMap(@Self)^.clr := $00002000;
  50435. end;
  50436. procedure TPMP_PMMODE.setIRQM0(thebits : TBits_1); inline;
  50437. begin
  50438. if thebits = 0 then
  50439. pTDefRegMap(@Self)^.clr := $00002000
  50440. else
  50441. pTDefRegMap(@Self)^.&set := $00002000;
  50442. end;
  50443. function TPMP_PMMODE.getIRQM0 : TBits_1; inline;
  50444. begin
  50445. getIRQM0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50446. end;
  50447. procedure TPMP_PMMODE.setIRQM1; inline;
  50448. begin
  50449. pTDefRegMap(@Self)^.&set := $00004000;
  50450. end;
  50451. procedure TPMP_PMMODE.clearIRQM1; inline;
  50452. begin
  50453. pTDefRegMap(@Self)^.clr := $00004000;
  50454. end;
  50455. procedure TPMP_PMMODE.setIRQM1(thebits : TBits_1); inline;
  50456. begin
  50457. if thebits = 0 then
  50458. pTDefRegMap(@Self)^.clr := $00004000
  50459. else
  50460. pTDefRegMap(@Self)^.&set := $00004000;
  50461. end;
  50462. function TPMP_PMMODE.getIRQM1 : TBits_1; inline;
  50463. begin
  50464. getIRQM1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  50465. end;
  50466. procedure TPMP_PMMODE.setw(thebits : TBits_32); inline;
  50467. begin
  50468. pTDefRegMap(@Self)^.val := thebits;
  50469. end;
  50470. function TPMP_PMMODE.getw : TBits_32; inline;
  50471. begin
  50472. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50473. end;
  50474. procedure TPMP_PMADDR.setADDR(thebits : TBits_14); inline;
  50475. begin
  50476. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  50477. end;
  50478. function TPMP_PMADDR.getADDR : TBits_14; inline;
  50479. begin
  50480. getADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  50481. end;
  50482. procedure TPMP_PMADDR.setCS(thebits : TBits_2); inline;
  50483. begin
  50484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  50485. end;
  50486. function TPMP_PMADDR.getCS : TBits_2; inline;
  50487. begin
  50488. getCS := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  50489. end;
  50490. procedure TPMP_PMADDR.setPADDR(thebits : TBits_14); inline;
  50491. begin
  50492. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC000 or ( thebits shl 0 );
  50493. end;
  50494. function TPMP_PMADDR.getPADDR : TBits_14; inline;
  50495. begin
  50496. getPADDR := (pTDefRegMap(@Self)^.val and $00003FFF) shr 0;
  50497. end;
  50498. procedure TPMP_PMADDR.setCS1; inline;
  50499. begin
  50500. pTDefRegMap(@Self)^.&set := $00004000;
  50501. end;
  50502. procedure TPMP_PMADDR.clearCS1; inline;
  50503. begin
  50504. pTDefRegMap(@Self)^.clr := $00004000;
  50505. end;
  50506. procedure TPMP_PMADDR.setCS1(thebits : TBits_1); inline;
  50507. begin
  50508. if thebits = 0 then
  50509. pTDefRegMap(@Self)^.clr := $00004000
  50510. else
  50511. pTDefRegMap(@Self)^.&set := $00004000;
  50512. end;
  50513. function TPMP_PMADDR.getCS1 : TBits_1; inline;
  50514. begin
  50515. getCS1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  50516. end;
  50517. procedure TPMP_PMADDR.setCS2; inline;
  50518. begin
  50519. pTDefRegMap(@Self)^.&set := $00008000;
  50520. end;
  50521. procedure TPMP_PMADDR.clearCS2; inline;
  50522. begin
  50523. pTDefRegMap(@Self)^.clr := $00008000;
  50524. end;
  50525. procedure TPMP_PMADDR.setCS2(thebits : TBits_1); inline;
  50526. begin
  50527. if thebits = 0 then
  50528. pTDefRegMap(@Self)^.clr := $00008000
  50529. else
  50530. pTDefRegMap(@Self)^.&set := $00008000;
  50531. end;
  50532. function TPMP_PMADDR.getCS2 : TBits_1; inline;
  50533. begin
  50534. getCS2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50535. end;
  50536. procedure TPMP_PMADDR.setw(thebits : TBits_32); inline;
  50537. begin
  50538. pTDefRegMap(@Self)^.val := thebits;
  50539. end;
  50540. function TPMP_PMADDR.getw : TBits_32; inline;
  50541. begin
  50542. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50543. end;
  50544. procedure TPMP_PMDOUT.setDATAOUT(thebits : TBits_32); inline;
  50545. begin
  50546. pTDefRegMap(@Self)^.val := thebits;
  50547. end;
  50548. function TPMP_PMDOUT.getDATAOUT : TBits_32; inline;
  50549. begin
  50550. getDATAOUT := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50551. end;
  50552. procedure TPMP_PMDOUT.setw(thebits : TBits_32); inline;
  50553. begin
  50554. pTDefRegMap(@Self)^.val := thebits;
  50555. end;
  50556. function TPMP_PMDOUT.getw : TBits_32; inline;
  50557. begin
  50558. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50559. end;
  50560. procedure TPMP_PMDIN.setDATAIN(thebits : TBits_32); inline;
  50561. begin
  50562. pTDefRegMap(@Self)^.val := thebits;
  50563. end;
  50564. function TPMP_PMDIN.getDATAIN : TBits_32; inline;
  50565. begin
  50566. getDATAIN := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50567. end;
  50568. procedure TPMP_PMDIN.setw(thebits : TBits_32); inline;
  50569. begin
  50570. pTDefRegMap(@Self)^.val := thebits;
  50571. end;
  50572. function TPMP_PMDIN.getw : TBits_32; inline;
  50573. begin
  50574. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50575. end;
  50576. procedure TPMP_PMAEN.setPTEN(thebits : TBits_16); inline;
  50577. begin
  50578. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  50579. end;
  50580. function TPMP_PMAEN.getPTEN : TBits_16; inline;
  50581. begin
  50582. getPTEN := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  50583. end;
  50584. procedure TPMP_PMAEN.setPTEN0; inline;
  50585. begin
  50586. pTDefRegMap(@Self)^.&set := $00000001;
  50587. end;
  50588. procedure TPMP_PMAEN.clearPTEN0; inline;
  50589. begin
  50590. pTDefRegMap(@Self)^.clr := $00000001;
  50591. end;
  50592. procedure TPMP_PMAEN.setPTEN0(thebits : TBits_1); inline;
  50593. begin
  50594. if thebits = 0 then
  50595. pTDefRegMap(@Self)^.clr := $00000001
  50596. else
  50597. pTDefRegMap(@Self)^.&set := $00000001;
  50598. end;
  50599. function TPMP_PMAEN.getPTEN0 : TBits_1; inline;
  50600. begin
  50601. getPTEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50602. end;
  50603. procedure TPMP_PMAEN.setPTEN1; inline;
  50604. begin
  50605. pTDefRegMap(@Self)^.&set := $00000002;
  50606. end;
  50607. procedure TPMP_PMAEN.clearPTEN1; inline;
  50608. begin
  50609. pTDefRegMap(@Self)^.clr := $00000002;
  50610. end;
  50611. procedure TPMP_PMAEN.setPTEN1(thebits : TBits_1); inline;
  50612. begin
  50613. if thebits = 0 then
  50614. pTDefRegMap(@Self)^.clr := $00000002
  50615. else
  50616. pTDefRegMap(@Self)^.&set := $00000002;
  50617. end;
  50618. function TPMP_PMAEN.getPTEN1 : TBits_1; inline;
  50619. begin
  50620. getPTEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50621. end;
  50622. procedure TPMP_PMAEN.setPTEN2; inline;
  50623. begin
  50624. pTDefRegMap(@Self)^.&set := $00000004;
  50625. end;
  50626. procedure TPMP_PMAEN.clearPTEN2; inline;
  50627. begin
  50628. pTDefRegMap(@Self)^.clr := $00000004;
  50629. end;
  50630. procedure TPMP_PMAEN.setPTEN2(thebits : TBits_1); inline;
  50631. begin
  50632. if thebits = 0 then
  50633. pTDefRegMap(@Self)^.clr := $00000004
  50634. else
  50635. pTDefRegMap(@Self)^.&set := $00000004;
  50636. end;
  50637. function TPMP_PMAEN.getPTEN2 : TBits_1; inline;
  50638. begin
  50639. getPTEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50640. end;
  50641. procedure TPMP_PMAEN.setPTEN3; inline;
  50642. begin
  50643. pTDefRegMap(@Self)^.&set := $00000008;
  50644. end;
  50645. procedure TPMP_PMAEN.clearPTEN3; inline;
  50646. begin
  50647. pTDefRegMap(@Self)^.clr := $00000008;
  50648. end;
  50649. procedure TPMP_PMAEN.setPTEN3(thebits : TBits_1); inline;
  50650. begin
  50651. if thebits = 0 then
  50652. pTDefRegMap(@Self)^.clr := $00000008
  50653. else
  50654. pTDefRegMap(@Self)^.&set := $00000008;
  50655. end;
  50656. function TPMP_PMAEN.getPTEN3 : TBits_1; inline;
  50657. begin
  50658. getPTEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50659. end;
  50660. procedure TPMP_PMAEN.setPTEN4; inline;
  50661. begin
  50662. pTDefRegMap(@Self)^.&set := $00000010;
  50663. end;
  50664. procedure TPMP_PMAEN.clearPTEN4; inline;
  50665. begin
  50666. pTDefRegMap(@Self)^.clr := $00000010;
  50667. end;
  50668. procedure TPMP_PMAEN.setPTEN4(thebits : TBits_1); inline;
  50669. begin
  50670. if thebits = 0 then
  50671. pTDefRegMap(@Self)^.clr := $00000010
  50672. else
  50673. pTDefRegMap(@Self)^.&set := $00000010;
  50674. end;
  50675. function TPMP_PMAEN.getPTEN4 : TBits_1; inline;
  50676. begin
  50677. getPTEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  50678. end;
  50679. procedure TPMP_PMAEN.setPTEN5; inline;
  50680. begin
  50681. pTDefRegMap(@Self)^.&set := $00000020;
  50682. end;
  50683. procedure TPMP_PMAEN.clearPTEN5; inline;
  50684. begin
  50685. pTDefRegMap(@Self)^.clr := $00000020;
  50686. end;
  50687. procedure TPMP_PMAEN.setPTEN5(thebits : TBits_1); inline;
  50688. begin
  50689. if thebits = 0 then
  50690. pTDefRegMap(@Self)^.clr := $00000020
  50691. else
  50692. pTDefRegMap(@Self)^.&set := $00000020;
  50693. end;
  50694. function TPMP_PMAEN.getPTEN5 : TBits_1; inline;
  50695. begin
  50696. getPTEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  50697. end;
  50698. procedure TPMP_PMAEN.setPTEN6; inline;
  50699. begin
  50700. pTDefRegMap(@Self)^.&set := $00000040;
  50701. end;
  50702. procedure TPMP_PMAEN.clearPTEN6; inline;
  50703. begin
  50704. pTDefRegMap(@Self)^.clr := $00000040;
  50705. end;
  50706. procedure TPMP_PMAEN.setPTEN6(thebits : TBits_1); inline;
  50707. begin
  50708. if thebits = 0 then
  50709. pTDefRegMap(@Self)^.clr := $00000040
  50710. else
  50711. pTDefRegMap(@Self)^.&set := $00000040;
  50712. end;
  50713. function TPMP_PMAEN.getPTEN6 : TBits_1; inline;
  50714. begin
  50715. getPTEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50716. end;
  50717. procedure TPMP_PMAEN.setPTEN7; inline;
  50718. begin
  50719. pTDefRegMap(@Self)^.&set := $00000080;
  50720. end;
  50721. procedure TPMP_PMAEN.clearPTEN7; inline;
  50722. begin
  50723. pTDefRegMap(@Self)^.clr := $00000080;
  50724. end;
  50725. procedure TPMP_PMAEN.setPTEN7(thebits : TBits_1); inline;
  50726. begin
  50727. if thebits = 0 then
  50728. pTDefRegMap(@Self)^.clr := $00000080
  50729. else
  50730. pTDefRegMap(@Self)^.&set := $00000080;
  50731. end;
  50732. function TPMP_PMAEN.getPTEN7 : TBits_1; inline;
  50733. begin
  50734. getPTEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  50735. end;
  50736. procedure TPMP_PMAEN.setPTEN8; inline;
  50737. begin
  50738. pTDefRegMap(@Self)^.&set := $00000100;
  50739. end;
  50740. procedure TPMP_PMAEN.clearPTEN8; inline;
  50741. begin
  50742. pTDefRegMap(@Self)^.clr := $00000100;
  50743. end;
  50744. procedure TPMP_PMAEN.setPTEN8(thebits : TBits_1); inline;
  50745. begin
  50746. if thebits = 0 then
  50747. pTDefRegMap(@Self)^.clr := $00000100
  50748. else
  50749. pTDefRegMap(@Self)^.&set := $00000100;
  50750. end;
  50751. function TPMP_PMAEN.getPTEN8 : TBits_1; inline;
  50752. begin
  50753. getPTEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  50754. end;
  50755. procedure TPMP_PMAEN.setPTEN9; inline;
  50756. begin
  50757. pTDefRegMap(@Self)^.&set := $00000200;
  50758. end;
  50759. procedure TPMP_PMAEN.clearPTEN9; inline;
  50760. begin
  50761. pTDefRegMap(@Self)^.clr := $00000200;
  50762. end;
  50763. procedure TPMP_PMAEN.setPTEN9(thebits : TBits_1); inline;
  50764. begin
  50765. if thebits = 0 then
  50766. pTDefRegMap(@Self)^.clr := $00000200
  50767. else
  50768. pTDefRegMap(@Self)^.&set := $00000200;
  50769. end;
  50770. function TPMP_PMAEN.getPTEN9 : TBits_1; inline;
  50771. begin
  50772. getPTEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  50773. end;
  50774. procedure TPMP_PMAEN.setPTEN10; inline;
  50775. begin
  50776. pTDefRegMap(@Self)^.&set := $00000400;
  50777. end;
  50778. procedure TPMP_PMAEN.clearPTEN10; inline;
  50779. begin
  50780. pTDefRegMap(@Self)^.clr := $00000400;
  50781. end;
  50782. procedure TPMP_PMAEN.setPTEN10(thebits : TBits_1); inline;
  50783. begin
  50784. if thebits = 0 then
  50785. pTDefRegMap(@Self)^.clr := $00000400
  50786. else
  50787. pTDefRegMap(@Self)^.&set := $00000400;
  50788. end;
  50789. function TPMP_PMAEN.getPTEN10 : TBits_1; inline;
  50790. begin
  50791. getPTEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  50792. end;
  50793. procedure TPMP_PMAEN.setPTEN11; inline;
  50794. begin
  50795. pTDefRegMap(@Self)^.&set := $00000800;
  50796. end;
  50797. procedure TPMP_PMAEN.clearPTEN11; inline;
  50798. begin
  50799. pTDefRegMap(@Self)^.clr := $00000800;
  50800. end;
  50801. procedure TPMP_PMAEN.setPTEN11(thebits : TBits_1); inline;
  50802. begin
  50803. if thebits = 0 then
  50804. pTDefRegMap(@Self)^.clr := $00000800
  50805. else
  50806. pTDefRegMap(@Self)^.&set := $00000800;
  50807. end;
  50808. function TPMP_PMAEN.getPTEN11 : TBits_1; inline;
  50809. begin
  50810. getPTEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  50811. end;
  50812. procedure TPMP_PMAEN.setPTEN12; inline;
  50813. begin
  50814. pTDefRegMap(@Self)^.&set := $00001000;
  50815. end;
  50816. procedure TPMP_PMAEN.clearPTEN12; inline;
  50817. begin
  50818. pTDefRegMap(@Self)^.clr := $00001000;
  50819. end;
  50820. procedure TPMP_PMAEN.setPTEN12(thebits : TBits_1); inline;
  50821. begin
  50822. if thebits = 0 then
  50823. pTDefRegMap(@Self)^.clr := $00001000
  50824. else
  50825. pTDefRegMap(@Self)^.&set := $00001000;
  50826. end;
  50827. function TPMP_PMAEN.getPTEN12 : TBits_1; inline;
  50828. begin
  50829. getPTEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  50830. end;
  50831. procedure TPMP_PMAEN.setPTEN13; inline;
  50832. begin
  50833. pTDefRegMap(@Self)^.&set := $00002000;
  50834. end;
  50835. procedure TPMP_PMAEN.clearPTEN13; inline;
  50836. begin
  50837. pTDefRegMap(@Self)^.clr := $00002000;
  50838. end;
  50839. procedure TPMP_PMAEN.setPTEN13(thebits : TBits_1); inline;
  50840. begin
  50841. if thebits = 0 then
  50842. pTDefRegMap(@Self)^.clr := $00002000
  50843. else
  50844. pTDefRegMap(@Self)^.&set := $00002000;
  50845. end;
  50846. function TPMP_PMAEN.getPTEN13 : TBits_1; inline;
  50847. begin
  50848. getPTEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  50849. end;
  50850. procedure TPMP_PMAEN.setPTEN14; inline;
  50851. begin
  50852. pTDefRegMap(@Self)^.&set := $00004000;
  50853. end;
  50854. procedure TPMP_PMAEN.clearPTEN14; inline;
  50855. begin
  50856. pTDefRegMap(@Self)^.clr := $00004000;
  50857. end;
  50858. procedure TPMP_PMAEN.setPTEN14(thebits : TBits_1); inline;
  50859. begin
  50860. if thebits = 0 then
  50861. pTDefRegMap(@Self)^.clr := $00004000
  50862. else
  50863. pTDefRegMap(@Self)^.&set := $00004000;
  50864. end;
  50865. function TPMP_PMAEN.getPTEN14 : TBits_1; inline;
  50866. begin
  50867. getPTEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  50868. end;
  50869. procedure TPMP_PMAEN.setPTEN15; inline;
  50870. begin
  50871. pTDefRegMap(@Self)^.&set := $00008000;
  50872. end;
  50873. procedure TPMP_PMAEN.clearPTEN15; inline;
  50874. begin
  50875. pTDefRegMap(@Self)^.clr := $00008000;
  50876. end;
  50877. procedure TPMP_PMAEN.setPTEN15(thebits : TBits_1); inline;
  50878. begin
  50879. if thebits = 0 then
  50880. pTDefRegMap(@Self)^.clr := $00008000
  50881. else
  50882. pTDefRegMap(@Self)^.&set := $00008000;
  50883. end;
  50884. function TPMP_PMAEN.getPTEN15 : TBits_1; inline;
  50885. begin
  50886. getPTEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  50887. end;
  50888. procedure TPMP_PMAEN.setw(thebits : TBits_32); inline;
  50889. begin
  50890. pTDefRegMap(@Self)^.val := thebits;
  50891. end;
  50892. function TPMP_PMAEN.getw : TBits_32; inline;
  50893. begin
  50894. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  50895. end;
  50896. procedure TPMP_PMSTAT.setOB0E; inline;
  50897. begin
  50898. pTDefRegMap(@Self)^.&set := $00000001;
  50899. end;
  50900. procedure TPMP_PMSTAT.clearOB0E; inline;
  50901. begin
  50902. pTDefRegMap(@Self)^.clr := $00000001;
  50903. end;
  50904. procedure TPMP_PMSTAT.setOB0E(thebits : TBits_1); inline;
  50905. begin
  50906. if thebits = 0 then
  50907. pTDefRegMap(@Self)^.clr := $00000001
  50908. else
  50909. pTDefRegMap(@Self)^.&set := $00000001;
  50910. end;
  50911. function TPMP_PMSTAT.getOB0E : TBits_1; inline;
  50912. begin
  50913. getOB0E := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  50914. end;
  50915. procedure TPMP_PMSTAT.setOB1E; inline;
  50916. begin
  50917. pTDefRegMap(@Self)^.&set := $00000002;
  50918. end;
  50919. procedure TPMP_PMSTAT.clearOB1E; inline;
  50920. begin
  50921. pTDefRegMap(@Self)^.clr := $00000002;
  50922. end;
  50923. procedure TPMP_PMSTAT.setOB1E(thebits : TBits_1); inline;
  50924. begin
  50925. if thebits = 0 then
  50926. pTDefRegMap(@Self)^.clr := $00000002
  50927. else
  50928. pTDefRegMap(@Self)^.&set := $00000002;
  50929. end;
  50930. function TPMP_PMSTAT.getOB1E : TBits_1; inline;
  50931. begin
  50932. getOB1E := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  50933. end;
  50934. procedure TPMP_PMSTAT.setOB2E; inline;
  50935. begin
  50936. pTDefRegMap(@Self)^.&set := $00000004;
  50937. end;
  50938. procedure TPMP_PMSTAT.clearOB2E; inline;
  50939. begin
  50940. pTDefRegMap(@Self)^.clr := $00000004;
  50941. end;
  50942. procedure TPMP_PMSTAT.setOB2E(thebits : TBits_1); inline;
  50943. begin
  50944. if thebits = 0 then
  50945. pTDefRegMap(@Self)^.clr := $00000004
  50946. else
  50947. pTDefRegMap(@Self)^.&set := $00000004;
  50948. end;
  50949. function TPMP_PMSTAT.getOB2E : TBits_1; inline;
  50950. begin
  50951. getOB2E := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  50952. end;
  50953. procedure TPMP_PMSTAT.setOB3E; inline;
  50954. begin
  50955. pTDefRegMap(@Self)^.&set := $00000008;
  50956. end;
  50957. procedure TPMP_PMSTAT.clearOB3E; inline;
  50958. begin
  50959. pTDefRegMap(@Self)^.clr := $00000008;
  50960. end;
  50961. procedure TPMP_PMSTAT.setOB3E(thebits : TBits_1); inline;
  50962. begin
  50963. if thebits = 0 then
  50964. pTDefRegMap(@Self)^.clr := $00000008
  50965. else
  50966. pTDefRegMap(@Self)^.&set := $00000008;
  50967. end;
  50968. function TPMP_PMSTAT.getOB3E : TBits_1; inline;
  50969. begin
  50970. getOB3E := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  50971. end;
  50972. procedure TPMP_PMSTAT.setOBUF; inline;
  50973. begin
  50974. pTDefRegMap(@Self)^.&set := $00000040;
  50975. end;
  50976. procedure TPMP_PMSTAT.clearOBUF; inline;
  50977. begin
  50978. pTDefRegMap(@Self)^.clr := $00000040;
  50979. end;
  50980. procedure TPMP_PMSTAT.setOBUF(thebits : TBits_1); inline;
  50981. begin
  50982. if thebits = 0 then
  50983. pTDefRegMap(@Self)^.clr := $00000040
  50984. else
  50985. pTDefRegMap(@Self)^.&set := $00000040;
  50986. end;
  50987. function TPMP_PMSTAT.getOBUF : TBits_1; inline;
  50988. begin
  50989. getOBUF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  50990. end;
  50991. procedure TPMP_PMSTAT.setOBE; inline;
  50992. begin
  50993. pTDefRegMap(@Self)^.&set := $00000080;
  50994. end;
  50995. procedure TPMP_PMSTAT.clearOBE; inline;
  50996. begin
  50997. pTDefRegMap(@Self)^.clr := $00000080;
  50998. end;
  50999. procedure TPMP_PMSTAT.setOBE(thebits : TBits_1); inline;
  51000. begin
  51001. if thebits = 0 then
  51002. pTDefRegMap(@Self)^.clr := $00000080
  51003. else
  51004. pTDefRegMap(@Self)^.&set := $00000080;
  51005. end;
  51006. function TPMP_PMSTAT.getOBE : TBits_1; inline;
  51007. begin
  51008. getOBE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51009. end;
  51010. procedure TPMP_PMSTAT.setIB0F; inline;
  51011. begin
  51012. pTDefRegMap(@Self)^.&set := $00000100;
  51013. end;
  51014. procedure TPMP_PMSTAT.clearIB0F; inline;
  51015. begin
  51016. pTDefRegMap(@Self)^.clr := $00000100;
  51017. end;
  51018. procedure TPMP_PMSTAT.setIB0F(thebits : TBits_1); inline;
  51019. begin
  51020. if thebits = 0 then
  51021. pTDefRegMap(@Self)^.clr := $00000100
  51022. else
  51023. pTDefRegMap(@Self)^.&set := $00000100;
  51024. end;
  51025. function TPMP_PMSTAT.getIB0F : TBits_1; inline;
  51026. begin
  51027. getIB0F := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51028. end;
  51029. procedure TPMP_PMSTAT.setIB1F; inline;
  51030. begin
  51031. pTDefRegMap(@Self)^.&set := $00000200;
  51032. end;
  51033. procedure TPMP_PMSTAT.clearIB1F; inline;
  51034. begin
  51035. pTDefRegMap(@Self)^.clr := $00000200;
  51036. end;
  51037. procedure TPMP_PMSTAT.setIB1F(thebits : TBits_1); inline;
  51038. begin
  51039. if thebits = 0 then
  51040. pTDefRegMap(@Self)^.clr := $00000200
  51041. else
  51042. pTDefRegMap(@Self)^.&set := $00000200;
  51043. end;
  51044. function TPMP_PMSTAT.getIB1F : TBits_1; inline;
  51045. begin
  51046. getIB1F := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  51047. end;
  51048. procedure TPMP_PMSTAT.setIB2F; inline;
  51049. begin
  51050. pTDefRegMap(@Self)^.&set := $00000400;
  51051. end;
  51052. procedure TPMP_PMSTAT.clearIB2F; inline;
  51053. begin
  51054. pTDefRegMap(@Self)^.clr := $00000400;
  51055. end;
  51056. procedure TPMP_PMSTAT.setIB2F(thebits : TBits_1); inline;
  51057. begin
  51058. if thebits = 0 then
  51059. pTDefRegMap(@Self)^.clr := $00000400
  51060. else
  51061. pTDefRegMap(@Self)^.&set := $00000400;
  51062. end;
  51063. function TPMP_PMSTAT.getIB2F : TBits_1; inline;
  51064. begin
  51065. getIB2F := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51066. end;
  51067. procedure TPMP_PMSTAT.setIB3F; inline;
  51068. begin
  51069. pTDefRegMap(@Self)^.&set := $00000800;
  51070. end;
  51071. procedure TPMP_PMSTAT.clearIB3F; inline;
  51072. begin
  51073. pTDefRegMap(@Self)^.clr := $00000800;
  51074. end;
  51075. procedure TPMP_PMSTAT.setIB3F(thebits : TBits_1); inline;
  51076. begin
  51077. if thebits = 0 then
  51078. pTDefRegMap(@Self)^.clr := $00000800
  51079. else
  51080. pTDefRegMap(@Self)^.&set := $00000800;
  51081. end;
  51082. function TPMP_PMSTAT.getIB3F : TBits_1; inline;
  51083. begin
  51084. getIB3F := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  51085. end;
  51086. procedure TPMP_PMSTAT.setIBOV; inline;
  51087. begin
  51088. pTDefRegMap(@Self)^.&set := $00004000;
  51089. end;
  51090. procedure TPMP_PMSTAT.clearIBOV; inline;
  51091. begin
  51092. pTDefRegMap(@Self)^.clr := $00004000;
  51093. end;
  51094. procedure TPMP_PMSTAT.setIBOV(thebits : TBits_1); inline;
  51095. begin
  51096. if thebits = 0 then
  51097. pTDefRegMap(@Self)^.clr := $00004000
  51098. else
  51099. pTDefRegMap(@Self)^.&set := $00004000;
  51100. end;
  51101. function TPMP_PMSTAT.getIBOV : TBits_1; inline;
  51102. begin
  51103. getIBOV := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  51104. end;
  51105. procedure TPMP_PMSTAT.setIBF; inline;
  51106. begin
  51107. pTDefRegMap(@Self)^.&set := $00008000;
  51108. end;
  51109. procedure TPMP_PMSTAT.clearIBF; inline;
  51110. begin
  51111. pTDefRegMap(@Self)^.clr := $00008000;
  51112. end;
  51113. procedure TPMP_PMSTAT.setIBF(thebits : TBits_1); inline;
  51114. begin
  51115. if thebits = 0 then
  51116. pTDefRegMap(@Self)^.clr := $00008000
  51117. else
  51118. pTDefRegMap(@Self)^.&set := $00008000;
  51119. end;
  51120. function TPMP_PMSTAT.getIBF : TBits_1; inline;
  51121. begin
  51122. getIBF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51123. end;
  51124. procedure TPMP_PMSTAT.setw(thebits : TBits_32); inline;
  51125. begin
  51126. pTDefRegMap(@Self)^.val := thebits;
  51127. end;
  51128. function TPMP_PMSTAT.getw : TBits_32; inline;
  51129. begin
  51130. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51131. end;
  51132. procedure TADC10_AD1CON1.setDONE; inline;
  51133. begin
  51134. pTDefRegMap(@Self)^.&set := $00000001;
  51135. end;
  51136. procedure TADC10_AD1CON1.clearDONE; inline;
  51137. begin
  51138. pTDefRegMap(@Self)^.clr := $00000001;
  51139. end;
  51140. procedure TADC10_AD1CON1.setDONE(thebits : TBits_1); inline;
  51141. begin
  51142. if thebits = 0 then
  51143. pTDefRegMap(@Self)^.clr := $00000001
  51144. else
  51145. pTDefRegMap(@Self)^.&set := $00000001;
  51146. end;
  51147. function TADC10_AD1CON1.getDONE : TBits_1; inline;
  51148. begin
  51149. getDONE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51150. end;
  51151. procedure TADC10_AD1CON1.setSAMP; inline;
  51152. begin
  51153. pTDefRegMap(@Self)^.&set := $00000002;
  51154. end;
  51155. procedure TADC10_AD1CON1.clearSAMP; inline;
  51156. begin
  51157. pTDefRegMap(@Self)^.clr := $00000002;
  51158. end;
  51159. procedure TADC10_AD1CON1.setSAMP(thebits : TBits_1); inline;
  51160. begin
  51161. if thebits = 0 then
  51162. pTDefRegMap(@Self)^.clr := $00000002
  51163. else
  51164. pTDefRegMap(@Self)^.&set := $00000002;
  51165. end;
  51166. function TADC10_AD1CON1.getSAMP : TBits_1; inline;
  51167. begin
  51168. getSAMP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51169. end;
  51170. procedure TADC10_AD1CON1.setASAM; inline;
  51171. begin
  51172. pTDefRegMap(@Self)^.&set := $00000004;
  51173. end;
  51174. procedure TADC10_AD1CON1.clearASAM; inline;
  51175. begin
  51176. pTDefRegMap(@Self)^.clr := $00000004;
  51177. end;
  51178. procedure TADC10_AD1CON1.setASAM(thebits : TBits_1); inline;
  51179. begin
  51180. if thebits = 0 then
  51181. pTDefRegMap(@Self)^.clr := $00000004
  51182. else
  51183. pTDefRegMap(@Self)^.&set := $00000004;
  51184. end;
  51185. function TADC10_AD1CON1.getASAM : TBits_1; inline;
  51186. begin
  51187. getASAM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51188. end;
  51189. procedure TADC10_AD1CON1.setCLRASAM; inline;
  51190. begin
  51191. pTDefRegMap(@Self)^.&set := $00000010;
  51192. end;
  51193. procedure TADC10_AD1CON1.clearCLRASAM; inline;
  51194. begin
  51195. pTDefRegMap(@Self)^.clr := $00000010;
  51196. end;
  51197. procedure TADC10_AD1CON1.setCLRASAM(thebits : TBits_1); inline;
  51198. begin
  51199. if thebits = 0 then
  51200. pTDefRegMap(@Self)^.clr := $00000010
  51201. else
  51202. pTDefRegMap(@Self)^.&set := $00000010;
  51203. end;
  51204. function TADC10_AD1CON1.getCLRASAM : TBits_1; inline;
  51205. begin
  51206. getCLRASAM := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51207. end;
  51208. procedure TADC10_AD1CON1.setSSRC(thebits : TBits_3); inline;
  51209. begin
  51210. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF1F or ( thebits shl 5 );
  51211. end;
  51212. function TADC10_AD1CON1.getSSRC : TBits_3; inline;
  51213. begin
  51214. getSSRC := (pTDefRegMap(@Self)^.val and $000000E0) shr 5;
  51215. end;
  51216. procedure TADC10_AD1CON1.setFORM(thebits : TBits_3); inline;
  51217. begin
  51218. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  51219. end;
  51220. function TADC10_AD1CON1.getFORM : TBits_3; inline;
  51221. begin
  51222. getFORM := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  51223. end;
  51224. procedure TADC10_AD1CON1.setSIDL; inline;
  51225. begin
  51226. pTDefRegMap(@Self)^.&set := $00002000;
  51227. end;
  51228. procedure TADC10_AD1CON1.clearSIDL; inline;
  51229. begin
  51230. pTDefRegMap(@Self)^.clr := $00002000;
  51231. end;
  51232. procedure TADC10_AD1CON1.setSIDL(thebits : TBits_1); inline;
  51233. begin
  51234. if thebits = 0 then
  51235. pTDefRegMap(@Self)^.clr := $00002000
  51236. else
  51237. pTDefRegMap(@Self)^.&set := $00002000;
  51238. end;
  51239. function TADC10_AD1CON1.getSIDL : TBits_1; inline;
  51240. begin
  51241. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51242. end;
  51243. procedure TADC10_AD1CON1.setON; inline;
  51244. begin
  51245. pTDefRegMap(@Self)^.&set := $00008000;
  51246. end;
  51247. procedure TADC10_AD1CON1.clearON; inline;
  51248. begin
  51249. pTDefRegMap(@Self)^.clr := $00008000;
  51250. end;
  51251. procedure TADC10_AD1CON1.setON(thebits : TBits_1); inline;
  51252. begin
  51253. if thebits = 0 then
  51254. pTDefRegMap(@Self)^.clr := $00008000
  51255. else
  51256. pTDefRegMap(@Self)^.&set := $00008000;
  51257. end;
  51258. function TADC10_AD1CON1.getON : TBits_1; inline;
  51259. begin
  51260. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51261. end;
  51262. procedure TADC10_AD1CON1.setSSRC0; inline;
  51263. begin
  51264. pTDefRegMap(@Self)^.&set := $00000020;
  51265. end;
  51266. procedure TADC10_AD1CON1.clearSSRC0; inline;
  51267. begin
  51268. pTDefRegMap(@Self)^.clr := $00000020;
  51269. end;
  51270. procedure TADC10_AD1CON1.setSSRC0(thebits : TBits_1); inline;
  51271. begin
  51272. if thebits = 0 then
  51273. pTDefRegMap(@Self)^.clr := $00000020
  51274. else
  51275. pTDefRegMap(@Self)^.&set := $00000020;
  51276. end;
  51277. function TADC10_AD1CON1.getSSRC0 : TBits_1; inline;
  51278. begin
  51279. getSSRC0 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51280. end;
  51281. procedure TADC10_AD1CON1.setSSRC1; inline;
  51282. begin
  51283. pTDefRegMap(@Self)^.&set := $00000040;
  51284. end;
  51285. procedure TADC10_AD1CON1.clearSSRC1; inline;
  51286. begin
  51287. pTDefRegMap(@Self)^.clr := $00000040;
  51288. end;
  51289. procedure TADC10_AD1CON1.setSSRC1(thebits : TBits_1); inline;
  51290. begin
  51291. if thebits = 0 then
  51292. pTDefRegMap(@Self)^.clr := $00000040
  51293. else
  51294. pTDefRegMap(@Self)^.&set := $00000040;
  51295. end;
  51296. function TADC10_AD1CON1.getSSRC1 : TBits_1; inline;
  51297. begin
  51298. getSSRC1 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51299. end;
  51300. procedure TADC10_AD1CON1.setSSRC2; inline;
  51301. begin
  51302. pTDefRegMap(@Self)^.&set := $00000080;
  51303. end;
  51304. procedure TADC10_AD1CON1.clearSSRC2; inline;
  51305. begin
  51306. pTDefRegMap(@Self)^.clr := $00000080;
  51307. end;
  51308. procedure TADC10_AD1CON1.setSSRC2(thebits : TBits_1); inline;
  51309. begin
  51310. if thebits = 0 then
  51311. pTDefRegMap(@Self)^.clr := $00000080
  51312. else
  51313. pTDefRegMap(@Self)^.&set := $00000080;
  51314. end;
  51315. function TADC10_AD1CON1.getSSRC2 : TBits_1; inline;
  51316. begin
  51317. getSSRC2 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51318. end;
  51319. procedure TADC10_AD1CON1.setFORM0; inline;
  51320. begin
  51321. pTDefRegMap(@Self)^.&set := $00000100;
  51322. end;
  51323. procedure TADC10_AD1CON1.clearFORM0; inline;
  51324. begin
  51325. pTDefRegMap(@Self)^.clr := $00000100;
  51326. end;
  51327. procedure TADC10_AD1CON1.setFORM0(thebits : TBits_1); inline;
  51328. begin
  51329. if thebits = 0 then
  51330. pTDefRegMap(@Self)^.clr := $00000100
  51331. else
  51332. pTDefRegMap(@Self)^.&set := $00000100;
  51333. end;
  51334. function TADC10_AD1CON1.getFORM0 : TBits_1; inline;
  51335. begin
  51336. getFORM0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51337. end;
  51338. procedure TADC10_AD1CON1.setFORM1; inline;
  51339. begin
  51340. pTDefRegMap(@Self)^.&set := $00000200;
  51341. end;
  51342. procedure TADC10_AD1CON1.clearFORM1; inline;
  51343. begin
  51344. pTDefRegMap(@Self)^.clr := $00000200;
  51345. end;
  51346. procedure TADC10_AD1CON1.setFORM1(thebits : TBits_1); inline;
  51347. begin
  51348. if thebits = 0 then
  51349. pTDefRegMap(@Self)^.clr := $00000200
  51350. else
  51351. pTDefRegMap(@Self)^.&set := $00000200;
  51352. end;
  51353. function TADC10_AD1CON1.getFORM1 : TBits_1; inline;
  51354. begin
  51355. getFORM1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  51356. end;
  51357. procedure TADC10_AD1CON1.setFORM2; inline;
  51358. begin
  51359. pTDefRegMap(@Self)^.&set := $00000400;
  51360. end;
  51361. procedure TADC10_AD1CON1.clearFORM2; inline;
  51362. begin
  51363. pTDefRegMap(@Self)^.clr := $00000400;
  51364. end;
  51365. procedure TADC10_AD1CON1.setFORM2(thebits : TBits_1); inline;
  51366. begin
  51367. if thebits = 0 then
  51368. pTDefRegMap(@Self)^.clr := $00000400
  51369. else
  51370. pTDefRegMap(@Self)^.&set := $00000400;
  51371. end;
  51372. function TADC10_AD1CON1.getFORM2 : TBits_1; inline;
  51373. begin
  51374. getFORM2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51375. end;
  51376. procedure TADC10_AD1CON1.setADSIDL; inline;
  51377. begin
  51378. pTDefRegMap(@Self)^.&set := $00002000;
  51379. end;
  51380. procedure TADC10_AD1CON1.clearADSIDL; inline;
  51381. begin
  51382. pTDefRegMap(@Self)^.clr := $00002000;
  51383. end;
  51384. procedure TADC10_AD1CON1.setADSIDL(thebits : TBits_1); inline;
  51385. begin
  51386. if thebits = 0 then
  51387. pTDefRegMap(@Self)^.clr := $00002000
  51388. else
  51389. pTDefRegMap(@Self)^.&set := $00002000;
  51390. end;
  51391. function TADC10_AD1CON1.getADSIDL : TBits_1; inline;
  51392. begin
  51393. getADSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51394. end;
  51395. procedure TADC10_AD1CON1.setADON; inline;
  51396. begin
  51397. pTDefRegMap(@Self)^.&set := $00008000;
  51398. end;
  51399. procedure TADC10_AD1CON1.clearADON; inline;
  51400. begin
  51401. pTDefRegMap(@Self)^.clr := $00008000;
  51402. end;
  51403. procedure TADC10_AD1CON1.setADON(thebits : TBits_1); inline;
  51404. begin
  51405. if thebits = 0 then
  51406. pTDefRegMap(@Self)^.clr := $00008000
  51407. else
  51408. pTDefRegMap(@Self)^.&set := $00008000;
  51409. end;
  51410. function TADC10_AD1CON1.getADON : TBits_1; inline;
  51411. begin
  51412. getADON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51413. end;
  51414. procedure TADC10_AD1CON1.setw(thebits : TBits_32); inline;
  51415. begin
  51416. pTDefRegMap(@Self)^.val := thebits;
  51417. end;
  51418. function TADC10_AD1CON1.getw : TBits_32; inline;
  51419. begin
  51420. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51421. end;
  51422. procedure TADC10_AD1CON2.setALTS; inline;
  51423. begin
  51424. pTDefRegMap(@Self)^.&set := $00000001;
  51425. end;
  51426. procedure TADC10_AD1CON2.clearALTS; inline;
  51427. begin
  51428. pTDefRegMap(@Self)^.clr := $00000001;
  51429. end;
  51430. procedure TADC10_AD1CON2.setALTS(thebits : TBits_1); inline;
  51431. begin
  51432. if thebits = 0 then
  51433. pTDefRegMap(@Self)^.clr := $00000001
  51434. else
  51435. pTDefRegMap(@Self)^.&set := $00000001;
  51436. end;
  51437. function TADC10_AD1CON2.getALTS : TBits_1; inline;
  51438. begin
  51439. getALTS := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51440. end;
  51441. procedure TADC10_AD1CON2.setBUFM; inline;
  51442. begin
  51443. pTDefRegMap(@Self)^.&set := $00000002;
  51444. end;
  51445. procedure TADC10_AD1CON2.clearBUFM; inline;
  51446. begin
  51447. pTDefRegMap(@Self)^.clr := $00000002;
  51448. end;
  51449. procedure TADC10_AD1CON2.setBUFM(thebits : TBits_1); inline;
  51450. begin
  51451. if thebits = 0 then
  51452. pTDefRegMap(@Self)^.clr := $00000002
  51453. else
  51454. pTDefRegMap(@Self)^.&set := $00000002;
  51455. end;
  51456. function TADC10_AD1CON2.getBUFM : TBits_1; inline;
  51457. begin
  51458. getBUFM := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51459. end;
  51460. procedure TADC10_AD1CON2.setSMPI(thebits : TBits_4); inline;
  51461. begin
  51462. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  51463. end;
  51464. function TADC10_AD1CON2.getSMPI : TBits_4; inline;
  51465. begin
  51466. getSMPI := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  51467. end;
  51468. procedure TADC10_AD1CON2.setBUFS; inline;
  51469. begin
  51470. pTDefRegMap(@Self)^.&set := $00000080;
  51471. end;
  51472. procedure TADC10_AD1CON2.clearBUFS; inline;
  51473. begin
  51474. pTDefRegMap(@Self)^.clr := $00000080;
  51475. end;
  51476. procedure TADC10_AD1CON2.setBUFS(thebits : TBits_1); inline;
  51477. begin
  51478. if thebits = 0 then
  51479. pTDefRegMap(@Self)^.clr := $00000080
  51480. else
  51481. pTDefRegMap(@Self)^.&set := $00000080;
  51482. end;
  51483. function TADC10_AD1CON2.getBUFS : TBits_1; inline;
  51484. begin
  51485. getBUFS := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51486. end;
  51487. procedure TADC10_AD1CON2.setCSCNA; inline;
  51488. begin
  51489. pTDefRegMap(@Self)^.&set := $00000400;
  51490. end;
  51491. procedure TADC10_AD1CON2.clearCSCNA; inline;
  51492. begin
  51493. pTDefRegMap(@Self)^.clr := $00000400;
  51494. end;
  51495. procedure TADC10_AD1CON2.setCSCNA(thebits : TBits_1); inline;
  51496. begin
  51497. if thebits = 0 then
  51498. pTDefRegMap(@Self)^.clr := $00000400
  51499. else
  51500. pTDefRegMap(@Self)^.&set := $00000400;
  51501. end;
  51502. function TADC10_AD1CON2.getCSCNA : TBits_1; inline;
  51503. begin
  51504. getCSCNA := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51505. end;
  51506. procedure TADC10_AD1CON2.setOFFCAL; inline;
  51507. begin
  51508. pTDefRegMap(@Self)^.&set := $00001000;
  51509. end;
  51510. procedure TADC10_AD1CON2.clearOFFCAL; inline;
  51511. begin
  51512. pTDefRegMap(@Self)^.clr := $00001000;
  51513. end;
  51514. procedure TADC10_AD1CON2.setOFFCAL(thebits : TBits_1); inline;
  51515. begin
  51516. if thebits = 0 then
  51517. pTDefRegMap(@Self)^.clr := $00001000
  51518. else
  51519. pTDefRegMap(@Self)^.&set := $00001000;
  51520. end;
  51521. function TADC10_AD1CON2.getOFFCAL : TBits_1; inline;
  51522. begin
  51523. getOFFCAL := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  51524. end;
  51525. procedure TADC10_AD1CON2.setVCFG(thebits : TBits_3); inline;
  51526. begin
  51527. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF1FFF or ( thebits shl 13 );
  51528. end;
  51529. function TADC10_AD1CON2.getVCFG : TBits_3; inline;
  51530. begin
  51531. getVCFG := (pTDefRegMap(@Self)^.val and $0000E000) shr 13;
  51532. end;
  51533. procedure TADC10_AD1CON2.setSMPI0; inline;
  51534. begin
  51535. pTDefRegMap(@Self)^.&set := $00000004;
  51536. end;
  51537. procedure TADC10_AD1CON2.clearSMPI0; inline;
  51538. begin
  51539. pTDefRegMap(@Self)^.clr := $00000004;
  51540. end;
  51541. procedure TADC10_AD1CON2.setSMPI0(thebits : TBits_1); inline;
  51542. begin
  51543. if thebits = 0 then
  51544. pTDefRegMap(@Self)^.clr := $00000004
  51545. else
  51546. pTDefRegMap(@Self)^.&set := $00000004;
  51547. end;
  51548. function TADC10_AD1CON2.getSMPI0 : TBits_1; inline;
  51549. begin
  51550. getSMPI0 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51551. end;
  51552. procedure TADC10_AD1CON2.setSMPI1; inline;
  51553. begin
  51554. pTDefRegMap(@Self)^.&set := $00000008;
  51555. end;
  51556. procedure TADC10_AD1CON2.clearSMPI1; inline;
  51557. begin
  51558. pTDefRegMap(@Self)^.clr := $00000008;
  51559. end;
  51560. procedure TADC10_AD1CON2.setSMPI1(thebits : TBits_1); inline;
  51561. begin
  51562. if thebits = 0 then
  51563. pTDefRegMap(@Self)^.clr := $00000008
  51564. else
  51565. pTDefRegMap(@Self)^.&set := $00000008;
  51566. end;
  51567. function TADC10_AD1CON2.getSMPI1 : TBits_1; inline;
  51568. begin
  51569. getSMPI1 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51570. end;
  51571. procedure TADC10_AD1CON2.setSMPI2; inline;
  51572. begin
  51573. pTDefRegMap(@Self)^.&set := $00000010;
  51574. end;
  51575. procedure TADC10_AD1CON2.clearSMPI2; inline;
  51576. begin
  51577. pTDefRegMap(@Self)^.clr := $00000010;
  51578. end;
  51579. procedure TADC10_AD1CON2.setSMPI2(thebits : TBits_1); inline;
  51580. begin
  51581. if thebits = 0 then
  51582. pTDefRegMap(@Self)^.clr := $00000010
  51583. else
  51584. pTDefRegMap(@Self)^.&set := $00000010;
  51585. end;
  51586. function TADC10_AD1CON2.getSMPI2 : TBits_1; inline;
  51587. begin
  51588. getSMPI2 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51589. end;
  51590. procedure TADC10_AD1CON2.setSMPI3; inline;
  51591. begin
  51592. pTDefRegMap(@Self)^.&set := $00000020;
  51593. end;
  51594. procedure TADC10_AD1CON2.clearSMPI3; inline;
  51595. begin
  51596. pTDefRegMap(@Self)^.clr := $00000020;
  51597. end;
  51598. procedure TADC10_AD1CON2.setSMPI3(thebits : TBits_1); inline;
  51599. begin
  51600. if thebits = 0 then
  51601. pTDefRegMap(@Self)^.clr := $00000020
  51602. else
  51603. pTDefRegMap(@Self)^.&set := $00000020;
  51604. end;
  51605. function TADC10_AD1CON2.getSMPI3 : TBits_1; inline;
  51606. begin
  51607. getSMPI3 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51608. end;
  51609. procedure TADC10_AD1CON2.setVCFG0; inline;
  51610. begin
  51611. pTDefRegMap(@Self)^.&set := $00002000;
  51612. end;
  51613. procedure TADC10_AD1CON2.clearVCFG0; inline;
  51614. begin
  51615. pTDefRegMap(@Self)^.clr := $00002000;
  51616. end;
  51617. procedure TADC10_AD1CON2.setVCFG0(thebits : TBits_1); inline;
  51618. begin
  51619. if thebits = 0 then
  51620. pTDefRegMap(@Self)^.clr := $00002000
  51621. else
  51622. pTDefRegMap(@Self)^.&set := $00002000;
  51623. end;
  51624. function TADC10_AD1CON2.getVCFG0 : TBits_1; inline;
  51625. begin
  51626. getVCFG0 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  51627. end;
  51628. procedure TADC10_AD1CON2.setVCFG1; inline;
  51629. begin
  51630. pTDefRegMap(@Self)^.&set := $00004000;
  51631. end;
  51632. procedure TADC10_AD1CON2.clearVCFG1; inline;
  51633. begin
  51634. pTDefRegMap(@Self)^.clr := $00004000;
  51635. end;
  51636. procedure TADC10_AD1CON2.setVCFG1(thebits : TBits_1); inline;
  51637. begin
  51638. if thebits = 0 then
  51639. pTDefRegMap(@Self)^.clr := $00004000
  51640. else
  51641. pTDefRegMap(@Self)^.&set := $00004000;
  51642. end;
  51643. function TADC10_AD1CON2.getVCFG1 : TBits_1; inline;
  51644. begin
  51645. getVCFG1 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  51646. end;
  51647. procedure TADC10_AD1CON2.setVCFG2; inline;
  51648. begin
  51649. pTDefRegMap(@Self)^.&set := $00008000;
  51650. end;
  51651. procedure TADC10_AD1CON2.clearVCFG2; inline;
  51652. begin
  51653. pTDefRegMap(@Self)^.clr := $00008000;
  51654. end;
  51655. procedure TADC10_AD1CON2.setVCFG2(thebits : TBits_1); inline;
  51656. begin
  51657. if thebits = 0 then
  51658. pTDefRegMap(@Self)^.clr := $00008000
  51659. else
  51660. pTDefRegMap(@Self)^.&set := $00008000;
  51661. end;
  51662. function TADC10_AD1CON2.getVCFG2 : TBits_1; inline;
  51663. begin
  51664. getVCFG2 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51665. end;
  51666. procedure TADC10_AD1CON2.setw(thebits : TBits_32); inline;
  51667. begin
  51668. pTDefRegMap(@Self)^.val := thebits;
  51669. end;
  51670. function TADC10_AD1CON2.getw : TBits_32; inline;
  51671. begin
  51672. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51673. end;
  51674. procedure TADC10_AD1CON3.setADCS(thebits : TBits_8); inline;
  51675. begin
  51676. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  51677. end;
  51678. function TADC10_AD1CON3.getADCS : TBits_8; inline;
  51679. begin
  51680. getADCS := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  51681. end;
  51682. procedure TADC10_AD1CON3.setSAMC(thebits : TBits_5); inline;
  51683. begin
  51684. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  51685. end;
  51686. function TADC10_AD1CON3.getSAMC : TBits_5; inline;
  51687. begin
  51688. getSAMC := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  51689. end;
  51690. procedure TADC10_AD1CON3.setADRC; inline;
  51691. begin
  51692. pTDefRegMap(@Self)^.&set := $00008000;
  51693. end;
  51694. procedure TADC10_AD1CON3.clearADRC; inline;
  51695. begin
  51696. pTDefRegMap(@Self)^.clr := $00008000;
  51697. end;
  51698. procedure TADC10_AD1CON3.setADRC(thebits : TBits_1); inline;
  51699. begin
  51700. if thebits = 0 then
  51701. pTDefRegMap(@Self)^.clr := $00008000
  51702. else
  51703. pTDefRegMap(@Self)^.&set := $00008000;
  51704. end;
  51705. function TADC10_AD1CON3.getADRC : TBits_1; inline;
  51706. begin
  51707. getADRC := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  51708. end;
  51709. procedure TADC10_AD1CON3.setADCS0; inline;
  51710. begin
  51711. pTDefRegMap(@Self)^.&set := $00000001;
  51712. end;
  51713. procedure TADC10_AD1CON3.clearADCS0; inline;
  51714. begin
  51715. pTDefRegMap(@Self)^.clr := $00000001;
  51716. end;
  51717. procedure TADC10_AD1CON3.setADCS0(thebits : TBits_1); inline;
  51718. begin
  51719. if thebits = 0 then
  51720. pTDefRegMap(@Self)^.clr := $00000001
  51721. else
  51722. pTDefRegMap(@Self)^.&set := $00000001;
  51723. end;
  51724. function TADC10_AD1CON3.getADCS0 : TBits_1; inline;
  51725. begin
  51726. getADCS0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  51727. end;
  51728. procedure TADC10_AD1CON3.setADCS1; inline;
  51729. begin
  51730. pTDefRegMap(@Self)^.&set := $00000002;
  51731. end;
  51732. procedure TADC10_AD1CON3.clearADCS1; inline;
  51733. begin
  51734. pTDefRegMap(@Self)^.clr := $00000002;
  51735. end;
  51736. procedure TADC10_AD1CON3.setADCS1(thebits : TBits_1); inline;
  51737. begin
  51738. if thebits = 0 then
  51739. pTDefRegMap(@Self)^.clr := $00000002
  51740. else
  51741. pTDefRegMap(@Self)^.&set := $00000002;
  51742. end;
  51743. function TADC10_AD1CON3.getADCS1 : TBits_1; inline;
  51744. begin
  51745. getADCS1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  51746. end;
  51747. procedure TADC10_AD1CON3.setADCS2; inline;
  51748. begin
  51749. pTDefRegMap(@Self)^.&set := $00000004;
  51750. end;
  51751. procedure TADC10_AD1CON3.clearADCS2; inline;
  51752. begin
  51753. pTDefRegMap(@Self)^.clr := $00000004;
  51754. end;
  51755. procedure TADC10_AD1CON3.setADCS2(thebits : TBits_1); inline;
  51756. begin
  51757. if thebits = 0 then
  51758. pTDefRegMap(@Self)^.clr := $00000004
  51759. else
  51760. pTDefRegMap(@Self)^.&set := $00000004;
  51761. end;
  51762. function TADC10_AD1CON3.getADCS2 : TBits_1; inline;
  51763. begin
  51764. getADCS2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  51765. end;
  51766. procedure TADC10_AD1CON3.setADCS3; inline;
  51767. begin
  51768. pTDefRegMap(@Self)^.&set := $00000008;
  51769. end;
  51770. procedure TADC10_AD1CON3.clearADCS3; inline;
  51771. begin
  51772. pTDefRegMap(@Self)^.clr := $00000008;
  51773. end;
  51774. procedure TADC10_AD1CON3.setADCS3(thebits : TBits_1); inline;
  51775. begin
  51776. if thebits = 0 then
  51777. pTDefRegMap(@Self)^.clr := $00000008
  51778. else
  51779. pTDefRegMap(@Self)^.&set := $00000008;
  51780. end;
  51781. function TADC10_AD1CON3.getADCS3 : TBits_1; inline;
  51782. begin
  51783. getADCS3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  51784. end;
  51785. procedure TADC10_AD1CON3.setADCS4; inline;
  51786. begin
  51787. pTDefRegMap(@Self)^.&set := $00000010;
  51788. end;
  51789. procedure TADC10_AD1CON3.clearADCS4; inline;
  51790. begin
  51791. pTDefRegMap(@Self)^.clr := $00000010;
  51792. end;
  51793. procedure TADC10_AD1CON3.setADCS4(thebits : TBits_1); inline;
  51794. begin
  51795. if thebits = 0 then
  51796. pTDefRegMap(@Self)^.clr := $00000010
  51797. else
  51798. pTDefRegMap(@Self)^.&set := $00000010;
  51799. end;
  51800. function TADC10_AD1CON3.getADCS4 : TBits_1; inline;
  51801. begin
  51802. getADCS4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  51803. end;
  51804. procedure TADC10_AD1CON3.setADCS5; inline;
  51805. begin
  51806. pTDefRegMap(@Self)^.&set := $00000020;
  51807. end;
  51808. procedure TADC10_AD1CON3.clearADCS5; inline;
  51809. begin
  51810. pTDefRegMap(@Self)^.clr := $00000020;
  51811. end;
  51812. procedure TADC10_AD1CON3.setADCS5(thebits : TBits_1); inline;
  51813. begin
  51814. if thebits = 0 then
  51815. pTDefRegMap(@Self)^.clr := $00000020
  51816. else
  51817. pTDefRegMap(@Self)^.&set := $00000020;
  51818. end;
  51819. function TADC10_AD1CON3.getADCS5 : TBits_1; inline;
  51820. begin
  51821. getADCS5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  51822. end;
  51823. procedure TADC10_AD1CON3.setADCS6; inline;
  51824. begin
  51825. pTDefRegMap(@Self)^.&set := $00000040;
  51826. end;
  51827. procedure TADC10_AD1CON3.clearADCS6; inline;
  51828. begin
  51829. pTDefRegMap(@Self)^.clr := $00000040;
  51830. end;
  51831. procedure TADC10_AD1CON3.setADCS6(thebits : TBits_1); inline;
  51832. begin
  51833. if thebits = 0 then
  51834. pTDefRegMap(@Self)^.clr := $00000040
  51835. else
  51836. pTDefRegMap(@Self)^.&set := $00000040;
  51837. end;
  51838. function TADC10_AD1CON3.getADCS6 : TBits_1; inline;
  51839. begin
  51840. getADCS6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  51841. end;
  51842. procedure TADC10_AD1CON3.setADCS7; inline;
  51843. begin
  51844. pTDefRegMap(@Self)^.&set := $00000080;
  51845. end;
  51846. procedure TADC10_AD1CON3.clearADCS7; inline;
  51847. begin
  51848. pTDefRegMap(@Self)^.clr := $00000080;
  51849. end;
  51850. procedure TADC10_AD1CON3.setADCS7(thebits : TBits_1); inline;
  51851. begin
  51852. if thebits = 0 then
  51853. pTDefRegMap(@Self)^.clr := $00000080
  51854. else
  51855. pTDefRegMap(@Self)^.&set := $00000080;
  51856. end;
  51857. function TADC10_AD1CON3.getADCS7 : TBits_1; inline;
  51858. begin
  51859. getADCS7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  51860. end;
  51861. procedure TADC10_AD1CON3.setSAMC0; inline;
  51862. begin
  51863. pTDefRegMap(@Self)^.&set := $00000100;
  51864. end;
  51865. procedure TADC10_AD1CON3.clearSAMC0; inline;
  51866. begin
  51867. pTDefRegMap(@Self)^.clr := $00000100;
  51868. end;
  51869. procedure TADC10_AD1CON3.setSAMC0(thebits : TBits_1); inline;
  51870. begin
  51871. if thebits = 0 then
  51872. pTDefRegMap(@Self)^.clr := $00000100
  51873. else
  51874. pTDefRegMap(@Self)^.&set := $00000100;
  51875. end;
  51876. function TADC10_AD1CON3.getSAMC0 : TBits_1; inline;
  51877. begin
  51878. getSAMC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  51879. end;
  51880. procedure TADC10_AD1CON3.setSAMC1; inline;
  51881. begin
  51882. pTDefRegMap(@Self)^.&set := $00000200;
  51883. end;
  51884. procedure TADC10_AD1CON3.clearSAMC1; inline;
  51885. begin
  51886. pTDefRegMap(@Self)^.clr := $00000200;
  51887. end;
  51888. procedure TADC10_AD1CON3.setSAMC1(thebits : TBits_1); inline;
  51889. begin
  51890. if thebits = 0 then
  51891. pTDefRegMap(@Self)^.clr := $00000200
  51892. else
  51893. pTDefRegMap(@Self)^.&set := $00000200;
  51894. end;
  51895. function TADC10_AD1CON3.getSAMC1 : TBits_1; inline;
  51896. begin
  51897. getSAMC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  51898. end;
  51899. procedure TADC10_AD1CON3.setSAMC2; inline;
  51900. begin
  51901. pTDefRegMap(@Self)^.&set := $00000400;
  51902. end;
  51903. procedure TADC10_AD1CON3.clearSAMC2; inline;
  51904. begin
  51905. pTDefRegMap(@Self)^.clr := $00000400;
  51906. end;
  51907. procedure TADC10_AD1CON3.setSAMC2(thebits : TBits_1); inline;
  51908. begin
  51909. if thebits = 0 then
  51910. pTDefRegMap(@Self)^.clr := $00000400
  51911. else
  51912. pTDefRegMap(@Self)^.&set := $00000400;
  51913. end;
  51914. function TADC10_AD1CON3.getSAMC2 : TBits_1; inline;
  51915. begin
  51916. getSAMC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  51917. end;
  51918. procedure TADC10_AD1CON3.setSAMC3; inline;
  51919. begin
  51920. pTDefRegMap(@Self)^.&set := $00000800;
  51921. end;
  51922. procedure TADC10_AD1CON3.clearSAMC3; inline;
  51923. begin
  51924. pTDefRegMap(@Self)^.clr := $00000800;
  51925. end;
  51926. procedure TADC10_AD1CON3.setSAMC3(thebits : TBits_1); inline;
  51927. begin
  51928. if thebits = 0 then
  51929. pTDefRegMap(@Self)^.clr := $00000800
  51930. else
  51931. pTDefRegMap(@Self)^.&set := $00000800;
  51932. end;
  51933. function TADC10_AD1CON3.getSAMC3 : TBits_1; inline;
  51934. begin
  51935. getSAMC3 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  51936. end;
  51937. procedure TADC10_AD1CON3.setSAMC4; inline;
  51938. begin
  51939. pTDefRegMap(@Self)^.&set := $00001000;
  51940. end;
  51941. procedure TADC10_AD1CON3.clearSAMC4; inline;
  51942. begin
  51943. pTDefRegMap(@Self)^.clr := $00001000;
  51944. end;
  51945. procedure TADC10_AD1CON3.setSAMC4(thebits : TBits_1); inline;
  51946. begin
  51947. if thebits = 0 then
  51948. pTDefRegMap(@Self)^.clr := $00001000
  51949. else
  51950. pTDefRegMap(@Self)^.&set := $00001000;
  51951. end;
  51952. function TADC10_AD1CON3.getSAMC4 : TBits_1; inline;
  51953. begin
  51954. getSAMC4 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  51955. end;
  51956. procedure TADC10_AD1CON3.setw(thebits : TBits_32); inline;
  51957. begin
  51958. pTDefRegMap(@Self)^.val := thebits;
  51959. end;
  51960. function TADC10_AD1CON3.getw : TBits_32; inline;
  51961. begin
  51962. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  51963. end;
  51964. procedure TADC10_AD1CHS.setCH0SA(thebits : TBits_4); inline;
  51965. begin
  51966. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF0FFFF or ( thebits shl 16 );
  51967. end;
  51968. function TADC10_AD1CHS.getCH0SA : TBits_4; inline;
  51969. begin
  51970. getCH0SA := (pTDefRegMap(@Self)^.val and $000F0000) shr 16;
  51971. end;
  51972. procedure TADC10_AD1CHS.setCH0NA; inline;
  51973. begin
  51974. pTDefRegMap(@Self)^.&set := $00800000;
  51975. end;
  51976. procedure TADC10_AD1CHS.clearCH0NA; inline;
  51977. begin
  51978. pTDefRegMap(@Self)^.clr := $00800000;
  51979. end;
  51980. procedure TADC10_AD1CHS.setCH0NA(thebits : TBits_1); inline;
  51981. begin
  51982. if thebits = 0 then
  51983. pTDefRegMap(@Self)^.clr := $00800000
  51984. else
  51985. pTDefRegMap(@Self)^.&set := $00800000;
  51986. end;
  51987. function TADC10_AD1CHS.getCH0NA : TBits_1; inline;
  51988. begin
  51989. getCH0NA := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  51990. end;
  51991. procedure TADC10_AD1CHS.setCH0SB(thebits : TBits_4); inline;
  51992. begin
  51993. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F0FFFFFF or ( thebits shl 24 );
  51994. end;
  51995. function TADC10_AD1CHS.getCH0SB : TBits_4; inline;
  51996. begin
  51997. getCH0SB := (pTDefRegMap(@Self)^.val and $0F000000) shr 24;
  51998. end;
  51999. procedure TADC10_AD1CHS.setCH0NB; inline;
  52000. begin
  52001. pTDefRegMap(@Self)^.&set := $80000000;
  52002. end;
  52003. procedure TADC10_AD1CHS.clearCH0NB; inline;
  52004. begin
  52005. pTDefRegMap(@Self)^.clr := $80000000;
  52006. end;
  52007. procedure TADC10_AD1CHS.setCH0NB(thebits : TBits_1); inline;
  52008. begin
  52009. if thebits = 0 then
  52010. pTDefRegMap(@Self)^.clr := $80000000
  52011. else
  52012. pTDefRegMap(@Self)^.&set := $80000000;
  52013. end;
  52014. function TADC10_AD1CHS.getCH0NB : TBits_1; inline;
  52015. begin
  52016. getCH0NB := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  52017. end;
  52018. procedure TADC10_AD1CHS.setCH0SA0; inline;
  52019. begin
  52020. pTDefRegMap(@Self)^.&set := $00010000;
  52021. end;
  52022. procedure TADC10_AD1CHS.clearCH0SA0; inline;
  52023. begin
  52024. pTDefRegMap(@Self)^.clr := $00010000;
  52025. end;
  52026. procedure TADC10_AD1CHS.setCH0SA0(thebits : TBits_1); inline;
  52027. begin
  52028. if thebits = 0 then
  52029. pTDefRegMap(@Self)^.clr := $00010000
  52030. else
  52031. pTDefRegMap(@Self)^.&set := $00010000;
  52032. end;
  52033. function TADC10_AD1CHS.getCH0SA0 : TBits_1; inline;
  52034. begin
  52035. getCH0SA0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  52036. end;
  52037. procedure TADC10_AD1CHS.setCH0SA1; inline;
  52038. begin
  52039. pTDefRegMap(@Self)^.&set := $00020000;
  52040. end;
  52041. procedure TADC10_AD1CHS.clearCH0SA1; inline;
  52042. begin
  52043. pTDefRegMap(@Self)^.clr := $00020000;
  52044. end;
  52045. procedure TADC10_AD1CHS.setCH0SA1(thebits : TBits_1); inline;
  52046. begin
  52047. if thebits = 0 then
  52048. pTDefRegMap(@Self)^.clr := $00020000
  52049. else
  52050. pTDefRegMap(@Self)^.&set := $00020000;
  52051. end;
  52052. function TADC10_AD1CHS.getCH0SA1 : TBits_1; inline;
  52053. begin
  52054. getCH0SA1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  52055. end;
  52056. procedure TADC10_AD1CHS.setCH0SA2; inline;
  52057. begin
  52058. pTDefRegMap(@Self)^.&set := $00040000;
  52059. end;
  52060. procedure TADC10_AD1CHS.clearCH0SA2; inline;
  52061. begin
  52062. pTDefRegMap(@Self)^.clr := $00040000;
  52063. end;
  52064. procedure TADC10_AD1CHS.setCH0SA2(thebits : TBits_1); inline;
  52065. begin
  52066. if thebits = 0 then
  52067. pTDefRegMap(@Self)^.clr := $00040000
  52068. else
  52069. pTDefRegMap(@Self)^.&set := $00040000;
  52070. end;
  52071. function TADC10_AD1CHS.getCH0SA2 : TBits_1; inline;
  52072. begin
  52073. getCH0SA2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  52074. end;
  52075. procedure TADC10_AD1CHS.setCH0SA3; inline;
  52076. begin
  52077. pTDefRegMap(@Self)^.&set := $00080000;
  52078. end;
  52079. procedure TADC10_AD1CHS.clearCH0SA3; inline;
  52080. begin
  52081. pTDefRegMap(@Self)^.clr := $00080000;
  52082. end;
  52083. procedure TADC10_AD1CHS.setCH0SA3(thebits : TBits_1); inline;
  52084. begin
  52085. if thebits = 0 then
  52086. pTDefRegMap(@Self)^.clr := $00080000
  52087. else
  52088. pTDefRegMap(@Self)^.&set := $00080000;
  52089. end;
  52090. function TADC10_AD1CHS.getCH0SA3 : TBits_1; inline;
  52091. begin
  52092. getCH0SA3 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  52093. end;
  52094. procedure TADC10_AD1CHS.setCH0SB0; inline;
  52095. begin
  52096. pTDefRegMap(@Self)^.&set := $01000000;
  52097. end;
  52098. procedure TADC10_AD1CHS.clearCH0SB0; inline;
  52099. begin
  52100. pTDefRegMap(@Self)^.clr := $01000000;
  52101. end;
  52102. procedure TADC10_AD1CHS.setCH0SB0(thebits : TBits_1); inline;
  52103. begin
  52104. if thebits = 0 then
  52105. pTDefRegMap(@Self)^.clr := $01000000
  52106. else
  52107. pTDefRegMap(@Self)^.&set := $01000000;
  52108. end;
  52109. function TADC10_AD1CHS.getCH0SB0 : TBits_1; inline;
  52110. begin
  52111. getCH0SB0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  52112. end;
  52113. procedure TADC10_AD1CHS.setCH0SB1; inline;
  52114. begin
  52115. pTDefRegMap(@Self)^.&set := $02000000;
  52116. end;
  52117. procedure TADC10_AD1CHS.clearCH0SB1; inline;
  52118. begin
  52119. pTDefRegMap(@Self)^.clr := $02000000;
  52120. end;
  52121. procedure TADC10_AD1CHS.setCH0SB1(thebits : TBits_1); inline;
  52122. begin
  52123. if thebits = 0 then
  52124. pTDefRegMap(@Self)^.clr := $02000000
  52125. else
  52126. pTDefRegMap(@Self)^.&set := $02000000;
  52127. end;
  52128. function TADC10_AD1CHS.getCH0SB1 : TBits_1; inline;
  52129. begin
  52130. getCH0SB1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  52131. end;
  52132. procedure TADC10_AD1CHS.setCH0SB2; inline;
  52133. begin
  52134. pTDefRegMap(@Self)^.&set := $04000000;
  52135. end;
  52136. procedure TADC10_AD1CHS.clearCH0SB2; inline;
  52137. begin
  52138. pTDefRegMap(@Self)^.clr := $04000000;
  52139. end;
  52140. procedure TADC10_AD1CHS.setCH0SB2(thebits : TBits_1); inline;
  52141. begin
  52142. if thebits = 0 then
  52143. pTDefRegMap(@Self)^.clr := $04000000
  52144. else
  52145. pTDefRegMap(@Self)^.&set := $04000000;
  52146. end;
  52147. function TADC10_AD1CHS.getCH0SB2 : TBits_1; inline;
  52148. begin
  52149. getCH0SB2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  52150. end;
  52151. procedure TADC10_AD1CHS.setCH0SB3; inline;
  52152. begin
  52153. pTDefRegMap(@Self)^.&set := $08000000;
  52154. end;
  52155. procedure TADC10_AD1CHS.clearCH0SB3; inline;
  52156. begin
  52157. pTDefRegMap(@Self)^.clr := $08000000;
  52158. end;
  52159. procedure TADC10_AD1CHS.setCH0SB3(thebits : TBits_1); inline;
  52160. begin
  52161. if thebits = 0 then
  52162. pTDefRegMap(@Self)^.clr := $08000000
  52163. else
  52164. pTDefRegMap(@Self)^.&set := $08000000;
  52165. end;
  52166. function TADC10_AD1CHS.getCH0SB3 : TBits_1; inline;
  52167. begin
  52168. getCH0SB3 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  52169. end;
  52170. procedure TADC10_AD1CHS.setw(thebits : TBits_32); inline;
  52171. begin
  52172. pTDefRegMap(@Self)^.val := thebits;
  52173. end;
  52174. function TADC10_AD1CHS.getw : TBits_32; inline;
  52175. begin
  52176. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52177. end;
  52178. procedure TADC10_AD1CSSL.setCSSL(thebits : TBits_16); inline;
  52179. begin
  52180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  52181. end;
  52182. function TADC10_AD1CSSL.getCSSL : TBits_16; inline;
  52183. begin
  52184. getCSSL := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  52185. end;
  52186. procedure TADC10_AD1CSSL.setCSSL0; inline;
  52187. begin
  52188. pTDefRegMap(@Self)^.&set := $00000001;
  52189. end;
  52190. procedure TADC10_AD1CSSL.clearCSSL0; inline;
  52191. begin
  52192. pTDefRegMap(@Self)^.clr := $00000001;
  52193. end;
  52194. procedure TADC10_AD1CSSL.setCSSL0(thebits : TBits_1); inline;
  52195. begin
  52196. if thebits = 0 then
  52197. pTDefRegMap(@Self)^.clr := $00000001
  52198. else
  52199. pTDefRegMap(@Self)^.&set := $00000001;
  52200. end;
  52201. function TADC10_AD1CSSL.getCSSL0 : TBits_1; inline;
  52202. begin
  52203. getCSSL0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52204. end;
  52205. procedure TADC10_AD1CSSL.setCSSL1; inline;
  52206. begin
  52207. pTDefRegMap(@Self)^.&set := $00000002;
  52208. end;
  52209. procedure TADC10_AD1CSSL.clearCSSL1; inline;
  52210. begin
  52211. pTDefRegMap(@Self)^.clr := $00000002;
  52212. end;
  52213. procedure TADC10_AD1CSSL.setCSSL1(thebits : TBits_1); inline;
  52214. begin
  52215. if thebits = 0 then
  52216. pTDefRegMap(@Self)^.clr := $00000002
  52217. else
  52218. pTDefRegMap(@Self)^.&set := $00000002;
  52219. end;
  52220. function TADC10_AD1CSSL.getCSSL1 : TBits_1; inline;
  52221. begin
  52222. getCSSL1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52223. end;
  52224. procedure TADC10_AD1CSSL.setCSSL2; inline;
  52225. begin
  52226. pTDefRegMap(@Self)^.&set := $00000004;
  52227. end;
  52228. procedure TADC10_AD1CSSL.clearCSSL2; inline;
  52229. begin
  52230. pTDefRegMap(@Self)^.clr := $00000004;
  52231. end;
  52232. procedure TADC10_AD1CSSL.setCSSL2(thebits : TBits_1); inline;
  52233. begin
  52234. if thebits = 0 then
  52235. pTDefRegMap(@Self)^.clr := $00000004
  52236. else
  52237. pTDefRegMap(@Self)^.&set := $00000004;
  52238. end;
  52239. function TADC10_AD1CSSL.getCSSL2 : TBits_1; inline;
  52240. begin
  52241. getCSSL2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52242. end;
  52243. procedure TADC10_AD1CSSL.setCSSL3; inline;
  52244. begin
  52245. pTDefRegMap(@Self)^.&set := $00000008;
  52246. end;
  52247. procedure TADC10_AD1CSSL.clearCSSL3; inline;
  52248. begin
  52249. pTDefRegMap(@Self)^.clr := $00000008;
  52250. end;
  52251. procedure TADC10_AD1CSSL.setCSSL3(thebits : TBits_1); inline;
  52252. begin
  52253. if thebits = 0 then
  52254. pTDefRegMap(@Self)^.clr := $00000008
  52255. else
  52256. pTDefRegMap(@Self)^.&set := $00000008;
  52257. end;
  52258. function TADC10_AD1CSSL.getCSSL3 : TBits_1; inline;
  52259. begin
  52260. getCSSL3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52261. end;
  52262. procedure TADC10_AD1CSSL.setCSSL4; inline;
  52263. begin
  52264. pTDefRegMap(@Self)^.&set := $00000010;
  52265. end;
  52266. procedure TADC10_AD1CSSL.clearCSSL4; inline;
  52267. begin
  52268. pTDefRegMap(@Self)^.clr := $00000010;
  52269. end;
  52270. procedure TADC10_AD1CSSL.setCSSL4(thebits : TBits_1); inline;
  52271. begin
  52272. if thebits = 0 then
  52273. pTDefRegMap(@Self)^.clr := $00000010
  52274. else
  52275. pTDefRegMap(@Self)^.&set := $00000010;
  52276. end;
  52277. function TADC10_AD1CSSL.getCSSL4 : TBits_1; inline;
  52278. begin
  52279. getCSSL4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52280. end;
  52281. procedure TADC10_AD1CSSL.setCSSL5; inline;
  52282. begin
  52283. pTDefRegMap(@Self)^.&set := $00000020;
  52284. end;
  52285. procedure TADC10_AD1CSSL.clearCSSL5; inline;
  52286. begin
  52287. pTDefRegMap(@Self)^.clr := $00000020;
  52288. end;
  52289. procedure TADC10_AD1CSSL.setCSSL5(thebits : TBits_1); inline;
  52290. begin
  52291. if thebits = 0 then
  52292. pTDefRegMap(@Self)^.clr := $00000020
  52293. else
  52294. pTDefRegMap(@Self)^.&set := $00000020;
  52295. end;
  52296. function TADC10_AD1CSSL.getCSSL5 : TBits_1; inline;
  52297. begin
  52298. getCSSL5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52299. end;
  52300. procedure TADC10_AD1CSSL.setCSSL6; inline;
  52301. begin
  52302. pTDefRegMap(@Self)^.&set := $00000040;
  52303. end;
  52304. procedure TADC10_AD1CSSL.clearCSSL6; inline;
  52305. begin
  52306. pTDefRegMap(@Self)^.clr := $00000040;
  52307. end;
  52308. procedure TADC10_AD1CSSL.setCSSL6(thebits : TBits_1); inline;
  52309. begin
  52310. if thebits = 0 then
  52311. pTDefRegMap(@Self)^.clr := $00000040
  52312. else
  52313. pTDefRegMap(@Self)^.&set := $00000040;
  52314. end;
  52315. function TADC10_AD1CSSL.getCSSL6 : TBits_1; inline;
  52316. begin
  52317. getCSSL6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52318. end;
  52319. procedure TADC10_AD1CSSL.setCSSL7; inline;
  52320. begin
  52321. pTDefRegMap(@Self)^.&set := $00000080;
  52322. end;
  52323. procedure TADC10_AD1CSSL.clearCSSL7; inline;
  52324. begin
  52325. pTDefRegMap(@Self)^.clr := $00000080;
  52326. end;
  52327. procedure TADC10_AD1CSSL.setCSSL7(thebits : TBits_1); inline;
  52328. begin
  52329. if thebits = 0 then
  52330. pTDefRegMap(@Self)^.clr := $00000080
  52331. else
  52332. pTDefRegMap(@Self)^.&set := $00000080;
  52333. end;
  52334. function TADC10_AD1CSSL.getCSSL7 : TBits_1; inline;
  52335. begin
  52336. getCSSL7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52337. end;
  52338. procedure TADC10_AD1CSSL.setCSSL8; inline;
  52339. begin
  52340. pTDefRegMap(@Self)^.&set := $00000100;
  52341. end;
  52342. procedure TADC10_AD1CSSL.clearCSSL8; inline;
  52343. begin
  52344. pTDefRegMap(@Self)^.clr := $00000100;
  52345. end;
  52346. procedure TADC10_AD1CSSL.setCSSL8(thebits : TBits_1); inline;
  52347. begin
  52348. if thebits = 0 then
  52349. pTDefRegMap(@Self)^.clr := $00000100
  52350. else
  52351. pTDefRegMap(@Self)^.&set := $00000100;
  52352. end;
  52353. function TADC10_AD1CSSL.getCSSL8 : TBits_1; inline;
  52354. begin
  52355. getCSSL8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52356. end;
  52357. procedure TADC10_AD1CSSL.setCSSL9; inline;
  52358. begin
  52359. pTDefRegMap(@Self)^.&set := $00000200;
  52360. end;
  52361. procedure TADC10_AD1CSSL.clearCSSL9; inline;
  52362. begin
  52363. pTDefRegMap(@Self)^.clr := $00000200;
  52364. end;
  52365. procedure TADC10_AD1CSSL.setCSSL9(thebits : TBits_1); inline;
  52366. begin
  52367. if thebits = 0 then
  52368. pTDefRegMap(@Self)^.clr := $00000200
  52369. else
  52370. pTDefRegMap(@Self)^.&set := $00000200;
  52371. end;
  52372. function TADC10_AD1CSSL.getCSSL9 : TBits_1; inline;
  52373. begin
  52374. getCSSL9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  52375. end;
  52376. procedure TADC10_AD1CSSL.setCSSL10; inline;
  52377. begin
  52378. pTDefRegMap(@Self)^.&set := $00000400;
  52379. end;
  52380. procedure TADC10_AD1CSSL.clearCSSL10; inline;
  52381. begin
  52382. pTDefRegMap(@Self)^.clr := $00000400;
  52383. end;
  52384. procedure TADC10_AD1CSSL.setCSSL10(thebits : TBits_1); inline;
  52385. begin
  52386. if thebits = 0 then
  52387. pTDefRegMap(@Self)^.clr := $00000400
  52388. else
  52389. pTDefRegMap(@Self)^.&set := $00000400;
  52390. end;
  52391. function TADC10_AD1CSSL.getCSSL10 : TBits_1; inline;
  52392. begin
  52393. getCSSL10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  52394. end;
  52395. procedure TADC10_AD1CSSL.setCSSL11; inline;
  52396. begin
  52397. pTDefRegMap(@Self)^.&set := $00000800;
  52398. end;
  52399. procedure TADC10_AD1CSSL.clearCSSL11; inline;
  52400. begin
  52401. pTDefRegMap(@Self)^.clr := $00000800;
  52402. end;
  52403. procedure TADC10_AD1CSSL.setCSSL11(thebits : TBits_1); inline;
  52404. begin
  52405. if thebits = 0 then
  52406. pTDefRegMap(@Self)^.clr := $00000800
  52407. else
  52408. pTDefRegMap(@Self)^.&set := $00000800;
  52409. end;
  52410. function TADC10_AD1CSSL.getCSSL11 : TBits_1; inline;
  52411. begin
  52412. getCSSL11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52413. end;
  52414. procedure TADC10_AD1CSSL.setCSSL12; inline;
  52415. begin
  52416. pTDefRegMap(@Self)^.&set := $00001000;
  52417. end;
  52418. procedure TADC10_AD1CSSL.clearCSSL12; inline;
  52419. begin
  52420. pTDefRegMap(@Self)^.clr := $00001000;
  52421. end;
  52422. procedure TADC10_AD1CSSL.setCSSL12(thebits : TBits_1); inline;
  52423. begin
  52424. if thebits = 0 then
  52425. pTDefRegMap(@Self)^.clr := $00001000
  52426. else
  52427. pTDefRegMap(@Self)^.&set := $00001000;
  52428. end;
  52429. function TADC10_AD1CSSL.getCSSL12 : TBits_1; inline;
  52430. begin
  52431. getCSSL12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52432. end;
  52433. procedure TADC10_AD1CSSL.setCSSL13; inline;
  52434. begin
  52435. pTDefRegMap(@Self)^.&set := $00002000;
  52436. end;
  52437. procedure TADC10_AD1CSSL.clearCSSL13; inline;
  52438. begin
  52439. pTDefRegMap(@Self)^.clr := $00002000;
  52440. end;
  52441. procedure TADC10_AD1CSSL.setCSSL13(thebits : TBits_1); inline;
  52442. begin
  52443. if thebits = 0 then
  52444. pTDefRegMap(@Self)^.clr := $00002000
  52445. else
  52446. pTDefRegMap(@Self)^.&set := $00002000;
  52447. end;
  52448. function TADC10_AD1CSSL.getCSSL13 : TBits_1; inline;
  52449. begin
  52450. getCSSL13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  52451. end;
  52452. procedure TADC10_AD1CSSL.setCSSL14; inline;
  52453. begin
  52454. pTDefRegMap(@Self)^.&set := $00004000;
  52455. end;
  52456. procedure TADC10_AD1CSSL.clearCSSL14; inline;
  52457. begin
  52458. pTDefRegMap(@Self)^.clr := $00004000;
  52459. end;
  52460. procedure TADC10_AD1CSSL.setCSSL14(thebits : TBits_1); inline;
  52461. begin
  52462. if thebits = 0 then
  52463. pTDefRegMap(@Self)^.clr := $00004000
  52464. else
  52465. pTDefRegMap(@Self)^.&set := $00004000;
  52466. end;
  52467. function TADC10_AD1CSSL.getCSSL14 : TBits_1; inline;
  52468. begin
  52469. getCSSL14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  52470. end;
  52471. procedure TADC10_AD1CSSL.setCSSL15; inline;
  52472. begin
  52473. pTDefRegMap(@Self)^.&set := $00008000;
  52474. end;
  52475. procedure TADC10_AD1CSSL.clearCSSL15; inline;
  52476. begin
  52477. pTDefRegMap(@Self)^.clr := $00008000;
  52478. end;
  52479. procedure TADC10_AD1CSSL.setCSSL15(thebits : TBits_1); inline;
  52480. begin
  52481. if thebits = 0 then
  52482. pTDefRegMap(@Self)^.clr := $00008000
  52483. else
  52484. pTDefRegMap(@Self)^.&set := $00008000;
  52485. end;
  52486. function TADC10_AD1CSSL.getCSSL15 : TBits_1; inline;
  52487. begin
  52488. getCSSL15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52489. end;
  52490. procedure TADC10_AD1CSSL.setw(thebits : TBits_32); inline;
  52491. begin
  52492. pTDefRegMap(@Self)^.val := thebits;
  52493. end;
  52494. function TADC10_AD1CSSL.getw : TBits_32; inline;
  52495. begin
  52496. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52497. end;
  52498. procedure TADC10_AD1PCFG.setPCFG(thebits : TBits_16); inline;
  52499. begin
  52500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  52501. end;
  52502. function TADC10_AD1PCFG.getPCFG : TBits_16; inline;
  52503. begin
  52504. getPCFG := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  52505. end;
  52506. procedure TADC10_AD1PCFG.setPCFG0; inline;
  52507. begin
  52508. pTDefRegMap(@Self)^.&set := $00000001;
  52509. end;
  52510. procedure TADC10_AD1PCFG.clearPCFG0; inline;
  52511. begin
  52512. pTDefRegMap(@Self)^.clr := $00000001;
  52513. end;
  52514. procedure TADC10_AD1PCFG.setPCFG0(thebits : TBits_1); inline;
  52515. begin
  52516. if thebits = 0 then
  52517. pTDefRegMap(@Self)^.clr := $00000001
  52518. else
  52519. pTDefRegMap(@Self)^.&set := $00000001;
  52520. end;
  52521. function TADC10_AD1PCFG.getPCFG0 : TBits_1; inline;
  52522. begin
  52523. getPCFG0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52524. end;
  52525. procedure TADC10_AD1PCFG.setPCFG1; inline;
  52526. begin
  52527. pTDefRegMap(@Self)^.&set := $00000002;
  52528. end;
  52529. procedure TADC10_AD1PCFG.clearPCFG1; inline;
  52530. begin
  52531. pTDefRegMap(@Self)^.clr := $00000002;
  52532. end;
  52533. procedure TADC10_AD1PCFG.setPCFG1(thebits : TBits_1); inline;
  52534. begin
  52535. if thebits = 0 then
  52536. pTDefRegMap(@Self)^.clr := $00000002
  52537. else
  52538. pTDefRegMap(@Self)^.&set := $00000002;
  52539. end;
  52540. function TADC10_AD1PCFG.getPCFG1 : TBits_1; inline;
  52541. begin
  52542. getPCFG1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52543. end;
  52544. procedure TADC10_AD1PCFG.setPCFG2; inline;
  52545. begin
  52546. pTDefRegMap(@Self)^.&set := $00000004;
  52547. end;
  52548. procedure TADC10_AD1PCFG.clearPCFG2; inline;
  52549. begin
  52550. pTDefRegMap(@Self)^.clr := $00000004;
  52551. end;
  52552. procedure TADC10_AD1PCFG.setPCFG2(thebits : TBits_1); inline;
  52553. begin
  52554. if thebits = 0 then
  52555. pTDefRegMap(@Self)^.clr := $00000004
  52556. else
  52557. pTDefRegMap(@Self)^.&set := $00000004;
  52558. end;
  52559. function TADC10_AD1PCFG.getPCFG2 : TBits_1; inline;
  52560. begin
  52561. getPCFG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52562. end;
  52563. procedure TADC10_AD1PCFG.setPCFG3; inline;
  52564. begin
  52565. pTDefRegMap(@Self)^.&set := $00000008;
  52566. end;
  52567. procedure TADC10_AD1PCFG.clearPCFG3; inline;
  52568. begin
  52569. pTDefRegMap(@Self)^.clr := $00000008;
  52570. end;
  52571. procedure TADC10_AD1PCFG.setPCFG3(thebits : TBits_1); inline;
  52572. begin
  52573. if thebits = 0 then
  52574. pTDefRegMap(@Self)^.clr := $00000008
  52575. else
  52576. pTDefRegMap(@Self)^.&set := $00000008;
  52577. end;
  52578. function TADC10_AD1PCFG.getPCFG3 : TBits_1; inline;
  52579. begin
  52580. getPCFG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52581. end;
  52582. procedure TADC10_AD1PCFG.setPCFG4; inline;
  52583. begin
  52584. pTDefRegMap(@Self)^.&set := $00000010;
  52585. end;
  52586. procedure TADC10_AD1PCFG.clearPCFG4; inline;
  52587. begin
  52588. pTDefRegMap(@Self)^.clr := $00000010;
  52589. end;
  52590. procedure TADC10_AD1PCFG.setPCFG4(thebits : TBits_1); inline;
  52591. begin
  52592. if thebits = 0 then
  52593. pTDefRegMap(@Self)^.clr := $00000010
  52594. else
  52595. pTDefRegMap(@Self)^.&set := $00000010;
  52596. end;
  52597. function TADC10_AD1PCFG.getPCFG4 : TBits_1; inline;
  52598. begin
  52599. getPCFG4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52600. end;
  52601. procedure TADC10_AD1PCFG.setPCFG5; inline;
  52602. begin
  52603. pTDefRegMap(@Self)^.&set := $00000020;
  52604. end;
  52605. procedure TADC10_AD1PCFG.clearPCFG5; inline;
  52606. begin
  52607. pTDefRegMap(@Self)^.clr := $00000020;
  52608. end;
  52609. procedure TADC10_AD1PCFG.setPCFG5(thebits : TBits_1); inline;
  52610. begin
  52611. if thebits = 0 then
  52612. pTDefRegMap(@Self)^.clr := $00000020
  52613. else
  52614. pTDefRegMap(@Self)^.&set := $00000020;
  52615. end;
  52616. function TADC10_AD1PCFG.getPCFG5 : TBits_1; inline;
  52617. begin
  52618. getPCFG5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52619. end;
  52620. procedure TADC10_AD1PCFG.setPCFG6; inline;
  52621. begin
  52622. pTDefRegMap(@Self)^.&set := $00000040;
  52623. end;
  52624. procedure TADC10_AD1PCFG.clearPCFG6; inline;
  52625. begin
  52626. pTDefRegMap(@Self)^.clr := $00000040;
  52627. end;
  52628. procedure TADC10_AD1PCFG.setPCFG6(thebits : TBits_1); inline;
  52629. begin
  52630. if thebits = 0 then
  52631. pTDefRegMap(@Self)^.clr := $00000040
  52632. else
  52633. pTDefRegMap(@Self)^.&set := $00000040;
  52634. end;
  52635. function TADC10_AD1PCFG.getPCFG6 : TBits_1; inline;
  52636. begin
  52637. getPCFG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52638. end;
  52639. procedure TADC10_AD1PCFG.setPCFG7; inline;
  52640. begin
  52641. pTDefRegMap(@Self)^.&set := $00000080;
  52642. end;
  52643. procedure TADC10_AD1PCFG.clearPCFG7; inline;
  52644. begin
  52645. pTDefRegMap(@Self)^.clr := $00000080;
  52646. end;
  52647. procedure TADC10_AD1PCFG.setPCFG7(thebits : TBits_1); inline;
  52648. begin
  52649. if thebits = 0 then
  52650. pTDefRegMap(@Self)^.clr := $00000080
  52651. else
  52652. pTDefRegMap(@Self)^.&set := $00000080;
  52653. end;
  52654. function TADC10_AD1PCFG.getPCFG7 : TBits_1; inline;
  52655. begin
  52656. getPCFG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  52657. end;
  52658. procedure TADC10_AD1PCFG.setPCFG8; inline;
  52659. begin
  52660. pTDefRegMap(@Self)^.&set := $00000100;
  52661. end;
  52662. procedure TADC10_AD1PCFG.clearPCFG8; inline;
  52663. begin
  52664. pTDefRegMap(@Self)^.clr := $00000100;
  52665. end;
  52666. procedure TADC10_AD1PCFG.setPCFG8(thebits : TBits_1); inline;
  52667. begin
  52668. if thebits = 0 then
  52669. pTDefRegMap(@Self)^.clr := $00000100
  52670. else
  52671. pTDefRegMap(@Self)^.&set := $00000100;
  52672. end;
  52673. function TADC10_AD1PCFG.getPCFG8 : TBits_1; inline;
  52674. begin
  52675. getPCFG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  52676. end;
  52677. procedure TADC10_AD1PCFG.setPCFG9; inline;
  52678. begin
  52679. pTDefRegMap(@Self)^.&set := $00000200;
  52680. end;
  52681. procedure TADC10_AD1PCFG.clearPCFG9; inline;
  52682. begin
  52683. pTDefRegMap(@Self)^.clr := $00000200;
  52684. end;
  52685. procedure TADC10_AD1PCFG.setPCFG9(thebits : TBits_1); inline;
  52686. begin
  52687. if thebits = 0 then
  52688. pTDefRegMap(@Self)^.clr := $00000200
  52689. else
  52690. pTDefRegMap(@Self)^.&set := $00000200;
  52691. end;
  52692. function TADC10_AD1PCFG.getPCFG9 : TBits_1; inline;
  52693. begin
  52694. getPCFG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  52695. end;
  52696. procedure TADC10_AD1PCFG.setPCFG10; inline;
  52697. begin
  52698. pTDefRegMap(@Self)^.&set := $00000400;
  52699. end;
  52700. procedure TADC10_AD1PCFG.clearPCFG10; inline;
  52701. begin
  52702. pTDefRegMap(@Self)^.clr := $00000400;
  52703. end;
  52704. procedure TADC10_AD1PCFG.setPCFG10(thebits : TBits_1); inline;
  52705. begin
  52706. if thebits = 0 then
  52707. pTDefRegMap(@Self)^.clr := $00000400
  52708. else
  52709. pTDefRegMap(@Self)^.&set := $00000400;
  52710. end;
  52711. function TADC10_AD1PCFG.getPCFG10 : TBits_1; inline;
  52712. begin
  52713. getPCFG10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  52714. end;
  52715. procedure TADC10_AD1PCFG.setPCFG11; inline;
  52716. begin
  52717. pTDefRegMap(@Self)^.&set := $00000800;
  52718. end;
  52719. procedure TADC10_AD1PCFG.clearPCFG11; inline;
  52720. begin
  52721. pTDefRegMap(@Self)^.clr := $00000800;
  52722. end;
  52723. procedure TADC10_AD1PCFG.setPCFG11(thebits : TBits_1); inline;
  52724. begin
  52725. if thebits = 0 then
  52726. pTDefRegMap(@Self)^.clr := $00000800
  52727. else
  52728. pTDefRegMap(@Self)^.&set := $00000800;
  52729. end;
  52730. function TADC10_AD1PCFG.getPCFG11 : TBits_1; inline;
  52731. begin
  52732. getPCFG11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  52733. end;
  52734. procedure TADC10_AD1PCFG.setPCFG12; inline;
  52735. begin
  52736. pTDefRegMap(@Self)^.&set := $00001000;
  52737. end;
  52738. procedure TADC10_AD1PCFG.clearPCFG12; inline;
  52739. begin
  52740. pTDefRegMap(@Self)^.clr := $00001000;
  52741. end;
  52742. procedure TADC10_AD1PCFG.setPCFG12(thebits : TBits_1); inline;
  52743. begin
  52744. if thebits = 0 then
  52745. pTDefRegMap(@Self)^.clr := $00001000
  52746. else
  52747. pTDefRegMap(@Self)^.&set := $00001000;
  52748. end;
  52749. function TADC10_AD1PCFG.getPCFG12 : TBits_1; inline;
  52750. begin
  52751. getPCFG12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  52752. end;
  52753. procedure TADC10_AD1PCFG.setPCFG13; inline;
  52754. begin
  52755. pTDefRegMap(@Self)^.&set := $00002000;
  52756. end;
  52757. procedure TADC10_AD1PCFG.clearPCFG13; inline;
  52758. begin
  52759. pTDefRegMap(@Self)^.clr := $00002000;
  52760. end;
  52761. procedure TADC10_AD1PCFG.setPCFG13(thebits : TBits_1); inline;
  52762. begin
  52763. if thebits = 0 then
  52764. pTDefRegMap(@Self)^.clr := $00002000
  52765. else
  52766. pTDefRegMap(@Self)^.&set := $00002000;
  52767. end;
  52768. function TADC10_AD1PCFG.getPCFG13 : TBits_1; inline;
  52769. begin
  52770. getPCFG13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  52771. end;
  52772. procedure TADC10_AD1PCFG.setPCFG14; inline;
  52773. begin
  52774. pTDefRegMap(@Self)^.&set := $00004000;
  52775. end;
  52776. procedure TADC10_AD1PCFG.clearPCFG14; inline;
  52777. begin
  52778. pTDefRegMap(@Self)^.clr := $00004000;
  52779. end;
  52780. procedure TADC10_AD1PCFG.setPCFG14(thebits : TBits_1); inline;
  52781. begin
  52782. if thebits = 0 then
  52783. pTDefRegMap(@Self)^.clr := $00004000
  52784. else
  52785. pTDefRegMap(@Self)^.&set := $00004000;
  52786. end;
  52787. function TADC10_AD1PCFG.getPCFG14 : TBits_1; inline;
  52788. begin
  52789. getPCFG14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  52790. end;
  52791. procedure TADC10_AD1PCFG.setPCFG15; inline;
  52792. begin
  52793. pTDefRegMap(@Self)^.&set := $00008000;
  52794. end;
  52795. procedure TADC10_AD1PCFG.clearPCFG15; inline;
  52796. begin
  52797. pTDefRegMap(@Self)^.clr := $00008000;
  52798. end;
  52799. procedure TADC10_AD1PCFG.setPCFG15(thebits : TBits_1); inline;
  52800. begin
  52801. if thebits = 0 then
  52802. pTDefRegMap(@Self)^.clr := $00008000
  52803. else
  52804. pTDefRegMap(@Self)^.&set := $00008000;
  52805. end;
  52806. function TADC10_AD1PCFG.getPCFG15 : TBits_1; inline;
  52807. begin
  52808. getPCFG15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52809. end;
  52810. procedure TADC10_AD1PCFG.setw(thebits : TBits_32); inline;
  52811. begin
  52812. pTDefRegMap(@Self)^.val := thebits;
  52813. end;
  52814. function TADC10_AD1PCFG.getw : TBits_32; inline;
  52815. begin
  52816. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52817. end;
  52818. procedure TCVR_CVRCON.setCVR(thebits : TBits_4); inline;
  52819. begin
  52820. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  52821. end;
  52822. function TCVR_CVRCON.getCVR : TBits_4; inline;
  52823. begin
  52824. getCVR := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  52825. end;
  52826. procedure TCVR_CVRCON.setCVRSS; inline;
  52827. begin
  52828. pTDefRegMap(@Self)^.&set := $00000010;
  52829. end;
  52830. procedure TCVR_CVRCON.clearCVRSS; inline;
  52831. begin
  52832. pTDefRegMap(@Self)^.clr := $00000010;
  52833. end;
  52834. procedure TCVR_CVRCON.setCVRSS(thebits : TBits_1); inline;
  52835. begin
  52836. if thebits = 0 then
  52837. pTDefRegMap(@Self)^.clr := $00000010
  52838. else
  52839. pTDefRegMap(@Self)^.&set := $00000010;
  52840. end;
  52841. function TCVR_CVRCON.getCVRSS : TBits_1; inline;
  52842. begin
  52843. getCVRSS := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  52844. end;
  52845. procedure TCVR_CVRCON.setCVRR; inline;
  52846. begin
  52847. pTDefRegMap(@Self)^.&set := $00000020;
  52848. end;
  52849. procedure TCVR_CVRCON.clearCVRR; inline;
  52850. begin
  52851. pTDefRegMap(@Self)^.clr := $00000020;
  52852. end;
  52853. procedure TCVR_CVRCON.setCVRR(thebits : TBits_1); inline;
  52854. begin
  52855. if thebits = 0 then
  52856. pTDefRegMap(@Self)^.clr := $00000020
  52857. else
  52858. pTDefRegMap(@Self)^.&set := $00000020;
  52859. end;
  52860. function TCVR_CVRCON.getCVRR : TBits_1; inline;
  52861. begin
  52862. getCVRR := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  52863. end;
  52864. procedure TCVR_CVRCON.setCVROE; inline;
  52865. begin
  52866. pTDefRegMap(@Self)^.&set := $00000040;
  52867. end;
  52868. procedure TCVR_CVRCON.clearCVROE; inline;
  52869. begin
  52870. pTDefRegMap(@Self)^.clr := $00000040;
  52871. end;
  52872. procedure TCVR_CVRCON.setCVROE(thebits : TBits_1); inline;
  52873. begin
  52874. if thebits = 0 then
  52875. pTDefRegMap(@Self)^.clr := $00000040
  52876. else
  52877. pTDefRegMap(@Self)^.&set := $00000040;
  52878. end;
  52879. function TCVR_CVRCON.getCVROE : TBits_1; inline;
  52880. begin
  52881. getCVROE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  52882. end;
  52883. procedure TCVR_CVRCON.setON; inline;
  52884. begin
  52885. pTDefRegMap(@Self)^.&set := $00008000;
  52886. end;
  52887. procedure TCVR_CVRCON.clearON; inline;
  52888. begin
  52889. pTDefRegMap(@Self)^.clr := $00008000;
  52890. end;
  52891. procedure TCVR_CVRCON.setON(thebits : TBits_1); inline;
  52892. begin
  52893. if thebits = 0 then
  52894. pTDefRegMap(@Self)^.clr := $00008000
  52895. else
  52896. pTDefRegMap(@Self)^.&set := $00008000;
  52897. end;
  52898. function TCVR_CVRCON.getON : TBits_1; inline;
  52899. begin
  52900. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  52901. end;
  52902. procedure TCVR_CVRCON.setCVR0; inline;
  52903. begin
  52904. pTDefRegMap(@Self)^.&set := $00000001;
  52905. end;
  52906. procedure TCVR_CVRCON.clearCVR0; inline;
  52907. begin
  52908. pTDefRegMap(@Self)^.clr := $00000001;
  52909. end;
  52910. procedure TCVR_CVRCON.setCVR0(thebits : TBits_1); inline;
  52911. begin
  52912. if thebits = 0 then
  52913. pTDefRegMap(@Self)^.clr := $00000001
  52914. else
  52915. pTDefRegMap(@Self)^.&set := $00000001;
  52916. end;
  52917. function TCVR_CVRCON.getCVR0 : TBits_1; inline;
  52918. begin
  52919. getCVR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  52920. end;
  52921. procedure TCVR_CVRCON.setCVR1; inline;
  52922. begin
  52923. pTDefRegMap(@Self)^.&set := $00000002;
  52924. end;
  52925. procedure TCVR_CVRCON.clearCVR1; inline;
  52926. begin
  52927. pTDefRegMap(@Self)^.clr := $00000002;
  52928. end;
  52929. procedure TCVR_CVRCON.setCVR1(thebits : TBits_1); inline;
  52930. begin
  52931. if thebits = 0 then
  52932. pTDefRegMap(@Self)^.clr := $00000002
  52933. else
  52934. pTDefRegMap(@Self)^.&set := $00000002;
  52935. end;
  52936. function TCVR_CVRCON.getCVR1 : TBits_1; inline;
  52937. begin
  52938. getCVR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  52939. end;
  52940. procedure TCVR_CVRCON.setCVR2; inline;
  52941. begin
  52942. pTDefRegMap(@Self)^.&set := $00000004;
  52943. end;
  52944. procedure TCVR_CVRCON.clearCVR2; inline;
  52945. begin
  52946. pTDefRegMap(@Self)^.clr := $00000004;
  52947. end;
  52948. procedure TCVR_CVRCON.setCVR2(thebits : TBits_1); inline;
  52949. begin
  52950. if thebits = 0 then
  52951. pTDefRegMap(@Self)^.clr := $00000004
  52952. else
  52953. pTDefRegMap(@Self)^.&set := $00000004;
  52954. end;
  52955. function TCVR_CVRCON.getCVR2 : TBits_1; inline;
  52956. begin
  52957. getCVR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  52958. end;
  52959. procedure TCVR_CVRCON.setCVR3; inline;
  52960. begin
  52961. pTDefRegMap(@Self)^.&set := $00000008;
  52962. end;
  52963. procedure TCVR_CVRCON.clearCVR3; inline;
  52964. begin
  52965. pTDefRegMap(@Self)^.clr := $00000008;
  52966. end;
  52967. procedure TCVR_CVRCON.setCVR3(thebits : TBits_1); inline;
  52968. begin
  52969. if thebits = 0 then
  52970. pTDefRegMap(@Self)^.clr := $00000008
  52971. else
  52972. pTDefRegMap(@Self)^.&set := $00000008;
  52973. end;
  52974. function TCVR_CVRCON.getCVR3 : TBits_1; inline;
  52975. begin
  52976. getCVR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  52977. end;
  52978. procedure TCVR_CVRCON.setw(thebits : TBits_32); inline;
  52979. begin
  52980. pTDefRegMap(@Self)^.val := thebits;
  52981. end;
  52982. function TCVR_CVRCON.getw : TBits_32; inline;
  52983. begin
  52984. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  52985. end;
  52986. procedure TCMP_CM1CON.setCCH(thebits : TBits_2); inline;
  52987. begin
  52988. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  52989. end;
  52990. function TCMP_CM1CON.getCCH : TBits_2; inline;
  52991. begin
  52992. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  52993. end;
  52994. procedure TCMP_CM1CON.setCREF; inline;
  52995. begin
  52996. pTDefRegMap(@Self)^.&set := $00000010;
  52997. end;
  52998. procedure TCMP_CM1CON.clearCREF; inline;
  52999. begin
  53000. pTDefRegMap(@Self)^.clr := $00000010;
  53001. end;
  53002. procedure TCMP_CM1CON.setCREF(thebits : TBits_1); inline;
  53003. begin
  53004. if thebits = 0 then
  53005. pTDefRegMap(@Self)^.clr := $00000010
  53006. else
  53007. pTDefRegMap(@Self)^.&set := $00000010;
  53008. end;
  53009. function TCMP_CM1CON.getCREF : TBits_1; inline;
  53010. begin
  53011. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53012. end;
  53013. procedure TCMP_CM1CON.setEVPOL(thebits : TBits_2); inline;
  53014. begin
  53015. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  53016. end;
  53017. function TCMP_CM1CON.getEVPOL : TBits_2; inline;
  53018. begin
  53019. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  53020. end;
  53021. procedure TCMP_CM1CON.setCOUT; inline;
  53022. begin
  53023. pTDefRegMap(@Self)^.&set := $00000100;
  53024. end;
  53025. procedure TCMP_CM1CON.clearCOUT; inline;
  53026. begin
  53027. pTDefRegMap(@Self)^.clr := $00000100;
  53028. end;
  53029. procedure TCMP_CM1CON.setCOUT(thebits : TBits_1); inline;
  53030. begin
  53031. if thebits = 0 then
  53032. pTDefRegMap(@Self)^.clr := $00000100
  53033. else
  53034. pTDefRegMap(@Self)^.&set := $00000100;
  53035. end;
  53036. function TCMP_CM1CON.getCOUT : TBits_1; inline;
  53037. begin
  53038. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53039. end;
  53040. procedure TCMP_CM1CON.setCPOL; inline;
  53041. begin
  53042. pTDefRegMap(@Self)^.&set := $00002000;
  53043. end;
  53044. procedure TCMP_CM1CON.clearCPOL; inline;
  53045. begin
  53046. pTDefRegMap(@Self)^.clr := $00002000;
  53047. end;
  53048. procedure TCMP_CM1CON.setCPOL(thebits : TBits_1); inline;
  53049. begin
  53050. if thebits = 0 then
  53051. pTDefRegMap(@Self)^.clr := $00002000
  53052. else
  53053. pTDefRegMap(@Self)^.&set := $00002000;
  53054. end;
  53055. function TCMP_CM1CON.getCPOL : TBits_1; inline;
  53056. begin
  53057. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53058. end;
  53059. procedure TCMP_CM1CON.setCOE; inline;
  53060. begin
  53061. pTDefRegMap(@Self)^.&set := $00004000;
  53062. end;
  53063. procedure TCMP_CM1CON.clearCOE; inline;
  53064. begin
  53065. pTDefRegMap(@Self)^.clr := $00004000;
  53066. end;
  53067. procedure TCMP_CM1CON.setCOE(thebits : TBits_1); inline;
  53068. begin
  53069. if thebits = 0 then
  53070. pTDefRegMap(@Self)^.clr := $00004000
  53071. else
  53072. pTDefRegMap(@Self)^.&set := $00004000;
  53073. end;
  53074. function TCMP_CM1CON.getCOE : TBits_1; inline;
  53075. begin
  53076. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  53077. end;
  53078. procedure TCMP_CM1CON.setON; inline;
  53079. begin
  53080. pTDefRegMap(@Self)^.&set := $00008000;
  53081. end;
  53082. procedure TCMP_CM1CON.clearON; inline;
  53083. begin
  53084. pTDefRegMap(@Self)^.clr := $00008000;
  53085. end;
  53086. procedure TCMP_CM1CON.setON(thebits : TBits_1); inline;
  53087. begin
  53088. if thebits = 0 then
  53089. pTDefRegMap(@Self)^.clr := $00008000
  53090. else
  53091. pTDefRegMap(@Self)^.&set := $00008000;
  53092. end;
  53093. function TCMP_CM1CON.getON : TBits_1; inline;
  53094. begin
  53095. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53096. end;
  53097. procedure TCMP_CM1CON.setCCH0; inline;
  53098. begin
  53099. pTDefRegMap(@Self)^.&set := $00000001;
  53100. end;
  53101. procedure TCMP_CM1CON.clearCCH0; inline;
  53102. begin
  53103. pTDefRegMap(@Self)^.clr := $00000001;
  53104. end;
  53105. procedure TCMP_CM1CON.setCCH0(thebits : TBits_1); inline;
  53106. begin
  53107. if thebits = 0 then
  53108. pTDefRegMap(@Self)^.clr := $00000001
  53109. else
  53110. pTDefRegMap(@Self)^.&set := $00000001;
  53111. end;
  53112. function TCMP_CM1CON.getCCH0 : TBits_1; inline;
  53113. begin
  53114. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53115. end;
  53116. procedure TCMP_CM1CON.setCCH1; inline;
  53117. begin
  53118. pTDefRegMap(@Self)^.&set := $00000002;
  53119. end;
  53120. procedure TCMP_CM1CON.clearCCH1; inline;
  53121. begin
  53122. pTDefRegMap(@Self)^.clr := $00000002;
  53123. end;
  53124. procedure TCMP_CM1CON.setCCH1(thebits : TBits_1); inline;
  53125. begin
  53126. if thebits = 0 then
  53127. pTDefRegMap(@Self)^.clr := $00000002
  53128. else
  53129. pTDefRegMap(@Self)^.&set := $00000002;
  53130. end;
  53131. function TCMP_CM1CON.getCCH1 : TBits_1; inline;
  53132. begin
  53133. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53134. end;
  53135. procedure TCMP_CM1CON.setEVPOL0; inline;
  53136. begin
  53137. pTDefRegMap(@Self)^.&set := $00000040;
  53138. end;
  53139. procedure TCMP_CM1CON.clearEVPOL0; inline;
  53140. begin
  53141. pTDefRegMap(@Self)^.clr := $00000040;
  53142. end;
  53143. procedure TCMP_CM1CON.setEVPOL0(thebits : TBits_1); inline;
  53144. begin
  53145. if thebits = 0 then
  53146. pTDefRegMap(@Self)^.clr := $00000040
  53147. else
  53148. pTDefRegMap(@Self)^.&set := $00000040;
  53149. end;
  53150. function TCMP_CM1CON.getEVPOL0 : TBits_1; inline;
  53151. begin
  53152. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53153. end;
  53154. procedure TCMP_CM1CON.setEVPOL1; inline;
  53155. begin
  53156. pTDefRegMap(@Self)^.&set := $00000080;
  53157. end;
  53158. procedure TCMP_CM1CON.clearEVPOL1; inline;
  53159. begin
  53160. pTDefRegMap(@Self)^.clr := $00000080;
  53161. end;
  53162. procedure TCMP_CM1CON.setEVPOL1(thebits : TBits_1); inline;
  53163. begin
  53164. if thebits = 0 then
  53165. pTDefRegMap(@Self)^.clr := $00000080
  53166. else
  53167. pTDefRegMap(@Self)^.&set := $00000080;
  53168. end;
  53169. function TCMP_CM1CON.getEVPOL1 : TBits_1; inline;
  53170. begin
  53171. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53172. end;
  53173. procedure TCMP_CM1CON.setw(thebits : TBits_32); inline;
  53174. begin
  53175. pTDefRegMap(@Self)^.val := thebits;
  53176. end;
  53177. function TCMP_CM1CON.getw : TBits_32; inline;
  53178. begin
  53179. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53180. end;
  53181. procedure TCMP_CM2CON.setCCH(thebits : TBits_2); inline;
  53182. begin
  53183. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  53184. end;
  53185. function TCMP_CM2CON.getCCH : TBits_2; inline;
  53186. begin
  53187. getCCH := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  53188. end;
  53189. procedure TCMP_CM2CON.setCREF; inline;
  53190. begin
  53191. pTDefRegMap(@Self)^.&set := $00000010;
  53192. end;
  53193. procedure TCMP_CM2CON.clearCREF; inline;
  53194. begin
  53195. pTDefRegMap(@Self)^.clr := $00000010;
  53196. end;
  53197. procedure TCMP_CM2CON.setCREF(thebits : TBits_1); inline;
  53198. begin
  53199. if thebits = 0 then
  53200. pTDefRegMap(@Self)^.clr := $00000010
  53201. else
  53202. pTDefRegMap(@Self)^.&set := $00000010;
  53203. end;
  53204. function TCMP_CM2CON.getCREF : TBits_1; inline;
  53205. begin
  53206. getCREF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53207. end;
  53208. procedure TCMP_CM2CON.setEVPOL(thebits : TBits_2); inline;
  53209. begin
  53210. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  53211. end;
  53212. function TCMP_CM2CON.getEVPOL : TBits_2; inline;
  53213. begin
  53214. getEVPOL := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  53215. end;
  53216. procedure TCMP_CM2CON.setCOUT; inline;
  53217. begin
  53218. pTDefRegMap(@Self)^.&set := $00000100;
  53219. end;
  53220. procedure TCMP_CM2CON.clearCOUT; inline;
  53221. begin
  53222. pTDefRegMap(@Self)^.clr := $00000100;
  53223. end;
  53224. procedure TCMP_CM2CON.setCOUT(thebits : TBits_1); inline;
  53225. begin
  53226. if thebits = 0 then
  53227. pTDefRegMap(@Self)^.clr := $00000100
  53228. else
  53229. pTDefRegMap(@Self)^.&set := $00000100;
  53230. end;
  53231. function TCMP_CM2CON.getCOUT : TBits_1; inline;
  53232. begin
  53233. getCOUT := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53234. end;
  53235. procedure TCMP_CM2CON.setCPOL; inline;
  53236. begin
  53237. pTDefRegMap(@Self)^.&set := $00002000;
  53238. end;
  53239. procedure TCMP_CM2CON.clearCPOL; inline;
  53240. begin
  53241. pTDefRegMap(@Self)^.clr := $00002000;
  53242. end;
  53243. procedure TCMP_CM2CON.setCPOL(thebits : TBits_1); inline;
  53244. begin
  53245. if thebits = 0 then
  53246. pTDefRegMap(@Self)^.clr := $00002000
  53247. else
  53248. pTDefRegMap(@Self)^.&set := $00002000;
  53249. end;
  53250. function TCMP_CM2CON.getCPOL : TBits_1; inline;
  53251. begin
  53252. getCPOL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53253. end;
  53254. procedure TCMP_CM2CON.setCOE; inline;
  53255. begin
  53256. pTDefRegMap(@Self)^.&set := $00004000;
  53257. end;
  53258. procedure TCMP_CM2CON.clearCOE; inline;
  53259. begin
  53260. pTDefRegMap(@Self)^.clr := $00004000;
  53261. end;
  53262. procedure TCMP_CM2CON.setCOE(thebits : TBits_1); inline;
  53263. begin
  53264. if thebits = 0 then
  53265. pTDefRegMap(@Self)^.clr := $00004000
  53266. else
  53267. pTDefRegMap(@Self)^.&set := $00004000;
  53268. end;
  53269. function TCMP_CM2CON.getCOE : TBits_1; inline;
  53270. begin
  53271. getCOE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  53272. end;
  53273. procedure TCMP_CM2CON.setON; inline;
  53274. begin
  53275. pTDefRegMap(@Self)^.&set := $00008000;
  53276. end;
  53277. procedure TCMP_CM2CON.clearON; inline;
  53278. begin
  53279. pTDefRegMap(@Self)^.clr := $00008000;
  53280. end;
  53281. procedure TCMP_CM2CON.setON(thebits : TBits_1); inline;
  53282. begin
  53283. if thebits = 0 then
  53284. pTDefRegMap(@Self)^.clr := $00008000
  53285. else
  53286. pTDefRegMap(@Self)^.&set := $00008000;
  53287. end;
  53288. function TCMP_CM2CON.getON : TBits_1; inline;
  53289. begin
  53290. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  53291. end;
  53292. procedure TCMP_CM2CON.setCCH0; inline;
  53293. begin
  53294. pTDefRegMap(@Self)^.&set := $00000001;
  53295. end;
  53296. procedure TCMP_CM2CON.clearCCH0; inline;
  53297. begin
  53298. pTDefRegMap(@Self)^.clr := $00000001;
  53299. end;
  53300. procedure TCMP_CM2CON.setCCH0(thebits : TBits_1); inline;
  53301. begin
  53302. if thebits = 0 then
  53303. pTDefRegMap(@Self)^.clr := $00000001
  53304. else
  53305. pTDefRegMap(@Self)^.&set := $00000001;
  53306. end;
  53307. function TCMP_CM2CON.getCCH0 : TBits_1; inline;
  53308. begin
  53309. getCCH0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53310. end;
  53311. procedure TCMP_CM2CON.setCCH1; inline;
  53312. begin
  53313. pTDefRegMap(@Self)^.&set := $00000002;
  53314. end;
  53315. procedure TCMP_CM2CON.clearCCH1; inline;
  53316. begin
  53317. pTDefRegMap(@Self)^.clr := $00000002;
  53318. end;
  53319. procedure TCMP_CM2CON.setCCH1(thebits : TBits_1); inline;
  53320. begin
  53321. if thebits = 0 then
  53322. pTDefRegMap(@Self)^.clr := $00000002
  53323. else
  53324. pTDefRegMap(@Self)^.&set := $00000002;
  53325. end;
  53326. function TCMP_CM2CON.getCCH1 : TBits_1; inline;
  53327. begin
  53328. getCCH1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53329. end;
  53330. procedure TCMP_CM2CON.setEVPOL0; inline;
  53331. begin
  53332. pTDefRegMap(@Self)^.&set := $00000040;
  53333. end;
  53334. procedure TCMP_CM2CON.clearEVPOL0; inline;
  53335. begin
  53336. pTDefRegMap(@Self)^.clr := $00000040;
  53337. end;
  53338. procedure TCMP_CM2CON.setEVPOL0(thebits : TBits_1); inline;
  53339. begin
  53340. if thebits = 0 then
  53341. pTDefRegMap(@Self)^.clr := $00000040
  53342. else
  53343. pTDefRegMap(@Self)^.&set := $00000040;
  53344. end;
  53345. function TCMP_CM2CON.getEVPOL0 : TBits_1; inline;
  53346. begin
  53347. getEVPOL0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53348. end;
  53349. procedure TCMP_CM2CON.setEVPOL1; inline;
  53350. begin
  53351. pTDefRegMap(@Self)^.&set := $00000080;
  53352. end;
  53353. procedure TCMP_CM2CON.clearEVPOL1; inline;
  53354. begin
  53355. pTDefRegMap(@Self)^.clr := $00000080;
  53356. end;
  53357. procedure TCMP_CM2CON.setEVPOL1(thebits : TBits_1); inline;
  53358. begin
  53359. if thebits = 0 then
  53360. pTDefRegMap(@Self)^.clr := $00000080
  53361. else
  53362. pTDefRegMap(@Self)^.&set := $00000080;
  53363. end;
  53364. function TCMP_CM2CON.getEVPOL1 : TBits_1; inline;
  53365. begin
  53366. getEVPOL1 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53367. end;
  53368. procedure TCMP_CM2CON.setw(thebits : TBits_32); inline;
  53369. begin
  53370. pTDefRegMap(@Self)^.val := thebits;
  53371. end;
  53372. function TCMP_CM2CON.getw : TBits_32; inline;
  53373. begin
  53374. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53375. end;
  53376. procedure TCMP_CMSTAT.setC1OUT; inline;
  53377. begin
  53378. pTDefRegMap(@Self)^.&set := $00000001;
  53379. end;
  53380. procedure TCMP_CMSTAT.clearC1OUT; inline;
  53381. begin
  53382. pTDefRegMap(@Self)^.clr := $00000001;
  53383. end;
  53384. procedure TCMP_CMSTAT.setC1OUT(thebits : TBits_1); inline;
  53385. begin
  53386. if thebits = 0 then
  53387. pTDefRegMap(@Self)^.clr := $00000001
  53388. else
  53389. pTDefRegMap(@Self)^.&set := $00000001;
  53390. end;
  53391. function TCMP_CMSTAT.getC1OUT : TBits_1; inline;
  53392. begin
  53393. getC1OUT := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53394. end;
  53395. procedure TCMP_CMSTAT.setC2OUT; inline;
  53396. begin
  53397. pTDefRegMap(@Self)^.&set := $00000002;
  53398. end;
  53399. procedure TCMP_CMSTAT.clearC2OUT; inline;
  53400. begin
  53401. pTDefRegMap(@Self)^.clr := $00000002;
  53402. end;
  53403. procedure TCMP_CMSTAT.setC2OUT(thebits : TBits_1); inline;
  53404. begin
  53405. if thebits = 0 then
  53406. pTDefRegMap(@Self)^.clr := $00000002
  53407. else
  53408. pTDefRegMap(@Self)^.&set := $00000002;
  53409. end;
  53410. function TCMP_CMSTAT.getC2OUT : TBits_1; inline;
  53411. begin
  53412. getC2OUT := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53413. end;
  53414. procedure TCMP_CMSTAT.setSIDL; inline;
  53415. begin
  53416. pTDefRegMap(@Self)^.&set := $00002000;
  53417. end;
  53418. procedure TCMP_CMSTAT.clearSIDL; inline;
  53419. begin
  53420. pTDefRegMap(@Self)^.clr := $00002000;
  53421. end;
  53422. procedure TCMP_CMSTAT.setSIDL(thebits : TBits_1); inline;
  53423. begin
  53424. if thebits = 0 then
  53425. pTDefRegMap(@Self)^.clr := $00002000
  53426. else
  53427. pTDefRegMap(@Self)^.&set := $00002000;
  53428. end;
  53429. function TCMP_CMSTAT.getSIDL : TBits_1; inline;
  53430. begin
  53431. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53432. end;
  53433. procedure TCMP_CMSTAT.setw(thebits : TBits_32); inline;
  53434. begin
  53435. pTDefRegMap(@Self)^.val := thebits;
  53436. end;
  53437. function TCMP_CMSTAT.getw : TBits_32; inline;
  53438. begin
  53439. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53440. end;
  53441. procedure TOSC_OSCCON.setOSWEN; inline;
  53442. begin
  53443. pTDefRegMap(@Self)^.&set := $00000001;
  53444. end;
  53445. procedure TOSC_OSCCON.clearOSWEN; inline;
  53446. begin
  53447. pTDefRegMap(@Self)^.clr := $00000001;
  53448. end;
  53449. procedure TOSC_OSCCON.setOSWEN(thebits : TBits_1); inline;
  53450. begin
  53451. if thebits = 0 then
  53452. pTDefRegMap(@Self)^.clr := $00000001
  53453. else
  53454. pTDefRegMap(@Self)^.&set := $00000001;
  53455. end;
  53456. function TOSC_OSCCON.getOSWEN : TBits_1; inline;
  53457. begin
  53458. getOSWEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  53459. end;
  53460. procedure TOSC_OSCCON.setSOSCEN; inline;
  53461. begin
  53462. pTDefRegMap(@Self)^.&set := $00000002;
  53463. end;
  53464. procedure TOSC_OSCCON.clearSOSCEN; inline;
  53465. begin
  53466. pTDefRegMap(@Self)^.clr := $00000002;
  53467. end;
  53468. procedure TOSC_OSCCON.setSOSCEN(thebits : TBits_1); inline;
  53469. begin
  53470. if thebits = 0 then
  53471. pTDefRegMap(@Self)^.clr := $00000002
  53472. else
  53473. pTDefRegMap(@Self)^.&set := $00000002;
  53474. end;
  53475. function TOSC_OSCCON.getSOSCEN : TBits_1; inline;
  53476. begin
  53477. getSOSCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  53478. end;
  53479. procedure TOSC_OSCCON.setUFRCEN; inline;
  53480. begin
  53481. pTDefRegMap(@Self)^.&set := $00000004;
  53482. end;
  53483. procedure TOSC_OSCCON.clearUFRCEN; inline;
  53484. begin
  53485. pTDefRegMap(@Self)^.clr := $00000004;
  53486. end;
  53487. procedure TOSC_OSCCON.setUFRCEN(thebits : TBits_1); inline;
  53488. begin
  53489. if thebits = 0 then
  53490. pTDefRegMap(@Self)^.clr := $00000004
  53491. else
  53492. pTDefRegMap(@Self)^.&set := $00000004;
  53493. end;
  53494. function TOSC_OSCCON.getUFRCEN : TBits_1; inline;
  53495. begin
  53496. getUFRCEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  53497. end;
  53498. procedure TOSC_OSCCON.setCF; inline;
  53499. begin
  53500. pTDefRegMap(@Self)^.&set := $00000008;
  53501. end;
  53502. procedure TOSC_OSCCON.clearCF; inline;
  53503. begin
  53504. pTDefRegMap(@Self)^.clr := $00000008;
  53505. end;
  53506. procedure TOSC_OSCCON.setCF(thebits : TBits_1); inline;
  53507. begin
  53508. if thebits = 0 then
  53509. pTDefRegMap(@Self)^.clr := $00000008
  53510. else
  53511. pTDefRegMap(@Self)^.&set := $00000008;
  53512. end;
  53513. function TOSC_OSCCON.getCF : TBits_1; inline;
  53514. begin
  53515. getCF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  53516. end;
  53517. procedure TOSC_OSCCON.setSLPEN; inline;
  53518. begin
  53519. pTDefRegMap(@Self)^.&set := $00000010;
  53520. end;
  53521. procedure TOSC_OSCCON.clearSLPEN; inline;
  53522. begin
  53523. pTDefRegMap(@Self)^.clr := $00000010;
  53524. end;
  53525. procedure TOSC_OSCCON.setSLPEN(thebits : TBits_1); inline;
  53526. begin
  53527. if thebits = 0 then
  53528. pTDefRegMap(@Self)^.clr := $00000010
  53529. else
  53530. pTDefRegMap(@Self)^.&set := $00000010;
  53531. end;
  53532. function TOSC_OSCCON.getSLPEN : TBits_1; inline;
  53533. begin
  53534. getSLPEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  53535. end;
  53536. procedure TOSC_OSCCON.setSLOCK; inline;
  53537. begin
  53538. pTDefRegMap(@Self)^.&set := $00000020;
  53539. end;
  53540. procedure TOSC_OSCCON.clearSLOCK; inline;
  53541. begin
  53542. pTDefRegMap(@Self)^.clr := $00000020;
  53543. end;
  53544. procedure TOSC_OSCCON.setSLOCK(thebits : TBits_1); inline;
  53545. begin
  53546. if thebits = 0 then
  53547. pTDefRegMap(@Self)^.clr := $00000020
  53548. else
  53549. pTDefRegMap(@Self)^.&set := $00000020;
  53550. end;
  53551. function TOSC_OSCCON.getSLOCK : TBits_1; inline;
  53552. begin
  53553. getSLOCK := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  53554. end;
  53555. procedure TOSC_OSCCON.setULOCK; inline;
  53556. begin
  53557. pTDefRegMap(@Self)^.&set := $00000040;
  53558. end;
  53559. procedure TOSC_OSCCON.clearULOCK; inline;
  53560. begin
  53561. pTDefRegMap(@Self)^.clr := $00000040;
  53562. end;
  53563. procedure TOSC_OSCCON.setULOCK(thebits : TBits_1); inline;
  53564. begin
  53565. if thebits = 0 then
  53566. pTDefRegMap(@Self)^.clr := $00000040
  53567. else
  53568. pTDefRegMap(@Self)^.&set := $00000040;
  53569. end;
  53570. function TOSC_OSCCON.getULOCK : TBits_1; inline;
  53571. begin
  53572. getULOCK := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  53573. end;
  53574. procedure TOSC_OSCCON.setCLKLOCK; inline;
  53575. begin
  53576. pTDefRegMap(@Self)^.&set := $00000080;
  53577. end;
  53578. procedure TOSC_OSCCON.clearCLKLOCK; inline;
  53579. begin
  53580. pTDefRegMap(@Self)^.clr := $00000080;
  53581. end;
  53582. procedure TOSC_OSCCON.setCLKLOCK(thebits : TBits_1); inline;
  53583. begin
  53584. if thebits = 0 then
  53585. pTDefRegMap(@Self)^.clr := $00000080
  53586. else
  53587. pTDefRegMap(@Self)^.&set := $00000080;
  53588. end;
  53589. function TOSC_OSCCON.getCLKLOCK : TBits_1; inline;
  53590. begin
  53591. getCLKLOCK := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  53592. end;
  53593. procedure TOSC_OSCCON.setNOSC(thebits : TBits_3); inline;
  53594. begin
  53595. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  53596. end;
  53597. function TOSC_OSCCON.getNOSC : TBits_3; inline;
  53598. begin
  53599. getNOSC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  53600. end;
  53601. procedure TOSC_OSCCON.setCOSC(thebits : TBits_3); inline;
  53602. begin
  53603. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF8FFF or ( thebits shl 12 );
  53604. end;
  53605. function TOSC_OSCCON.getCOSC : TBits_3; inline;
  53606. begin
  53607. getCOSC := (pTDefRegMap(@Self)^.val and $00007000) shr 12;
  53608. end;
  53609. procedure TOSC_OSCCON.setPLLMULT(thebits : TBits_3); inline;
  53610. begin
  53611. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  53612. end;
  53613. function TOSC_OSCCON.getPLLMULT : TBits_3; inline;
  53614. begin
  53615. getPLLMULT := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  53616. end;
  53617. procedure TOSC_OSCCON.setPBDIV(thebits : TBits_2); inline;
  53618. begin
  53619. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE7FFFF or ( thebits shl 19 );
  53620. end;
  53621. function TOSC_OSCCON.getPBDIV : TBits_2; inline;
  53622. begin
  53623. getPBDIV := (pTDefRegMap(@Self)^.val and $00180000) shr 19;
  53624. end;
  53625. procedure TOSC_OSCCON.setSOSCRDY; inline;
  53626. begin
  53627. pTDefRegMap(@Self)^.&set := $00400000;
  53628. end;
  53629. procedure TOSC_OSCCON.clearSOSCRDY; inline;
  53630. begin
  53631. pTDefRegMap(@Self)^.clr := $00400000;
  53632. end;
  53633. procedure TOSC_OSCCON.setSOSCRDY(thebits : TBits_1); inline;
  53634. begin
  53635. if thebits = 0 then
  53636. pTDefRegMap(@Self)^.clr := $00400000
  53637. else
  53638. pTDefRegMap(@Self)^.&set := $00400000;
  53639. end;
  53640. function TOSC_OSCCON.getSOSCRDY : TBits_1; inline;
  53641. begin
  53642. getSOSCRDY := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  53643. end;
  53644. procedure TOSC_OSCCON.setFRCDIV(thebits : TBits_3); inline;
  53645. begin
  53646. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  53647. end;
  53648. function TOSC_OSCCON.getFRCDIV : TBits_3; inline;
  53649. begin
  53650. getFRCDIV := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  53651. end;
  53652. procedure TOSC_OSCCON.setPLLODIV(thebits : TBits_3); inline;
  53653. begin
  53654. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $C7FFFFFF or ( thebits shl 27 );
  53655. end;
  53656. function TOSC_OSCCON.getPLLODIV : TBits_3; inline;
  53657. begin
  53658. getPLLODIV := (pTDefRegMap(@Self)^.val and $38000000) shr 27;
  53659. end;
  53660. procedure TOSC_OSCCON.setNOSC0; inline;
  53661. begin
  53662. pTDefRegMap(@Self)^.&set := $00000100;
  53663. end;
  53664. procedure TOSC_OSCCON.clearNOSC0; inline;
  53665. begin
  53666. pTDefRegMap(@Self)^.clr := $00000100;
  53667. end;
  53668. procedure TOSC_OSCCON.setNOSC0(thebits : TBits_1); inline;
  53669. begin
  53670. if thebits = 0 then
  53671. pTDefRegMap(@Self)^.clr := $00000100
  53672. else
  53673. pTDefRegMap(@Self)^.&set := $00000100;
  53674. end;
  53675. function TOSC_OSCCON.getNOSC0 : TBits_1; inline;
  53676. begin
  53677. getNOSC0 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  53678. end;
  53679. procedure TOSC_OSCCON.setNOSC1; inline;
  53680. begin
  53681. pTDefRegMap(@Self)^.&set := $00000200;
  53682. end;
  53683. procedure TOSC_OSCCON.clearNOSC1; inline;
  53684. begin
  53685. pTDefRegMap(@Self)^.clr := $00000200;
  53686. end;
  53687. procedure TOSC_OSCCON.setNOSC1(thebits : TBits_1); inline;
  53688. begin
  53689. if thebits = 0 then
  53690. pTDefRegMap(@Self)^.clr := $00000200
  53691. else
  53692. pTDefRegMap(@Self)^.&set := $00000200;
  53693. end;
  53694. function TOSC_OSCCON.getNOSC1 : TBits_1; inline;
  53695. begin
  53696. getNOSC1 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  53697. end;
  53698. procedure TOSC_OSCCON.setNOSC2; inline;
  53699. begin
  53700. pTDefRegMap(@Self)^.&set := $00000400;
  53701. end;
  53702. procedure TOSC_OSCCON.clearNOSC2; inline;
  53703. begin
  53704. pTDefRegMap(@Self)^.clr := $00000400;
  53705. end;
  53706. procedure TOSC_OSCCON.setNOSC2(thebits : TBits_1); inline;
  53707. begin
  53708. if thebits = 0 then
  53709. pTDefRegMap(@Self)^.clr := $00000400
  53710. else
  53711. pTDefRegMap(@Self)^.&set := $00000400;
  53712. end;
  53713. function TOSC_OSCCON.getNOSC2 : TBits_1; inline;
  53714. begin
  53715. getNOSC2 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  53716. end;
  53717. procedure TOSC_OSCCON.setCOSC0; inline;
  53718. begin
  53719. pTDefRegMap(@Self)^.&set := $00001000;
  53720. end;
  53721. procedure TOSC_OSCCON.clearCOSC0; inline;
  53722. begin
  53723. pTDefRegMap(@Self)^.clr := $00001000;
  53724. end;
  53725. procedure TOSC_OSCCON.setCOSC0(thebits : TBits_1); inline;
  53726. begin
  53727. if thebits = 0 then
  53728. pTDefRegMap(@Self)^.clr := $00001000
  53729. else
  53730. pTDefRegMap(@Self)^.&set := $00001000;
  53731. end;
  53732. function TOSC_OSCCON.getCOSC0 : TBits_1; inline;
  53733. begin
  53734. getCOSC0 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  53735. end;
  53736. procedure TOSC_OSCCON.setCOSC1; inline;
  53737. begin
  53738. pTDefRegMap(@Self)^.&set := $00002000;
  53739. end;
  53740. procedure TOSC_OSCCON.clearCOSC1; inline;
  53741. begin
  53742. pTDefRegMap(@Self)^.clr := $00002000;
  53743. end;
  53744. procedure TOSC_OSCCON.setCOSC1(thebits : TBits_1); inline;
  53745. begin
  53746. if thebits = 0 then
  53747. pTDefRegMap(@Self)^.clr := $00002000
  53748. else
  53749. pTDefRegMap(@Self)^.&set := $00002000;
  53750. end;
  53751. function TOSC_OSCCON.getCOSC1 : TBits_1; inline;
  53752. begin
  53753. getCOSC1 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  53754. end;
  53755. procedure TOSC_OSCCON.setCOSC2; inline;
  53756. begin
  53757. pTDefRegMap(@Self)^.&set := $00004000;
  53758. end;
  53759. procedure TOSC_OSCCON.clearCOSC2; inline;
  53760. begin
  53761. pTDefRegMap(@Self)^.clr := $00004000;
  53762. end;
  53763. procedure TOSC_OSCCON.setCOSC2(thebits : TBits_1); inline;
  53764. begin
  53765. if thebits = 0 then
  53766. pTDefRegMap(@Self)^.clr := $00004000
  53767. else
  53768. pTDefRegMap(@Self)^.&set := $00004000;
  53769. end;
  53770. function TOSC_OSCCON.getCOSC2 : TBits_1; inline;
  53771. begin
  53772. getCOSC2 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  53773. end;
  53774. procedure TOSC_OSCCON.setPLLMULT0; inline;
  53775. begin
  53776. pTDefRegMap(@Self)^.&set := $00010000;
  53777. end;
  53778. procedure TOSC_OSCCON.clearPLLMULT0; inline;
  53779. begin
  53780. pTDefRegMap(@Self)^.clr := $00010000;
  53781. end;
  53782. procedure TOSC_OSCCON.setPLLMULT0(thebits : TBits_1); inline;
  53783. begin
  53784. if thebits = 0 then
  53785. pTDefRegMap(@Self)^.clr := $00010000
  53786. else
  53787. pTDefRegMap(@Self)^.&set := $00010000;
  53788. end;
  53789. function TOSC_OSCCON.getPLLMULT0 : TBits_1; inline;
  53790. begin
  53791. getPLLMULT0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  53792. end;
  53793. procedure TOSC_OSCCON.setPLLMULT1; inline;
  53794. begin
  53795. pTDefRegMap(@Self)^.&set := $00020000;
  53796. end;
  53797. procedure TOSC_OSCCON.clearPLLMULT1; inline;
  53798. begin
  53799. pTDefRegMap(@Self)^.clr := $00020000;
  53800. end;
  53801. procedure TOSC_OSCCON.setPLLMULT1(thebits : TBits_1); inline;
  53802. begin
  53803. if thebits = 0 then
  53804. pTDefRegMap(@Self)^.clr := $00020000
  53805. else
  53806. pTDefRegMap(@Self)^.&set := $00020000;
  53807. end;
  53808. function TOSC_OSCCON.getPLLMULT1 : TBits_1; inline;
  53809. begin
  53810. getPLLMULT1 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  53811. end;
  53812. procedure TOSC_OSCCON.setPLLMULT2; inline;
  53813. begin
  53814. pTDefRegMap(@Self)^.&set := $00040000;
  53815. end;
  53816. procedure TOSC_OSCCON.clearPLLMULT2; inline;
  53817. begin
  53818. pTDefRegMap(@Self)^.clr := $00040000;
  53819. end;
  53820. procedure TOSC_OSCCON.setPLLMULT2(thebits : TBits_1); inline;
  53821. begin
  53822. if thebits = 0 then
  53823. pTDefRegMap(@Self)^.clr := $00040000
  53824. else
  53825. pTDefRegMap(@Self)^.&set := $00040000;
  53826. end;
  53827. function TOSC_OSCCON.getPLLMULT2 : TBits_1; inline;
  53828. begin
  53829. getPLLMULT2 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  53830. end;
  53831. procedure TOSC_OSCCON.setPBDIV0; inline;
  53832. begin
  53833. pTDefRegMap(@Self)^.&set := $00080000;
  53834. end;
  53835. procedure TOSC_OSCCON.clearPBDIV0; inline;
  53836. begin
  53837. pTDefRegMap(@Self)^.clr := $00080000;
  53838. end;
  53839. procedure TOSC_OSCCON.setPBDIV0(thebits : TBits_1); inline;
  53840. begin
  53841. if thebits = 0 then
  53842. pTDefRegMap(@Self)^.clr := $00080000
  53843. else
  53844. pTDefRegMap(@Self)^.&set := $00080000;
  53845. end;
  53846. function TOSC_OSCCON.getPBDIV0 : TBits_1; inline;
  53847. begin
  53848. getPBDIV0 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  53849. end;
  53850. procedure TOSC_OSCCON.setPBDIV1; inline;
  53851. begin
  53852. pTDefRegMap(@Self)^.&set := $00100000;
  53853. end;
  53854. procedure TOSC_OSCCON.clearPBDIV1; inline;
  53855. begin
  53856. pTDefRegMap(@Self)^.clr := $00100000;
  53857. end;
  53858. procedure TOSC_OSCCON.setPBDIV1(thebits : TBits_1); inline;
  53859. begin
  53860. if thebits = 0 then
  53861. pTDefRegMap(@Self)^.clr := $00100000
  53862. else
  53863. pTDefRegMap(@Self)^.&set := $00100000;
  53864. end;
  53865. function TOSC_OSCCON.getPBDIV1 : TBits_1; inline;
  53866. begin
  53867. getPBDIV1 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  53868. end;
  53869. procedure TOSC_OSCCON.setFRCDIV0; inline;
  53870. begin
  53871. pTDefRegMap(@Self)^.&set := $01000000;
  53872. end;
  53873. procedure TOSC_OSCCON.clearFRCDIV0; inline;
  53874. begin
  53875. pTDefRegMap(@Self)^.clr := $01000000;
  53876. end;
  53877. procedure TOSC_OSCCON.setFRCDIV0(thebits : TBits_1); inline;
  53878. begin
  53879. if thebits = 0 then
  53880. pTDefRegMap(@Self)^.clr := $01000000
  53881. else
  53882. pTDefRegMap(@Self)^.&set := $01000000;
  53883. end;
  53884. function TOSC_OSCCON.getFRCDIV0 : TBits_1; inline;
  53885. begin
  53886. getFRCDIV0 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  53887. end;
  53888. procedure TOSC_OSCCON.setFRCDIV1; inline;
  53889. begin
  53890. pTDefRegMap(@Self)^.&set := $02000000;
  53891. end;
  53892. procedure TOSC_OSCCON.clearFRCDIV1; inline;
  53893. begin
  53894. pTDefRegMap(@Self)^.clr := $02000000;
  53895. end;
  53896. procedure TOSC_OSCCON.setFRCDIV1(thebits : TBits_1); inline;
  53897. begin
  53898. if thebits = 0 then
  53899. pTDefRegMap(@Self)^.clr := $02000000
  53900. else
  53901. pTDefRegMap(@Self)^.&set := $02000000;
  53902. end;
  53903. function TOSC_OSCCON.getFRCDIV1 : TBits_1; inline;
  53904. begin
  53905. getFRCDIV1 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  53906. end;
  53907. procedure TOSC_OSCCON.setFRCDIV2; inline;
  53908. begin
  53909. pTDefRegMap(@Self)^.&set := $04000000;
  53910. end;
  53911. procedure TOSC_OSCCON.clearFRCDIV2; inline;
  53912. begin
  53913. pTDefRegMap(@Self)^.clr := $04000000;
  53914. end;
  53915. procedure TOSC_OSCCON.setFRCDIV2(thebits : TBits_1); inline;
  53916. begin
  53917. if thebits = 0 then
  53918. pTDefRegMap(@Self)^.clr := $04000000
  53919. else
  53920. pTDefRegMap(@Self)^.&set := $04000000;
  53921. end;
  53922. function TOSC_OSCCON.getFRCDIV2 : TBits_1; inline;
  53923. begin
  53924. getFRCDIV2 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  53925. end;
  53926. procedure TOSC_OSCCON.setPLLODIV0; inline;
  53927. begin
  53928. pTDefRegMap(@Self)^.&set := $08000000;
  53929. end;
  53930. procedure TOSC_OSCCON.clearPLLODIV0; inline;
  53931. begin
  53932. pTDefRegMap(@Self)^.clr := $08000000;
  53933. end;
  53934. procedure TOSC_OSCCON.setPLLODIV0(thebits : TBits_1); inline;
  53935. begin
  53936. if thebits = 0 then
  53937. pTDefRegMap(@Self)^.clr := $08000000
  53938. else
  53939. pTDefRegMap(@Self)^.&set := $08000000;
  53940. end;
  53941. function TOSC_OSCCON.getPLLODIV0 : TBits_1; inline;
  53942. begin
  53943. getPLLODIV0 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  53944. end;
  53945. procedure TOSC_OSCCON.setPLLODIV1; inline;
  53946. begin
  53947. pTDefRegMap(@Self)^.&set := $10000000;
  53948. end;
  53949. procedure TOSC_OSCCON.clearPLLODIV1; inline;
  53950. begin
  53951. pTDefRegMap(@Self)^.clr := $10000000;
  53952. end;
  53953. procedure TOSC_OSCCON.setPLLODIV1(thebits : TBits_1); inline;
  53954. begin
  53955. if thebits = 0 then
  53956. pTDefRegMap(@Self)^.clr := $10000000
  53957. else
  53958. pTDefRegMap(@Self)^.&set := $10000000;
  53959. end;
  53960. function TOSC_OSCCON.getPLLODIV1 : TBits_1; inline;
  53961. begin
  53962. getPLLODIV1 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  53963. end;
  53964. procedure TOSC_OSCCON.setPLLODIV2; inline;
  53965. begin
  53966. pTDefRegMap(@Self)^.&set := $20000000;
  53967. end;
  53968. procedure TOSC_OSCCON.clearPLLODIV2; inline;
  53969. begin
  53970. pTDefRegMap(@Self)^.clr := $20000000;
  53971. end;
  53972. procedure TOSC_OSCCON.setPLLODIV2(thebits : TBits_1); inline;
  53973. begin
  53974. if thebits = 0 then
  53975. pTDefRegMap(@Self)^.clr := $20000000
  53976. else
  53977. pTDefRegMap(@Self)^.&set := $20000000;
  53978. end;
  53979. function TOSC_OSCCON.getPLLODIV2 : TBits_1; inline;
  53980. begin
  53981. getPLLODIV2 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  53982. end;
  53983. procedure TOSC_OSCCON.setw(thebits : TBits_32); inline;
  53984. begin
  53985. pTDefRegMap(@Self)^.val := thebits;
  53986. end;
  53987. function TOSC_OSCCON.getw : TBits_32; inline;
  53988. begin
  53989. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  53990. end;
  53991. procedure TOSC_OSCTUN.setTUN(thebits : TBits_6); inline;
  53992. begin
  53993. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  53994. end;
  53995. function TOSC_OSCTUN.getTUN : TBits_6; inline;
  53996. begin
  53997. getTUN := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  53998. end;
  53999. procedure TOSC_OSCTUN.setTUN0; inline;
  54000. begin
  54001. pTDefRegMap(@Self)^.&set := $00000001;
  54002. end;
  54003. procedure TOSC_OSCTUN.clearTUN0; inline;
  54004. begin
  54005. pTDefRegMap(@Self)^.clr := $00000001;
  54006. end;
  54007. procedure TOSC_OSCTUN.setTUN0(thebits : TBits_1); inline;
  54008. begin
  54009. if thebits = 0 then
  54010. pTDefRegMap(@Self)^.clr := $00000001
  54011. else
  54012. pTDefRegMap(@Self)^.&set := $00000001;
  54013. end;
  54014. function TOSC_OSCTUN.getTUN0 : TBits_1; inline;
  54015. begin
  54016. getTUN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54017. end;
  54018. procedure TOSC_OSCTUN.setTUN1; inline;
  54019. begin
  54020. pTDefRegMap(@Self)^.&set := $00000002;
  54021. end;
  54022. procedure TOSC_OSCTUN.clearTUN1; inline;
  54023. begin
  54024. pTDefRegMap(@Self)^.clr := $00000002;
  54025. end;
  54026. procedure TOSC_OSCTUN.setTUN1(thebits : TBits_1); inline;
  54027. begin
  54028. if thebits = 0 then
  54029. pTDefRegMap(@Self)^.clr := $00000002
  54030. else
  54031. pTDefRegMap(@Self)^.&set := $00000002;
  54032. end;
  54033. function TOSC_OSCTUN.getTUN1 : TBits_1; inline;
  54034. begin
  54035. getTUN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54036. end;
  54037. procedure TOSC_OSCTUN.setTUN2; inline;
  54038. begin
  54039. pTDefRegMap(@Self)^.&set := $00000004;
  54040. end;
  54041. procedure TOSC_OSCTUN.clearTUN2; inline;
  54042. begin
  54043. pTDefRegMap(@Self)^.clr := $00000004;
  54044. end;
  54045. procedure TOSC_OSCTUN.setTUN2(thebits : TBits_1); inline;
  54046. begin
  54047. if thebits = 0 then
  54048. pTDefRegMap(@Self)^.clr := $00000004
  54049. else
  54050. pTDefRegMap(@Self)^.&set := $00000004;
  54051. end;
  54052. function TOSC_OSCTUN.getTUN2 : TBits_1; inline;
  54053. begin
  54054. getTUN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54055. end;
  54056. procedure TOSC_OSCTUN.setTUN3; inline;
  54057. begin
  54058. pTDefRegMap(@Self)^.&set := $00000008;
  54059. end;
  54060. procedure TOSC_OSCTUN.clearTUN3; inline;
  54061. begin
  54062. pTDefRegMap(@Self)^.clr := $00000008;
  54063. end;
  54064. procedure TOSC_OSCTUN.setTUN3(thebits : TBits_1); inline;
  54065. begin
  54066. if thebits = 0 then
  54067. pTDefRegMap(@Self)^.clr := $00000008
  54068. else
  54069. pTDefRegMap(@Self)^.&set := $00000008;
  54070. end;
  54071. function TOSC_OSCTUN.getTUN3 : TBits_1; inline;
  54072. begin
  54073. getTUN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54074. end;
  54075. procedure TOSC_OSCTUN.setTUN4; inline;
  54076. begin
  54077. pTDefRegMap(@Self)^.&set := $00000010;
  54078. end;
  54079. procedure TOSC_OSCTUN.clearTUN4; inline;
  54080. begin
  54081. pTDefRegMap(@Self)^.clr := $00000010;
  54082. end;
  54083. procedure TOSC_OSCTUN.setTUN4(thebits : TBits_1); inline;
  54084. begin
  54085. if thebits = 0 then
  54086. pTDefRegMap(@Self)^.clr := $00000010
  54087. else
  54088. pTDefRegMap(@Self)^.&set := $00000010;
  54089. end;
  54090. function TOSC_OSCTUN.getTUN4 : TBits_1; inline;
  54091. begin
  54092. getTUN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54093. end;
  54094. procedure TOSC_OSCTUN.setTUN5; inline;
  54095. begin
  54096. pTDefRegMap(@Self)^.&set := $00000020;
  54097. end;
  54098. procedure TOSC_OSCTUN.clearTUN5; inline;
  54099. begin
  54100. pTDefRegMap(@Self)^.clr := $00000020;
  54101. end;
  54102. procedure TOSC_OSCTUN.setTUN5(thebits : TBits_1); inline;
  54103. begin
  54104. if thebits = 0 then
  54105. pTDefRegMap(@Self)^.clr := $00000020
  54106. else
  54107. pTDefRegMap(@Self)^.&set := $00000020;
  54108. end;
  54109. function TOSC_OSCTUN.getTUN5 : TBits_1; inline;
  54110. begin
  54111. getTUN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54112. end;
  54113. procedure TOSC_OSCTUN.setw(thebits : TBits_32); inline;
  54114. begin
  54115. pTDefRegMap(@Self)^.val := thebits;
  54116. end;
  54117. function TOSC_OSCTUN.getw : TBits_32; inline;
  54118. begin
  54119. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54120. end;
  54121. procedure TNVM_NVMCON.setNVMOP(thebits : TBits_4); inline;
  54122. begin
  54123. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  54124. end;
  54125. function TNVM_NVMCON.getNVMOP : TBits_4; inline;
  54126. begin
  54127. getNVMOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  54128. end;
  54129. procedure TNVM_NVMCON.setLVDSTAT; inline;
  54130. begin
  54131. pTDefRegMap(@Self)^.&set := $00000800;
  54132. end;
  54133. procedure TNVM_NVMCON.clearLVDSTAT; inline;
  54134. begin
  54135. pTDefRegMap(@Self)^.clr := $00000800;
  54136. end;
  54137. procedure TNVM_NVMCON.setLVDSTAT(thebits : TBits_1); inline;
  54138. begin
  54139. if thebits = 0 then
  54140. pTDefRegMap(@Self)^.clr := $00000800
  54141. else
  54142. pTDefRegMap(@Self)^.&set := $00000800;
  54143. end;
  54144. function TNVM_NVMCON.getLVDSTAT : TBits_1; inline;
  54145. begin
  54146. getLVDSTAT := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  54147. end;
  54148. procedure TNVM_NVMCON.setLVDERR; inline;
  54149. begin
  54150. pTDefRegMap(@Self)^.&set := $00001000;
  54151. end;
  54152. procedure TNVM_NVMCON.clearLVDERR; inline;
  54153. begin
  54154. pTDefRegMap(@Self)^.clr := $00001000;
  54155. end;
  54156. procedure TNVM_NVMCON.setLVDERR(thebits : TBits_1); inline;
  54157. begin
  54158. if thebits = 0 then
  54159. pTDefRegMap(@Self)^.clr := $00001000
  54160. else
  54161. pTDefRegMap(@Self)^.&set := $00001000;
  54162. end;
  54163. function TNVM_NVMCON.getLVDERR : TBits_1; inline;
  54164. begin
  54165. getLVDERR := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  54166. end;
  54167. procedure TNVM_NVMCON.setWRERR; inline;
  54168. begin
  54169. pTDefRegMap(@Self)^.&set := $00002000;
  54170. end;
  54171. procedure TNVM_NVMCON.clearWRERR; inline;
  54172. begin
  54173. pTDefRegMap(@Self)^.clr := $00002000;
  54174. end;
  54175. procedure TNVM_NVMCON.setWRERR(thebits : TBits_1); inline;
  54176. begin
  54177. if thebits = 0 then
  54178. pTDefRegMap(@Self)^.clr := $00002000
  54179. else
  54180. pTDefRegMap(@Self)^.&set := $00002000;
  54181. end;
  54182. function TNVM_NVMCON.getWRERR : TBits_1; inline;
  54183. begin
  54184. getWRERR := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  54185. end;
  54186. procedure TNVM_NVMCON.setWREN; inline;
  54187. begin
  54188. pTDefRegMap(@Self)^.&set := $00004000;
  54189. end;
  54190. procedure TNVM_NVMCON.clearWREN; inline;
  54191. begin
  54192. pTDefRegMap(@Self)^.clr := $00004000;
  54193. end;
  54194. procedure TNVM_NVMCON.setWREN(thebits : TBits_1); inline;
  54195. begin
  54196. if thebits = 0 then
  54197. pTDefRegMap(@Self)^.clr := $00004000
  54198. else
  54199. pTDefRegMap(@Self)^.&set := $00004000;
  54200. end;
  54201. function TNVM_NVMCON.getWREN : TBits_1; inline;
  54202. begin
  54203. getWREN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  54204. end;
  54205. procedure TNVM_NVMCON.setWR; inline;
  54206. begin
  54207. pTDefRegMap(@Self)^.&set := $00008000;
  54208. end;
  54209. procedure TNVM_NVMCON.clearWR; inline;
  54210. begin
  54211. pTDefRegMap(@Self)^.clr := $00008000;
  54212. end;
  54213. procedure TNVM_NVMCON.setWR(thebits : TBits_1); inline;
  54214. begin
  54215. if thebits = 0 then
  54216. pTDefRegMap(@Self)^.clr := $00008000
  54217. else
  54218. pTDefRegMap(@Self)^.&set := $00008000;
  54219. end;
  54220. function TNVM_NVMCON.getWR : TBits_1; inline;
  54221. begin
  54222. getWR := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  54223. end;
  54224. procedure TNVM_NVMCON.setNVMOP0; inline;
  54225. begin
  54226. pTDefRegMap(@Self)^.&set := $00000001;
  54227. end;
  54228. procedure TNVM_NVMCON.clearNVMOP0; inline;
  54229. begin
  54230. pTDefRegMap(@Self)^.clr := $00000001;
  54231. end;
  54232. procedure TNVM_NVMCON.setNVMOP0(thebits : TBits_1); inline;
  54233. begin
  54234. if thebits = 0 then
  54235. pTDefRegMap(@Self)^.clr := $00000001
  54236. else
  54237. pTDefRegMap(@Self)^.&set := $00000001;
  54238. end;
  54239. function TNVM_NVMCON.getNVMOP0 : TBits_1; inline;
  54240. begin
  54241. getNVMOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54242. end;
  54243. procedure TNVM_NVMCON.setNVMOP1; inline;
  54244. begin
  54245. pTDefRegMap(@Self)^.&set := $00000002;
  54246. end;
  54247. procedure TNVM_NVMCON.clearNVMOP1; inline;
  54248. begin
  54249. pTDefRegMap(@Self)^.clr := $00000002;
  54250. end;
  54251. procedure TNVM_NVMCON.setNVMOP1(thebits : TBits_1); inline;
  54252. begin
  54253. if thebits = 0 then
  54254. pTDefRegMap(@Self)^.clr := $00000002
  54255. else
  54256. pTDefRegMap(@Self)^.&set := $00000002;
  54257. end;
  54258. function TNVM_NVMCON.getNVMOP1 : TBits_1; inline;
  54259. begin
  54260. getNVMOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54261. end;
  54262. procedure TNVM_NVMCON.setNVMOP2; inline;
  54263. begin
  54264. pTDefRegMap(@Self)^.&set := $00000004;
  54265. end;
  54266. procedure TNVM_NVMCON.clearNVMOP2; inline;
  54267. begin
  54268. pTDefRegMap(@Self)^.clr := $00000004;
  54269. end;
  54270. procedure TNVM_NVMCON.setNVMOP2(thebits : TBits_1); inline;
  54271. begin
  54272. if thebits = 0 then
  54273. pTDefRegMap(@Self)^.clr := $00000004
  54274. else
  54275. pTDefRegMap(@Self)^.&set := $00000004;
  54276. end;
  54277. function TNVM_NVMCON.getNVMOP2 : TBits_1; inline;
  54278. begin
  54279. getNVMOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54280. end;
  54281. procedure TNVM_NVMCON.setNVMOP3; inline;
  54282. begin
  54283. pTDefRegMap(@Self)^.&set := $00000008;
  54284. end;
  54285. procedure TNVM_NVMCON.clearNVMOP3; inline;
  54286. begin
  54287. pTDefRegMap(@Self)^.clr := $00000008;
  54288. end;
  54289. procedure TNVM_NVMCON.setNVMOP3(thebits : TBits_1); inline;
  54290. begin
  54291. if thebits = 0 then
  54292. pTDefRegMap(@Self)^.clr := $00000008
  54293. else
  54294. pTDefRegMap(@Self)^.&set := $00000008;
  54295. end;
  54296. function TNVM_NVMCON.getNVMOP3 : TBits_1; inline;
  54297. begin
  54298. getNVMOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54299. end;
  54300. procedure TNVM_NVMCON.setPROGOP(thebits : TBits_4); inline;
  54301. begin
  54302. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  54303. end;
  54304. function TNVM_NVMCON.getPROGOP : TBits_4; inline;
  54305. begin
  54306. getPROGOP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  54307. end;
  54308. procedure TNVM_NVMCON.setPROGOP0; inline;
  54309. begin
  54310. pTDefRegMap(@Self)^.&set := $00000001;
  54311. end;
  54312. procedure TNVM_NVMCON.clearPROGOP0; inline;
  54313. begin
  54314. pTDefRegMap(@Self)^.clr := $00000001;
  54315. end;
  54316. procedure TNVM_NVMCON.setPROGOP0(thebits : TBits_1); inline;
  54317. begin
  54318. if thebits = 0 then
  54319. pTDefRegMap(@Self)^.clr := $00000001
  54320. else
  54321. pTDefRegMap(@Self)^.&set := $00000001;
  54322. end;
  54323. function TNVM_NVMCON.getPROGOP0 : TBits_1; inline;
  54324. begin
  54325. getPROGOP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54326. end;
  54327. procedure TNVM_NVMCON.setPROGOP1; inline;
  54328. begin
  54329. pTDefRegMap(@Self)^.&set := $00000002;
  54330. end;
  54331. procedure TNVM_NVMCON.clearPROGOP1; inline;
  54332. begin
  54333. pTDefRegMap(@Self)^.clr := $00000002;
  54334. end;
  54335. procedure TNVM_NVMCON.setPROGOP1(thebits : TBits_1); inline;
  54336. begin
  54337. if thebits = 0 then
  54338. pTDefRegMap(@Self)^.clr := $00000002
  54339. else
  54340. pTDefRegMap(@Self)^.&set := $00000002;
  54341. end;
  54342. function TNVM_NVMCON.getPROGOP1 : TBits_1; inline;
  54343. begin
  54344. getPROGOP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54345. end;
  54346. procedure TNVM_NVMCON.setPROGOP2; inline;
  54347. begin
  54348. pTDefRegMap(@Self)^.&set := $00000004;
  54349. end;
  54350. procedure TNVM_NVMCON.clearPROGOP2; inline;
  54351. begin
  54352. pTDefRegMap(@Self)^.clr := $00000004;
  54353. end;
  54354. procedure TNVM_NVMCON.setPROGOP2(thebits : TBits_1); inline;
  54355. begin
  54356. if thebits = 0 then
  54357. pTDefRegMap(@Self)^.clr := $00000004
  54358. else
  54359. pTDefRegMap(@Self)^.&set := $00000004;
  54360. end;
  54361. function TNVM_NVMCON.getPROGOP2 : TBits_1; inline;
  54362. begin
  54363. getPROGOP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54364. end;
  54365. procedure TNVM_NVMCON.setPROGOP3; inline;
  54366. begin
  54367. pTDefRegMap(@Self)^.&set := $00000008;
  54368. end;
  54369. procedure TNVM_NVMCON.clearPROGOP3; inline;
  54370. begin
  54371. pTDefRegMap(@Self)^.clr := $00000008;
  54372. end;
  54373. procedure TNVM_NVMCON.setPROGOP3(thebits : TBits_1); inline;
  54374. begin
  54375. if thebits = 0 then
  54376. pTDefRegMap(@Self)^.clr := $00000008
  54377. else
  54378. pTDefRegMap(@Self)^.&set := $00000008;
  54379. end;
  54380. function TNVM_NVMCON.getPROGOP3 : TBits_1; inline;
  54381. begin
  54382. getPROGOP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54383. end;
  54384. procedure TNVM_NVMCON.setw(thebits : TBits_32); inline;
  54385. begin
  54386. pTDefRegMap(@Self)^.val := thebits;
  54387. end;
  54388. function TNVM_NVMCON.getw : TBits_32; inline;
  54389. begin
  54390. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54391. end;
  54392. procedure TRCON_RCON.setPOR; inline;
  54393. begin
  54394. pTDefRegMap(@Self)^.&set := $00000001;
  54395. end;
  54396. procedure TRCON_RCON.clearPOR; inline;
  54397. begin
  54398. pTDefRegMap(@Self)^.clr := $00000001;
  54399. end;
  54400. procedure TRCON_RCON.setPOR(thebits : TBits_1); inline;
  54401. begin
  54402. if thebits = 0 then
  54403. pTDefRegMap(@Self)^.clr := $00000001
  54404. else
  54405. pTDefRegMap(@Self)^.&set := $00000001;
  54406. end;
  54407. function TRCON_RCON.getPOR : TBits_1; inline;
  54408. begin
  54409. getPOR := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54410. end;
  54411. procedure TRCON_RCON.setBOR; inline;
  54412. begin
  54413. pTDefRegMap(@Self)^.&set := $00000002;
  54414. end;
  54415. procedure TRCON_RCON.clearBOR; inline;
  54416. begin
  54417. pTDefRegMap(@Self)^.clr := $00000002;
  54418. end;
  54419. procedure TRCON_RCON.setBOR(thebits : TBits_1); inline;
  54420. begin
  54421. if thebits = 0 then
  54422. pTDefRegMap(@Self)^.clr := $00000002
  54423. else
  54424. pTDefRegMap(@Self)^.&set := $00000002;
  54425. end;
  54426. function TRCON_RCON.getBOR : TBits_1; inline;
  54427. begin
  54428. getBOR := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54429. end;
  54430. procedure TRCON_RCON.setIDLE; inline;
  54431. begin
  54432. pTDefRegMap(@Self)^.&set := $00000004;
  54433. end;
  54434. procedure TRCON_RCON.clearIDLE; inline;
  54435. begin
  54436. pTDefRegMap(@Self)^.clr := $00000004;
  54437. end;
  54438. procedure TRCON_RCON.setIDLE(thebits : TBits_1); inline;
  54439. begin
  54440. if thebits = 0 then
  54441. pTDefRegMap(@Self)^.clr := $00000004
  54442. else
  54443. pTDefRegMap(@Self)^.&set := $00000004;
  54444. end;
  54445. function TRCON_RCON.getIDLE : TBits_1; inline;
  54446. begin
  54447. getIDLE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54448. end;
  54449. procedure TRCON_RCON.setSLEEP; inline;
  54450. begin
  54451. pTDefRegMap(@Self)^.&set := $00000008;
  54452. end;
  54453. procedure TRCON_RCON.clearSLEEP; inline;
  54454. begin
  54455. pTDefRegMap(@Self)^.clr := $00000008;
  54456. end;
  54457. procedure TRCON_RCON.setSLEEP(thebits : TBits_1); inline;
  54458. begin
  54459. if thebits = 0 then
  54460. pTDefRegMap(@Self)^.clr := $00000008
  54461. else
  54462. pTDefRegMap(@Self)^.&set := $00000008;
  54463. end;
  54464. function TRCON_RCON.getSLEEP : TBits_1; inline;
  54465. begin
  54466. getSLEEP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54467. end;
  54468. procedure TRCON_RCON.setWDTO; inline;
  54469. begin
  54470. pTDefRegMap(@Self)^.&set := $00000010;
  54471. end;
  54472. procedure TRCON_RCON.clearWDTO; inline;
  54473. begin
  54474. pTDefRegMap(@Self)^.clr := $00000010;
  54475. end;
  54476. procedure TRCON_RCON.setWDTO(thebits : TBits_1); inline;
  54477. begin
  54478. if thebits = 0 then
  54479. pTDefRegMap(@Self)^.clr := $00000010
  54480. else
  54481. pTDefRegMap(@Self)^.&set := $00000010;
  54482. end;
  54483. function TRCON_RCON.getWDTO : TBits_1; inline;
  54484. begin
  54485. getWDTO := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54486. end;
  54487. procedure TRCON_RCON.setSWR; inline;
  54488. begin
  54489. pTDefRegMap(@Self)^.&set := $00000040;
  54490. end;
  54491. procedure TRCON_RCON.clearSWR; inline;
  54492. begin
  54493. pTDefRegMap(@Self)^.clr := $00000040;
  54494. end;
  54495. procedure TRCON_RCON.setSWR(thebits : TBits_1); inline;
  54496. begin
  54497. if thebits = 0 then
  54498. pTDefRegMap(@Self)^.clr := $00000040
  54499. else
  54500. pTDefRegMap(@Self)^.&set := $00000040;
  54501. end;
  54502. function TRCON_RCON.getSWR : TBits_1; inline;
  54503. begin
  54504. getSWR := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54505. end;
  54506. procedure TRCON_RCON.setEXTR; inline;
  54507. begin
  54508. pTDefRegMap(@Self)^.&set := $00000080;
  54509. end;
  54510. procedure TRCON_RCON.clearEXTR; inline;
  54511. begin
  54512. pTDefRegMap(@Self)^.clr := $00000080;
  54513. end;
  54514. procedure TRCON_RCON.setEXTR(thebits : TBits_1); inline;
  54515. begin
  54516. if thebits = 0 then
  54517. pTDefRegMap(@Self)^.clr := $00000080
  54518. else
  54519. pTDefRegMap(@Self)^.&set := $00000080;
  54520. end;
  54521. function TRCON_RCON.getEXTR : TBits_1; inline;
  54522. begin
  54523. getEXTR := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54524. end;
  54525. procedure TRCON_RCON.setVREGS; inline;
  54526. begin
  54527. pTDefRegMap(@Self)^.&set := $00000100;
  54528. end;
  54529. procedure TRCON_RCON.clearVREGS; inline;
  54530. begin
  54531. pTDefRegMap(@Self)^.clr := $00000100;
  54532. end;
  54533. procedure TRCON_RCON.setVREGS(thebits : TBits_1); inline;
  54534. begin
  54535. if thebits = 0 then
  54536. pTDefRegMap(@Self)^.clr := $00000100
  54537. else
  54538. pTDefRegMap(@Self)^.&set := $00000100;
  54539. end;
  54540. function TRCON_RCON.getVREGS : TBits_1; inline;
  54541. begin
  54542. getVREGS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54543. end;
  54544. procedure TRCON_RCON.setCMR; inline;
  54545. begin
  54546. pTDefRegMap(@Self)^.&set := $00000200;
  54547. end;
  54548. procedure TRCON_RCON.clearCMR; inline;
  54549. begin
  54550. pTDefRegMap(@Self)^.clr := $00000200;
  54551. end;
  54552. procedure TRCON_RCON.setCMR(thebits : TBits_1); inline;
  54553. begin
  54554. if thebits = 0 then
  54555. pTDefRegMap(@Self)^.clr := $00000200
  54556. else
  54557. pTDefRegMap(@Self)^.&set := $00000200;
  54558. end;
  54559. function TRCON_RCON.getCMR : TBits_1; inline;
  54560. begin
  54561. getCMR := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  54562. end;
  54563. procedure TRCON_RCON.setw(thebits : TBits_32); inline;
  54564. begin
  54565. pTDefRegMap(@Self)^.val := thebits;
  54566. end;
  54567. function TRCON_RCON.getw : TBits_32; inline;
  54568. begin
  54569. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54570. end;
  54571. procedure TRCON_RSWRST.setSWRST; inline;
  54572. begin
  54573. pTDefRegMap(@Self)^.&set := $00000001;
  54574. end;
  54575. procedure TRCON_RSWRST.clearSWRST; inline;
  54576. begin
  54577. pTDefRegMap(@Self)^.clr := $00000001;
  54578. end;
  54579. procedure TRCON_RSWRST.setSWRST(thebits : TBits_1); inline;
  54580. begin
  54581. if thebits = 0 then
  54582. pTDefRegMap(@Self)^.clr := $00000001
  54583. else
  54584. pTDefRegMap(@Self)^.&set := $00000001;
  54585. end;
  54586. function TRCON_RSWRST.getSWRST : TBits_1; inline;
  54587. begin
  54588. getSWRST := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54589. end;
  54590. procedure TRCON_RSWRST.setw(thebits : TBits_32); inline;
  54591. begin
  54592. pTDefRegMap(@Self)^.val := thebits;
  54593. end;
  54594. function TRCON_RSWRST.getw : TBits_32; inline;
  54595. begin
  54596. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54597. end;
  54598. procedure TINT_INTCON.setINT0EP; inline;
  54599. begin
  54600. pTDefRegMap(@Self)^.&set := $00000001;
  54601. end;
  54602. procedure TINT_INTCON.clearINT0EP; inline;
  54603. begin
  54604. pTDefRegMap(@Self)^.clr := $00000001;
  54605. end;
  54606. procedure TINT_INTCON.setINT0EP(thebits : TBits_1); inline;
  54607. begin
  54608. if thebits = 0 then
  54609. pTDefRegMap(@Self)^.clr := $00000001
  54610. else
  54611. pTDefRegMap(@Self)^.&set := $00000001;
  54612. end;
  54613. function TINT_INTCON.getINT0EP : TBits_1; inline;
  54614. begin
  54615. getINT0EP := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54616. end;
  54617. procedure TINT_INTCON.setINT1EP; inline;
  54618. begin
  54619. pTDefRegMap(@Self)^.&set := $00000002;
  54620. end;
  54621. procedure TINT_INTCON.clearINT1EP; inline;
  54622. begin
  54623. pTDefRegMap(@Self)^.clr := $00000002;
  54624. end;
  54625. procedure TINT_INTCON.setINT1EP(thebits : TBits_1); inline;
  54626. begin
  54627. if thebits = 0 then
  54628. pTDefRegMap(@Self)^.clr := $00000002
  54629. else
  54630. pTDefRegMap(@Self)^.&set := $00000002;
  54631. end;
  54632. function TINT_INTCON.getINT1EP : TBits_1; inline;
  54633. begin
  54634. getINT1EP := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54635. end;
  54636. procedure TINT_INTCON.setINT2EP; inline;
  54637. begin
  54638. pTDefRegMap(@Self)^.&set := $00000004;
  54639. end;
  54640. procedure TINT_INTCON.clearINT2EP; inline;
  54641. begin
  54642. pTDefRegMap(@Self)^.clr := $00000004;
  54643. end;
  54644. procedure TINT_INTCON.setINT2EP(thebits : TBits_1); inline;
  54645. begin
  54646. if thebits = 0 then
  54647. pTDefRegMap(@Self)^.clr := $00000004
  54648. else
  54649. pTDefRegMap(@Self)^.&set := $00000004;
  54650. end;
  54651. function TINT_INTCON.getINT2EP : TBits_1; inline;
  54652. begin
  54653. getINT2EP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54654. end;
  54655. procedure TINT_INTCON.setINT3EP; inline;
  54656. begin
  54657. pTDefRegMap(@Self)^.&set := $00000008;
  54658. end;
  54659. procedure TINT_INTCON.clearINT3EP; inline;
  54660. begin
  54661. pTDefRegMap(@Self)^.clr := $00000008;
  54662. end;
  54663. procedure TINT_INTCON.setINT3EP(thebits : TBits_1); inline;
  54664. begin
  54665. if thebits = 0 then
  54666. pTDefRegMap(@Self)^.clr := $00000008
  54667. else
  54668. pTDefRegMap(@Self)^.&set := $00000008;
  54669. end;
  54670. function TINT_INTCON.getINT3EP : TBits_1; inline;
  54671. begin
  54672. getINT3EP := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54673. end;
  54674. procedure TINT_INTCON.setINT4EP; inline;
  54675. begin
  54676. pTDefRegMap(@Self)^.&set := $00000010;
  54677. end;
  54678. procedure TINT_INTCON.clearINT4EP; inline;
  54679. begin
  54680. pTDefRegMap(@Self)^.clr := $00000010;
  54681. end;
  54682. procedure TINT_INTCON.setINT4EP(thebits : TBits_1); inline;
  54683. begin
  54684. if thebits = 0 then
  54685. pTDefRegMap(@Self)^.clr := $00000010
  54686. else
  54687. pTDefRegMap(@Self)^.&set := $00000010;
  54688. end;
  54689. function TINT_INTCON.getINT4EP : TBits_1; inline;
  54690. begin
  54691. getINT4EP := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54692. end;
  54693. procedure TINT_INTCON.setTPC(thebits : TBits_3); inline;
  54694. begin
  54695. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  54696. end;
  54697. function TINT_INTCON.getTPC : TBits_3; inline;
  54698. begin
  54699. getTPC := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  54700. end;
  54701. procedure TINT_INTCON.setMVEC; inline;
  54702. begin
  54703. pTDefRegMap(@Self)^.&set := $00001000;
  54704. end;
  54705. procedure TINT_INTCON.clearMVEC; inline;
  54706. begin
  54707. pTDefRegMap(@Self)^.clr := $00001000;
  54708. end;
  54709. procedure TINT_INTCON.setMVEC(thebits : TBits_1); inline;
  54710. begin
  54711. if thebits = 0 then
  54712. pTDefRegMap(@Self)^.clr := $00001000
  54713. else
  54714. pTDefRegMap(@Self)^.&set := $00001000;
  54715. end;
  54716. function TINT_INTCON.getMVEC : TBits_1; inline;
  54717. begin
  54718. getMVEC := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  54719. end;
  54720. procedure TINT_INTCON.setFRZ; inline;
  54721. begin
  54722. pTDefRegMap(@Self)^.&set := $00004000;
  54723. end;
  54724. procedure TINT_INTCON.clearFRZ; inline;
  54725. begin
  54726. pTDefRegMap(@Self)^.clr := $00004000;
  54727. end;
  54728. procedure TINT_INTCON.setFRZ(thebits : TBits_1); inline;
  54729. begin
  54730. if thebits = 0 then
  54731. pTDefRegMap(@Self)^.clr := $00004000
  54732. else
  54733. pTDefRegMap(@Self)^.&set := $00004000;
  54734. end;
  54735. function TINT_INTCON.getFRZ : TBits_1; inline;
  54736. begin
  54737. getFRZ := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  54738. end;
  54739. procedure TINT_INTCON.setSS0; inline;
  54740. begin
  54741. pTDefRegMap(@Self)^.&set := $00010000;
  54742. end;
  54743. procedure TINT_INTCON.clearSS0; inline;
  54744. begin
  54745. pTDefRegMap(@Self)^.clr := $00010000;
  54746. end;
  54747. procedure TINT_INTCON.setSS0(thebits : TBits_1); inline;
  54748. begin
  54749. if thebits = 0 then
  54750. pTDefRegMap(@Self)^.clr := $00010000
  54751. else
  54752. pTDefRegMap(@Self)^.&set := $00010000;
  54753. end;
  54754. function TINT_INTCON.getSS0 : TBits_1; inline;
  54755. begin
  54756. getSS0 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  54757. end;
  54758. procedure TINT_INTCON.setw(thebits : TBits_32); inline;
  54759. begin
  54760. pTDefRegMap(@Self)^.val := thebits;
  54761. end;
  54762. function TINT_INTCON.getw : TBits_32; inline;
  54763. begin
  54764. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  54765. end;
  54766. procedure TINT_IFS0.setCTIF; inline;
  54767. begin
  54768. pTDefRegMap(@Self)^.&set := $00000001;
  54769. end;
  54770. procedure TINT_IFS0.clearCTIF; inline;
  54771. begin
  54772. pTDefRegMap(@Self)^.clr := $00000001;
  54773. end;
  54774. procedure TINT_IFS0.setCTIF(thebits : TBits_1); inline;
  54775. begin
  54776. if thebits = 0 then
  54777. pTDefRegMap(@Self)^.clr := $00000001
  54778. else
  54779. pTDefRegMap(@Self)^.&set := $00000001;
  54780. end;
  54781. function TINT_IFS0.getCTIF : TBits_1; inline;
  54782. begin
  54783. getCTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  54784. end;
  54785. procedure TINT_IFS0.setCS0IF; inline;
  54786. begin
  54787. pTDefRegMap(@Self)^.&set := $00000002;
  54788. end;
  54789. procedure TINT_IFS0.clearCS0IF; inline;
  54790. begin
  54791. pTDefRegMap(@Self)^.clr := $00000002;
  54792. end;
  54793. procedure TINT_IFS0.setCS0IF(thebits : TBits_1); inline;
  54794. begin
  54795. if thebits = 0 then
  54796. pTDefRegMap(@Self)^.clr := $00000002
  54797. else
  54798. pTDefRegMap(@Self)^.&set := $00000002;
  54799. end;
  54800. function TINT_IFS0.getCS0IF : TBits_1; inline;
  54801. begin
  54802. getCS0IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  54803. end;
  54804. procedure TINT_IFS0.setCS1IF; inline;
  54805. begin
  54806. pTDefRegMap(@Self)^.&set := $00000004;
  54807. end;
  54808. procedure TINT_IFS0.clearCS1IF; inline;
  54809. begin
  54810. pTDefRegMap(@Self)^.clr := $00000004;
  54811. end;
  54812. procedure TINT_IFS0.setCS1IF(thebits : TBits_1); inline;
  54813. begin
  54814. if thebits = 0 then
  54815. pTDefRegMap(@Self)^.clr := $00000004
  54816. else
  54817. pTDefRegMap(@Self)^.&set := $00000004;
  54818. end;
  54819. function TINT_IFS0.getCS1IF : TBits_1; inline;
  54820. begin
  54821. getCS1IF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  54822. end;
  54823. procedure TINT_IFS0.setINT0IF; inline;
  54824. begin
  54825. pTDefRegMap(@Self)^.&set := $00000008;
  54826. end;
  54827. procedure TINT_IFS0.clearINT0IF; inline;
  54828. begin
  54829. pTDefRegMap(@Self)^.clr := $00000008;
  54830. end;
  54831. procedure TINT_IFS0.setINT0IF(thebits : TBits_1); inline;
  54832. begin
  54833. if thebits = 0 then
  54834. pTDefRegMap(@Self)^.clr := $00000008
  54835. else
  54836. pTDefRegMap(@Self)^.&set := $00000008;
  54837. end;
  54838. function TINT_IFS0.getINT0IF : TBits_1; inline;
  54839. begin
  54840. getINT0IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  54841. end;
  54842. procedure TINT_IFS0.setT1IF; inline;
  54843. begin
  54844. pTDefRegMap(@Self)^.&set := $00000010;
  54845. end;
  54846. procedure TINT_IFS0.clearT1IF; inline;
  54847. begin
  54848. pTDefRegMap(@Self)^.clr := $00000010;
  54849. end;
  54850. procedure TINT_IFS0.setT1IF(thebits : TBits_1); inline;
  54851. begin
  54852. if thebits = 0 then
  54853. pTDefRegMap(@Self)^.clr := $00000010
  54854. else
  54855. pTDefRegMap(@Self)^.&set := $00000010;
  54856. end;
  54857. function TINT_IFS0.getT1IF : TBits_1; inline;
  54858. begin
  54859. getT1IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  54860. end;
  54861. procedure TINT_IFS0.setIC1IF; inline;
  54862. begin
  54863. pTDefRegMap(@Self)^.&set := $00000020;
  54864. end;
  54865. procedure TINT_IFS0.clearIC1IF; inline;
  54866. begin
  54867. pTDefRegMap(@Self)^.clr := $00000020;
  54868. end;
  54869. procedure TINT_IFS0.setIC1IF(thebits : TBits_1); inline;
  54870. begin
  54871. if thebits = 0 then
  54872. pTDefRegMap(@Self)^.clr := $00000020
  54873. else
  54874. pTDefRegMap(@Self)^.&set := $00000020;
  54875. end;
  54876. function TINT_IFS0.getIC1IF : TBits_1; inline;
  54877. begin
  54878. getIC1IF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  54879. end;
  54880. procedure TINT_IFS0.setOC1IF; inline;
  54881. begin
  54882. pTDefRegMap(@Self)^.&set := $00000040;
  54883. end;
  54884. procedure TINT_IFS0.clearOC1IF; inline;
  54885. begin
  54886. pTDefRegMap(@Self)^.clr := $00000040;
  54887. end;
  54888. procedure TINT_IFS0.setOC1IF(thebits : TBits_1); inline;
  54889. begin
  54890. if thebits = 0 then
  54891. pTDefRegMap(@Self)^.clr := $00000040
  54892. else
  54893. pTDefRegMap(@Self)^.&set := $00000040;
  54894. end;
  54895. function TINT_IFS0.getOC1IF : TBits_1; inline;
  54896. begin
  54897. getOC1IF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  54898. end;
  54899. procedure TINT_IFS0.setINT1IF; inline;
  54900. begin
  54901. pTDefRegMap(@Self)^.&set := $00000080;
  54902. end;
  54903. procedure TINT_IFS0.clearINT1IF; inline;
  54904. begin
  54905. pTDefRegMap(@Self)^.clr := $00000080;
  54906. end;
  54907. procedure TINT_IFS0.setINT1IF(thebits : TBits_1); inline;
  54908. begin
  54909. if thebits = 0 then
  54910. pTDefRegMap(@Self)^.clr := $00000080
  54911. else
  54912. pTDefRegMap(@Self)^.&set := $00000080;
  54913. end;
  54914. function TINT_IFS0.getINT1IF : TBits_1; inline;
  54915. begin
  54916. getINT1IF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  54917. end;
  54918. procedure TINT_IFS0.setT2IF; inline;
  54919. begin
  54920. pTDefRegMap(@Self)^.&set := $00000100;
  54921. end;
  54922. procedure TINT_IFS0.clearT2IF; inline;
  54923. begin
  54924. pTDefRegMap(@Self)^.clr := $00000100;
  54925. end;
  54926. procedure TINT_IFS0.setT2IF(thebits : TBits_1); inline;
  54927. begin
  54928. if thebits = 0 then
  54929. pTDefRegMap(@Self)^.clr := $00000100
  54930. else
  54931. pTDefRegMap(@Self)^.&set := $00000100;
  54932. end;
  54933. function TINT_IFS0.getT2IF : TBits_1; inline;
  54934. begin
  54935. getT2IF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  54936. end;
  54937. procedure TINT_IFS0.setIC2IF; inline;
  54938. begin
  54939. pTDefRegMap(@Self)^.&set := $00000200;
  54940. end;
  54941. procedure TINT_IFS0.clearIC2IF; inline;
  54942. begin
  54943. pTDefRegMap(@Self)^.clr := $00000200;
  54944. end;
  54945. procedure TINT_IFS0.setIC2IF(thebits : TBits_1); inline;
  54946. begin
  54947. if thebits = 0 then
  54948. pTDefRegMap(@Self)^.clr := $00000200
  54949. else
  54950. pTDefRegMap(@Self)^.&set := $00000200;
  54951. end;
  54952. function TINT_IFS0.getIC2IF : TBits_1; inline;
  54953. begin
  54954. getIC2IF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  54955. end;
  54956. procedure TINT_IFS0.setOC2IF; inline;
  54957. begin
  54958. pTDefRegMap(@Self)^.&set := $00000400;
  54959. end;
  54960. procedure TINT_IFS0.clearOC2IF; inline;
  54961. begin
  54962. pTDefRegMap(@Self)^.clr := $00000400;
  54963. end;
  54964. procedure TINT_IFS0.setOC2IF(thebits : TBits_1); inline;
  54965. begin
  54966. if thebits = 0 then
  54967. pTDefRegMap(@Self)^.clr := $00000400
  54968. else
  54969. pTDefRegMap(@Self)^.&set := $00000400;
  54970. end;
  54971. function TINT_IFS0.getOC2IF : TBits_1; inline;
  54972. begin
  54973. getOC2IF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  54974. end;
  54975. procedure TINT_IFS0.setINT2IF; inline;
  54976. begin
  54977. pTDefRegMap(@Self)^.&set := $00000800;
  54978. end;
  54979. procedure TINT_IFS0.clearINT2IF; inline;
  54980. begin
  54981. pTDefRegMap(@Self)^.clr := $00000800;
  54982. end;
  54983. procedure TINT_IFS0.setINT2IF(thebits : TBits_1); inline;
  54984. begin
  54985. if thebits = 0 then
  54986. pTDefRegMap(@Self)^.clr := $00000800
  54987. else
  54988. pTDefRegMap(@Self)^.&set := $00000800;
  54989. end;
  54990. function TINT_IFS0.getINT2IF : TBits_1; inline;
  54991. begin
  54992. getINT2IF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  54993. end;
  54994. procedure TINT_IFS0.setT3IF; inline;
  54995. begin
  54996. pTDefRegMap(@Self)^.&set := $00001000;
  54997. end;
  54998. procedure TINT_IFS0.clearT3IF; inline;
  54999. begin
  55000. pTDefRegMap(@Self)^.clr := $00001000;
  55001. end;
  55002. procedure TINT_IFS0.setT3IF(thebits : TBits_1); inline;
  55003. begin
  55004. if thebits = 0 then
  55005. pTDefRegMap(@Self)^.clr := $00001000
  55006. else
  55007. pTDefRegMap(@Self)^.&set := $00001000;
  55008. end;
  55009. function TINT_IFS0.getT3IF : TBits_1; inline;
  55010. begin
  55011. getT3IF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  55012. end;
  55013. procedure TINT_IFS0.setIC3IF; inline;
  55014. begin
  55015. pTDefRegMap(@Self)^.&set := $00002000;
  55016. end;
  55017. procedure TINT_IFS0.clearIC3IF; inline;
  55018. begin
  55019. pTDefRegMap(@Self)^.clr := $00002000;
  55020. end;
  55021. procedure TINT_IFS0.setIC3IF(thebits : TBits_1); inline;
  55022. begin
  55023. if thebits = 0 then
  55024. pTDefRegMap(@Self)^.clr := $00002000
  55025. else
  55026. pTDefRegMap(@Self)^.&set := $00002000;
  55027. end;
  55028. function TINT_IFS0.getIC3IF : TBits_1; inline;
  55029. begin
  55030. getIC3IF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  55031. end;
  55032. procedure TINT_IFS0.setOC3IF; inline;
  55033. begin
  55034. pTDefRegMap(@Self)^.&set := $00004000;
  55035. end;
  55036. procedure TINT_IFS0.clearOC3IF; inline;
  55037. begin
  55038. pTDefRegMap(@Self)^.clr := $00004000;
  55039. end;
  55040. procedure TINT_IFS0.setOC3IF(thebits : TBits_1); inline;
  55041. begin
  55042. if thebits = 0 then
  55043. pTDefRegMap(@Self)^.clr := $00004000
  55044. else
  55045. pTDefRegMap(@Self)^.&set := $00004000;
  55046. end;
  55047. function TINT_IFS0.getOC3IF : TBits_1; inline;
  55048. begin
  55049. getOC3IF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55050. end;
  55051. procedure TINT_IFS0.setINT3IF; inline;
  55052. begin
  55053. pTDefRegMap(@Self)^.&set := $00008000;
  55054. end;
  55055. procedure TINT_IFS0.clearINT3IF; inline;
  55056. begin
  55057. pTDefRegMap(@Self)^.clr := $00008000;
  55058. end;
  55059. procedure TINT_IFS0.setINT3IF(thebits : TBits_1); inline;
  55060. begin
  55061. if thebits = 0 then
  55062. pTDefRegMap(@Self)^.clr := $00008000
  55063. else
  55064. pTDefRegMap(@Self)^.&set := $00008000;
  55065. end;
  55066. function TINT_IFS0.getINT3IF : TBits_1; inline;
  55067. begin
  55068. getINT3IF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55069. end;
  55070. procedure TINT_IFS0.setT4IF; inline;
  55071. begin
  55072. pTDefRegMap(@Self)^.&set := $00010000;
  55073. end;
  55074. procedure TINT_IFS0.clearT4IF; inline;
  55075. begin
  55076. pTDefRegMap(@Self)^.clr := $00010000;
  55077. end;
  55078. procedure TINT_IFS0.setT4IF(thebits : TBits_1); inline;
  55079. begin
  55080. if thebits = 0 then
  55081. pTDefRegMap(@Self)^.clr := $00010000
  55082. else
  55083. pTDefRegMap(@Self)^.&set := $00010000;
  55084. end;
  55085. function TINT_IFS0.getT4IF : TBits_1; inline;
  55086. begin
  55087. getT4IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  55088. end;
  55089. procedure TINT_IFS0.setIC4IF; inline;
  55090. begin
  55091. pTDefRegMap(@Self)^.&set := $00020000;
  55092. end;
  55093. procedure TINT_IFS0.clearIC4IF; inline;
  55094. begin
  55095. pTDefRegMap(@Self)^.clr := $00020000;
  55096. end;
  55097. procedure TINT_IFS0.setIC4IF(thebits : TBits_1); inline;
  55098. begin
  55099. if thebits = 0 then
  55100. pTDefRegMap(@Self)^.clr := $00020000
  55101. else
  55102. pTDefRegMap(@Self)^.&set := $00020000;
  55103. end;
  55104. function TINT_IFS0.getIC4IF : TBits_1; inline;
  55105. begin
  55106. getIC4IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  55107. end;
  55108. procedure TINT_IFS0.setOC4IF; inline;
  55109. begin
  55110. pTDefRegMap(@Self)^.&set := $00040000;
  55111. end;
  55112. procedure TINT_IFS0.clearOC4IF; inline;
  55113. begin
  55114. pTDefRegMap(@Self)^.clr := $00040000;
  55115. end;
  55116. procedure TINT_IFS0.setOC4IF(thebits : TBits_1); inline;
  55117. begin
  55118. if thebits = 0 then
  55119. pTDefRegMap(@Self)^.clr := $00040000
  55120. else
  55121. pTDefRegMap(@Self)^.&set := $00040000;
  55122. end;
  55123. function TINT_IFS0.getOC4IF : TBits_1; inline;
  55124. begin
  55125. getOC4IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  55126. end;
  55127. procedure TINT_IFS0.setINT4IF; inline;
  55128. begin
  55129. pTDefRegMap(@Self)^.&set := $00080000;
  55130. end;
  55131. procedure TINT_IFS0.clearINT4IF; inline;
  55132. begin
  55133. pTDefRegMap(@Self)^.clr := $00080000;
  55134. end;
  55135. procedure TINT_IFS0.setINT4IF(thebits : TBits_1); inline;
  55136. begin
  55137. if thebits = 0 then
  55138. pTDefRegMap(@Self)^.clr := $00080000
  55139. else
  55140. pTDefRegMap(@Self)^.&set := $00080000;
  55141. end;
  55142. function TINT_IFS0.getINT4IF : TBits_1; inline;
  55143. begin
  55144. getINT4IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  55145. end;
  55146. procedure TINT_IFS0.setT5IF; inline;
  55147. begin
  55148. pTDefRegMap(@Self)^.&set := $00100000;
  55149. end;
  55150. procedure TINT_IFS0.clearT5IF; inline;
  55151. begin
  55152. pTDefRegMap(@Self)^.clr := $00100000;
  55153. end;
  55154. procedure TINT_IFS0.setT5IF(thebits : TBits_1); inline;
  55155. begin
  55156. if thebits = 0 then
  55157. pTDefRegMap(@Self)^.clr := $00100000
  55158. else
  55159. pTDefRegMap(@Self)^.&set := $00100000;
  55160. end;
  55161. function TINT_IFS0.getT5IF : TBits_1; inline;
  55162. begin
  55163. getT5IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  55164. end;
  55165. procedure TINT_IFS0.setIC5IF; inline;
  55166. begin
  55167. pTDefRegMap(@Self)^.&set := $00200000;
  55168. end;
  55169. procedure TINT_IFS0.clearIC5IF; inline;
  55170. begin
  55171. pTDefRegMap(@Self)^.clr := $00200000;
  55172. end;
  55173. procedure TINT_IFS0.setIC5IF(thebits : TBits_1); inline;
  55174. begin
  55175. if thebits = 0 then
  55176. pTDefRegMap(@Self)^.clr := $00200000
  55177. else
  55178. pTDefRegMap(@Self)^.&set := $00200000;
  55179. end;
  55180. function TINT_IFS0.getIC5IF : TBits_1; inline;
  55181. begin
  55182. getIC5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  55183. end;
  55184. procedure TINT_IFS0.setOC5IF; inline;
  55185. begin
  55186. pTDefRegMap(@Self)^.&set := $00400000;
  55187. end;
  55188. procedure TINT_IFS0.clearOC5IF; inline;
  55189. begin
  55190. pTDefRegMap(@Self)^.clr := $00400000;
  55191. end;
  55192. procedure TINT_IFS0.setOC5IF(thebits : TBits_1); inline;
  55193. begin
  55194. if thebits = 0 then
  55195. pTDefRegMap(@Self)^.clr := $00400000
  55196. else
  55197. pTDefRegMap(@Self)^.&set := $00400000;
  55198. end;
  55199. function TINT_IFS0.getOC5IF : TBits_1; inline;
  55200. begin
  55201. getOC5IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  55202. end;
  55203. procedure TINT_IFS0.setU1EIF; inline;
  55204. begin
  55205. pTDefRegMap(@Self)^.&set := $04000000;
  55206. end;
  55207. procedure TINT_IFS0.clearU1EIF; inline;
  55208. begin
  55209. pTDefRegMap(@Self)^.clr := $04000000;
  55210. end;
  55211. procedure TINT_IFS0.setU1EIF(thebits : TBits_1); inline;
  55212. begin
  55213. if thebits = 0 then
  55214. pTDefRegMap(@Self)^.clr := $04000000
  55215. else
  55216. pTDefRegMap(@Self)^.&set := $04000000;
  55217. end;
  55218. function TINT_IFS0.getU1EIF : TBits_1; inline;
  55219. begin
  55220. getU1EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  55221. end;
  55222. procedure TINT_IFS0.setU1RXIF; inline;
  55223. begin
  55224. pTDefRegMap(@Self)^.&set := $08000000;
  55225. end;
  55226. procedure TINT_IFS0.clearU1RXIF; inline;
  55227. begin
  55228. pTDefRegMap(@Self)^.clr := $08000000;
  55229. end;
  55230. procedure TINT_IFS0.setU1RXIF(thebits : TBits_1); inline;
  55231. begin
  55232. if thebits = 0 then
  55233. pTDefRegMap(@Self)^.clr := $08000000
  55234. else
  55235. pTDefRegMap(@Self)^.&set := $08000000;
  55236. end;
  55237. function TINT_IFS0.getU1RXIF : TBits_1; inline;
  55238. begin
  55239. getU1RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  55240. end;
  55241. procedure TINT_IFS0.setU1TXIF; inline;
  55242. begin
  55243. pTDefRegMap(@Self)^.&set := $10000000;
  55244. end;
  55245. procedure TINT_IFS0.clearU1TXIF; inline;
  55246. begin
  55247. pTDefRegMap(@Self)^.clr := $10000000;
  55248. end;
  55249. procedure TINT_IFS0.setU1TXIF(thebits : TBits_1); inline;
  55250. begin
  55251. if thebits = 0 then
  55252. pTDefRegMap(@Self)^.clr := $10000000
  55253. else
  55254. pTDefRegMap(@Self)^.&set := $10000000;
  55255. end;
  55256. function TINT_IFS0.getU1TXIF : TBits_1; inline;
  55257. begin
  55258. getU1TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  55259. end;
  55260. procedure TINT_IFS0.setI2C1BIF; inline;
  55261. begin
  55262. pTDefRegMap(@Self)^.&set := $20000000;
  55263. end;
  55264. procedure TINT_IFS0.clearI2C1BIF; inline;
  55265. begin
  55266. pTDefRegMap(@Self)^.clr := $20000000;
  55267. end;
  55268. procedure TINT_IFS0.setI2C1BIF(thebits : TBits_1); inline;
  55269. begin
  55270. if thebits = 0 then
  55271. pTDefRegMap(@Self)^.clr := $20000000
  55272. else
  55273. pTDefRegMap(@Self)^.&set := $20000000;
  55274. end;
  55275. function TINT_IFS0.getI2C1BIF : TBits_1; inline;
  55276. begin
  55277. getI2C1BIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  55278. end;
  55279. procedure TINT_IFS0.setI2C1SIF; inline;
  55280. begin
  55281. pTDefRegMap(@Self)^.&set := $40000000;
  55282. end;
  55283. procedure TINT_IFS0.clearI2C1SIF; inline;
  55284. begin
  55285. pTDefRegMap(@Self)^.clr := $40000000;
  55286. end;
  55287. procedure TINT_IFS0.setI2C1SIF(thebits : TBits_1); inline;
  55288. begin
  55289. if thebits = 0 then
  55290. pTDefRegMap(@Self)^.clr := $40000000
  55291. else
  55292. pTDefRegMap(@Self)^.&set := $40000000;
  55293. end;
  55294. function TINT_IFS0.getI2C1SIF : TBits_1; inline;
  55295. begin
  55296. getI2C1SIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  55297. end;
  55298. procedure TINT_IFS0.setI2C1MIF; inline;
  55299. begin
  55300. pTDefRegMap(@Self)^.&set := $80000000;
  55301. end;
  55302. procedure TINT_IFS0.clearI2C1MIF; inline;
  55303. begin
  55304. pTDefRegMap(@Self)^.clr := $80000000;
  55305. end;
  55306. procedure TINT_IFS0.setI2C1MIF(thebits : TBits_1); inline;
  55307. begin
  55308. if thebits = 0 then
  55309. pTDefRegMap(@Self)^.clr := $80000000
  55310. else
  55311. pTDefRegMap(@Self)^.&set := $80000000;
  55312. end;
  55313. function TINT_IFS0.getI2C1MIF : TBits_1; inline;
  55314. begin
  55315. getI2C1MIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  55316. end;
  55317. procedure TINT_IFS0.setU1AEIF; inline;
  55318. begin
  55319. pTDefRegMap(@Self)^.&set := $04000000;
  55320. end;
  55321. procedure TINT_IFS0.clearU1AEIF; inline;
  55322. begin
  55323. pTDefRegMap(@Self)^.clr := $04000000;
  55324. end;
  55325. procedure TINT_IFS0.setU1AEIF(thebits : TBits_1); inline;
  55326. begin
  55327. if thebits = 0 then
  55328. pTDefRegMap(@Self)^.clr := $04000000
  55329. else
  55330. pTDefRegMap(@Self)^.&set := $04000000;
  55331. end;
  55332. function TINT_IFS0.getU1AEIF : TBits_1; inline;
  55333. begin
  55334. getU1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  55335. end;
  55336. procedure TINT_IFS0.setU1ARXIF; inline;
  55337. begin
  55338. pTDefRegMap(@Self)^.&set := $08000000;
  55339. end;
  55340. procedure TINT_IFS0.clearU1ARXIF; inline;
  55341. begin
  55342. pTDefRegMap(@Self)^.clr := $08000000;
  55343. end;
  55344. procedure TINT_IFS0.setU1ARXIF(thebits : TBits_1); inline;
  55345. begin
  55346. if thebits = 0 then
  55347. pTDefRegMap(@Self)^.clr := $08000000
  55348. else
  55349. pTDefRegMap(@Self)^.&set := $08000000;
  55350. end;
  55351. function TINT_IFS0.getU1ARXIF : TBits_1; inline;
  55352. begin
  55353. getU1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  55354. end;
  55355. procedure TINT_IFS0.setU1ATXIF; inline;
  55356. begin
  55357. pTDefRegMap(@Self)^.&set := $10000000;
  55358. end;
  55359. procedure TINT_IFS0.clearU1ATXIF; inline;
  55360. begin
  55361. pTDefRegMap(@Self)^.clr := $10000000;
  55362. end;
  55363. procedure TINT_IFS0.setU1ATXIF(thebits : TBits_1); inline;
  55364. begin
  55365. if thebits = 0 then
  55366. pTDefRegMap(@Self)^.clr := $10000000
  55367. else
  55368. pTDefRegMap(@Self)^.&set := $10000000;
  55369. end;
  55370. function TINT_IFS0.getU1ATXIF : TBits_1; inline;
  55371. begin
  55372. getU1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  55373. end;
  55374. procedure TINT_IFS0.setSPI3EIF; inline;
  55375. begin
  55376. pTDefRegMap(@Self)^.&set := $04000000;
  55377. end;
  55378. procedure TINT_IFS0.clearSPI3EIF; inline;
  55379. begin
  55380. pTDefRegMap(@Self)^.clr := $04000000;
  55381. end;
  55382. procedure TINT_IFS0.setSPI3EIF(thebits : TBits_1); inline;
  55383. begin
  55384. if thebits = 0 then
  55385. pTDefRegMap(@Self)^.clr := $04000000
  55386. else
  55387. pTDefRegMap(@Self)^.&set := $04000000;
  55388. end;
  55389. function TINT_IFS0.getSPI3EIF : TBits_1; inline;
  55390. begin
  55391. getSPI3EIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  55392. end;
  55393. procedure TINT_IFS0.setSPI3RXIF; inline;
  55394. begin
  55395. pTDefRegMap(@Self)^.&set := $08000000;
  55396. end;
  55397. procedure TINT_IFS0.clearSPI3RXIF; inline;
  55398. begin
  55399. pTDefRegMap(@Self)^.clr := $08000000;
  55400. end;
  55401. procedure TINT_IFS0.setSPI3RXIF(thebits : TBits_1); inline;
  55402. begin
  55403. if thebits = 0 then
  55404. pTDefRegMap(@Self)^.clr := $08000000
  55405. else
  55406. pTDefRegMap(@Self)^.&set := $08000000;
  55407. end;
  55408. function TINT_IFS0.getSPI3RXIF : TBits_1; inline;
  55409. begin
  55410. getSPI3RXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  55411. end;
  55412. procedure TINT_IFS0.setSPI3TXIF; inline;
  55413. begin
  55414. pTDefRegMap(@Self)^.&set := $10000000;
  55415. end;
  55416. procedure TINT_IFS0.clearSPI3TXIF; inline;
  55417. begin
  55418. pTDefRegMap(@Self)^.clr := $10000000;
  55419. end;
  55420. procedure TINT_IFS0.setSPI3TXIF(thebits : TBits_1); inline;
  55421. begin
  55422. if thebits = 0 then
  55423. pTDefRegMap(@Self)^.clr := $10000000
  55424. else
  55425. pTDefRegMap(@Self)^.&set := $10000000;
  55426. end;
  55427. function TINT_IFS0.getSPI3TXIF : TBits_1; inline;
  55428. begin
  55429. getSPI3TXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  55430. end;
  55431. procedure TINT_IFS0.setSPI1AEIF; inline;
  55432. begin
  55433. pTDefRegMap(@Self)^.&set := $04000000;
  55434. end;
  55435. procedure TINT_IFS0.clearSPI1AEIF; inline;
  55436. begin
  55437. pTDefRegMap(@Self)^.clr := $04000000;
  55438. end;
  55439. procedure TINT_IFS0.setSPI1AEIF(thebits : TBits_1); inline;
  55440. begin
  55441. if thebits = 0 then
  55442. pTDefRegMap(@Self)^.clr := $04000000
  55443. else
  55444. pTDefRegMap(@Self)^.&set := $04000000;
  55445. end;
  55446. function TINT_IFS0.getSPI1AEIF : TBits_1; inline;
  55447. begin
  55448. getSPI1AEIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  55449. end;
  55450. procedure TINT_IFS0.setSPI1ARXIF; inline;
  55451. begin
  55452. pTDefRegMap(@Self)^.&set := $08000000;
  55453. end;
  55454. procedure TINT_IFS0.clearSPI1ARXIF; inline;
  55455. begin
  55456. pTDefRegMap(@Self)^.clr := $08000000;
  55457. end;
  55458. procedure TINT_IFS0.setSPI1ARXIF(thebits : TBits_1); inline;
  55459. begin
  55460. if thebits = 0 then
  55461. pTDefRegMap(@Self)^.clr := $08000000
  55462. else
  55463. pTDefRegMap(@Self)^.&set := $08000000;
  55464. end;
  55465. function TINT_IFS0.getSPI1ARXIF : TBits_1; inline;
  55466. begin
  55467. getSPI1ARXIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  55468. end;
  55469. procedure TINT_IFS0.setSPI1ATXIF; inline;
  55470. begin
  55471. pTDefRegMap(@Self)^.&set := $10000000;
  55472. end;
  55473. procedure TINT_IFS0.clearSPI1ATXIF; inline;
  55474. begin
  55475. pTDefRegMap(@Self)^.clr := $10000000;
  55476. end;
  55477. procedure TINT_IFS0.setSPI1ATXIF(thebits : TBits_1); inline;
  55478. begin
  55479. if thebits = 0 then
  55480. pTDefRegMap(@Self)^.clr := $10000000
  55481. else
  55482. pTDefRegMap(@Self)^.&set := $10000000;
  55483. end;
  55484. function TINT_IFS0.getSPI1ATXIF : TBits_1; inline;
  55485. begin
  55486. getSPI1ATXIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  55487. end;
  55488. procedure TINT_IFS0.setI2C3BIF; inline;
  55489. begin
  55490. pTDefRegMap(@Self)^.&set := $04000000;
  55491. end;
  55492. procedure TINT_IFS0.clearI2C3BIF; inline;
  55493. begin
  55494. pTDefRegMap(@Self)^.clr := $04000000;
  55495. end;
  55496. procedure TINT_IFS0.setI2C3BIF(thebits : TBits_1); inline;
  55497. begin
  55498. if thebits = 0 then
  55499. pTDefRegMap(@Self)^.clr := $04000000
  55500. else
  55501. pTDefRegMap(@Self)^.&set := $04000000;
  55502. end;
  55503. function TINT_IFS0.getI2C3BIF : TBits_1; inline;
  55504. begin
  55505. getI2C3BIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  55506. end;
  55507. procedure TINT_IFS0.setI2C3SIF; inline;
  55508. begin
  55509. pTDefRegMap(@Self)^.&set := $08000000;
  55510. end;
  55511. procedure TINT_IFS0.clearI2C3SIF; inline;
  55512. begin
  55513. pTDefRegMap(@Self)^.clr := $08000000;
  55514. end;
  55515. procedure TINT_IFS0.setI2C3SIF(thebits : TBits_1); inline;
  55516. begin
  55517. if thebits = 0 then
  55518. pTDefRegMap(@Self)^.clr := $08000000
  55519. else
  55520. pTDefRegMap(@Self)^.&set := $08000000;
  55521. end;
  55522. function TINT_IFS0.getI2C3SIF : TBits_1; inline;
  55523. begin
  55524. getI2C3SIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  55525. end;
  55526. procedure TINT_IFS0.setI2C3MIF; inline;
  55527. begin
  55528. pTDefRegMap(@Self)^.&set := $10000000;
  55529. end;
  55530. procedure TINT_IFS0.clearI2C3MIF; inline;
  55531. begin
  55532. pTDefRegMap(@Self)^.clr := $10000000;
  55533. end;
  55534. procedure TINT_IFS0.setI2C3MIF(thebits : TBits_1); inline;
  55535. begin
  55536. if thebits = 0 then
  55537. pTDefRegMap(@Self)^.clr := $10000000
  55538. else
  55539. pTDefRegMap(@Self)^.&set := $10000000;
  55540. end;
  55541. function TINT_IFS0.getI2C3MIF : TBits_1; inline;
  55542. begin
  55543. getI2C3MIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  55544. end;
  55545. procedure TINT_IFS0.setI2C1ABIF; inline;
  55546. begin
  55547. pTDefRegMap(@Self)^.&set := $04000000;
  55548. end;
  55549. procedure TINT_IFS0.clearI2C1ABIF; inline;
  55550. begin
  55551. pTDefRegMap(@Self)^.clr := $04000000;
  55552. end;
  55553. procedure TINT_IFS0.setI2C1ABIF(thebits : TBits_1); inline;
  55554. begin
  55555. if thebits = 0 then
  55556. pTDefRegMap(@Self)^.clr := $04000000
  55557. else
  55558. pTDefRegMap(@Self)^.&set := $04000000;
  55559. end;
  55560. function TINT_IFS0.getI2C1ABIF : TBits_1; inline;
  55561. begin
  55562. getI2C1ABIF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  55563. end;
  55564. procedure TINT_IFS0.setI2C1ASIF; inline;
  55565. begin
  55566. pTDefRegMap(@Self)^.&set := $08000000;
  55567. end;
  55568. procedure TINT_IFS0.clearI2C1ASIF; inline;
  55569. begin
  55570. pTDefRegMap(@Self)^.clr := $08000000;
  55571. end;
  55572. procedure TINT_IFS0.setI2C1ASIF(thebits : TBits_1); inline;
  55573. begin
  55574. if thebits = 0 then
  55575. pTDefRegMap(@Self)^.clr := $08000000
  55576. else
  55577. pTDefRegMap(@Self)^.&set := $08000000;
  55578. end;
  55579. function TINT_IFS0.getI2C1ASIF : TBits_1; inline;
  55580. begin
  55581. getI2C1ASIF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  55582. end;
  55583. procedure TINT_IFS0.setI2C1AMIF; inline;
  55584. begin
  55585. pTDefRegMap(@Self)^.&set := $10000000;
  55586. end;
  55587. procedure TINT_IFS0.clearI2C1AMIF; inline;
  55588. begin
  55589. pTDefRegMap(@Self)^.clr := $10000000;
  55590. end;
  55591. procedure TINT_IFS0.setI2C1AMIF(thebits : TBits_1); inline;
  55592. begin
  55593. if thebits = 0 then
  55594. pTDefRegMap(@Self)^.clr := $10000000
  55595. else
  55596. pTDefRegMap(@Self)^.&set := $10000000;
  55597. end;
  55598. function TINT_IFS0.getI2C1AMIF : TBits_1; inline;
  55599. begin
  55600. getI2C1AMIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  55601. end;
  55602. procedure TINT_IFS0.setw(thebits : TBits_32); inline;
  55603. begin
  55604. pTDefRegMap(@Self)^.val := thebits;
  55605. end;
  55606. function TINT_IFS0.getw : TBits_32; inline;
  55607. begin
  55608. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  55609. end;
  55610. procedure TINT_IFS1.setCNIF; inline;
  55611. begin
  55612. pTDefRegMap(@Self)^.&set := $00000001;
  55613. end;
  55614. procedure TINT_IFS1.clearCNIF; inline;
  55615. begin
  55616. pTDefRegMap(@Self)^.clr := $00000001;
  55617. end;
  55618. procedure TINT_IFS1.setCNIF(thebits : TBits_1); inline;
  55619. begin
  55620. if thebits = 0 then
  55621. pTDefRegMap(@Self)^.clr := $00000001
  55622. else
  55623. pTDefRegMap(@Self)^.&set := $00000001;
  55624. end;
  55625. function TINT_IFS1.getCNIF : TBits_1; inline;
  55626. begin
  55627. getCNIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  55628. end;
  55629. procedure TINT_IFS1.setAD1IF; inline;
  55630. begin
  55631. pTDefRegMap(@Self)^.&set := $00000002;
  55632. end;
  55633. procedure TINT_IFS1.clearAD1IF; inline;
  55634. begin
  55635. pTDefRegMap(@Self)^.clr := $00000002;
  55636. end;
  55637. procedure TINT_IFS1.setAD1IF(thebits : TBits_1); inline;
  55638. begin
  55639. if thebits = 0 then
  55640. pTDefRegMap(@Self)^.clr := $00000002
  55641. else
  55642. pTDefRegMap(@Self)^.&set := $00000002;
  55643. end;
  55644. function TINT_IFS1.getAD1IF : TBits_1; inline;
  55645. begin
  55646. getAD1IF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  55647. end;
  55648. procedure TINT_IFS1.setPMPIF; inline;
  55649. begin
  55650. pTDefRegMap(@Self)^.&set := $00000004;
  55651. end;
  55652. procedure TINT_IFS1.clearPMPIF; inline;
  55653. begin
  55654. pTDefRegMap(@Self)^.clr := $00000004;
  55655. end;
  55656. procedure TINT_IFS1.setPMPIF(thebits : TBits_1); inline;
  55657. begin
  55658. if thebits = 0 then
  55659. pTDefRegMap(@Self)^.clr := $00000004
  55660. else
  55661. pTDefRegMap(@Self)^.&set := $00000004;
  55662. end;
  55663. function TINT_IFS1.getPMPIF : TBits_1; inline;
  55664. begin
  55665. getPMPIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  55666. end;
  55667. procedure TINT_IFS1.setCMP1IF; inline;
  55668. begin
  55669. pTDefRegMap(@Self)^.&set := $00000008;
  55670. end;
  55671. procedure TINT_IFS1.clearCMP1IF; inline;
  55672. begin
  55673. pTDefRegMap(@Self)^.clr := $00000008;
  55674. end;
  55675. procedure TINT_IFS1.setCMP1IF(thebits : TBits_1); inline;
  55676. begin
  55677. if thebits = 0 then
  55678. pTDefRegMap(@Self)^.clr := $00000008
  55679. else
  55680. pTDefRegMap(@Self)^.&set := $00000008;
  55681. end;
  55682. function TINT_IFS1.getCMP1IF : TBits_1; inline;
  55683. begin
  55684. getCMP1IF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  55685. end;
  55686. procedure TINT_IFS1.setCMP2IF; inline;
  55687. begin
  55688. pTDefRegMap(@Self)^.&set := $00000010;
  55689. end;
  55690. procedure TINT_IFS1.clearCMP2IF; inline;
  55691. begin
  55692. pTDefRegMap(@Self)^.clr := $00000010;
  55693. end;
  55694. procedure TINT_IFS1.setCMP2IF(thebits : TBits_1); inline;
  55695. begin
  55696. if thebits = 0 then
  55697. pTDefRegMap(@Self)^.clr := $00000010
  55698. else
  55699. pTDefRegMap(@Self)^.&set := $00000010;
  55700. end;
  55701. function TINT_IFS1.getCMP2IF : TBits_1; inline;
  55702. begin
  55703. getCMP2IF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  55704. end;
  55705. procedure TINT_IFS1.setU3EIF; inline;
  55706. begin
  55707. pTDefRegMap(@Self)^.&set := $00000020;
  55708. end;
  55709. procedure TINT_IFS1.clearU3EIF; inline;
  55710. begin
  55711. pTDefRegMap(@Self)^.clr := $00000020;
  55712. end;
  55713. procedure TINT_IFS1.setU3EIF(thebits : TBits_1); inline;
  55714. begin
  55715. if thebits = 0 then
  55716. pTDefRegMap(@Self)^.clr := $00000020
  55717. else
  55718. pTDefRegMap(@Self)^.&set := $00000020;
  55719. end;
  55720. function TINT_IFS1.getU3EIF : TBits_1; inline;
  55721. begin
  55722. getU3EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  55723. end;
  55724. procedure TINT_IFS1.setU3RXIF; inline;
  55725. begin
  55726. pTDefRegMap(@Self)^.&set := $00000040;
  55727. end;
  55728. procedure TINT_IFS1.clearU3RXIF; inline;
  55729. begin
  55730. pTDefRegMap(@Self)^.clr := $00000040;
  55731. end;
  55732. procedure TINT_IFS1.setU3RXIF(thebits : TBits_1); inline;
  55733. begin
  55734. if thebits = 0 then
  55735. pTDefRegMap(@Self)^.clr := $00000040
  55736. else
  55737. pTDefRegMap(@Self)^.&set := $00000040;
  55738. end;
  55739. function TINT_IFS1.getU3RXIF : TBits_1; inline;
  55740. begin
  55741. getU3RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  55742. end;
  55743. procedure TINT_IFS1.setU3TXIF; inline;
  55744. begin
  55745. pTDefRegMap(@Self)^.&set := $00000080;
  55746. end;
  55747. procedure TINT_IFS1.clearU3TXIF; inline;
  55748. begin
  55749. pTDefRegMap(@Self)^.clr := $00000080;
  55750. end;
  55751. procedure TINT_IFS1.setU3TXIF(thebits : TBits_1); inline;
  55752. begin
  55753. if thebits = 0 then
  55754. pTDefRegMap(@Self)^.clr := $00000080
  55755. else
  55756. pTDefRegMap(@Self)^.&set := $00000080;
  55757. end;
  55758. function TINT_IFS1.getU3TXIF : TBits_1; inline;
  55759. begin
  55760. getU3TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  55761. end;
  55762. procedure TINT_IFS1.setU2EIF; inline;
  55763. begin
  55764. pTDefRegMap(@Self)^.&set := $00000100;
  55765. end;
  55766. procedure TINT_IFS1.clearU2EIF; inline;
  55767. begin
  55768. pTDefRegMap(@Self)^.clr := $00000100;
  55769. end;
  55770. procedure TINT_IFS1.setU2EIF(thebits : TBits_1); inline;
  55771. begin
  55772. if thebits = 0 then
  55773. pTDefRegMap(@Self)^.clr := $00000100
  55774. else
  55775. pTDefRegMap(@Self)^.&set := $00000100;
  55776. end;
  55777. function TINT_IFS1.getU2EIF : TBits_1; inline;
  55778. begin
  55779. getU2EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  55780. end;
  55781. procedure TINT_IFS1.setU2RXIF; inline;
  55782. begin
  55783. pTDefRegMap(@Self)^.&set := $00000200;
  55784. end;
  55785. procedure TINT_IFS1.clearU2RXIF; inline;
  55786. begin
  55787. pTDefRegMap(@Self)^.clr := $00000200;
  55788. end;
  55789. procedure TINT_IFS1.setU2RXIF(thebits : TBits_1); inline;
  55790. begin
  55791. if thebits = 0 then
  55792. pTDefRegMap(@Self)^.clr := $00000200
  55793. else
  55794. pTDefRegMap(@Self)^.&set := $00000200;
  55795. end;
  55796. function TINT_IFS1.getU2RXIF : TBits_1; inline;
  55797. begin
  55798. getU2RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  55799. end;
  55800. procedure TINT_IFS1.setU2TXIF; inline;
  55801. begin
  55802. pTDefRegMap(@Self)^.&set := $00000400;
  55803. end;
  55804. procedure TINT_IFS1.clearU2TXIF; inline;
  55805. begin
  55806. pTDefRegMap(@Self)^.clr := $00000400;
  55807. end;
  55808. procedure TINT_IFS1.setU2TXIF(thebits : TBits_1); inline;
  55809. begin
  55810. if thebits = 0 then
  55811. pTDefRegMap(@Self)^.clr := $00000400
  55812. else
  55813. pTDefRegMap(@Self)^.&set := $00000400;
  55814. end;
  55815. function TINT_IFS1.getU2TXIF : TBits_1; inline;
  55816. begin
  55817. getU2TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  55818. end;
  55819. procedure TINT_IFS1.setFSCMIF; inline;
  55820. begin
  55821. pTDefRegMap(@Self)^.&set := $00004000;
  55822. end;
  55823. procedure TINT_IFS1.clearFSCMIF; inline;
  55824. begin
  55825. pTDefRegMap(@Self)^.clr := $00004000;
  55826. end;
  55827. procedure TINT_IFS1.setFSCMIF(thebits : TBits_1); inline;
  55828. begin
  55829. if thebits = 0 then
  55830. pTDefRegMap(@Self)^.clr := $00004000
  55831. else
  55832. pTDefRegMap(@Self)^.&set := $00004000;
  55833. end;
  55834. function TINT_IFS1.getFSCMIF : TBits_1; inline;
  55835. begin
  55836. getFSCMIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  55837. end;
  55838. procedure TINT_IFS1.setRTCCIF; inline;
  55839. begin
  55840. pTDefRegMap(@Self)^.&set := $00008000;
  55841. end;
  55842. procedure TINT_IFS1.clearRTCCIF; inline;
  55843. begin
  55844. pTDefRegMap(@Self)^.clr := $00008000;
  55845. end;
  55846. procedure TINT_IFS1.setRTCCIF(thebits : TBits_1); inline;
  55847. begin
  55848. if thebits = 0 then
  55849. pTDefRegMap(@Self)^.clr := $00008000
  55850. else
  55851. pTDefRegMap(@Self)^.&set := $00008000;
  55852. end;
  55853. function TINT_IFS1.getRTCCIF : TBits_1; inline;
  55854. begin
  55855. getRTCCIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  55856. end;
  55857. procedure TINT_IFS1.setDMA0IF; inline;
  55858. begin
  55859. pTDefRegMap(@Self)^.&set := $00010000;
  55860. end;
  55861. procedure TINT_IFS1.clearDMA0IF; inline;
  55862. begin
  55863. pTDefRegMap(@Self)^.clr := $00010000;
  55864. end;
  55865. procedure TINT_IFS1.setDMA0IF(thebits : TBits_1); inline;
  55866. begin
  55867. if thebits = 0 then
  55868. pTDefRegMap(@Self)^.clr := $00010000
  55869. else
  55870. pTDefRegMap(@Self)^.&set := $00010000;
  55871. end;
  55872. function TINT_IFS1.getDMA0IF : TBits_1; inline;
  55873. begin
  55874. getDMA0IF := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  55875. end;
  55876. procedure TINT_IFS1.setDMA1IF; inline;
  55877. begin
  55878. pTDefRegMap(@Self)^.&set := $00020000;
  55879. end;
  55880. procedure TINT_IFS1.clearDMA1IF; inline;
  55881. begin
  55882. pTDefRegMap(@Self)^.clr := $00020000;
  55883. end;
  55884. procedure TINT_IFS1.setDMA1IF(thebits : TBits_1); inline;
  55885. begin
  55886. if thebits = 0 then
  55887. pTDefRegMap(@Self)^.clr := $00020000
  55888. else
  55889. pTDefRegMap(@Self)^.&set := $00020000;
  55890. end;
  55891. function TINT_IFS1.getDMA1IF : TBits_1; inline;
  55892. begin
  55893. getDMA1IF := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  55894. end;
  55895. procedure TINT_IFS1.setDMA2IF; inline;
  55896. begin
  55897. pTDefRegMap(@Self)^.&set := $00040000;
  55898. end;
  55899. procedure TINT_IFS1.clearDMA2IF; inline;
  55900. begin
  55901. pTDefRegMap(@Self)^.clr := $00040000;
  55902. end;
  55903. procedure TINT_IFS1.setDMA2IF(thebits : TBits_1); inline;
  55904. begin
  55905. if thebits = 0 then
  55906. pTDefRegMap(@Self)^.clr := $00040000
  55907. else
  55908. pTDefRegMap(@Self)^.&set := $00040000;
  55909. end;
  55910. function TINT_IFS1.getDMA2IF : TBits_1; inline;
  55911. begin
  55912. getDMA2IF := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  55913. end;
  55914. procedure TINT_IFS1.setDMA3IF; inline;
  55915. begin
  55916. pTDefRegMap(@Self)^.&set := $00080000;
  55917. end;
  55918. procedure TINT_IFS1.clearDMA3IF; inline;
  55919. begin
  55920. pTDefRegMap(@Self)^.clr := $00080000;
  55921. end;
  55922. procedure TINT_IFS1.setDMA3IF(thebits : TBits_1); inline;
  55923. begin
  55924. if thebits = 0 then
  55925. pTDefRegMap(@Self)^.clr := $00080000
  55926. else
  55927. pTDefRegMap(@Self)^.&set := $00080000;
  55928. end;
  55929. function TINT_IFS1.getDMA3IF : TBits_1; inline;
  55930. begin
  55931. getDMA3IF := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  55932. end;
  55933. procedure TINT_IFS1.setDMA4IF; inline;
  55934. begin
  55935. pTDefRegMap(@Self)^.&set := $00100000;
  55936. end;
  55937. procedure TINT_IFS1.clearDMA4IF; inline;
  55938. begin
  55939. pTDefRegMap(@Self)^.clr := $00100000;
  55940. end;
  55941. procedure TINT_IFS1.setDMA4IF(thebits : TBits_1); inline;
  55942. begin
  55943. if thebits = 0 then
  55944. pTDefRegMap(@Self)^.clr := $00100000
  55945. else
  55946. pTDefRegMap(@Self)^.&set := $00100000;
  55947. end;
  55948. function TINT_IFS1.getDMA4IF : TBits_1; inline;
  55949. begin
  55950. getDMA4IF := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  55951. end;
  55952. procedure TINT_IFS1.setDMA5IF; inline;
  55953. begin
  55954. pTDefRegMap(@Self)^.&set := $00200000;
  55955. end;
  55956. procedure TINT_IFS1.clearDMA5IF; inline;
  55957. begin
  55958. pTDefRegMap(@Self)^.clr := $00200000;
  55959. end;
  55960. procedure TINT_IFS1.setDMA5IF(thebits : TBits_1); inline;
  55961. begin
  55962. if thebits = 0 then
  55963. pTDefRegMap(@Self)^.clr := $00200000
  55964. else
  55965. pTDefRegMap(@Self)^.&set := $00200000;
  55966. end;
  55967. function TINT_IFS1.getDMA5IF : TBits_1; inline;
  55968. begin
  55969. getDMA5IF := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  55970. end;
  55971. procedure TINT_IFS1.setDMA6IF; inline;
  55972. begin
  55973. pTDefRegMap(@Self)^.&set := $00400000;
  55974. end;
  55975. procedure TINT_IFS1.clearDMA6IF; inline;
  55976. begin
  55977. pTDefRegMap(@Self)^.clr := $00400000;
  55978. end;
  55979. procedure TINT_IFS1.setDMA6IF(thebits : TBits_1); inline;
  55980. begin
  55981. if thebits = 0 then
  55982. pTDefRegMap(@Self)^.clr := $00400000
  55983. else
  55984. pTDefRegMap(@Self)^.&set := $00400000;
  55985. end;
  55986. function TINT_IFS1.getDMA6IF : TBits_1; inline;
  55987. begin
  55988. getDMA6IF := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  55989. end;
  55990. procedure TINT_IFS1.setDMA7IF; inline;
  55991. begin
  55992. pTDefRegMap(@Self)^.&set := $00800000;
  55993. end;
  55994. procedure TINT_IFS1.clearDMA7IF; inline;
  55995. begin
  55996. pTDefRegMap(@Self)^.clr := $00800000;
  55997. end;
  55998. procedure TINT_IFS1.setDMA7IF(thebits : TBits_1); inline;
  55999. begin
  56000. if thebits = 0 then
  56001. pTDefRegMap(@Self)^.clr := $00800000
  56002. else
  56003. pTDefRegMap(@Self)^.&set := $00800000;
  56004. end;
  56005. function TINT_IFS1.getDMA7IF : TBits_1; inline;
  56006. begin
  56007. getDMA7IF := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  56008. end;
  56009. procedure TINT_IFS1.setFCEIF; inline;
  56010. begin
  56011. pTDefRegMap(@Self)^.&set := $01000000;
  56012. end;
  56013. procedure TINT_IFS1.clearFCEIF; inline;
  56014. begin
  56015. pTDefRegMap(@Self)^.clr := $01000000;
  56016. end;
  56017. procedure TINT_IFS1.setFCEIF(thebits : TBits_1); inline;
  56018. begin
  56019. if thebits = 0 then
  56020. pTDefRegMap(@Self)^.clr := $01000000
  56021. else
  56022. pTDefRegMap(@Self)^.&set := $01000000;
  56023. end;
  56024. function TINT_IFS1.getFCEIF : TBits_1; inline;
  56025. begin
  56026. getFCEIF := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  56027. end;
  56028. procedure TINT_IFS1.setUSBIF; inline;
  56029. begin
  56030. pTDefRegMap(@Self)^.&set := $02000000;
  56031. end;
  56032. procedure TINT_IFS1.clearUSBIF; inline;
  56033. begin
  56034. pTDefRegMap(@Self)^.clr := $02000000;
  56035. end;
  56036. procedure TINT_IFS1.setUSBIF(thebits : TBits_1); inline;
  56037. begin
  56038. if thebits = 0 then
  56039. pTDefRegMap(@Self)^.clr := $02000000
  56040. else
  56041. pTDefRegMap(@Self)^.&set := $02000000;
  56042. end;
  56043. function TINT_IFS1.getUSBIF : TBits_1; inline;
  56044. begin
  56045. getUSBIF := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  56046. end;
  56047. procedure TINT_IFS1.setCAN1IF; inline;
  56048. begin
  56049. pTDefRegMap(@Self)^.&set := $04000000;
  56050. end;
  56051. procedure TINT_IFS1.clearCAN1IF; inline;
  56052. begin
  56053. pTDefRegMap(@Self)^.clr := $04000000;
  56054. end;
  56055. procedure TINT_IFS1.setCAN1IF(thebits : TBits_1); inline;
  56056. begin
  56057. if thebits = 0 then
  56058. pTDefRegMap(@Self)^.clr := $04000000
  56059. else
  56060. pTDefRegMap(@Self)^.&set := $04000000;
  56061. end;
  56062. function TINT_IFS1.getCAN1IF : TBits_1; inline;
  56063. begin
  56064. getCAN1IF := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  56065. end;
  56066. procedure TINT_IFS1.setCAN2IF; inline;
  56067. begin
  56068. pTDefRegMap(@Self)^.&set := $08000000;
  56069. end;
  56070. procedure TINT_IFS1.clearCAN2IF; inline;
  56071. begin
  56072. pTDefRegMap(@Self)^.clr := $08000000;
  56073. end;
  56074. procedure TINT_IFS1.setCAN2IF(thebits : TBits_1); inline;
  56075. begin
  56076. if thebits = 0 then
  56077. pTDefRegMap(@Self)^.clr := $08000000
  56078. else
  56079. pTDefRegMap(@Self)^.&set := $08000000;
  56080. end;
  56081. function TINT_IFS1.getCAN2IF : TBits_1; inline;
  56082. begin
  56083. getCAN2IF := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  56084. end;
  56085. procedure TINT_IFS1.setETHIF; inline;
  56086. begin
  56087. pTDefRegMap(@Self)^.&set := $10000000;
  56088. end;
  56089. procedure TINT_IFS1.clearETHIF; inline;
  56090. begin
  56091. pTDefRegMap(@Self)^.clr := $10000000;
  56092. end;
  56093. procedure TINT_IFS1.setETHIF(thebits : TBits_1); inline;
  56094. begin
  56095. if thebits = 0 then
  56096. pTDefRegMap(@Self)^.clr := $10000000
  56097. else
  56098. pTDefRegMap(@Self)^.&set := $10000000;
  56099. end;
  56100. function TINT_IFS1.getETHIF : TBits_1; inline;
  56101. begin
  56102. getETHIF := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  56103. end;
  56104. procedure TINT_IFS1.setIC1EIF; inline;
  56105. begin
  56106. pTDefRegMap(@Self)^.&set := $20000000;
  56107. end;
  56108. procedure TINT_IFS1.clearIC1EIF; inline;
  56109. begin
  56110. pTDefRegMap(@Self)^.clr := $20000000;
  56111. end;
  56112. procedure TINT_IFS1.setIC1EIF(thebits : TBits_1); inline;
  56113. begin
  56114. if thebits = 0 then
  56115. pTDefRegMap(@Self)^.clr := $20000000
  56116. else
  56117. pTDefRegMap(@Self)^.&set := $20000000;
  56118. end;
  56119. function TINT_IFS1.getIC1EIF : TBits_1; inline;
  56120. begin
  56121. getIC1EIF := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  56122. end;
  56123. procedure TINT_IFS1.setIC2EIF; inline;
  56124. begin
  56125. pTDefRegMap(@Self)^.&set := $40000000;
  56126. end;
  56127. procedure TINT_IFS1.clearIC2EIF; inline;
  56128. begin
  56129. pTDefRegMap(@Self)^.clr := $40000000;
  56130. end;
  56131. procedure TINT_IFS1.setIC2EIF(thebits : TBits_1); inline;
  56132. begin
  56133. if thebits = 0 then
  56134. pTDefRegMap(@Self)^.clr := $40000000
  56135. else
  56136. pTDefRegMap(@Self)^.&set := $40000000;
  56137. end;
  56138. function TINT_IFS1.getIC2EIF : TBits_1; inline;
  56139. begin
  56140. getIC2EIF := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  56141. end;
  56142. procedure TINT_IFS1.setIC3EIF; inline;
  56143. begin
  56144. pTDefRegMap(@Self)^.&set := $80000000;
  56145. end;
  56146. procedure TINT_IFS1.clearIC3EIF; inline;
  56147. begin
  56148. pTDefRegMap(@Self)^.clr := $80000000;
  56149. end;
  56150. procedure TINT_IFS1.setIC3EIF(thebits : TBits_1); inline;
  56151. begin
  56152. if thebits = 0 then
  56153. pTDefRegMap(@Self)^.clr := $80000000
  56154. else
  56155. pTDefRegMap(@Self)^.&set := $80000000;
  56156. end;
  56157. function TINT_IFS1.getIC3EIF : TBits_1; inline;
  56158. begin
  56159. getIC3EIF := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  56160. end;
  56161. procedure TINT_IFS1.setU2AEIF; inline;
  56162. begin
  56163. pTDefRegMap(@Self)^.&set := $00000020;
  56164. end;
  56165. procedure TINT_IFS1.clearU2AEIF; inline;
  56166. begin
  56167. pTDefRegMap(@Self)^.clr := $00000020;
  56168. end;
  56169. procedure TINT_IFS1.setU2AEIF(thebits : TBits_1); inline;
  56170. begin
  56171. if thebits = 0 then
  56172. pTDefRegMap(@Self)^.clr := $00000020
  56173. else
  56174. pTDefRegMap(@Self)^.&set := $00000020;
  56175. end;
  56176. function TINT_IFS1.getU2AEIF : TBits_1; inline;
  56177. begin
  56178. getU2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56179. end;
  56180. procedure TINT_IFS1.setU2ARXIF; inline;
  56181. begin
  56182. pTDefRegMap(@Self)^.&set := $00000040;
  56183. end;
  56184. procedure TINT_IFS1.clearU2ARXIF; inline;
  56185. begin
  56186. pTDefRegMap(@Self)^.clr := $00000040;
  56187. end;
  56188. procedure TINT_IFS1.setU2ARXIF(thebits : TBits_1); inline;
  56189. begin
  56190. if thebits = 0 then
  56191. pTDefRegMap(@Self)^.clr := $00000040
  56192. else
  56193. pTDefRegMap(@Self)^.&set := $00000040;
  56194. end;
  56195. function TINT_IFS1.getU2ARXIF : TBits_1; inline;
  56196. begin
  56197. getU2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56198. end;
  56199. procedure TINT_IFS1.setU2ATXIF; inline;
  56200. begin
  56201. pTDefRegMap(@Self)^.&set := $00000080;
  56202. end;
  56203. procedure TINT_IFS1.clearU2ATXIF; inline;
  56204. begin
  56205. pTDefRegMap(@Self)^.clr := $00000080;
  56206. end;
  56207. procedure TINT_IFS1.setU2ATXIF(thebits : TBits_1); inline;
  56208. begin
  56209. if thebits = 0 then
  56210. pTDefRegMap(@Self)^.clr := $00000080
  56211. else
  56212. pTDefRegMap(@Self)^.&set := $00000080;
  56213. end;
  56214. function TINT_IFS1.getU2ATXIF : TBits_1; inline;
  56215. begin
  56216. getU2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56217. end;
  56218. procedure TINT_IFS1.setU3AEIF; inline;
  56219. begin
  56220. pTDefRegMap(@Self)^.&set := $00000100;
  56221. end;
  56222. procedure TINT_IFS1.clearU3AEIF; inline;
  56223. begin
  56224. pTDefRegMap(@Self)^.clr := $00000100;
  56225. end;
  56226. procedure TINT_IFS1.setU3AEIF(thebits : TBits_1); inline;
  56227. begin
  56228. if thebits = 0 then
  56229. pTDefRegMap(@Self)^.clr := $00000100
  56230. else
  56231. pTDefRegMap(@Self)^.&set := $00000100;
  56232. end;
  56233. function TINT_IFS1.getU3AEIF : TBits_1; inline;
  56234. begin
  56235. getU3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56236. end;
  56237. procedure TINT_IFS1.setU3ARXIF; inline;
  56238. begin
  56239. pTDefRegMap(@Self)^.&set := $00000200;
  56240. end;
  56241. procedure TINT_IFS1.clearU3ARXIF; inline;
  56242. begin
  56243. pTDefRegMap(@Self)^.clr := $00000200;
  56244. end;
  56245. procedure TINT_IFS1.setU3ARXIF(thebits : TBits_1); inline;
  56246. begin
  56247. if thebits = 0 then
  56248. pTDefRegMap(@Self)^.clr := $00000200
  56249. else
  56250. pTDefRegMap(@Self)^.&set := $00000200;
  56251. end;
  56252. function TINT_IFS1.getU3ARXIF : TBits_1; inline;
  56253. begin
  56254. getU3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56255. end;
  56256. procedure TINT_IFS1.setU3ATXIF; inline;
  56257. begin
  56258. pTDefRegMap(@Self)^.&set := $00000400;
  56259. end;
  56260. procedure TINT_IFS1.clearU3ATXIF; inline;
  56261. begin
  56262. pTDefRegMap(@Self)^.clr := $00000400;
  56263. end;
  56264. procedure TINT_IFS1.setU3ATXIF(thebits : TBits_1); inline;
  56265. begin
  56266. if thebits = 0 then
  56267. pTDefRegMap(@Self)^.clr := $00000400
  56268. else
  56269. pTDefRegMap(@Self)^.&set := $00000400;
  56270. end;
  56271. function TINT_IFS1.getU3ATXIF : TBits_1; inline;
  56272. begin
  56273. getU3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56274. end;
  56275. procedure TINT_IFS1.setSPI2EIF; inline;
  56276. begin
  56277. pTDefRegMap(@Self)^.&set := $00000020;
  56278. end;
  56279. procedure TINT_IFS1.clearSPI2EIF; inline;
  56280. begin
  56281. pTDefRegMap(@Self)^.clr := $00000020;
  56282. end;
  56283. procedure TINT_IFS1.setSPI2EIF(thebits : TBits_1); inline;
  56284. begin
  56285. if thebits = 0 then
  56286. pTDefRegMap(@Self)^.clr := $00000020
  56287. else
  56288. pTDefRegMap(@Self)^.&set := $00000020;
  56289. end;
  56290. function TINT_IFS1.getSPI2EIF : TBits_1; inline;
  56291. begin
  56292. getSPI2EIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56293. end;
  56294. procedure TINT_IFS1.setSPI2RXIF; inline;
  56295. begin
  56296. pTDefRegMap(@Self)^.&set := $00000040;
  56297. end;
  56298. procedure TINT_IFS1.clearSPI2RXIF; inline;
  56299. begin
  56300. pTDefRegMap(@Self)^.clr := $00000040;
  56301. end;
  56302. procedure TINT_IFS1.setSPI2RXIF(thebits : TBits_1); inline;
  56303. begin
  56304. if thebits = 0 then
  56305. pTDefRegMap(@Self)^.clr := $00000040
  56306. else
  56307. pTDefRegMap(@Self)^.&set := $00000040;
  56308. end;
  56309. function TINT_IFS1.getSPI2RXIF : TBits_1; inline;
  56310. begin
  56311. getSPI2RXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56312. end;
  56313. procedure TINT_IFS1.setSPI2TXIF; inline;
  56314. begin
  56315. pTDefRegMap(@Self)^.&set := $00000080;
  56316. end;
  56317. procedure TINT_IFS1.clearSPI2TXIF; inline;
  56318. begin
  56319. pTDefRegMap(@Self)^.clr := $00000080;
  56320. end;
  56321. procedure TINT_IFS1.setSPI2TXIF(thebits : TBits_1); inline;
  56322. begin
  56323. if thebits = 0 then
  56324. pTDefRegMap(@Self)^.clr := $00000080
  56325. else
  56326. pTDefRegMap(@Self)^.&set := $00000080;
  56327. end;
  56328. function TINT_IFS1.getSPI2TXIF : TBits_1; inline;
  56329. begin
  56330. getSPI2TXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56331. end;
  56332. procedure TINT_IFS1.setSPI4EIF; inline;
  56333. begin
  56334. pTDefRegMap(@Self)^.&set := $00000100;
  56335. end;
  56336. procedure TINT_IFS1.clearSPI4EIF; inline;
  56337. begin
  56338. pTDefRegMap(@Self)^.clr := $00000100;
  56339. end;
  56340. procedure TINT_IFS1.setSPI4EIF(thebits : TBits_1); inline;
  56341. begin
  56342. if thebits = 0 then
  56343. pTDefRegMap(@Self)^.clr := $00000100
  56344. else
  56345. pTDefRegMap(@Self)^.&set := $00000100;
  56346. end;
  56347. function TINT_IFS1.getSPI4EIF : TBits_1; inline;
  56348. begin
  56349. getSPI4EIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56350. end;
  56351. procedure TINT_IFS1.setSPI4RXIF; inline;
  56352. begin
  56353. pTDefRegMap(@Self)^.&set := $00000200;
  56354. end;
  56355. procedure TINT_IFS1.clearSPI4RXIF; inline;
  56356. begin
  56357. pTDefRegMap(@Self)^.clr := $00000200;
  56358. end;
  56359. procedure TINT_IFS1.setSPI4RXIF(thebits : TBits_1); inline;
  56360. begin
  56361. if thebits = 0 then
  56362. pTDefRegMap(@Self)^.clr := $00000200
  56363. else
  56364. pTDefRegMap(@Self)^.&set := $00000200;
  56365. end;
  56366. function TINT_IFS1.getSPI4RXIF : TBits_1; inline;
  56367. begin
  56368. getSPI4RXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56369. end;
  56370. procedure TINT_IFS1.setSPI4TXIF; inline;
  56371. begin
  56372. pTDefRegMap(@Self)^.&set := $00000400;
  56373. end;
  56374. procedure TINT_IFS1.clearSPI4TXIF; inline;
  56375. begin
  56376. pTDefRegMap(@Self)^.clr := $00000400;
  56377. end;
  56378. procedure TINT_IFS1.setSPI4TXIF(thebits : TBits_1); inline;
  56379. begin
  56380. if thebits = 0 then
  56381. pTDefRegMap(@Self)^.clr := $00000400
  56382. else
  56383. pTDefRegMap(@Self)^.&set := $00000400;
  56384. end;
  56385. function TINT_IFS1.getSPI4TXIF : TBits_1; inline;
  56386. begin
  56387. getSPI4TXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56388. end;
  56389. procedure TINT_IFS1.setSPI2AEIF; inline;
  56390. begin
  56391. pTDefRegMap(@Self)^.&set := $00000020;
  56392. end;
  56393. procedure TINT_IFS1.clearSPI2AEIF; inline;
  56394. begin
  56395. pTDefRegMap(@Self)^.clr := $00000020;
  56396. end;
  56397. procedure TINT_IFS1.setSPI2AEIF(thebits : TBits_1); inline;
  56398. begin
  56399. if thebits = 0 then
  56400. pTDefRegMap(@Self)^.clr := $00000020
  56401. else
  56402. pTDefRegMap(@Self)^.&set := $00000020;
  56403. end;
  56404. function TINT_IFS1.getSPI2AEIF : TBits_1; inline;
  56405. begin
  56406. getSPI2AEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56407. end;
  56408. procedure TINT_IFS1.setSPI2ARXIF; inline;
  56409. begin
  56410. pTDefRegMap(@Self)^.&set := $00000040;
  56411. end;
  56412. procedure TINT_IFS1.clearSPI2ARXIF; inline;
  56413. begin
  56414. pTDefRegMap(@Self)^.clr := $00000040;
  56415. end;
  56416. procedure TINT_IFS1.setSPI2ARXIF(thebits : TBits_1); inline;
  56417. begin
  56418. if thebits = 0 then
  56419. pTDefRegMap(@Self)^.clr := $00000040
  56420. else
  56421. pTDefRegMap(@Self)^.&set := $00000040;
  56422. end;
  56423. function TINT_IFS1.getSPI2ARXIF : TBits_1; inline;
  56424. begin
  56425. getSPI2ARXIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56426. end;
  56427. procedure TINT_IFS1.setSPI2ATXIF; inline;
  56428. begin
  56429. pTDefRegMap(@Self)^.&set := $00000080;
  56430. end;
  56431. procedure TINT_IFS1.clearSPI2ATXIF; inline;
  56432. begin
  56433. pTDefRegMap(@Self)^.clr := $00000080;
  56434. end;
  56435. procedure TINT_IFS1.setSPI2ATXIF(thebits : TBits_1); inline;
  56436. begin
  56437. if thebits = 0 then
  56438. pTDefRegMap(@Self)^.clr := $00000080
  56439. else
  56440. pTDefRegMap(@Self)^.&set := $00000080;
  56441. end;
  56442. function TINT_IFS1.getSPI2ATXIF : TBits_1; inline;
  56443. begin
  56444. getSPI2ATXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56445. end;
  56446. procedure TINT_IFS1.setSPI3AEIF; inline;
  56447. begin
  56448. pTDefRegMap(@Self)^.&set := $00000100;
  56449. end;
  56450. procedure TINT_IFS1.clearSPI3AEIF; inline;
  56451. begin
  56452. pTDefRegMap(@Self)^.clr := $00000100;
  56453. end;
  56454. procedure TINT_IFS1.setSPI3AEIF(thebits : TBits_1); inline;
  56455. begin
  56456. if thebits = 0 then
  56457. pTDefRegMap(@Self)^.clr := $00000100
  56458. else
  56459. pTDefRegMap(@Self)^.&set := $00000100;
  56460. end;
  56461. function TINT_IFS1.getSPI3AEIF : TBits_1; inline;
  56462. begin
  56463. getSPI3AEIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56464. end;
  56465. procedure TINT_IFS1.setSPI3ARXIF; inline;
  56466. begin
  56467. pTDefRegMap(@Self)^.&set := $00000200;
  56468. end;
  56469. procedure TINT_IFS1.clearSPI3ARXIF; inline;
  56470. begin
  56471. pTDefRegMap(@Self)^.clr := $00000200;
  56472. end;
  56473. procedure TINT_IFS1.setSPI3ARXIF(thebits : TBits_1); inline;
  56474. begin
  56475. if thebits = 0 then
  56476. pTDefRegMap(@Self)^.clr := $00000200
  56477. else
  56478. pTDefRegMap(@Self)^.&set := $00000200;
  56479. end;
  56480. function TINT_IFS1.getSPI3ARXIF : TBits_1; inline;
  56481. begin
  56482. getSPI3ARXIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56483. end;
  56484. procedure TINT_IFS1.setSPI3ATXIF; inline;
  56485. begin
  56486. pTDefRegMap(@Self)^.&set := $00000400;
  56487. end;
  56488. procedure TINT_IFS1.clearSPI3ATXIF; inline;
  56489. begin
  56490. pTDefRegMap(@Self)^.clr := $00000400;
  56491. end;
  56492. procedure TINT_IFS1.setSPI3ATXIF(thebits : TBits_1); inline;
  56493. begin
  56494. if thebits = 0 then
  56495. pTDefRegMap(@Self)^.clr := $00000400
  56496. else
  56497. pTDefRegMap(@Self)^.&set := $00000400;
  56498. end;
  56499. function TINT_IFS1.getSPI3ATXIF : TBits_1; inline;
  56500. begin
  56501. getSPI3ATXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56502. end;
  56503. procedure TINT_IFS1.setI2C4BIF; inline;
  56504. begin
  56505. pTDefRegMap(@Self)^.&set := $00000020;
  56506. end;
  56507. procedure TINT_IFS1.clearI2C4BIF; inline;
  56508. begin
  56509. pTDefRegMap(@Self)^.clr := $00000020;
  56510. end;
  56511. procedure TINT_IFS1.setI2C4BIF(thebits : TBits_1); inline;
  56512. begin
  56513. if thebits = 0 then
  56514. pTDefRegMap(@Self)^.clr := $00000020
  56515. else
  56516. pTDefRegMap(@Self)^.&set := $00000020;
  56517. end;
  56518. function TINT_IFS1.getI2C4BIF : TBits_1; inline;
  56519. begin
  56520. getI2C4BIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56521. end;
  56522. procedure TINT_IFS1.setI2C4SIF; inline;
  56523. begin
  56524. pTDefRegMap(@Self)^.&set := $00000040;
  56525. end;
  56526. procedure TINT_IFS1.clearI2C4SIF; inline;
  56527. begin
  56528. pTDefRegMap(@Self)^.clr := $00000040;
  56529. end;
  56530. procedure TINT_IFS1.setI2C4SIF(thebits : TBits_1); inline;
  56531. begin
  56532. if thebits = 0 then
  56533. pTDefRegMap(@Self)^.clr := $00000040
  56534. else
  56535. pTDefRegMap(@Self)^.&set := $00000040;
  56536. end;
  56537. function TINT_IFS1.getI2C4SIF : TBits_1; inline;
  56538. begin
  56539. getI2C4SIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56540. end;
  56541. procedure TINT_IFS1.setI2C4MIF; inline;
  56542. begin
  56543. pTDefRegMap(@Self)^.&set := $00000080;
  56544. end;
  56545. procedure TINT_IFS1.clearI2C4MIF; inline;
  56546. begin
  56547. pTDefRegMap(@Self)^.clr := $00000080;
  56548. end;
  56549. procedure TINT_IFS1.setI2C4MIF(thebits : TBits_1); inline;
  56550. begin
  56551. if thebits = 0 then
  56552. pTDefRegMap(@Self)^.clr := $00000080
  56553. else
  56554. pTDefRegMap(@Self)^.&set := $00000080;
  56555. end;
  56556. function TINT_IFS1.getI2C4MIF : TBits_1; inline;
  56557. begin
  56558. getI2C4MIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56559. end;
  56560. procedure TINT_IFS1.setI2C5BIF; inline;
  56561. begin
  56562. pTDefRegMap(@Self)^.&set := $00000100;
  56563. end;
  56564. procedure TINT_IFS1.clearI2C5BIF; inline;
  56565. begin
  56566. pTDefRegMap(@Self)^.clr := $00000100;
  56567. end;
  56568. procedure TINT_IFS1.setI2C5BIF(thebits : TBits_1); inline;
  56569. begin
  56570. if thebits = 0 then
  56571. pTDefRegMap(@Self)^.clr := $00000100
  56572. else
  56573. pTDefRegMap(@Self)^.&set := $00000100;
  56574. end;
  56575. function TINT_IFS1.getI2C5BIF : TBits_1; inline;
  56576. begin
  56577. getI2C5BIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56578. end;
  56579. procedure TINT_IFS1.setI2C5SIF; inline;
  56580. begin
  56581. pTDefRegMap(@Self)^.&set := $00000200;
  56582. end;
  56583. procedure TINT_IFS1.clearI2C5SIF; inline;
  56584. begin
  56585. pTDefRegMap(@Self)^.clr := $00000200;
  56586. end;
  56587. procedure TINT_IFS1.setI2C5SIF(thebits : TBits_1); inline;
  56588. begin
  56589. if thebits = 0 then
  56590. pTDefRegMap(@Self)^.clr := $00000200
  56591. else
  56592. pTDefRegMap(@Self)^.&set := $00000200;
  56593. end;
  56594. function TINT_IFS1.getI2C5SIF : TBits_1; inline;
  56595. begin
  56596. getI2C5SIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56597. end;
  56598. procedure TINT_IFS1.setI2C5MIF; inline;
  56599. begin
  56600. pTDefRegMap(@Self)^.&set := $00000400;
  56601. end;
  56602. procedure TINT_IFS1.clearI2C5MIF; inline;
  56603. begin
  56604. pTDefRegMap(@Self)^.clr := $00000400;
  56605. end;
  56606. procedure TINT_IFS1.setI2C5MIF(thebits : TBits_1); inline;
  56607. begin
  56608. if thebits = 0 then
  56609. pTDefRegMap(@Self)^.clr := $00000400
  56610. else
  56611. pTDefRegMap(@Self)^.&set := $00000400;
  56612. end;
  56613. function TINT_IFS1.getI2C5MIF : TBits_1; inline;
  56614. begin
  56615. getI2C5MIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56616. end;
  56617. procedure TINT_IFS1.setI2C2ABIF; inline;
  56618. begin
  56619. pTDefRegMap(@Self)^.&set := $00000020;
  56620. end;
  56621. procedure TINT_IFS1.clearI2C2ABIF; inline;
  56622. begin
  56623. pTDefRegMap(@Self)^.clr := $00000020;
  56624. end;
  56625. procedure TINT_IFS1.setI2C2ABIF(thebits : TBits_1); inline;
  56626. begin
  56627. if thebits = 0 then
  56628. pTDefRegMap(@Self)^.clr := $00000020
  56629. else
  56630. pTDefRegMap(@Self)^.&set := $00000020;
  56631. end;
  56632. function TINT_IFS1.getI2C2ABIF : TBits_1; inline;
  56633. begin
  56634. getI2C2ABIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56635. end;
  56636. procedure TINT_IFS1.setI2C2ASIF; inline;
  56637. begin
  56638. pTDefRegMap(@Self)^.&set := $00000040;
  56639. end;
  56640. procedure TINT_IFS1.clearI2C2ASIF; inline;
  56641. begin
  56642. pTDefRegMap(@Self)^.clr := $00000040;
  56643. end;
  56644. procedure TINT_IFS1.setI2C2ASIF(thebits : TBits_1); inline;
  56645. begin
  56646. if thebits = 0 then
  56647. pTDefRegMap(@Self)^.clr := $00000040
  56648. else
  56649. pTDefRegMap(@Self)^.&set := $00000040;
  56650. end;
  56651. function TINT_IFS1.getI2C2ASIF : TBits_1; inline;
  56652. begin
  56653. getI2C2ASIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56654. end;
  56655. procedure TINT_IFS1.setI2C2AMIF; inline;
  56656. begin
  56657. pTDefRegMap(@Self)^.&set := $00000080;
  56658. end;
  56659. procedure TINT_IFS1.clearI2C2AMIF; inline;
  56660. begin
  56661. pTDefRegMap(@Self)^.clr := $00000080;
  56662. end;
  56663. procedure TINT_IFS1.setI2C2AMIF(thebits : TBits_1); inline;
  56664. begin
  56665. if thebits = 0 then
  56666. pTDefRegMap(@Self)^.clr := $00000080
  56667. else
  56668. pTDefRegMap(@Self)^.&set := $00000080;
  56669. end;
  56670. function TINT_IFS1.getI2C2AMIF : TBits_1; inline;
  56671. begin
  56672. getI2C2AMIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56673. end;
  56674. procedure TINT_IFS1.setI2C3ABIF; inline;
  56675. begin
  56676. pTDefRegMap(@Self)^.&set := $00000100;
  56677. end;
  56678. procedure TINT_IFS1.clearI2C3ABIF; inline;
  56679. begin
  56680. pTDefRegMap(@Self)^.clr := $00000100;
  56681. end;
  56682. procedure TINT_IFS1.setI2C3ABIF(thebits : TBits_1); inline;
  56683. begin
  56684. if thebits = 0 then
  56685. pTDefRegMap(@Self)^.clr := $00000100
  56686. else
  56687. pTDefRegMap(@Self)^.&set := $00000100;
  56688. end;
  56689. function TINT_IFS1.getI2C3ABIF : TBits_1; inline;
  56690. begin
  56691. getI2C3ABIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56692. end;
  56693. procedure TINT_IFS1.setI2C3ASIF; inline;
  56694. begin
  56695. pTDefRegMap(@Self)^.&set := $00000200;
  56696. end;
  56697. procedure TINT_IFS1.clearI2C3ASIF; inline;
  56698. begin
  56699. pTDefRegMap(@Self)^.clr := $00000200;
  56700. end;
  56701. procedure TINT_IFS1.setI2C3ASIF(thebits : TBits_1); inline;
  56702. begin
  56703. if thebits = 0 then
  56704. pTDefRegMap(@Self)^.clr := $00000200
  56705. else
  56706. pTDefRegMap(@Self)^.&set := $00000200;
  56707. end;
  56708. function TINT_IFS1.getI2C3ASIF : TBits_1; inline;
  56709. begin
  56710. getI2C3ASIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56711. end;
  56712. procedure TINT_IFS1.setI2C3AMIF; inline;
  56713. begin
  56714. pTDefRegMap(@Self)^.&set := $00000400;
  56715. end;
  56716. procedure TINT_IFS1.clearI2C3AMIF; inline;
  56717. begin
  56718. pTDefRegMap(@Self)^.clr := $00000400;
  56719. end;
  56720. procedure TINT_IFS1.setI2C3AMIF(thebits : TBits_1); inline;
  56721. begin
  56722. if thebits = 0 then
  56723. pTDefRegMap(@Self)^.clr := $00000400
  56724. else
  56725. pTDefRegMap(@Self)^.&set := $00000400;
  56726. end;
  56727. function TINT_IFS1.getI2C3AMIF : TBits_1; inline;
  56728. begin
  56729. getI2C3AMIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56730. end;
  56731. procedure TINT_IFS1.setw(thebits : TBits_32); inline;
  56732. begin
  56733. pTDefRegMap(@Self)^.val := thebits;
  56734. end;
  56735. function TINT_IFS1.getw : TBits_32; inline;
  56736. begin
  56737. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  56738. end;
  56739. procedure TINT_IFS2.setIC4EIF; inline;
  56740. begin
  56741. pTDefRegMap(@Self)^.&set := $00000001;
  56742. end;
  56743. procedure TINT_IFS2.clearIC4EIF; inline;
  56744. begin
  56745. pTDefRegMap(@Self)^.clr := $00000001;
  56746. end;
  56747. procedure TINT_IFS2.setIC4EIF(thebits : TBits_1); inline;
  56748. begin
  56749. if thebits = 0 then
  56750. pTDefRegMap(@Self)^.clr := $00000001
  56751. else
  56752. pTDefRegMap(@Self)^.&set := $00000001;
  56753. end;
  56754. function TINT_IFS2.getIC4EIF : TBits_1; inline;
  56755. begin
  56756. getIC4EIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  56757. end;
  56758. procedure TINT_IFS2.setIC5EIF; inline;
  56759. begin
  56760. pTDefRegMap(@Self)^.&set := $00000002;
  56761. end;
  56762. procedure TINT_IFS2.clearIC5EIF; inline;
  56763. begin
  56764. pTDefRegMap(@Self)^.clr := $00000002;
  56765. end;
  56766. procedure TINT_IFS2.setIC5EIF(thebits : TBits_1); inline;
  56767. begin
  56768. if thebits = 0 then
  56769. pTDefRegMap(@Self)^.clr := $00000002
  56770. else
  56771. pTDefRegMap(@Self)^.&set := $00000002;
  56772. end;
  56773. function TINT_IFS2.getIC5EIF : TBits_1; inline;
  56774. begin
  56775. getIC5EIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  56776. end;
  56777. procedure TINT_IFS2.setPMPEIF; inline;
  56778. begin
  56779. pTDefRegMap(@Self)^.&set := $00000004;
  56780. end;
  56781. procedure TINT_IFS2.clearPMPEIF; inline;
  56782. begin
  56783. pTDefRegMap(@Self)^.clr := $00000004;
  56784. end;
  56785. procedure TINT_IFS2.setPMPEIF(thebits : TBits_1); inline;
  56786. begin
  56787. if thebits = 0 then
  56788. pTDefRegMap(@Self)^.clr := $00000004
  56789. else
  56790. pTDefRegMap(@Self)^.&set := $00000004;
  56791. end;
  56792. function TINT_IFS2.getPMPEIF : TBits_1; inline;
  56793. begin
  56794. getPMPEIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  56795. end;
  56796. procedure TINT_IFS2.setU1BEIF; inline;
  56797. begin
  56798. pTDefRegMap(@Self)^.&set := $00000008;
  56799. end;
  56800. procedure TINT_IFS2.clearU1BEIF; inline;
  56801. begin
  56802. pTDefRegMap(@Self)^.clr := $00000008;
  56803. end;
  56804. procedure TINT_IFS2.setU1BEIF(thebits : TBits_1); inline;
  56805. begin
  56806. if thebits = 0 then
  56807. pTDefRegMap(@Self)^.clr := $00000008
  56808. else
  56809. pTDefRegMap(@Self)^.&set := $00000008;
  56810. end;
  56811. function TINT_IFS2.getU1BEIF : TBits_1; inline;
  56812. begin
  56813. getU1BEIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56814. end;
  56815. procedure TINT_IFS2.setU1BRXIF; inline;
  56816. begin
  56817. pTDefRegMap(@Self)^.&set := $00000010;
  56818. end;
  56819. procedure TINT_IFS2.clearU1BRXIF; inline;
  56820. begin
  56821. pTDefRegMap(@Self)^.clr := $00000010;
  56822. end;
  56823. procedure TINT_IFS2.setU1BRXIF(thebits : TBits_1); inline;
  56824. begin
  56825. if thebits = 0 then
  56826. pTDefRegMap(@Self)^.clr := $00000010
  56827. else
  56828. pTDefRegMap(@Self)^.&set := $00000010;
  56829. end;
  56830. function TINT_IFS2.getU1BRXIF : TBits_1; inline;
  56831. begin
  56832. getU1BRXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  56833. end;
  56834. procedure TINT_IFS2.setU1BTXIF; inline;
  56835. begin
  56836. pTDefRegMap(@Self)^.&set := $00000020;
  56837. end;
  56838. procedure TINT_IFS2.clearU1BTXIF; inline;
  56839. begin
  56840. pTDefRegMap(@Self)^.clr := $00000020;
  56841. end;
  56842. procedure TINT_IFS2.setU1BTXIF(thebits : TBits_1); inline;
  56843. begin
  56844. if thebits = 0 then
  56845. pTDefRegMap(@Self)^.clr := $00000020
  56846. else
  56847. pTDefRegMap(@Self)^.&set := $00000020;
  56848. end;
  56849. function TINT_IFS2.getU1BTXIF : TBits_1; inline;
  56850. begin
  56851. getU1BTXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  56852. end;
  56853. procedure TINT_IFS2.setU2BEIF; inline;
  56854. begin
  56855. pTDefRegMap(@Self)^.&set := $00000040;
  56856. end;
  56857. procedure TINT_IFS2.clearU2BEIF; inline;
  56858. begin
  56859. pTDefRegMap(@Self)^.clr := $00000040;
  56860. end;
  56861. procedure TINT_IFS2.setU2BEIF(thebits : TBits_1); inline;
  56862. begin
  56863. if thebits = 0 then
  56864. pTDefRegMap(@Self)^.clr := $00000040
  56865. else
  56866. pTDefRegMap(@Self)^.&set := $00000040;
  56867. end;
  56868. function TINT_IFS2.getU2BEIF : TBits_1; inline;
  56869. begin
  56870. getU2BEIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  56871. end;
  56872. procedure TINT_IFS2.setU2BRXIF; inline;
  56873. begin
  56874. pTDefRegMap(@Self)^.&set := $00000080;
  56875. end;
  56876. procedure TINT_IFS2.clearU2BRXIF; inline;
  56877. begin
  56878. pTDefRegMap(@Self)^.clr := $00000080;
  56879. end;
  56880. procedure TINT_IFS2.setU2BRXIF(thebits : TBits_1); inline;
  56881. begin
  56882. if thebits = 0 then
  56883. pTDefRegMap(@Self)^.clr := $00000080
  56884. else
  56885. pTDefRegMap(@Self)^.&set := $00000080;
  56886. end;
  56887. function TINT_IFS2.getU2BRXIF : TBits_1; inline;
  56888. begin
  56889. getU2BRXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  56890. end;
  56891. procedure TINT_IFS2.setU2BTXIF; inline;
  56892. begin
  56893. pTDefRegMap(@Self)^.&set := $00000100;
  56894. end;
  56895. procedure TINT_IFS2.clearU2BTXIF; inline;
  56896. begin
  56897. pTDefRegMap(@Self)^.clr := $00000100;
  56898. end;
  56899. procedure TINT_IFS2.setU2BTXIF(thebits : TBits_1); inline;
  56900. begin
  56901. if thebits = 0 then
  56902. pTDefRegMap(@Self)^.clr := $00000100
  56903. else
  56904. pTDefRegMap(@Self)^.&set := $00000100;
  56905. end;
  56906. function TINT_IFS2.getU2BTXIF : TBits_1; inline;
  56907. begin
  56908. getU2BTXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  56909. end;
  56910. procedure TINT_IFS2.setU3BEIF; inline;
  56911. begin
  56912. pTDefRegMap(@Self)^.&set := $00000200;
  56913. end;
  56914. procedure TINT_IFS2.clearU3BEIF; inline;
  56915. begin
  56916. pTDefRegMap(@Self)^.clr := $00000200;
  56917. end;
  56918. procedure TINT_IFS2.setU3BEIF(thebits : TBits_1); inline;
  56919. begin
  56920. if thebits = 0 then
  56921. pTDefRegMap(@Self)^.clr := $00000200
  56922. else
  56923. pTDefRegMap(@Self)^.&set := $00000200;
  56924. end;
  56925. function TINT_IFS2.getU3BEIF : TBits_1; inline;
  56926. begin
  56927. getU3BEIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  56928. end;
  56929. procedure TINT_IFS2.setU3BRXIF; inline;
  56930. begin
  56931. pTDefRegMap(@Self)^.&set := $00000400;
  56932. end;
  56933. procedure TINT_IFS2.clearU3BRXIF; inline;
  56934. begin
  56935. pTDefRegMap(@Self)^.clr := $00000400;
  56936. end;
  56937. procedure TINT_IFS2.setU3BRXIF(thebits : TBits_1); inline;
  56938. begin
  56939. if thebits = 0 then
  56940. pTDefRegMap(@Self)^.clr := $00000400
  56941. else
  56942. pTDefRegMap(@Self)^.&set := $00000400;
  56943. end;
  56944. function TINT_IFS2.getU3BRXIF : TBits_1; inline;
  56945. begin
  56946. getU3BRXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  56947. end;
  56948. procedure TINT_IFS2.setU3BTXIF; inline;
  56949. begin
  56950. pTDefRegMap(@Self)^.&set := $00000800;
  56951. end;
  56952. procedure TINT_IFS2.clearU3BTXIF; inline;
  56953. begin
  56954. pTDefRegMap(@Self)^.clr := $00000800;
  56955. end;
  56956. procedure TINT_IFS2.setU3BTXIF(thebits : TBits_1); inline;
  56957. begin
  56958. if thebits = 0 then
  56959. pTDefRegMap(@Self)^.clr := $00000800
  56960. else
  56961. pTDefRegMap(@Self)^.&set := $00000800;
  56962. end;
  56963. function TINT_IFS2.getU3BTXIF : TBits_1; inline;
  56964. begin
  56965. getU3BTXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  56966. end;
  56967. procedure TINT_IFS2.setU4EIF; inline;
  56968. begin
  56969. pTDefRegMap(@Self)^.&set := $00000008;
  56970. end;
  56971. procedure TINT_IFS2.clearU4EIF; inline;
  56972. begin
  56973. pTDefRegMap(@Self)^.clr := $00000008;
  56974. end;
  56975. procedure TINT_IFS2.setU4EIF(thebits : TBits_1); inline;
  56976. begin
  56977. if thebits = 0 then
  56978. pTDefRegMap(@Self)^.clr := $00000008
  56979. else
  56980. pTDefRegMap(@Self)^.&set := $00000008;
  56981. end;
  56982. function TINT_IFS2.getU4EIF : TBits_1; inline;
  56983. begin
  56984. getU4EIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  56985. end;
  56986. procedure TINT_IFS2.setU4RXIF; inline;
  56987. begin
  56988. pTDefRegMap(@Self)^.&set := $00000010;
  56989. end;
  56990. procedure TINT_IFS2.clearU4RXIF; inline;
  56991. begin
  56992. pTDefRegMap(@Self)^.clr := $00000010;
  56993. end;
  56994. procedure TINT_IFS2.setU4RXIF(thebits : TBits_1); inline;
  56995. begin
  56996. if thebits = 0 then
  56997. pTDefRegMap(@Self)^.clr := $00000010
  56998. else
  56999. pTDefRegMap(@Self)^.&set := $00000010;
  57000. end;
  57001. function TINT_IFS2.getU4RXIF : TBits_1; inline;
  57002. begin
  57003. getU4RXIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57004. end;
  57005. procedure TINT_IFS2.setU4TXIF; inline;
  57006. begin
  57007. pTDefRegMap(@Self)^.&set := $00000020;
  57008. end;
  57009. procedure TINT_IFS2.clearU4TXIF; inline;
  57010. begin
  57011. pTDefRegMap(@Self)^.clr := $00000020;
  57012. end;
  57013. procedure TINT_IFS2.setU4TXIF(thebits : TBits_1); inline;
  57014. begin
  57015. if thebits = 0 then
  57016. pTDefRegMap(@Self)^.clr := $00000020
  57017. else
  57018. pTDefRegMap(@Self)^.&set := $00000020;
  57019. end;
  57020. function TINT_IFS2.getU4TXIF : TBits_1; inline;
  57021. begin
  57022. getU4TXIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57023. end;
  57024. procedure TINT_IFS2.setU6EIF; inline;
  57025. begin
  57026. pTDefRegMap(@Self)^.&set := $00000040;
  57027. end;
  57028. procedure TINT_IFS2.clearU6EIF; inline;
  57029. begin
  57030. pTDefRegMap(@Self)^.clr := $00000040;
  57031. end;
  57032. procedure TINT_IFS2.setU6EIF(thebits : TBits_1); inline;
  57033. begin
  57034. if thebits = 0 then
  57035. pTDefRegMap(@Self)^.clr := $00000040
  57036. else
  57037. pTDefRegMap(@Self)^.&set := $00000040;
  57038. end;
  57039. function TINT_IFS2.getU6EIF : TBits_1; inline;
  57040. begin
  57041. getU6EIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57042. end;
  57043. procedure TINT_IFS2.setU6RXIF; inline;
  57044. begin
  57045. pTDefRegMap(@Self)^.&set := $00000080;
  57046. end;
  57047. procedure TINT_IFS2.clearU6RXIF; inline;
  57048. begin
  57049. pTDefRegMap(@Self)^.clr := $00000080;
  57050. end;
  57051. procedure TINT_IFS2.setU6RXIF(thebits : TBits_1); inline;
  57052. begin
  57053. if thebits = 0 then
  57054. pTDefRegMap(@Self)^.clr := $00000080
  57055. else
  57056. pTDefRegMap(@Self)^.&set := $00000080;
  57057. end;
  57058. function TINT_IFS2.getU6RXIF : TBits_1; inline;
  57059. begin
  57060. getU6RXIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57061. end;
  57062. procedure TINT_IFS2.setU6TXIF; inline;
  57063. begin
  57064. pTDefRegMap(@Self)^.&set := $00000100;
  57065. end;
  57066. procedure TINT_IFS2.clearU6TXIF; inline;
  57067. begin
  57068. pTDefRegMap(@Self)^.clr := $00000100;
  57069. end;
  57070. procedure TINT_IFS2.setU6TXIF(thebits : TBits_1); inline;
  57071. begin
  57072. if thebits = 0 then
  57073. pTDefRegMap(@Self)^.clr := $00000100
  57074. else
  57075. pTDefRegMap(@Self)^.&set := $00000100;
  57076. end;
  57077. function TINT_IFS2.getU6TXIF : TBits_1; inline;
  57078. begin
  57079. getU6TXIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57080. end;
  57081. procedure TINT_IFS2.setU5EIF; inline;
  57082. begin
  57083. pTDefRegMap(@Self)^.&set := $00000200;
  57084. end;
  57085. procedure TINT_IFS2.clearU5EIF; inline;
  57086. begin
  57087. pTDefRegMap(@Self)^.clr := $00000200;
  57088. end;
  57089. procedure TINT_IFS2.setU5EIF(thebits : TBits_1); inline;
  57090. begin
  57091. if thebits = 0 then
  57092. pTDefRegMap(@Self)^.clr := $00000200
  57093. else
  57094. pTDefRegMap(@Self)^.&set := $00000200;
  57095. end;
  57096. function TINT_IFS2.getU5EIF : TBits_1; inline;
  57097. begin
  57098. getU5EIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57099. end;
  57100. procedure TINT_IFS2.setU5RXIF; inline;
  57101. begin
  57102. pTDefRegMap(@Self)^.&set := $00000400;
  57103. end;
  57104. procedure TINT_IFS2.clearU5RXIF; inline;
  57105. begin
  57106. pTDefRegMap(@Self)^.clr := $00000400;
  57107. end;
  57108. procedure TINT_IFS2.setU5RXIF(thebits : TBits_1); inline;
  57109. begin
  57110. if thebits = 0 then
  57111. pTDefRegMap(@Self)^.clr := $00000400
  57112. else
  57113. pTDefRegMap(@Self)^.&set := $00000400;
  57114. end;
  57115. function TINT_IFS2.getU5RXIF : TBits_1; inline;
  57116. begin
  57117. getU5RXIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57118. end;
  57119. procedure TINT_IFS2.setU5TXIF; inline;
  57120. begin
  57121. pTDefRegMap(@Self)^.&set := $00000800;
  57122. end;
  57123. procedure TINT_IFS2.clearU5TXIF; inline;
  57124. begin
  57125. pTDefRegMap(@Self)^.clr := $00000800;
  57126. end;
  57127. procedure TINT_IFS2.setU5TXIF(thebits : TBits_1); inline;
  57128. begin
  57129. if thebits = 0 then
  57130. pTDefRegMap(@Self)^.clr := $00000800
  57131. else
  57132. pTDefRegMap(@Self)^.&set := $00000800;
  57133. end;
  57134. function TINT_IFS2.getU5TXIF : TBits_1; inline;
  57135. begin
  57136. getU5TXIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57137. end;
  57138. procedure TINT_IFS2.setw(thebits : TBits_32); inline;
  57139. begin
  57140. pTDefRegMap(@Self)^.val := thebits;
  57141. end;
  57142. function TINT_IFS2.getw : TBits_32; inline;
  57143. begin
  57144. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57145. end;
  57146. procedure TINT_IEC0.setCTIE; inline;
  57147. begin
  57148. pTDefRegMap(@Self)^.&set := $00000001;
  57149. end;
  57150. procedure TINT_IEC0.clearCTIE; inline;
  57151. begin
  57152. pTDefRegMap(@Self)^.clr := $00000001;
  57153. end;
  57154. procedure TINT_IEC0.setCTIE(thebits : TBits_1); inline;
  57155. begin
  57156. if thebits = 0 then
  57157. pTDefRegMap(@Self)^.clr := $00000001
  57158. else
  57159. pTDefRegMap(@Self)^.&set := $00000001;
  57160. end;
  57161. function TINT_IEC0.getCTIE : TBits_1; inline;
  57162. begin
  57163. getCTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  57164. end;
  57165. procedure TINT_IEC0.setCS0IE; inline;
  57166. begin
  57167. pTDefRegMap(@Self)^.&set := $00000002;
  57168. end;
  57169. procedure TINT_IEC0.clearCS0IE; inline;
  57170. begin
  57171. pTDefRegMap(@Self)^.clr := $00000002;
  57172. end;
  57173. procedure TINT_IEC0.setCS0IE(thebits : TBits_1); inline;
  57174. begin
  57175. if thebits = 0 then
  57176. pTDefRegMap(@Self)^.clr := $00000002
  57177. else
  57178. pTDefRegMap(@Self)^.&set := $00000002;
  57179. end;
  57180. function TINT_IEC0.getCS0IE : TBits_1; inline;
  57181. begin
  57182. getCS0IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  57183. end;
  57184. procedure TINT_IEC0.setCS1IE; inline;
  57185. begin
  57186. pTDefRegMap(@Self)^.&set := $00000004;
  57187. end;
  57188. procedure TINT_IEC0.clearCS1IE; inline;
  57189. begin
  57190. pTDefRegMap(@Self)^.clr := $00000004;
  57191. end;
  57192. procedure TINT_IEC0.setCS1IE(thebits : TBits_1); inline;
  57193. begin
  57194. if thebits = 0 then
  57195. pTDefRegMap(@Self)^.clr := $00000004
  57196. else
  57197. pTDefRegMap(@Self)^.&set := $00000004;
  57198. end;
  57199. function TINT_IEC0.getCS1IE : TBits_1; inline;
  57200. begin
  57201. getCS1IE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  57202. end;
  57203. procedure TINT_IEC0.setINT0IE; inline;
  57204. begin
  57205. pTDefRegMap(@Self)^.&set := $00000008;
  57206. end;
  57207. procedure TINT_IEC0.clearINT0IE; inline;
  57208. begin
  57209. pTDefRegMap(@Self)^.clr := $00000008;
  57210. end;
  57211. procedure TINT_IEC0.setINT0IE(thebits : TBits_1); inline;
  57212. begin
  57213. if thebits = 0 then
  57214. pTDefRegMap(@Self)^.clr := $00000008
  57215. else
  57216. pTDefRegMap(@Self)^.&set := $00000008;
  57217. end;
  57218. function TINT_IEC0.getINT0IE : TBits_1; inline;
  57219. begin
  57220. getINT0IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  57221. end;
  57222. procedure TINT_IEC0.setT1IE; inline;
  57223. begin
  57224. pTDefRegMap(@Self)^.&set := $00000010;
  57225. end;
  57226. procedure TINT_IEC0.clearT1IE; inline;
  57227. begin
  57228. pTDefRegMap(@Self)^.clr := $00000010;
  57229. end;
  57230. procedure TINT_IEC0.setT1IE(thebits : TBits_1); inline;
  57231. begin
  57232. if thebits = 0 then
  57233. pTDefRegMap(@Self)^.clr := $00000010
  57234. else
  57235. pTDefRegMap(@Self)^.&set := $00000010;
  57236. end;
  57237. function TINT_IEC0.getT1IE : TBits_1; inline;
  57238. begin
  57239. getT1IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  57240. end;
  57241. procedure TINT_IEC0.setIC1IE; inline;
  57242. begin
  57243. pTDefRegMap(@Self)^.&set := $00000020;
  57244. end;
  57245. procedure TINT_IEC0.clearIC1IE; inline;
  57246. begin
  57247. pTDefRegMap(@Self)^.clr := $00000020;
  57248. end;
  57249. procedure TINT_IEC0.setIC1IE(thebits : TBits_1); inline;
  57250. begin
  57251. if thebits = 0 then
  57252. pTDefRegMap(@Self)^.clr := $00000020
  57253. else
  57254. pTDefRegMap(@Self)^.&set := $00000020;
  57255. end;
  57256. function TINT_IEC0.getIC1IE : TBits_1; inline;
  57257. begin
  57258. getIC1IE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  57259. end;
  57260. procedure TINT_IEC0.setOC1IE; inline;
  57261. begin
  57262. pTDefRegMap(@Self)^.&set := $00000040;
  57263. end;
  57264. procedure TINT_IEC0.clearOC1IE; inline;
  57265. begin
  57266. pTDefRegMap(@Self)^.clr := $00000040;
  57267. end;
  57268. procedure TINT_IEC0.setOC1IE(thebits : TBits_1); inline;
  57269. begin
  57270. if thebits = 0 then
  57271. pTDefRegMap(@Self)^.clr := $00000040
  57272. else
  57273. pTDefRegMap(@Self)^.&set := $00000040;
  57274. end;
  57275. function TINT_IEC0.getOC1IE : TBits_1; inline;
  57276. begin
  57277. getOC1IE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  57278. end;
  57279. procedure TINT_IEC0.setINT1IE; inline;
  57280. begin
  57281. pTDefRegMap(@Self)^.&set := $00000080;
  57282. end;
  57283. procedure TINT_IEC0.clearINT1IE; inline;
  57284. begin
  57285. pTDefRegMap(@Self)^.clr := $00000080;
  57286. end;
  57287. procedure TINT_IEC0.setINT1IE(thebits : TBits_1); inline;
  57288. begin
  57289. if thebits = 0 then
  57290. pTDefRegMap(@Self)^.clr := $00000080
  57291. else
  57292. pTDefRegMap(@Self)^.&set := $00000080;
  57293. end;
  57294. function TINT_IEC0.getINT1IE : TBits_1; inline;
  57295. begin
  57296. getINT1IE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  57297. end;
  57298. procedure TINT_IEC0.setT2IE; inline;
  57299. begin
  57300. pTDefRegMap(@Self)^.&set := $00000100;
  57301. end;
  57302. procedure TINT_IEC0.clearT2IE; inline;
  57303. begin
  57304. pTDefRegMap(@Self)^.clr := $00000100;
  57305. end;
  57306. procedure TINT_IEC0.setT2IE(thebits : TBits_1); inline;
  57307. begin
  57308. if thebits = 0 then
  57309. pTDefRegMap(@Self)^.clr := $00000100
  57310. else
  57311. pTDefRegMap(@Self)^.&set := $00000100;
  57312. end;
  57313. function TINT_IEC0.getT2IE : TBits_1; inline;
  57314. begin
  57315. getT2IE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  57316. end;
  57317. procedure TINT_IEC0.setIC2IE; inline;
  57318. begin
  57319. pTDefRegMap(@Self)^.&set := $00000200;
  57320. end;
  57321. procedure TINT_IEC0.clearIC2IE; inline;
  57322. begin
  57323. pTDefRegMap(@Self)^.clr := $00000200;
  57324. end;
  57325. procedure TINT_IEC0.setIC2IE(thebits : TBits_1); inline;
  57326. begin
  57327. if thebits = 0 then
  57328. pTDefRegMap(@Self)^.clr := $00000200
  57329. else
  57330. pTDefRegMap(@Self)^.&set := $00000200;
  57331. end;
  57332. function TINT_IEC0.getIC2IE : TBits_1; inline;
  57333. begin
  57334. getIC2IE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  57335. end;
  57336. procedure TINT_IEC0.setOC2IE; inline;
  57337. begin
  57338. pTDefRegMap(@Self)^.&set := $00000400;
  57339. end;
  57340. procedure TINT_IEC0.clearOC2IE; inline;
  57341. begin
  57342. pTDefRegMap(@Self)^.clr := $00000400;
  57343. end;
  57344. procedure TINT_IEC0.setOC2IE(thebits : TBits_1); inline;
  57345. begin
  57346. if thebits = 0 then
  57347. pTDefRegMap(@Self)^.clr := $00000400
  57348. else
  57349. pTDefRegMap(@Self)^.&set := $00000400;
  57350. end;
  57351. function TINT_IEC0.getOC2IE : TBits_1; inline;
  57352. begin
  57353. getOC2IE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  57354. end;
  57355. procedure TINT_IEC0.setINT2IE; inline;
  57356. begin
  57357. pTDefRegMap(@Self)^.&set := $00000800;
  57358. end;
  57359. procedure TINT_IEC0.clearINT2IE; inline;
  57360. begin
  57361. pTDefRegMap(@Self)^.clr := $00000800;
  57362. end;
  57363. procedure TINT_IEC0.setINT2IE(thebits : TBits_1); inline;
  57364. begin
  57365. if thebits = 0 then
  57366. pTDefRegMap(@Self)^.clr := $00000800
  57367. else
  57368. pTDefRegMap(@Self)^.&set := $00000800;
  57369. end;
  57370. function TINT_IEC0.getINT2IE : TBits_1; inline;
  57371. begin
  57372. getINT2IE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  57373. end;
  57374. procedure TINT_IEC0.setT3IE; inline;
  57375. begin
  57376. pTDefRegMap(@Self)^.&set := $00001000;
  57377. end;
  57378. procedure TINT_IEC0.clearT3IE; inline;
  57379. begin
  57380. pTDefRegMap(@Self)^.clr := $00001000;
  57381. end;
  57382. procedure TINT_IEC0.setT3IE(thebits : TBits_1); inline;
  57383. begin
  57384. if thebits = 0 then
  57385. pTDefRegMap(@Self)^.clr := $00001000
  57386. else
  57387. pTDefRegMap(@Self)^.&set := $00001000;
  57388. end;
  57389. function TINT_IEC0.getT3IE : TBits_1; inline;
  57390. begin
  57391. getT3IE := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  57392. end;
  57393. procedure TINT_IEC0.setIC3IE; inline;
  57394. begin
  57395. pTDefRegMap(@Self)^.&set := $00002000;
  57396. end;
  57397. procedure TINT_IEC0.clearIC3IE; inline;
  57398. begin
  57399. pTDefRegMap(@Self)^.clr := $00002000;
  57400. end;
  57401. procedure TINT_IEC0.setIC3IE(thebits : TBits_1); inline;
  57402. begin
  57403. if thebits = 0 then
  57404. pTDefRegMap(@Self)^.clr := $00002000
  57405. else
  57406. pTDefRegMap(@Self)^.&set := $00002000;
  57407. end;
  57408. function TINT_IEC0.getIC3IE : TBits_1; inline;
  57409. begin
  57410. getIC3IE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  57411. end;
  57412. procedure TINT_IEC0.setOC3IE; inline;
  57413. begin
  57414. pTDefRegMap(@Self)^.&set := $00004000;
  57415. end;
  57416. procedure TINT_IEC0.clearOC3IE; inline;
  57417. begin
  57418. pTDefRegMap(@Self)^.clr := $00004000;
  57419. end;
  57420. procedure TINT_IEC0.setOC3IE(thebits : TBits_1); inline;
  57421. begin
  57422. if thebits = 0 then
  57423. pTDefRegMap(@Self)^.clr := $00004000
  57424. else
  57425. pTDefRegMap(@Self)^.&set := $00004000;
  57426. end;
  57427. function TINT_IEC0.getOC3IE : TBits_1; inline;
  57428. begin
  57429. getOC3IE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  57430. end;
  57431. procedure TINT_IEC0.setINT3IE; inline;
  57432. begin
  57433. pTDefRegMap(@Self)^.&set := $00008000;
  57434. end;
  57435. procedure TINT_IEC0.clearINT3IE; inline;
  57436. begin
  57437. pTDefRegMap(@Self)^.clr := $00008000;
  57438. end;
  57439. procedure TINT_IEC0.setINT3IE(thebits : TBits_1); inline;
  57440. begin
  57441. if thebits = 0 then
  57442. pTDefRegMap(@Self)^.clr := $00008000
  57443. else
  57444. pTDefRegMap(@Self)^.&set := $00008000;
  57445. end;
  57446. function TINT_IEC0.getINT3IE : TBits_1; inline;
  57447. begin
  57448. getINT3IE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  57449. end;
  57450. procedure TINT_IEC0.setT4IE; inline;
  57451. begin
  57452. pTDefRegMap(@Self)^.&set := $00010000;
  57453. end;
  57454. procedure TINT_IEC0.clearT4IE; inline;
  57455. begin
  57456. pTDefRegMap(@Self)^.clr := $00010000;
  57457. end;
  57458. procedure TINT_IEC0.setT4IE(thebits : TBits_1); inline;
  57459. begin
  57460. if thebits = 0 then
  57461. pTDefRegMap(@Self)^.clr := $00010000
  57462. else
  57463. pTDefRegMap(@Self)^.&set := $00010000;
  57464. end;
  57465. function TINT_IEC0.getT4IE : TBits_1; inline;
  57466. begin
  57467. getT4IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  57468. end;
  57469. procedure TINT_IEC0.setIC4IE; inline;
  57470. begin
  57471. pTDefRegMap(@Self)^.&set := $00020000;
  57472. end;
  57473. procedure TINT_IEC0.clearIC4IE; inline;
  57474. begin
  57475. pTDefRegMap(@Self)^.clr := $00020000;
  57476. end;
  57477. procedure TINT_IEC0.setIC4IE(thebits : TBits_1); inline;
  57478. begin
  57479. if thebits = 0 then
  57480. pTDefRegMap(@Self)^.clr := $00020000
  57481. else
  57482. pTDefRegMap(@Self)^.&set := $00020000;
  57483. end;
  57484. function TINT_IEC0.getIC4IE : TBits_1; inline;
  57485. begin
  57486. getIC4IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  57487. end;
  57488. procedure TINT_IEC0.setOC4IE; inline;
  57489. begin
  57490. pTDefRegMap(@Self)^.&set := $00040000;
  57491. end;
  57492. procedure TINT_IEC0.clearOC4IE; inline;
  57493. begin
  57494. pTDefRegMap(@Self)^.clr := $00040000;
  57495. end;
  57496. procedure TINT_IEC0.setOC4IE(thebits : TBits_1); inline;
  57497. begin
  57498. if thebits = 0 then
  57499. pTDefRegMap(@Self)^.clr := $00040000
  57500. else
  57501. pTDefRegMap(@Self)^.&set := $00040000;
  57502. end;
  57503. function TINT_IEC0.getOC4IE : TBits_1; inline;
  57504. begin
  57505. getOC4IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  57506. end;
  57507. procedure TINT_IEC0.setINT4IE; inline;
  57508. begin
  57509. pTDefRegMap(@Self)^.&set := $00080000;
  57510. end;
  57511. procedure TINT_IEC0.clearINT4IE; inline;
  57512. begin
  57513. pTDefRegMap(@Self)^.clr := $00080000;
  57514. end;
  57515. procedure TINT_IEC0.setINT4IE(thebits : TBits_1); inline;
  57516. begin
  57517. if thebits = 0 then
  57518. pTDefRegMap(@Self)^.clr := $00080000
  57519. else
  57520. pTDefRegMap(@Self)^.&set := $00080000;
  57521. end;
  57522. function TINT_IEC0.getINT4IE : TBits_1; inline;
  57523. begin
  57524. getINT4IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  57525. end;
  57526. procedure TINT_IEC0.setT5IE; inline;
  57527. begin
  57528. pTDefRegMap(@Self)^.&set := $00100000;
  57529. end;
  57530. procedure TINT_IEC0.clearT5IE; inline;
  57531. begin
  57532. pTDefRegMap(@Self)^.clr := $00100000;
  57533. end;
  57534. procedure TINT_IEC0.setT5IE(thebits : TBits_1); inline;
  57535. begin
  57536. if thebits = 0 then
  57537. pTDefRegMap(@Self)^.clr := $00100000
  57538. else
  57539. pTDefRegMap(@Self)^.&set := $00100000;
  57540. end;
  57541. function TINT_IEC0.getT5IE : TBits_1; inline;
  57542. begin
  57543. getT5IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  57544. end;
  57545. procedure TINT_IEC0.setIC5IE; inline;
  57546. begin
  57547. pTDefRegMap(@Self)^.&set := $00200000;
  57548. end;
  57549. procedure TINT_IEC0.clearIC5IE; inline;
  57550. begin
  57551. pTDefRegMap(@Self)^.clr := $00200000;
  57552. end;
  57553. procedure TINT_IEC0.setIC5IE(thebits : TBits_1); inline;
  57554. begin
  57555. if thebits = 0 then
  57556. pTDefRegMap(@Self)^.clr := $00200000
  57557. else
  57558. pTDefRegMap(@Self)^.&set := $00200000;
  57559. end;
  57560. function TINT_IEC0.getIC5IE : TBits_1; inline;
  57561. begin
  57562. getIC5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  57563. end;
  57564. procedure TINT_IEC0.setOC5IE; inline;
  57565. begin
  57566. pTDefRegMap(@Self)^.&set := $00400000;
  57567. end;
  57568. procedure TINT_IEC0.clearOC5IE; inline;
  57569. begin
  57570. pTDefRegMap(@Self)^.clr := $00400000;
  57571. end;
  57572. procedure TINT_IEC0.setOC5IE(thebits : TBits_1); inline;
  57573. begin
  57574. if thebits = 0 then
  57575. pTDefRegMap(@Self)^.clr := $00400000
  57576. else
  57577. pTDefRegMap(@Self)^.&set := $00400000;
  57578. end;
  57579. function TINT_IEC0.getOC5IE : TBits_1; inline;
  57580. begin
  57581. getOC5IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  57582. end;
  57583. procedure TINT_IEC0.setU1EIE; inline;
  57584. begin
  57585. pTDefRegMap(@Self)^.&set := $04000000;
  57586. end;
  57587. procedure TINT_IEC0.clearU1EIE; inline;
  57588. begin
  57589. pTDefRegMap(@Self)^.clr := $04000000;
  57590. end;
  57591. procedure TINT_IEC0.setU1EIE(thebits : TBits_1); inline;
  57592. begin
  57593. if thebits = 0 then
  57594. pTDefRegMap(@Self)^.clr := $04000000
  57595. else
  57596. pTDefRegMap(@Self)^.&set := $04000000;
  57597. end;
  57598. function TINT_IEC0.getU1EIE : TBits_1; inline;
  57599. begin
  57600. getU1EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57601. end;
  57602. procedure TINT_IEC0.setU1RXIE; inline;
  57603. begin
  57604. pTDefRegMap(@Self)^.&set := $08000000;
  57605. end;
  57606. procedure TINT_IEC0.clearU1RXIE; inline;
  57607. begin
  57608. pTDefRegMap(@Self)^.clr := $08000000;
  57609. end;
  57610. procedure TINT_IEC0.setU1RXIE(thebits : TBits_1); inline;
  57611. begin
  57612. if thebits = 0 then
  57613. pTDefRegMap(@Self)^.clr := $08000000
  57614. else
  57615. pTDefRegMap(@Self)^.&set := $08000000;
  57616. end;
  57617. function TINT_IEC0.getU1RXIE : TBits_1; inline;
  57618. begin
  57619. getU1RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57620. end;
  57621. procedure TINT_IEC0.setU1TXIE; inline;
  57622. begin
  57623. pTDefRegMap(@Self)^.&set := $10000000;
  57624. end;
  57625. procedure TINT_IEC0.clearU1TXIE; inline;
  57626. begin
  57627. pTDefRegMap(@Self)^.clr := $10000000;
  57628. end;
  57629. procedure TINT_IEC0.setU1TXIE(thebits : TBits_1); inline;
  57630. begin
  57631. if thebits = 0 then
  57632. pTDefRegMap(@Self)^.clr := $10000000
  57633. else
  57634. pTDefRegMap(@Self)^.&set := $10000000;
  57635. end;
  57636. function TINT_IEC0.getU1TXIE : TBits_1; inline;
  57637. begin
  57638. getU1TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57639. end;
  57640. procedure TINT_IEC0.setI2C1BIE; inline;
  57641. begin
  57642. pTDefRegMap(@Self)^.&set := $20000000;
  57643. end;
  57644. procedure TINT_IEC0.clearI2C1BIE; inline;
  57645. begin
  57646. pTDefRegMap(@Self)^.clr := $20000000;
  57647. end;
  57648. procedure TINT_IEC0.setI2C1BIE(thebits : TBits_1); inline;
  57649. begin
  57650. if thebits = 0 then
  57651. pTDefRegMap(@Self)^.clr := $20000000
  57652. else
  57653. pTDefRegMap(@Self)^.&set := $20000000;
  57654. end;
  57655. function TINT_IEC0.getI2C1BIE : TBits_1; inline;
  57656. begin
  57657. getI2C1BIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  57658. end;
  57659. procedure TINT_IEC0.setI2C1SIE; inline;
  57660. begin
  57661. pTDefRegMap(@Self)^.&set := $40000000;
  57662. end;
  57663. procedure TINT_IEC0.clearI2C1SIE; inline;
  57664. begin
  57665. pTDefRegMap(@Self)^.clr := $40000000;
  57666. end;
  57667. procedure TINT_IEC0.setI2C1SIE(thebits : TBits_1); inline;
  57668. begin
  57669. if thebits = 0 then
  57670. pTDefRegMap(@Self)^.clr := $40000000
  57671. else
  57672. pTDefRegMap(@Self)^.&set := $40000000;
  57673. end;
  57674. function TINT_IEC0.getI2C1SIE : TBits_1; inline;
  57675. begin
  57676. getI2C1SIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  57677. end;
  57678. procedure TINT_IEC0.setI2C1MIE; inline;
  57679. begin
  57680. pTDefRegMap(@Self)^.&set := $80000000;
  57681. end;
  57682. procedure TINT_IEC0.clearI2C1MIE; inline;
  57683. begin
  57684. pTDefRegMap(@Self)^.clr := $80000000;
  57685. end;
  57686. procedure TINT_IEC0.setI2C1MIE(thebits : TBits_1); inline;
  57687. begin
  57688. if thebits = 0 then
  57689. pTDefRegMap(@Self)^.clr := $80000000
  57690. else
  57691. pTDefRegMap(@Self)^.&set := $80000000;
  57692. end;
  57693. function TINT_IEC0.getI2C1MIE : TBits_1; inline;
  57694. begin
  57695. getI2C1MIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  57696. end;
  57697. procedure TINT_IEC0.setU1AEIE; inline;
  57698. begin
  57699. pTDefRegMap(@Self)^.&set := $04000000;
  57700. end;
  57701. procedure TINT_IEC0.clearU1AEIE; inline;
  57702. begin
  57703. pTDefRegMap(@Self)^.clr := $04000000;
  57704. end;
  57705. procedure TINT_IEC0.setU1AEIE(thebits : TBits_1); inline;
  57706. begin
  57707. if thebits = 0 then
  57708. pTDefRegMap(@Self)^.clr := $04000000
  57709. else
  57710. pTDefRegMap(@Self)^.&set := $04000000;
  57711. end;
  57712. function TINT_IEC0.getU1AEIE : TBits_1; inline;
  57713. begin
  57714. getU1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57715. end;
  57716. procedure TINT_IEC0.setU1ARXIE; inline;
  57717. begin
  57718. pTDefRegMap(@Self)^.&set := $08000000;
  57719. end;
  57720. procedure TINT_IEC0.clearU1ARXIE; inline;
  57721. begin
  57722. pTDefRegMap(@Self)^.clr := $08000000;
  57723. end;
  57724. procedure TINT_IEC0.setU1ARXIE(thebits : TBits_1); inline;
  57725. begin
  57726. if thebits = 0 then
  57727. pTDefRegMap(@Self)^.clr := $08000000
  57728. else
  57729. pTDefRegMap(@Self)^.&set := $08000000;
  57730. end;
  57731. function TINT_IEC0.getU1ARXIE : TBits_1; inline;
  57732. begin
  57733. getU1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57734. end;
  57735. procedure TINT_IEC0.setU1ATXIE; inline;
  57736. begin
  57737. pTDefRegMap(@Self)^.&set := $10000000;
  57738. end;
  57739. procedure TINT_IEC0.clearU1ATXIE; inline;
  57740. begin
  57741. pTDefRegMap(@Self)^.clr := $10000000;
  57742. end;
  57743. procedure TINT_IEC0.setU1ATXIE(thebits : TBits_1); inline;
  57744. begin
  57745. if thebits = 0 then
  57746. pTDefRegMap(@Self)^.clr := $10000000
  57747. else
  57748. pTDefRegMap(@Self)^.&set := $10000000;
  57749. end;
  57750. function TINT_IEC0.getU1ATXIE : TBits_1; inline;
  57751. begin
  57752. getU1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57753. end;
  57754. procedure TINT_IEC0.setSPI3EIE; inline;
  57755. begin
  57756. pTDefRegMap(@Self)^.&set := $04000000;
  57757. end;
  57758. procedure TINT_IEC0.clearSPI3EIE; inline;
  57759. begin
  57760. pTDefRegMap(@Self)^.clr := $04000000;
  57761. end;
  57762. procedure TINT_IEC0.setSPI3EIE(thebits : TBits_1); inline;
  57763. begin
  57764. if thebits = 0 then
  57765. pTDefRegMap(@Self)^.clr := $04000000
  57766. else
  57767. pTDefRegMap(@Self)^.&set := $04000000;
  57768. end;
  57769. function TINT_IEC0.getSPI3EIE : TBits_1; inline;
  57770. begin
  57771. getSPI3EIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57772. end;
  57773. procedure TINT_IEC0.setSPI3RXIE; inline;
  57774. begin
  57775. pTDefRegMap(@Self)^.&set := $08000000;
  57776. end;
  57777. procedure TINT_IEC0.clearSPI3RXIE; inline;
  57778. begin
  57779. pTDefRegMap(@Self)^.clr := $08000000;
  57780. end;
  57781. procedure TINT_IEC0.setSPI3RXIE(thebits : TBits_1); inline;
  57782. begin
  57783. if thebits = 0 then
  57784. pTDefRegMap(@Self)^.clr := $08000000
  57785. else
  57786. pTDefRegMap(@Self)^.&set := $08000000;
  57787. end;
  57788. function TINT_IEC0.getSPI3RXIE : TBits_1; inline;
  57789. begin
  57790. getSPI3RXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57791. end;
  57792. procedure TINT_IEC0.setSPI3TXIE; inline;
  57793. begin
  57794. pTDefRegMap(@Self)^.&set := $10000000;
  57795. end;
  57796. procedure TINT_IEC0.clearSPI3TXIE; inline;
  57797. begin
  57798. pTDefRegMap(@Self)^.clr := $10000000;
  57799. end;
  57800. procedure TINT_IEC0.setSPI3TXIE(thebits : TBits_1); inline;
  57801. begin
  57802. if thebits = 0 then
  57803. pTDefRegMap(@Self)^.clr := $10000000
  57804. else
  57805. pTDefRegMap(@Self)^.&set := $10000000;
  57806. end;
  57807. function TINT_IEC0.getSPI3TXIE : TBits_1; inline;
  57808. begin
  57809. getSPI3TXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57810. end;
  57811. procedure TINT_IEC0.setSPI1AEIE; inline;
  57812. begin
  57813. pTDefRegMap(@Self)^.&set := $04000000;
  57814. end;
  57815. procedure TINT_IEC0.clearSPI1AEIE; inline;
  57816. begin
  57817. pTDefRegMap(@Self)^.clr := $04000000;
  57818. end;
  57819. procedure TINT_IEC0.setSPI1AEIE(thebits : TBits_1); inline;
  57820. begin
  57821. if thebits = 0 then
  57822. pTDefRegMap(@Self)^.clr := $04000000
  57823. else
  57824. pTDefRegMap(@Self)^.&set := $04000000;
  57825. end;
  57826. function TINT_IEC0.getSPI1AEIE : TBits_1; inline;
  57827. begin
  57828. getSPI1AEIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57829. end;
  57830. procedure TINT_IEC0.setSPI1ARXIE; inline;
  57831. begin
  57832. pTDefRegMap(@Self)^.&set := $08000000;
  57833. end;
  57834. procedure TINT_IEC0.clearSPI1ARXIE; inline;
  57835. begin
  57836. pTDefRegMap(@Self)^.clr := $08000000;
  57837. end;
  57838. procedure TINT_IEC0.setSPI1ARXIE(thebits : TBits_1); inline;
  57839. begin
  57840. if thebits = 0 then
  57841. pTDefRegMap(@Self)^.clr := $08000000
  57842. else
  57843. pTDefRegMap(@Self)^.&set := $08000000;
  57844. end;
  57845. function TINT_IEC0.getSPI1ARXIE : TBits_1; inline;
  57846. begin
  57847. getSPI1ARXIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57848. end;
  57849. procedure TINT_IEC0.setSPI1ATXIE; inline;
  57850. begin
  57851. pTDefRegMap(@Self)^.&set := $10000000;
  57852. end;
  57853. procedure TINT_IEC0.clearSPI1ATXIE; inline;
  57854. begin
  57855. pTDefRegMap(@Self)^.clr := $10000000;
  57856. end;
  57857. procedure TINT_IEC0.setSPI1ATXIE(thebits : TBits_1); inline;
  57858. begin
  57859. if thebits = 0 then
  57860. pTDefRegMap(@Self)^.clr := $10000000
  57861. else
  57862. pTDefRegMap(@Self)^.&set := $10000000;
  57863. end;
  57864. function TINT_IEC0.getSPI1ATXIE : TBits_1; inline;
  57865. begin
  57866. getSPI1ATXIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57867. end;
  57868. procedure TINT_IEC0.setI2C3BIE; inline;
  57869. begin
  57870. pTDefRegMap(@Self)^.&set := $04000000;
  57871. end;
  57872. procedure TINT_IEC0.clearI2C3BIE; inline;
  57873. begin
  57874. pTDefRegMap(@Self)^.clr := $04000000;
  57875. end;
  57876. procedure TINT_IEC0.setI2C3BIE(thebits : TBits_1); inline;
  57877. begin
  57878. if thebits = 0 then
  57879. pTDefRegMap(@Self)^.clr := $04000000
  57880. else
  57881. pTDefRegMap(@Self)^.&set := $04000000;
  57882. end;
  57883. function TINT_IEC0.getI2C3BIE : TBits_1; inline;
  57884. begin
  57885. getI2C3BIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57886. end;
  57887. procedure TINT_IEC0.setI2C3SIE; inline;
  57888. begin
  57889. pTDefRegMap(@Self)^.&set := $08000000;
  57890. end;
  57891. procedure TINT_IEC0.clearI2C3SIE; inline;
  57892. begin
  57893. pTDefRegMap(@Self)^.clr := $08000000;
  57894. end;
  57895. procedure TINT_IEC0.setI2C3SIE(thebits : TBits_1); inline;
  57896. begin
  57897. if thebits = 0 then
  57898. pTDefRegMap(@Self)^.clr := $08000000
  57899. else
  57900. pTDefRegMap(@Self)^.&set := $08000000;
  57901. end;
  57902. function TINT_IEC0.getI2C3SIE : TBits_1; inline;
  57903. begin
  57904. getI2C3SIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57905. end;
  57906. procedure TINT_IEC0.setI2C3MIE; inline;
  57907. begin
  57908. pTDefRegMap(@Self)^.&set := $10000000;
  57909. end;
  57910. procedure TINT_IEC0.clearI2C3MIE; inline;
  57911. begin
  57912. pTDefRegMap(@Self)^.clr := $10000000;
  57913. end;
  57914. procedure TINT_IEC0.setI2C3MIE(thebits : TBits_1); inline;
  57915. begin
  57916. if thebits = 0 then
  57917. pTDefRegMap(@Self)^.clr := $10000000
  57918. else
  57919. pTDefRegMap(@Self)^.&set := $10000000;
  57920. end;
  57921. function TINT_IEC0.getI2C3MIE : TBits_1; inline;
  57922. begin
  57923. getI2C3MIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57924. end;
  57925. procedure TINT_IEC0.setI2C1ABIE; inline;
  57926. begin
  57927. pTDefRegMap(@Self)^.&set := $04000000;
  57928. end;
  57929. procedure TINT_IEC0.clearI2C1ABIE; inline;
  57930. begin
  57931. pTDefRegMap(@Self)^.clr := $04000000;
  57932. end;
  57933. procedure TINT_IEC0.setI2C1ABIE(thebits : TBits_1); inline;
  57934. begin
  57935. if thebits = 0 then
  57936. pTDefRegMap(@Self)^.clr := $04000000
  57937. else
  57938. pTDefRegMap(@Self)^.&set := $04000000;
  57939. end;
  57940. function TINT_IEC0.getI2C1ABIE : TBits_1; inline;
  57941. begin
  57942. getI2C1ABIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  57943. end;
  57944. procedure TINT_IEC0.setI2C1ASIE; inline;
  57945. begin
  57946. pTDefRegMap(@Self)^.&set := $08000000;
  57947. end;
  57948. procedure TINT_IEC0.clearI2C1ASIE; inline;
  57949. begin
  57950. pTDefRegMap(@Self)^.clr := $08000000;
  57951. end;
  57952. procedure TINT_IEC0.setI2C1ASIE(thebits : TBits_1); inline;
  57953. begin
  57954. if thebits = 0 then
  57955. pTDefRegMap(@Self)^.clr := $08000000
  57956. else
  57957. pTDefRegMap(@Self)^.&set := $08000000;
  57958. end;
  57959. function TINT_IEC0.getI2C1ASIE : TBits_1; inline;
  57960. begin
  57961. getI2C1ASIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  57962. end;
  57963. procedure TINT_IEC0.setI2C1AMIE; inline;
  57964. begin
  57965. pTDefRegMap(@Self)^.&set := $10000000;
  57966. end;
  57967. procedure TINT_IEC0.clearI2C1AMIE; inline;
  57968. begin
  57969. pTDefRegMap(@Self)^.clr := $10000000;
  57970. end;
  57971. procedure TINT_IEC0.setI2C1AMIE(thebits : TBits_1); inline;
  57972. begin
  57973. if thebits = 0 then
  57974. pTDefRegMap(@Self)^.clr := $10000000
  57975. else
  57976. pTDefRegMap(@Self)^.&set := $10000000;
  57977. end;
  57978. function TINT_IEC0.getI2C1AMIE : TBits_1; inline;
  57979. begin
  57980. getI2C1AMIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  57981. end;
  57982. procedure TINT_IEC0.setw(thebits : TBits_32); inline;
  57983. begin
  57984. pTDefRegMap(@Self)^.val := thebits;
  57985. end;
  57986. function TINT_IEC0.getw : TBits_32; inline;
  57987. begin
  57988. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  57989. end;
  57990. procedure TINT_IEC1.setCNIE; inline;
  57991. begin
  57992. pTDefRegMap(@Self)^.&set := $00000001;
  57993. end;
  57994. procedure TINT_IEC1.clearCNIE; inline;
  57995. begin
  57996. pTDefRegMap(@Self)^.clr := $00000001;
  57997. end;
  57998. procedure TINT_IEC1.setCNIE(thebits : TBits_1); inline;
  57999. begin
  58000. if thebits = 0 then
  58001. pTDefRegMap(@Self)^.clr := $00000001
  58002. else
  58003. pTDefRegMap(@Self)^.&set := $00000001;
  58004. end;
  58005. function TINT_IEC1.getCNIE : TBits_1; inline;
  58006. begin
  58007. getCNIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  58008. end;
  58009. procedure TINT_IEC1.setAD1IE; inline;
  58010. begin
  58011. pTDefRegMap(@Self)^.&set := $00000002;
  58012. end;
  58013. procedure TINT_IEC1.clearAD1IE; inline;
  58014. begin
  58015. pTDefRegMap(@Self)^.clr := $00000002;
  58016. end;
  58017. procedure TINT_IEC1.setAD1IE(thebits : TBits_1); inline;
  58018. begin
  58019. if thebits = 0 then
  58020. pTDefRegMap(@Self)^.clr := $00000002
  58021. else
  58022. pTDefRegMap(@Self)^.&set := $00000002;
  58023. end;
  58024. function TINT_IEC1.getAD1IE : TBits_1; inline;
  58025. begin
  58026. getAD1IE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  58027. end;
  58028. procedure TINT_IEC1.setPMPIE; inline;
  58029. begin
  58030. pTDefRegMap(@Self)^.&set := $00000004;
  58031. end;
  58032. procedure TINT_IEC1.clearPMPIE; inline;
  58033. begin
  58034. pTDefRegMap(@Self)^.clr := $00000004;
  58035. end;
  58036. procedure TINT_IEC1.setPMPIE(thebits : TBits_1); inline;
  58037. begin
  58038. if thebits = 0 then
  58039. pTDefRegMap(@Self)^.clr := $00000004
  58040. else
  58041. pTDefRegMap(@Self)^.&set := $00000004;
  58042. end;
  58043. function TINT_IEC1.getPMPIE : TBits_1; inline;
  58044. begin
  58045. getPMPIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  58046. end;
  58047. procedure TINT_IEC1.setCMP1IE; inline;
  58048. begin
  58049. pTDefRegMap(@Self)^.&set := $00000008;
  58050. end;
  58051. procedure TINT_IEC1.clearCMP1IE; inline;
  58052. begin
  58053. pTDefRegMap(@Self)^.clr := $00000008;
  58054. end;
  58055. procedure TINT_IEC1.setCMP1IE(thebits : TBits_1); inline;
  58056. begin
  58057. if thebits = 0 then
  58058. pTDefRegMap(@Self)^.clr := $00000008
  58059. else
  58060. pTDefRegMap(@Self)^.&set := $00000008;
  58061. end;
  58062. function TINT_IEC1.getCMP1IE : TBits_1; inline;
  58063. begin
  58064. getCMP1IE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  58065. end;
  58066. procedure TINT_IEC1.setCMP2IE; inline;
  58067. begin
  58068. pTDefRegMap(@Self)^.&set := $00000010;
  58069. end;
  58070. procedure TINT_IEC1.clearCMP2IE; inline;
  58071. begin
  58072. pTDefRegMap(@Self)^.clr := $00000010;
  58073. end;
  58074. procedure TINT_IEC1.setCMP2IE(thebits : TBits_1); inline;
  58075. begin
  58076. if thebits = 0 then
  58077. pTDefRegMap(@Self)^.clr := $00000010
  58078. else
  58079. pTDefRegMap(@Self)^.&set := $00000010;
  58080. end;
  58081. function TINT_IEC1.getCMP2IE : TBits_1; inline;
  58082. begin
  58083. getCMP2IE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  58084. end;
  58085. procedure TINT_IEC1.setU3EIE; inline;
  58086. begin
  58087. pTDefRegMap(@Self)^.&set := $00000020;
  58088. end;
  58089. procedure TINT_IEC1.clearU3EIE; inline;
  58090. begin
  58091. pTDefRegMap(@Self)^.clr := $00000020;
  58092. end;
  58093. procedure TINT_IEC1.setU3EIE(thebits : TBits_1); inline;
  58094. begin
  58095. if thebits = 0 then
  58096. pTDefRegMap(@Self)^.clr := $00000020
  58097. else
  58098. pTDefRegMap(@Self)^.&set := $00000020;
  58099. end;
  58100. function TINT_IEC1.getU3EIE : TBits_1; inline;
  58101. begin
  58102. getU3EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58103. end;
  58104. procedure TINT_IEC1.setU3RXIE; inline;
  58105. begin
  58106. pTDefRegMap(@Self)^.&set := $00000040;
  58107. end;
  58108. procedure TINT_IEC1.clearU3RXIE; inline;
  58109. begin
  58110. pTDefRegMap(@Self)^.clr := $00000040;
  58111. end;
  58112. procedure TINT_IEC1.setU3RXIE(thebits : TBits_1); inline;
  58113. begin
  58114. if thebits = 0 then
  58115. pTDefRegMap(@Self)^.clr := $00000040
  58116. else
  58117. pTDefRegMap(@Self)^.&set := $00000040;
  58118. end;
  58119. function TINT_IEC1.getU3RXIE : TBits_1; inline;
  58120. begin
  58121. getU3RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58122. end;
  58123. procedure TINT_IEC1.setU3TXIE; inline;
  58124. begin
  58125. pTDefRegMap(@Self)^.&set := $00000080;
  58126. end;
  58127. procedure TINT_IEC1.clearU3TXIE; inline;
  58128. begin
  58129. pTDefRegMap(@Self)^.clr := $00000080;
  58130. end;
  58131. procedure TINT_IEC1.setU3TXIE(thebits : TBits_1); inline;
  58132. begin
  58133. if thebits = 0 then
  58134. pTDefRegMap(@Self)^.clr := $00000080
  58135. else
  58136. pTDefRegMap(@Self)^.&set := $00000080;
  58137. end;
  58138. function TINT_IEC1.getU3TXIE : TBits_1; inline;
  58139. begin
  58140. getU3TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58141. end;
  58142. procedure TINT_IEC1.setU2EIE; inline;
  58143. begin
  58144. pTDefRegMap(@Self)^.&set := $00000100;
  58145. end;
  58146. procedure TINT_IEC1.clearU2EIE; inline;
  58147. begin
  58148. pTDefRegMap(@Self)^.clr := $00000100;
  58149. end;
  58150. procedure TINT_IEC1.setU2EIE(thebits : TBits_1); inline;
  58151. begin
  58152. if thebits = 0 then
  58153. pTDefRegMap(@Self)^.clr := $00000100
  58154. else
  58155. pTDefRegMap(@Self)^.&set := $00000100;
  58156. end;
  58157. function TINT_IEC1.getU2EIE : TBits_1; inline;
  58158. begin
  58159. getU2EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58160. end;
  58161. procedure TINT_IEC1.setU2RXIE; inline;
  58162. begin
  58163. pTDefRegMap(@Self)^.&set := $00000200;
  58164. end;
  58165. procedure TINT_IEC1.clearU2RXIE; inline;
  58166. begin
  58167. pTDefRegMap(@Self)^.clr := $00000200;
  58168. end;
  58169. procedure TINT_IEC1.setU2RXIE(thebits : TBits_1); inline;
  58170. begin
  58171. if thebits = 0 then
  58172. pTDefRegMap(@Self)^.clr := $00000200
  58173. else
  58174. pTDefRegMap(@Self)^.&set := $00000200;
  58175. end;
  58176. function TINT_IEC1.getU2RXIE : TBits_1; inline;
  58177. begin
  58178. getU2RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58179. end;
  58180. procedure TINT_IEC1.setU2TXIE; inline;
  58181. begin
  58182. pTDefRegMap(@Self)^.&set := $00000400;
  58183. end;
  58184. procedure TINT_IEC1.clearU2TXIE; inline;
  58185. begin
  58186. pTDefRegMap(@Self)^.clr := $00000400;
  58187. end;
  58188. procedure TINT_IEC1.setU2TXIE(thebits : TBits_1); inline;
  58189. begin
  58190. if thebits = 0 then
  58191. pTDefRegMap(@Self)^.clr := $00000400
  58192. else
  58193. pTDefRegMap(@Self)^.&set := $00000400;
  58194. end;
  58195. function TINT_IEC1.getU2TXIE : TBits_1; inline;
  58196. begin
  58197. getU2TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58198. end;
  58199. procedure TINT_IEC1.setFSCMIE; inline;
  58200. begin
  58201. pTDefRegMap(@Self)^.&set := $00004000;
  58202. end;
  58203. procedure TINT_IEC1.clearFSCMIE; inline;
  58204. begin
  58205. pTDefRegMap(@Self)^.clr := $00004000;
  58206. end;
  58207. procedure TINT_IEC1.setFSCMIE(thebits : TBits_1); inline;
  58208. begin
  58209. if thebits = 0 then
  58210. pTDefRegMap(@Self)^.clr := $00004000
  58211. else
  58212. pTDefRegMap(@Self)^.&set := $00004000;
  58213. end;
  58214. function TINT_IEC1.getFSCMIE : TBits_1; inline;
  58215. begin
  58216. getFSCMIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  58217. end;
  58218. procedure TINT_IEC1.setRTCCIE; inline;
  58219. begin
  58220. pTDefRegMap(@Self)^.&set := $00008000;
  58221. end;
  58222. procedure TINT_IEC1.clearRTCCIE; inline;
  58223. begin
  58224. pTDefRegMap(@Self)^.clr := $00008000;
  58225. end;
  58226. procedure TINT_IEC1.setRTCCIE(thebits : TBits_1); inline;
  58227. begin
  58228. if thebits = 0 then
  58229. pTDefRegMap(@Self)^.clr := $00008000
  58230. else
  58231. pTDefRegMap(@Self)^.&set := $00008000;
  58232. end;
  58233. function TINT_IEC1.getRTCCIE : TBits_1; inline;
  58234. begin
  58235. getRTCCIE := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  58236. end;
  58237. procedure TINT_IEC1.setDMA0IE; inline;
  58238. begin
  58239. pTDefRegMap(@Self)^.&set := $00010000;
  58240. end;
  58241. procedure TINT_IEC1.clearDMA0IE; inline;
  58242. begin
  58243. pTDefRegMap(@Self)^.clr := $00010000;
  58244. end;
  58245. procedure TINT_IEC1.setDMA0IE(thebits : TBits_1); inline;
  58246. begin
  58247. if thebits = 0 then
  58248. pTDefRegMap(@Self)^.clr := $00010000
  58249. else
  58250. pTDefRegMap(@Self)^.&set := $00010000;
  58251. end;
  58252. function TINT_IEC1.getDMA0IE : TBits_1; inline;
  58253. begin
  58254. getDMA0IE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  58255. end;
  58256. procedure TINT_IEC1.setDMA1IE; inline;
  58257. begin
  58258. pTDefRegMap(@Self)^.&set := $00020000;
  58259. end;
  58260. procedure TINT_IEC1.clearDMA1IE; inline;
  58261. begin
  58262. pTDefRegMap(@Self)^.clr := $00020000;
  58263. end;
  58264. procedure TINT_IEC1.setDMA1IE(thebits : TBits_1); inline;
  58265. begin
  58266. if thebits = 0 then
  58267. pTDefRegMap(@Self)^.clr := $00020000
  58268. else
  58269. pTDefRegMap(@Self)^.&set := $00020000;
  58270. end;
  58271. function TINT_IEC1.getDMA1IE : TBits_1; inline;
  58272. begin
  58273. getDMA1IE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  58274. end;
  58275. procedure TINT_IEC1.setDMA2IE; inline;
  58276. begin
  58277. pTDefRegMap(@Self)^.&set := $00040000;
  58278. end;
  58279. procedure TINT_IEC1.clearDMA2IE; inline;
  58280. begin
  58281. pTDefRegMap(@Self)^.clr := $00040000;
  58282. end;
  58283. procedure TINT_IEC1.setDMA2IE(thebits : TBits_1); inline;
  58284. begin
  58285. if thebits = 0 then
  58286. pTDefRegMap(@Self)^.clr := $00040000
  58287. else
  58288. pTDefRegMap(@Self)^.&set := $00040000;
  58289. end;
  58290. function TINT_IEC1.getDMA2IE : TBits_1; inline;
  58291. begin
  58292. getDMA2IE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  58293. end;
  58294. procedure TINT_IEC1.setDMA3IE; inline;
  58295. begin
  58296. pTDefRegMap(@Self)^.&set := $00080000;
  58297. end;
  58298. procedure TINT_IEC1.clearDMA3IE; inline;
  58299. begin
  58300. pTDefRegMap(@Self)^.clr := $00080000;
  58301. end;
  58302. procedure TINT_IEC1.setDMA3IE(thebits : TBits_1); inline;
  58303. begin
  58304. if thebits = 0 then
  58305. pTDefRegMap(@Self)^.clr := $00080000
  58306. else
  58307. pTDefRegMap(@Self)^.&set := $00080000;
  58308. end;
  58309. function TINT_IEC1.getDMA3IE : TBits_1; inline;
  58310. begin
  58311. getDMA3IE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  58312. end;
  58313. procedure TINT_IEC1.setDMA4IE; inline;
  58314. begin
  58315. pTDefRegMap(@Self)^.&set := $00100000;
  58316. end;
  58317. procedure TINT_IEC1.clearDMA4IE; inline;
  58318. begin
  58319. pTDefRegMap(@Self)^.clr := $00100000;
  58320. end;
  58321. procedure TINT_IEC1.setDMA4IE(thebits : TBits_1); inline;
  58322. begin
  58323. if thebits = 0 then
  58324. pTDefRegMap(@Self)^.clr := $00100000
  58325. else
  58326. pTDefRegMap(@Self)^.&set := $00100000;
  58327. end;
  58328. function TINT_IEC1.getDMA4IE : TBits_1; inline;
  58329. begin
  58330. getDMA4IE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  58331. end;
  58332. procedure TINT_IEC1.setDMA5IE; inline;
  58333. begin
  58334. pTDefRegMap(@Self)^.&set := $00200000;
  58335. end;
  58336. procedure TINT_IEC1.clearDMA5IE; inline;
  58337. begin
  58338. pTDefRegMap(@Self)^.clr := $00200000;
  58339. end;
  58340. procedure TINT_IEC1.setDMA5IE(thebits : TBits_1); inline;
  58341. begin
  58342. if thebits = 0 then
  58343. pTDefRegMap(@Self)^.clr := $00200000
  58344. else
  58345. pTDefRegMap(@Self)^.&set := $00200000;
  58346. end;
  58347. function TINT_IEC1.getDMA5IE : TBits_1; inline;
  58348. begin
  58349. getDMA5IE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  58350. end;
  58351. procedure TINT_IEC1.setDMA6IE; inline;
  58352. begin
  58353. pTDefRegMap(@Self)^.&set := $00400000;
  58354. end;
  58355. procedure TINT_IEC1.clearDMA6IE; inline;
  58356. begin
  58357. pTDefRegMap(@Self)^.clr := $00400000;
  58358. end;
  58359. procedure TINT_IEC1.setDMA6IE(thebits : TBits_1); inline;
  58360. begin
  58361. if thebits = 0 then
  58362. pTDefRegMap(@Self)^.clr := $00400000
  58363. else
  58364. pTDefRegMap(@Self)^.&set := $00400000;
  58365. end;
  58366. function TINT_IEC1.getDMA6IE : TBits_1; inline;
  58367. begin
  58368. getDMA6IE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  58369. end;
  58370. procedure TINT_IEC1.setDMA7IE; inline;
  58371. begin
  58372. pTDefRegMap(@Self)^.&set := $00800000;
  58373. end;
  58374. procedure TINT_IEC1.clearDMA7IE; inline;
  58375. begin
  58376. pTDefRegMap(@Self)^.clr := $00800000;
  58377. end;
  58378. procedure TINT_IEC1.setDMA7IE(thebits : TBits_1); inline;
  58379. begin
  58380. if thebits = 0 then
  58381. pTDefRegMap(@Self)^.clr := $00800000
  58382. else
  58383. pTDefRegMap(@Self)^.&set := $00800000;
  58384. end;
  58385. function TINT_IEC1.getDMA7IE : TBits_1; inline;
  58386. begin
  58387. getDMA7IE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  58388. end;
  58389. procedure TINT_IEC1.setFCEIE; inline;
  58390. begin
  58391. pTDefRegMap(@Self)^.&set := $01000000;
  58392. end;
  58393. procedure TINT_IEC1.clearFCEIE; inline;
  58394. begin
  58395. pTDefRegMap(@Self)^.clr := $01000000;
  58396. end;
  58397. procedure TINT_IEC1.setFCEIE(thebits : TBits_1); inline;
  58398. begin
  58399. if thebits = 0 then
  58400. pTDefRegMap(@Self)^.clr := $01000000
  58401. else
  58402. pTDefRegMap(@Self)^.&set := $01000000;
  58403. end;
  58404. function TINT_IEC1.getFCEIE : TBits_1; inline;
  58405. begin
  58406. getFCEIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  58407. end;
  58408. procedure TINT_IEC1.setUSBIE; inline;
  58409. begin
  58410. pTDefRegMap(@Self)^.&set := $02000000;
  58411. end;
  58412. procedure TINT_IEC1.clearUSBIE; inline;
  58413. begin
  58414. pTDefRegMap(@Self)^.clr := $02000000;
  58415. end;
  58416. procedure TINT_IEC1.setUSBIE(thebits : TBits_1); inline;
  58417. begin
  58418. if thebits = 0 then
  58419. pTDefRegMap(@Self)^.clr := $02000000
  58420. else
  58421. pTDefRegMap(@Self)^.&set := $02000000;
  58422. end;
  58423. function TINT_IEC1.getUSBIE : TBits_1; inline;
  58424. begin
  58425. getUSBIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  58426. end;
  58427. procedure TINT_IEC1.setCAN1IE; inline;
  58428. begin
  58429. pTDefRegMap(@Self)^.&set := $04000000;
  58430. end;
  58431. procedure TINT_IEC1.clearCAN1IE; inline;
  58432. begin
  58433. pTDefRegMap(@Self)^.clr := $04000000;
  58434. end;
  58435. procedure TINT_IEC1.setCAN1IE(thebits : TBits_1); inline;
  58436. begin
  58437. if thebits = 0 then
  58438. pTDefRegMap(@Self)^.clr := $04000000
  58439. else
  58440. pTDefRegMap(@Self)^.&set := $04000000;
  58441. end;
  58442. function TINT_IEC1.getCAN1IE : TBits_1; inline;
  58443. begin
  58444. getCAN1IE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  58445. end;
  58446. procedure TINT_IEC1.setCAN2IE; inline;
  58447. begin
  58448. pTDefRegMap(@Self)^.&set := $08000000;
  58449. end;
  58450. procedure TINT_IEC1.clearCAN2IE; inline;
  58451. begin
  58452. pTDefRegMap(@Self)^.clr := $08000000;
  58453. end;
  58454. procedure TINT_IEC1.setCAN2IE(thebits : TBits_1); inline;
  58455. begin
  58456. if thebits = 0 then
  58457. pTDefRegMap(@Self)^.clr := $08000000
  58458. else
  58459. pTDefRegMap(@Self)^.&set := $08000000;
  58460. end;
  58461. function TINT_IEC1.getCAN2IE : TBits_1; inline;
  58462. begin
  58463. getCAN2IE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  58464. end;
  58465. procedure TINT_IEC1.setETHIE; inline;
  58466. begin
  58467. pTDefRegMap(@Self)^.&set := $10000000;
  58468. end;
  58469. procedure TINT_IEC1.clearETHIE; inline;
  58470. begin
  58471. pTDefRegMap(@Self)^.clr := $10000000;
  58472. end;
  58473. procedure TINT_IEC1.setETHIE(thebits : TBits_1); inline;
  58474. begin
  58475. if thebits = 0 then
  58476. pTDefRegMap(@Self)^.clr := $10000000
  58477. else
  58478. pTDefRegMap(@Self)^.&set := $10000000;
  58479. end;
  58480. function TINT_IEC1.getETHIE : TBits_1; inline;
  58481. begin
  58482. getETHIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  58483. end;
  58484. procedure TINT_IEC1.setIC1EIE; inline;
  58485. begin
  58486. pTDefRegMap(@Self)^.&set := $20000000;
  58487. end;
  58488. procedure TINT_IEC1.clearIC1EIE; inline;
  58489. begin
  58490. pTDefRegMap(@Self)^.clr := $20000000;
  58491. end;
  58492. procedure TINT_IEC1.setIC1EIE(thebits : TBits_1); inline;
  58493. begin
  58494. if thebits = 0 then
  58495. pTDefRegMap(@Self)^.clr := $20000000
  58496. else
  58497. pTDefRegMap(@Self)^.&set := $20000000;
  58498. end;
  58499. function TINT_IEC1.getIC1EIE : TBits_1; inline;
  58500. begin
  58501. getIC1EIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  58502. end;
  58503. procedure TINT_IEC1.setIC2EIE; inline;
  58504. begin
  58505. pTDefRegMap(@Self)^.&set := $40000000;
  58506. end;
  58507. procedure TINT_IEC1.clearIC2EIE; inline;
  58508. begin
  58509. pTDefRegMap(@Self)^.clr := $40000000;
  58510. end;
  58511. procedure TINT_IEC1.setIC2EIE(thebits : TBits_1); inline;
  58512. begin
  58513. if thebits = 0 then
  58514. pTDefRegMap(@Self)^.clr := $40000000
  58515. else
  58516. pTDefRegMap(@Self)^.&set := $40000000;
  58517. end;
  58518. function TINT_IEC1.getIC2EIE : TBits_1; inline;
  58519. begin
  58520. getIC2EIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  58521. end;
  58522. procedure TINT_IEC1.setIC3EIE; inline;
  58523. begin
  58524. pTDefRegMap(@Self)^.&set := $80000000;
  58525. end;
  58526. procedure TINT_IEC1.clearIC3EIE; inline;
  58527. begin
  58528. pTDefRegMap(@Self)^.clr := $80000000;
  58529. end;
  58530. procedure TINT_IEC1.setIC3EIE(thebits : TBits_1); inline;
  58531. begin
  58532. if thebits = 0 then
  58533. pTDefRegMap(@Self)^.clr := $80000000
  58534. else
  58535. pTDefRegMap(@Self)^.&set := $80000000;
  58536. end;
  58537. function TINT_IEC1.getIC3EIE : TBits_1; inline;
  58538. begin
  58539. getIC3EIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  58540. end;
  58541. procedure TINT_IEC1.setU2AEIE; inline;
  58542. begin
  58543. pTDefRegMap(@Self)^.&set := $00000020;
  58544. end;
  58545. procedure TINT_IEC1.clearU2AEIE; inline;
  58546. begin
  58547. pTDefRegMap(@Self)^.clr := $00000020;
  58548. end;
  58549. procedure TINT_IEC1.setU2AEIE(thebits : TBits_1); inline;
  58550. begin
  58551. if thebits = 0 then
  58552. pTDefRegMap(@Self)^.clr := $00000020
  58553. else
  58554. pTDefRegMap(@Self)^.&set := $00000020;
  58555. end;
  58556. function TINT_IEC1.getU2AEIE : TBits_1; inline;
  58557. begin
  58558. getU2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58559. end;
  58560. procedure TINT_IEC1.setU2ARXIE; inline;
  58561. begin
  58562. pTDefRegMap(@Self)^.&set := $00000040;
  58563. end;
  58564. procedure TINT_IEC1.clearU2ARXIE; inline;
  58565. begin
  58566. pTDefRegMap(@Self)^.clr := $00000040;
  58567. end;
  58568. procedure TINT_IEC1.setU2ARXIE(thebits : TBits_1); inline;
  58569. begin
  58570. if thebits = 0 then
  58571. pTDefRegMap(@Self)^.clr := $00000040
  58572. else
  58573. pTDefRegMap(@Self)^.&set := $00000040;
  58574. end;
  58575. function TINT_IEC1.getU2ARXIE : TBits_1; inline;
  58576. begin
  58577. getU2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58578. end;
  58579. procedure TINT_IEC1.setU2ATXIE; inline;
  58580. begin
  58581. pTDefRegMap(@Self)^.&set := $00000080;
  58582. end;
  58583. procedure TINT_IEC1.clearU2ATXIE; inline;
  58584. begin
  58585. pTDefRegMap(@Self)^.clr := $00000080;
  58586. end;
  58587. procedure TINT_IEC1.setU2ATXIE(thebits : TBits_1); inline;
  58588. begin
  58589. if thebits = 0 then
  58590. pTDefRegMap(@Self)^.clr := $00000080
  58591. else
  58592. pTDefRegMap(@Self)^.&set := $00000080;
  58593. end;
  58594. function TINT_IEC1.getU2ATXIE : TBits_1; inline;
  58595. begin
  58596. getU2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58597. end;
  58598. procedure TINT_IEC1.setU3AEIE; inline;
  58599. begin
  58600. pTDefRegMap(@Self)^.&set := $00000100;
  58601. end;
  58602. procedure TINT_IEC1.clearU3AEIE; inline;
  58603. begin
  58604. pTDefRegMap(@Self)^.clr := $00000100;
  58605. end;
  58606. procedure TINT_IEC1.setU3AEIE(thebits : TBits_1); inline;
  58607. begin
  58608. if thebits = 0 then
  58609. pTDefRegMap(@Self)^.clr := $00000100
  58610. else
  58611. pTDefRegMap(@Self)^.&set := $00000100;
  58612. end;
  58613. function TINT_IEC1.getU3AEIE : TBits_1; inline;
  58614. begin
  58615. getU3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58616. end;
  58617. procedure TINT_IEC1.setU3ARXIE; inline;
  58618. begin
  58619. pTDefRegMap(@Self)^.&set := $00000200;
  58620. end;
  58621. procedure TINT_IEC1.clearU3ARXIE; inline;
  58622. begin
  58623. pTDefRegMap(@Self)^.clr := $00000200;
  58624. end;
  58625. procedure TINT_IEC1.setU3ARXIE(thebits : TBits_1); inline;
  58626. begin
  58627. if thebits = 0 then
  58628. pTDefRegMap(@Self)^.clr := $00000200
  58629. else
  58630. pTDefRegMap(@Self)^.&set := $00000200;
  58631. end;
  58632. function TINT_IEC1.getU3ARXIE : TBits_1; inline;
  58633. begin
  58634. getU3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58635. end;
  58636. procedure TINT_IEC1.setU3ATXIE; inline;
  58637. begin
  58638. pTDefRegMap(@Self)^.&set := $00000400;
  58639. end;
  58640. procedure TINT_IEC1.clearU3ATXIE; inline;
  58641. begin
  58642. pTDefRegMap(@Self)^.clr := $00000400;
  58643. end;
  58644. procedure TINT_IEC1.setU3ATXIE(thebits : TBits_1); inline;
  58645. begin
  58646. if thebits = 0 then
  58647. pTDefRegMap(@Self)^.clr := $00000400
  58648. else
  58649. pTDefRegMap(@Self)^.&set := $00000400;
  58650. end;
  58651. function TINT_IEC1.getU3ATXIE : TBits_1; inline;
  58652. begin
  58653. getU3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58654. end;
  58655. procedure TINT_IEC1.setSPI2EIE; inline;
  58656. begin
  58657. pTDefRegMap(@Self)^.&set := $00000020;
  58658. end;
  58659. procedure TINT_IEC1.clearSPI2EIE; inline;
  58660. begin
  58661. pTDefRegMap(@Self)^.clr := $00000020;
  58662. end;
  58663. procedure TINT_IEC1.setSPI2EIE(thebits : TBits_1); inline;
  58664. begin
  58665. if thebits = 0 then
  58666. pTDefRegMap(@Self)^.clr := $00000020
  58667. else
  58668. pTDefRegMap(@Self)^.&set := $00000020;
  58669. end;
  58670. function TINT_IEC1.getSPI2EIE : TBits_1; inline;
  58671. begin
  58672. getSPI2EIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58673. end;
  58674. procedure TINT_IEC1.setSPI2RXIE; inline;
  58675. begin
  58676. pTDefRegMap(@Self)^.&set := $00000040;
  58677. end;
  58678. procedure TINT_IEC1.clearSPI2RXIE; inline;
  58679. begin
  58680. pTDefRegMap(@Self)^.clr := $00000040;
  58681. end;
  58682. procedure TINT_IEC1.setSPI2RXIE(thebits : TBits_1); inline;
  58683. begin
  58684. if thebits = 0 then
  58685. pTDefRegMap(@Self)^.clr := $00000040
  58686. else
  58687. pTDefRegMap(@Self)^.&set := $00000040;
  58688. end;
  58689. function TINT_IEC1.getSPI2RXIE : TBits_1; inline;
  58690. begin
  58691. getSPI2RXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58692. end;
  58693. procedure TINT_IEC1.setSPI2TXIE; inline;
  58694. begin
  58695. pTDefRegMap(@Self)^.&set := $00000080;
  58696. end;
  58697. procedure TINT_IEC1.clearSPI2TXIE; inline;
  58698. begin
  58699. pTDefRegMap(@Self)^.clr := $00000080;
  58700. end;
  58701. procedure TINT_IEC1.setSPI2TXIE(thebits : TBits_1); inline;
  58702. begin
  58703. if thebits = 0 then
  58704. pTDefRegMap(@Self)^.clr := $00000080
  58705. else
  58706. pTDefRegMap(@Self)^.&set := $00000080;
  58707. end;
  58708. function TINT_IEC1.getSPI2TXIE : TBits_1; inline;
  58709. begin
  58710. getSPI2TXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58711. end;
  58712. procedure TINT_IEC1.setSPI4EIE; inline;
  58713. begin
  58714. pTDefRegMap(@Self)^.&set := $00000100;
  58715. end;
  58716. procedure TINT_IEC1.clearSPI4EIE; inline;
  58717. begin
  58718. pTDefRegMap(@Self)^.clr := $00000100;
  58719. end;
  58720. procedure TINT_IEC1.setSPI4EIE(thebits : TBits_1); inline;
  58721. begin
  58722. if thebits = 0 then
  58723. pTDefRegMap(@Self)^.clr := $00000100
  58724. else
  58725. pTDefRegMap(@Self)^.&set := $00000100;
  58726. end;
  58727. function TINT_IEC1.getSPI4EIE : TBits_1; inline;
  58728. begin
  58729. getSPI4EIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58730. end;
  58731. procedure TINT_IEC1.setSPI4RXIE; inline;
  58732. begin
  58733. pTDefRegMap(@Self)^.&set := $00000200;
  58734. end;
  58735. procedure TINT_IEC1.clearSPI4RXIE; inline;
  58736. begin
  58737. pTDefRegMap(@Self)^.clr := $00000200;
  58738. end;
  58739. procedure TINT_IEC1.setSPI4RXIE(thebits : TBits_1); inline;
  58740. begin
  58741. if thebits = 0 then
  58742. pTDefRegMap(@Self)^.clr := $00000200
  58743. else
  58744. pTDefRegMap(@Self)^.&set := $00000200;
  58745. end;
  58746. function TINT_IEC1.getSPI4RXIE : TBits_1; inline;
  58747. begin
  58748. getSPI4RXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58749. end;
  58750. procedure TINT_IEC1.setSPI4TXIE; inline;
  58751. begin
  58752. pTDefRegMap(@Self)^.&set := $00000400;
  58753. end;
  58754. procedure TINT_IEC1.clearSPI4TXIE; inline;
  58755. begin
  58756. pTDefRegMap(@Self)^.clr := $00000400;
  58757. end;
  58758. procedure TINT_IEC1.setSPI4TXIE(thebits : TBits_1); inline;
  58759. begin
  58760. if thebits = 0 then
  58761. pTDefRegMap(@Self)^.clr := $00000400
  58762. else
  58763. pTDefRegMap(@Self)^.&set := $00000400;
  58764. end;
  58765. function TINT_IEC1.getSPI4TXIE : TBits_1; inline;
  58766. begin
  58767. getSPI4TXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58768. end;
  58769. procedure TINT_IEC1.setSPI2AEIE; inline;
  58770. begin
  58771. pTDefRegMap(@Self)^.&set := $00000020;
  58772. end;
  58773. procedure TINT_IEC1.clearSPI2AEIE; inline;
  58774. begin
  58775. pTDefRegMap(@Self)^.clr := $00000020;
  58776. end;
  58777. procedure TINT_IEC1.setSPI2AEIE(thebits : TBits_1); inline;
  58778. begin
  58779. if thebits = 0 then
  58780. pTDefRegMap(@Self)^.clr := $00000020
  58781. else
  58782. pTDefRegMap(@Self)^.&set := $00000020;
  58783. end;
  58784. function TINT_IEC1.getSPI2AEIE : TBits_1; inline;
  58785. begin
  58786. getSPI2AEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58787. end;
  58788. procedure TINT_IEC1.setSPI2ARXIE; inline;
  58789. begin
  58790. pTDefRegMap(@Self)^.&set := $00000040;
  58791. end;
  58792. procedure TINT_IEC1.clearSPI2ARXIE; inline;
  58793. begin
  58794. pTDefRegMap(@Self)^.clr := $00000040;
  58795. end;
  58796. procedure TINT_IEC1.setSPI2ARXIE(thebits : TBits_1); inline;
  58797. begin
  58798. if thebits = 0 then
  58799. pTDefRegMap(@Self)^.clr := $00000040
  58800. else
  58801. pTDefRegMap(@Self)^.&set := $00000040;
  58802. end;
  58803. function TINT_IEC1.getSPI2ARXIE : TBits_1; inline;
  58804. begin
  58805. getSPI2ARXIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58806. end;
  58807. procedure TINT_IEC1.setSPI2ATXIE; inline;
  58808. begin
  58809. pTDefRegMap(@Self)^.&set := $00000080;
  58810. end;
  58811. procedure TINT_IEC1.clearSPI2ATXIE; inline;
  58812. begin
  58813. pTDefRegMap(@Self)^.clr := $00000080;
  58814. end;
  58815. procedure TINT_IEC1.setSPI2ATXIE(thebits : TBits_1); inline;
  58816. begin
  58817. if thebits = 0 then
  58818. pTDefRegMap(@Self)^.clr := $00000080
  58819. else
  58820. pTDefRegMap(@Self)^.&set := $00000080;
  58821. end;
  58822. function TINT_IEC1.getSPI2ATXIE : TBits_1; inline;
  58823. begin
  58824. getSPI2ATXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58825. end;
  58826. procedure TINT_IEC1.setSPI3AEIE; inline;
  58827. begin
  58828. pTDefRegMap(@Self)^.&set := $00000100;
  58829. end;
  58830. procedure TINT_IEC1.clearSPI3AEIE; inline;
  58831. begin
  58832. pTDefRegMap(@Self)^.clr := $00000100;
  58833. end;
  58834. procedure TINT_IEC1.setSPI3AEIE(thebits : TBits_1); inline;
  58835. begin
  58836. if thebits = 0 then
  58837. pTDefRegMap(@Self)^.clr := $00000100
  58838. else
  58839. pTDefRegMap(@Self)^.&set := $00000100;
  58840. end;
  58841. function TINT_IEC1.getSPI3AEIE : TBits_1; inline;
  58842. begin
  58843. getSPI3AEIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58844. end;
  58845. procedure TINT_IEC1.setSPI3ARXIE; inline;
  58846. begin
  58847. pTDefRegMap(@Self)^.&set := $00000200;
  58848. end;
  58849. procedure TINT_IEC1.clearSPI3ARXIE; inline;
  58850. begin
  58851. pTDefRegMap(@Self)^.clr := $00000200;
  58852. end;
  58853. procedure TINT_IEC1.setSPI3ARXIE(thebits : TBits_1); inline;
  58854. begin
  58855. if thebits = 0 then
  58856. pTDefRegMap(@Self)^.clr := $00000200
  58857. else
  58858. pTDefRegMap(@Self)^.&set := $00000200;
  58859. end;
  58860. function TINT_IEC1.getSPI3ARXIE : TBits_1; inline;
  58861. begin
  58862. getSPI3ARXIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58863. end;
  58864. procedure TINT_IEC1.setSPI3ATXIE; inline;
  58865. begin
  58866. pTDefRegMap(@Self)^.&set := $00000400;
  58867. end;
  58868. procedure TINT_IEC1.clearSPI3ATXIE; inline;
  58869. begin
  58870. pTDefRegMap(@Self)^.clr := $00000400;
  58871. end;
  58872. procedure TINT_IEC1.setSPI3ATXIE(thebits : TBits_1); inline;
  58873. begin
  58874. if thebits = 0 then
  58875. pTDefRegMap(@Self)^.clr := $00000400
  58876. else
  58877. pTDefRegMap(@Self)^.&set := $00000400;
  58878. end;
  58879. function TINT_IEC1.getSPI3ATXIE : TBits_1; inline;
  58880. begin
  58881. getSPI3ATXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58882. end;
  58883. procedure TINT_IEC1.setI2C4BIE; inline;
  58884. begin
  58885. pTDefRegMap(@Self)^.&set := $00000020;
  58886. end;
  58887. procedure TINT_IEC1.clearI2C4BIE; inline;
  58888. begin
  58889. pTDefRegMap(@Self)^.clr := $00000020;
  58890. end;
  58891. procedure TINT_IEC1.setI2C4BIE(thebits : TBits_1); inline;
  58892. begin
  58893. if thebits = 0 then
  58894. pTDefRegMap(@Self)^.clr := $00000020
  58895. else
  58896. pTDefRegMap(@Self)^.&set := $00000020;
  58897. end;
  58898. function TINT_IEC1.getI2C4BIE : TBits_1; inline;
  58899. begin
  58900. getI2C4BIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  58901. end;
  58902. procedure TINT_IEC1.setI2C4SIE; inline;
  58903. begin
  58904. pTDefRegMap(@Self)^.&set := $00000040;
  58905. end;
  58906. procedure TINT_IEC1.clearI2C4SIE; inline;
  58907. begin
  58908. pTDefRegMap(@Self)^.clr := $00000040;
  58909. end;
  58910. procedure TINT_IEC1.setI2C4SIE(thebits : TBits_1); inline;
  58911. begin
  58912. if thebits = 0 then
  58913. pTDefRegMap(@Self)^.clr := $00000040
  58914. else
  58915. pTDefRegMap(@Self)^.&set := $00000040;
  58916. end;
  58917. function TINT_IEC1.getI2C4SIE : TBits_1; inline;
  58918. begin
  58919. getI2C4SIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  58920. end;
  58921. procedure TINT_IEC1.setI2C4MIE; inline;
  58922. begin
  58923. pTDefRegMap(@Self)^.&set := $00000080;
  58924. end;
  58925. procedure TINT_IEC1.clearI2C4MIE; inline;
  58926. begin
  58927. pTDefRegMap(@Self)^.clr := $00000080;
  58928. end;
  58929. procedure TINT_IEC1.setI2C4MIE(thebits : TBits_1); inline;
  58930. begin
  58931. if thebits = 0 then
  58932. pTDefRegMap(@Self)^.clr := $00000080
  58933. else
  58934. pTDefRegMap(@Self)^.&set := $00000080;
  58935. end;
  58936. function TINT_IEC1.getI2C4MIE : TBits_1; inline;
  58937. begin
  58938. getI2C4MIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  58939. end;
  58940. procedure TINT_IEC1.setI2C5BIE; inline;
  58941. begin
  58942. pTDefRegMap(@Self)^.&set := $00000100;
  58943. end;
  58944. procedure TINT_IEC1.clearI2C5BIE; inline;
  58945. begin
  58946. pTDefRegMap(@Self)^.clr := $00000100;
  58947. end;
  58948. procedure TINT_IEC1.setI2C5BIE(thebits : TBits_1); inline;
  58949. begin
  58950. if thebits = 0 then
  58951. pTDefRegMap(@Self)^.clr := $00000100
  58952. else
  58953. pTDefRegMap(@Self)^.&set := $00000100;
  58954. end;
  58955. function TINT_IEC1.getI2C5BIE : TBits_1; inline;
  58956. begin
  58957. getI2C5BIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  58958. end;
  58959. procedure TINT_IEC1.setI2C5SIE; inline;
  58960. begin
  58961. pTDefRegMap(@Self)^.&set := $00000200;
  58962. end;
  58963. procedure TINT_IEC1.clearI2C5SIE; inline;
  58964. begin
  58965. pTDefRegMap(@Self)^.clr := $00000200;
  58966. end;
  58967. procedure TINT_IEC1.setI2C5SIE(thebits : TBits_1); inline;
  58968. begin
  58969. if thebits = 0 then
  58970. pTDefRegMap(@Self)^.clr := $00000200
  58971. else
  58972. pTDefRegMap(@Self)^.&set := $00000200;
  58973. end;
  58974. function TINT_IEC1.getI2C5SIE : TBits_1; inline;
  58975. begin
  58976. getI2C5SIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  58977. end;
  58978. procedure TINT_IEC1.setI2C5MIE; inline;
  58979. begin
  58980. pTDefRegMap(@Self)^.&set := $00000400;
  58981. end;
  58982. procedure TINT_IEC1.clearI2C5MIE; inline;
  58983. begin
  58984. pTDefRegMap(@Self)^.clr := $00000400;
  58985. end;
  58986. procedure TINT_IEC1.setI2C5MIE(thebits : TBits_1); inline;
  58987. begin
  58988. if thebits = 0 then
  58989. pTDefRegMap(@Self)^.clr := $00000400
  58990. else
  58991. pTDefRegMap(@Self)^.&set := $00000400;
  58992. end;
  58993. function TINT_IEC1.getI2C5MIE : TBits_1; inline;
  58994. begin
  58995. getI2C5MIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  58996. end;
  58997. procedure TINT_IEC1.setI2C2ABIE; inline;
  58998. begin
  58999. pTDefRegMap(@Self)^.&set := $00000020;
  59000. end;
  59001. procedure TINT_IEC1.clearI2C2ABIE; inline;
  59002. begin
  59003. pTDefRegMap(@Self)^.clr := $00000020;
  59004. end;
  59005. procedure TINT_IEC1.setI2C2ABIE(thebits : TBits_1); inline;
  59006. begin
  59007. if thebits = 0 then
  59008. pTDefRegMap(@Self)^.clr := $00000020
  59009. else
  59010. pTDefRegMap(@Self)^.&set := $00000020;
  59011. end;
  59012. function TINT_IEC1.getI2C2ABIE : TBits_1; inline;
  59013. begin
  59014. getI2C2ABIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59015. end;
  59016. procedure TINT_IEC1.setI2C2ASIE; inline;
  59017. begin
  59018. pTDefRegMap(@Self)^.&set := $00000040;
  59019. end;
  59020. procedure TINT_IEC1.clearI2C2ASIE; inline;
  59021. begin
  59022. pTDefRegMap(@Self)^.clr := $00000040;
  59023. end;
  59024. procedure TINT_IEC1.setI2C2ASIE(thebits : TBits_1); inline;
  59025. begin
  59026. if thebits = 0 then
  59027. pTDefRegMap(@Self)^.clr := $00000040
  59028. else
  59029. pTDefRegMap(@Self)^.&set := $00000040;
  59030. end;
  59031. function TINT_IEC1.getI2C2ASIE : TBits_1; inline;
  59032. begin
  59033. getI2C2ASIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59034. end;
  59035. procedure TINT_IEC1.setI2C2AMIE; inline;
  59036. begin
  59037. pTDefRegMap(@Self)^.&set := $00000080;
  59038. end;
  59039. procedure TINT_IEC1.clearI2C2AMIE; inline;
  59040. begin
  59041. pTDefRegMap(@Self)^.clr := $00000080;
  59042. end;
  59043. procedure TINT_IEC1.setI2C2AMIE(thebits : TBits_1); inline;
  59044. begin
  59045. if thebits = 0 then
  59046. pTDefRegMap(@Self)^.clr := $00000080
  59047. else
  59048. pTDefRegMap(@Self)^.&set := $00000080;
  59049. end;
  59050. function TINT_IEC1.getI2C2AMIE : TBits_1; inline;
  59051. begin
  59052. getI2C2AMIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59053. end;
  59054. procedure TINT_IEC1.setI2C3ABIE; inline;
  59055. begin
  59056. pTDefRegMap(@Self)^.&set := $00000100;
  59057. end;
  59058. procedure TINT_IEC1.clearI2C3ABIE; inline;
  59059. begin
  59060. pTDefRegMap(@Self)^.clr := $00000100;
  59061. end;
  59062. procedure TINT_IEC1.setI2C3ABIE(thebits : TBits_1); inline;
  59063. begin
  59064. if thebits = 0 then
  59065. pTDefRegMap(@Self)^.clr := $00000100
  59066. else
  59067. pTDefRegMap(@Self)^.&set := $00000100;
  59068. end;
  59069. function TINT_IEC1.getI2C3ABIE : TBits_1; inline;
  59070. begin
  59071. getI2C3ABIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59072. end;
  59073. procedure TINT_IEC1.setI2C3ASIE; inline;
  59074. begin
  59075. pTDefRegMap(@Self)^.&set := $00000200;
  59076. end;
  59077. procedure TINT_IEC1.clearI2C3ASIE; inline;
  59078. begin
  59079. pTDefRegMap(@Self)^.clr := $00000200;
  59080. end;
  59081. procedure TINT_IEC1.setI2C3ASIE(thebits : TBits_1); inline;
  59082. begin
  59083. if thebits = 0 then
  59084. pTDefRegMap(@Self)^.clr := $00000200
  59085. else
  59086. pTDefRegMap(@Self)^.&set := $00000200;
  59087. end;
  59088. function TINT_IEC1.getI2C3ASIE : TBits_1; inline;
  59089. begin
  59090. getI2C3ASIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59091. end;
  59092. procedure TINT_IEC1.setI2C3AMIE; inline;
  59093. begin
  59094. pTDefRegMap(@Self)^.&set := $00000400;
  59095. end;
  59096. procedure TINT_IEC1.clearI2C3AMIE; inline;
  59097. begin
  59098. pTDefRegMap(@Self)^.clr := $00000400;
  59099. end;
  59100. procedure TINT_IEC1.setI2C3AMIE(thebits : TBits_1); inline;
  59101. begin
  59102. if thebits = 0 then
  59103. pTDefRegMap(@Self)^.clr := $00000400
  59104. else
  59105. pTDefRegMap(@Self)^.&set := $00000400;
  59106. end;
  59107. function TINT_IEC1.getI2C3AMIE : TBits_1; inline;
  59108. begin
  59109. getI2C3AMIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59110. end;
  59111. procedure TINT_IEC1.setw(thebits : TBits_32); inline;
  59112. begin
  59113. pTDefRegMap(@Self)^.val := thebits;
  59114. end;
  59115. function TINT_IEC1.getw : TBits_32; inline;
  59116. begin
  59117. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59118. end;
  59119. procedure TINT_IEC2.setIC4EIE; inline;
  59120. begin
  59121. pTDefRegMap(@Self)^.&set := $00000001;
  59122. end;
  59123. procedure TINT_IEC2.clearIC4EIE; inline;
  59124. begin
  59125. pTDefRegMap(@Self)^.clr := $00000001;
  59126. end;
  59127. procedure TINT_IEC2.setIC4EIE(thebits : TBits_1); inline;
  59128. begin
  59129. if thebits = 0 then
  59130. pTDefRegMap(@Self)^.clr := $00000001
  59131. else
  59132. pTDefRegMap(@Self)^.&set := $00000001;
  59133. end;
  59134. function TINT_IEC2.getIC4EIE : TBits_1; inline;
  59135. begin
  59136. getIC4EIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  59137. end;
  59138. procedure TINT_IEC2.setIC5EIE; inline;
  59139. begin
  59140. pTDefRegMap(@Self)^.&set := $00000002;
  59141. end;
  59142. procedure TINT_IEC2.clearIC5EIE; inline;
  59143. begin
  59144. pTDefRegMap(@Self)^.clr := $00000002;
  59145. end;
  59146. procedure TINT_IEC2.setIC5EIE(thebits : TBits_1); inline;
  59147. begin
  59148. if thebits = 0 then
  59149. pTDefRegMap(@Self)^.clr := $00000002
  59150. else
  59151. pTDefRegMap(@Self)^.&set := $00000002;
  59152. end;
  59153. function TINT_IEC2.getIC5EIE : TBits_1; inline;
  59154. begin
  59155. getIC5EIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  59156. end;
  59157. procedure TINT_IEC2.setPMPEIE; inline;
  59158. begin
  59159. pTDefRegMap(@Self)^.&set := $00000004;
  59160. end;
  59161. procedure TINT_IEC2.clearPMPEIE; inline;
  59162. begin
  59163. pTDefRegMap(@Self)^.clr := $00000004;
  59164. end;
  59165. procedure TINT_IEC2.setPMPEIE(thebits : TBits_1); inline;
  59166. begin
  59167. if thebits = 0 then
  59168. pTDefRegMap(@Self)^.clr := $00000004
  59169. else
  59170. pTDefRegMap(@Self)^.&set := $00000004;
  59171. end;
  59172. function TINT_IEC2.getPMPEIE : TBits_1; inline;
  59173. begin
  59174. getPMPEIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  59175. end;
  59176. procedure TINT_IEC2.setU1BEIE; inline;
  59177. begin
  59178. pTDefRegMap(@Self)^.&set := $00000008;
  59179. end;
  59180. procedure TINT_IEC2.clearU1BEIE; inline;
  59181. begin
  59182. pTDefRegMap(@Self)^.clr := $00000008;
  59183. end;
  59184. procedure TINT_IEC2.setU1BEIE(thebits : TBits_1); inline;
  59185. begin
  59186. if thebits = 0 then
  59187. pTDefRegMap(@Self)^.clr := $00000008
  59188. else
  59189. pTDefRegMap(@Self)^.&set := $00000008;
  59190. end;
  59191. function TINT_IEC2.getU1BEIE : TBits_1; inline;
  59192. begin
  59193. getU1BEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59194. end;
  59195. procedure TINT_IEC2.setU1BRXIE; inline;
  59196. begin
  59197. pTDefRegMap(@Self)^.&set := $00000010;
  59198. end;
  59199. procedure TINT_IEC2.clearU1BRXIE; inline;
  59200. begin
  59201. pTDefRegMap(@Self)^.clr := $00000010;
  59202. end;
  59203. procedure TINT_IEC2.setU1BRXIE(thebits : TBits_1); inline;
  59204. begin
  59205. if thebits = 0 then
  59206. pTDefRegMap(@Self)^.clr := $00000010
  59207. else
  59208. pTDefRegMap(@Self)^.&set := $00000010;
  59209. end;
  59210. function TINT_IEC2.getU1BRXIE : TBits_1; inline;
  59211. begin
  59212. getU1BRXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59213. end;
  59214. procedure TINT_IEC2.setU1BTXIE; inline;
  59215. begin
  59216. pTDefRegMap(@Self)^.&set := $00000020;
  59217. end;
  59218. procedure TINT_IEC2.clearU1BTXIE; inline;
  59219. begin
  59220. pTDefRegMap(@Self)^.clr := $00000020;
  59221. end;
  59222. procedure TINT_IEC2.setU1BTXIE(thebits : TBits_1); inline;
  59223. begin
  59224. if thebits = 0 then
  59225. pTDefRegMap(@Self)^.clr := $00000020
  59226. else
  59227. pTDefRegMap(@Self)^.&set := $00000020;
  59228. end;
  59229. function TINT_IEC2.getU1BTXIE : TBits_1; inline;
  59230. begin
  59231. getU1BTXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59232. end;
  59233. procedure TINT_IEC2.setU2BEIE; inline;
  59234. begin
  59235. pTDefRegMap(@Self)^.&set := $00000040;
  59236. end;
  59237. procedure TINT_IEC2.clearU2BEIE; inline;
  59238. begin
  59239. pTDefRegMap(@Self)^.clr := $00000040;
  59240. end;
  59241. procedure TINT_IEC2.setU2BEIE(thebits : TBits_1); inline;
  59242. begin
  59243. if thebits = 0 then
  59244. pTDefRegMap(@Self)^.clr := $00000040
  59245. else
  59246. pTDefRegMap(@Self)^.&set := $00000040;
  59247. end;
  59248. function TINT_IEC2.getU2BEIE : TBits_1; inline;
  59249. begin
  59250. getU2BEIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59251. end;
  59252. procedure TINT_IEC2.setU2BRXIE; inline;
  59253. begin
  59254. pTDefRegMap(@Self)^.&set := $00000080;
  59255. end;
  59256. procedure TINT_IEC2.clearU2BRXIE; inline;
  59257. begin
  59258. pTDefRegMap(@Self)^.clr := $00000080;
  59259. end;
  59260. procedure TINT_IEC2.setU2BRXIE(thebits : TBits_1); inline;
  59261. begin
  59262. if thebits = 0 then
  59263. pTDefRegMap(@Self)^.clr := $00000080
  59264. else
  59265. pTDefRegMap(@Self)^.&set := $00000080;
  59266. end;
  59267. function TINT_IEC2.getU2BRXIE : TBits_1; inline;
  59268. begin
  59269. getU2BRXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59270. end;
  59271. procedure TINT_IEC2.setU2BTXIE; inline;
  59272. begin
  59273. pTDefRegMap(@Self)^.&set := $00000100;
  59274. end;
  59275. procedure TINT_IEC2.clearU2BTXIE; inline;
  59276. begin
  59277. pTDefRegMap(@Self)^.clr := $00000100;
  59278. end;
  59279. procedure TINT_IEC2.setU2BTXIE(thebits : TBits_1); inline;
  59280. begin
  59281. if thebits = 0 then
  59282. pTDefRegMap(@Self)^.clr := $00000100
  59283. else
  59284. pTDefRegMap(@Self)^.&set := $00000100;
  59285. end;
  59286. function TINT_IEC2.getU2BTXIE : TBits_1; inline;
  59287. begin
  59288. getU2BTXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59289. end;
  59290. procedure TINT_IEC2.setU3BEIE; inline;
  59291. begin
  59292. pTDefRegMap(@Self)^.&set := $00000200;
  59293. end;
  59294. procedure TINT_IEC2.clearU3BEIE; inline;
  59295. begin
  59296. pTDefRegMap(@Self)^.clr := $00000200;
  59297. end;
  59298. procedure TINT_IEC2.setU3BEIE(thebits : TBits_1); inline;
  59299. begin
  59300. if thebits = 0 then
  59301. pTDefRegMap(@Self)^.clr := $00000200
  59302. else
  59303. pTDefRegMap(@Self)^.&set := $00000200;
  59304. end;
  59305. function TINT_IEC2.getU3BEIE : TBits_1; inline;
  59306. begin
  59307. getU3BEIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59308. end;
  59309. procedure TINT_IEC2.setU3BRXIE; inline;
  59310. begin
  59311. pTDefRegMap(@Self)^.&set := $00000400;
  59312. end;
  59313. procedure TINT_IEC2.clearU3BRXIE; inline;
  59314. begin
  59315. pTDefRegMap(@Self)^.clr := $00000400;
  59316. end;
  59317. procedure TINT_IEC2.setU3BRXIE(thebits : TBits_1); inline;
  59318. begin
  59319. if thebits = 0 then
  59320. pTDefRegMap(@Self)^.clr := $00000400
  59321. else
  59322. pTDefRegMap(@Self)^.&set := $00000400;
  59323. end;
  59324. function TINT_IEC2.getU3BRXIE : TBits_1; inline;
  59325. begin
  59326. getU3BRXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59327. end;
  59328. procedure TINT_IEC2.setU3BTXIE; inline;
  59329. begin
  59330. pTDefRegMap(@Self)^.&set := $00000800;
  59331. end;
  59332. procedure TINT_IEC2.clearU3BTXIE; inline;
  59333. begin
  59334. pTDefRegMap(@Self)^.clr := $00000800;
  59335. end;
  59336. procedure TINT_IEC2.setU3BTXIE(thebits : TBits_1); inline;
  59337. begin
  59338. if thebits = 0 then
  59339. pTDefRegMap(@Self)^.clr := $00000800
  59340. else
  59341. pTDefRegMap(@Self)^.&set := $00000800;
  59342. end;
  59343. function TINT_IEC2.getU3BTXIE : TBits_1; inline;
  59344. begin
  59345. getU3BTXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59346. end;
  59347. procedure TINT_IEC2.setU4EIE; inline;
  59348. begin
  59349. pTDefRegMap(@Self)^.&set := $00000008;
  59350. end;
  59351. procedure TINT_IEC2.clearU4EIE; inline;
  59352. begin
  59353. pTDefRegMap(@Self)^.clr := $00000008;
  59354. end;
  59355. procedure TINT_IEC2.setU4EIE(thebits : TBits_1); inline;
  59356. begin
  59357. if thebits = 0 then
  59358. pTDefRegMap(@Self)^.clr := $00000008
  59359. else
  59360. pTDefRegMap(@Self)^.&set := $00000008;
  59361. end;
  59362. function TINT_IEC2.getU4EIE : TBits_1; inline;
  59363. begin
  59364. getU4EIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  59365. end;
  59366. procedure TINT_IEC2.setU4RXIE; inline;
  59367. begin
  59368. pTDefRegMap(@Self)^.&set := $00000010;
  59369. end;
  59370. procedure TINT_IEC2.clearU4RXIE; inline;
  59371. begin
  59372. pTDefRegMap(@Self)^.clr := $00000010;
  59373. end;
  59374. procedure TINT_IEC2.setU4RXIE(thebits : TBits_1); inline;
  59375. begin
  59376. if thebits = 0 then
  59377. pTDefRegMap(@Self)^.clr := $00000010
  59378. else
  59379. pTDefRegMap(@Self)^.&set := $00000010;
  59380. end;
  59381. function TINT_IEC2.getU4RXIE : TBits_1; inline;
  59382. begin
  59383. getU4RXIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  59384. end;
  59385. procedure TINT_IEC2.setU4TXIE; inline;
  59386. begin
  59387. pTDefRegMap(@Self)^.&set := $00000020;
  59388. end;
  59389. procedure TINT_IEC2.clearU4TXIE; inline;
  59390. begin
  59391. pTDefRegMap(@Self)^.clr := $00000020;
  59392. end;
  59393. procedure TINT_IEC2.setU4TXIE(thebits : TBits_1); inline;
  59394. begin
  59395. if thebits = 0 then
  59396. pTDefRegMap(@Self)^.clr := $00000020
  59397. else
  59398. pTDefRegMap(@Self)^.&set := $00000020;
  59399. end;
  59400. function TINT_IEC2.getU4TXIE : TBits_1; inline;
  59401. begin
  59402. getU4TXIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  59403. end;
  59404. procedure TINT_IEC2.setU6EIE; inline;
  59405. begin
  59406. pTDefRegMap(@Self)^.&set := $00000040;
  59407. end;
  59408. procedure TINT_IEC2.clearU6EIE; inline;
  59409. begin
  59410. pTDefRegMap(@Self)^.clr := $00000040;
  59411. end;
  59412. procedure TINT_IEC2.setU6EIE(thebits : TBits_1); inline;
  59413. begin
  59414. if thebits = 0 then
  59415. pTDefRegMap(@Self)^.clr := $00000040
  59416. else
  59417. pTDefRegMap(@Self)^.&set := $00000040;
  59418. end;
  59419. function TINT_IEC2.getU6EIE : TBits_1; inline;
  59420. begin
  59421. getU6EIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  59422. end;
  59423. procedure TINT_IEC2.setU6RXIE; inline;
  59424. begin
  59425. pTDefRegMap(@Self)^.&set := $00000080;
  59426. end;
  59427. procedure TINT_IEC2.clearU6RXIE; inline;
  59428. begin
  59429. pTDefRegMap(@Self)^.clr := $00000080;
  59430. end;
  59431. procedure TINT_IEC2.setU6RXIE(thebits : TBits_1); inline;
  59432. begin
  59433. if thebits = 0 then
  59434. pTDefRegMap(@Self)^.clr := $00000080
  59435. else
  59436. pTDefRegMap(@Self)^.&set := $00000080;
  59437. end;
  59438. function TINT_IEC2.getU6RXIE : TBits_1; inline;
  59439. begin
  59440. getU6RXIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  59441. end;
  59442. procedure TINT_IEC2.setU6TXIE; inline;
  59443. begin
  59444. pTDefRegMap(@Self)^.&set := $00000100;
  59445. end;
  59446. procedure TINT_IEC2.clearU6TXIE; inline;
  59447. begin
  59448. pTDefRegMap(@Self)^.clr := $00000100;
  59449. end;
  59450. procedure TINT_IEC2.setU6TXIE(thebits : TBits_1); inline;
  59451. begin
  59452. if thebits = 0 then
  59453. pTDefRegMap(@Self)^.clr := $00000100
  59454. else
  59455. pTDefRegMap(@Self)^.&set := $00000100;
  59456. end;
  59457. function TINT_IEC2.getU6TXIE : TBits_1; inline;
  59458. begin
  59459. getU6TXIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  59460. end;
  59461. procedure TINT_IEC2.setU5EIE; inline;
  59462. begin
  59463. pTDefRegMap(@Self)^.&set := $00000200;
  59464. end;
  59465. procedure TINT_IEC2.clearU5EIE; inline;
  59466. begin
  59467. pTDefRegMap(@Self)^.clr := $00000200;
  59468. end;
  59469. procedure TINT_IEC2.setU5EIE(thebits : TBits_1); inline;
  59470. begin
  59471. if thebits = 0 then
  59472. pTDefRegMap(@Self)^.clr := $00000200
  59473. else
  59474. pTDefRegMap(@Self)^.&set := $00000200;
  59475. end;
  59476. function TINT_IEC2.getU5EIE : TBits_1; inline;
  59477. begin
  59478. getU5EIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  59479. end;
  59480. procedure TINT_IEC2.setU5RXIE; inline;
  59481. begin
  59482. pTDefRegMap(@Self)^.&set := $00000400;
  59483. end;
  59484. procedure TINT_IEC2.clearU5RXIE; inline;
  59485. begin
  59486. pTDefRegMap(@Self)^.clr := $00000400;
  59487. end;
  59488. procedure TINT_IEC2.setU5RXIE(thebits : TBits_1); inline;
  59489. begin
  59490. if thebits = 0 then
  59491. pTDefRegMap(@Self)^.clr := $00000400
  59492. else
  59493. pTDefRegMap(@Self)^.&set := $00000400;
  59494. end;
  59495. function TINT_IEC2.getU5RXIE : TBits_1; inline;
  59496. begin
  59497. getU5RXIE := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  59498. end;
  59499. procedure TINT_IEC2.setU5TXIE; inline;
  59500. begin
  59501. pTDefRegMap(@Self)^.&set := $00000800;
  59502. end;
  59503. procedure TINT_IEC2.clearU5TXIE; inline;
  59504. begin
  59505. pTDefRegMap(@Self)^.clr := $00000800;
  59506. end;
  59507. procedure TINT_IEC2.setU5TXIE(thebits : TBits_1); inline;
  59508. begin
  59509. if thebits = 0 then
  59510. pTDefRegMap(@Self)^.clr := $00000800
  59511. else
  59512. pTDefRegMap(@Self)^.&set := $00000800;
  59513. end;
  59514. function TINT_IEC2.getU5TXIE : TBits_1; inline;
  59515. begin
  59516. getU5TXIE := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  59517. end;
  59518. procedure TINT_IEC2.setw(thebits : TBits_32); inline;
  59519. begin
  59520. pTDefRegMap(@Self)^.val := thebits;
  59521. end;
  59522. function TINT_IEC2.getw : TBits_32; inline;
  59523. begin
  59524. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59525. end;
  59526. procedure TINT_IPC0.setCTIS(thebits : TBits_2); inline;
  59527. begin
  59528. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59529. end;
  59530. function TINT_IPC0.getCTIS : TBits_2; inline;
  59531. begin
  59532. getCTIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59533. end;
  59534. procedure TINT_IPC0.setCTIP(thebits : TBits_3); inline;
  59535. begin
  59536. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59537. end;
  59538. function TINT_IPC0.getCTIP : TBits_3; inline;
  59539. begin
  59540. getCTIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59541. end;
  59542. procedure TINT_IPC0.setCS0IS(thebits : TBits_2); inline;
  59543. begin
  59544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59545. end;
  59546. function TINT_IPC0.getCS0IS : TBits_2; inline;
  59547. begin
  59548. getCS0IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59549. end;
  59550. procedure TINT_IPC0.setCS0IP(thebits : TBits_3); inline;
  59551. begin
  59552. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59553. end;
  59554. function TINT_IPC0.getCS0IP : TBits_3; inline;
  59555. begin
  59556. getCS0IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59557. end;
  59558. procedure TINT_IPC0.setCS1IS(thebits : TBits_2); inline;
  59559. begin
  59560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59561. end;
  59562. function TINT_IPC0.getCS1IS : TBits_2; inline;
  59563. begin
  59564. getCS1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59565. end;
  59566. procedure TINT_IPC0.setCS1IP(thebits : TBits_3); inline;
  59567. begin
  59568. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59569. end;
  59570. function TINT_IPC0.getCS1IP : TBits_3; inline;
  59571. begin
  59572. getCS1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59573. end;
  59574. procedure TINT_IPC0.setINT0IS(thebits : TBits_2); inline;
  59575. begin
  59576. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  59577. end;
  59578. function TINT_IPC0.getINT0IS : TBits_2; inline;
  59579. begin
  59580. getINT0IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  59581. end;
  59582. procedure TINT_IPC0.setINT0IP(thebits : TBits_3); inline;
  59583. begin
  59584. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  59585. end;
  59586. function TINT_IPC0.getINT0IP : TBits_3; inline;
  59587. begin
  59588. getINT0IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  59589. end;
  59590. procedure TINT_IPC0.setw(thebits : TBits_32); inline;
  59591. begin
  59592. pTDefRegMap(@Self)^.val := thebits;
  59593. end;
  59594. function TINT_IPC0.getw : TBits_32; inline;
  59595. begin
  59596. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59597. end;
  59598. procedure TINT_IPC1.setT1IS(thebits : TBits_2); inline;
  59599. begin
  59600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59601. end;
  59602. function TINT_IPC1.getT1IS : TBits_2; inline;
  59603. begin
  59604. getT1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59605. end;
  59606. procedure TINT_IPC1.setT1IP(thebits : TBits_3); inline;
  59607. begin
  59608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59609. end;
  59610. function TINT_IPC1.getT1IP : TBits_3; inline;
  59611. begin
  59612. getT1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59613. end;
  59614. procedure TINT_IPC1.setIC1IS(thebits : TBits_2); inline;
  59615. begin
  59616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59617. end;
  59618. function TINT_IPC1.getIC1IS : TBits_2; inline;
  59619. begin
  59620. getIC1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59621. end;
  59622. procedure TINT_IPC1.setIC1IP(thebits : TBits_3); inline;
  59623. begin
  59624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59625. end;
  59626. function TINT_IPC1.getIC1IP : TBits_3; inline;
  59627. begin
  59628. getIC1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59629. end;
  59630. procedure TINT_IPC1.setOC1IS(thebits : TBits_2); inline;
  59631. begin
  59632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59633. end;
  59634. function TINT_IPC1.getOC1IS : TBits_2; inline;
  59635. begin
  59636. getOC1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59637. end;
  59638. procedure TINT_IPC1.setOC1IP(thebits : TBits_3); inline;
  59639. begin
  59640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59641. end;
  59642. function TINT_IPC1.getOC1IP : TBits_3; inline;
  59643. begin
  59644. getOC1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59645. end;
  59646. procedure TINT_IPC1.setINT1IS(thebits : TBits_2); inline;
  59647. begin
  59648. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  59649. end;
  59650. function TINT_IPC1.getINT1IS : TBits_2; inline;
  59651. begin
  59652. getINT1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  59653. end;
  59654. procedure TINT_IPC1.setINT1IP(thebits : TBits_3); inline;
  59655. begin
  59656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  59657. end;
  59658. function TINT_IPC1.getINT1IP : TBits_3; inline;
  59659. begin
  59660. getINT1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  59661. end;
  59662. procedure TINT_IPC1.setw(thebits : TBits_32); inline;
  59663. begin
  59664. pTDefRegMap(@Self)^.val := thebits;
  59665. end;
  59666. function TINT_IPC1.getw : TBits_32; inline;
  59667. begin
  59668. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59669. end;
  59670. procedure TINT_IPC2.setT2IS(thebits : TBits_2); inline;
  59671. begin
  59672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59673. end;
  59674. function TINT_IPC2.getT2IS : TBits_2; inline;
  59675. begin
  59676. getT2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59677. end;
  59678. procedure TINT_IPC2.setT2IP(thebits : TBits_3); inline;
  59679. begin
  59680. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59681. end;
  59682. function TINT_IPC2.getT2IP : TBits_3; inline;
  59683. begin
  59684. getT2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59685. end;
  59686. procedure TINT_IPC2.setIC2IS(thebits : TBits_2); inline;
  59687. begin
  59688. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59689. end;
  59690. function TINT_IPC2.getIC2IS : TBits_2; inline;
  59691. begin
  59692. getIC2IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59693. end;
  59694. procedure TINT_IPC2.setIC2IP(thebits : TBits_3); inline;
  59695. begin
  59696. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59697. end;
  59698. function TINT_IPC2.getIC2IP : TBits_3; inline;
  59699. begin
  59700. getIC2IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59701. end;
  59702. procedure TINT_IPC2.setOC2IS(thebits : TBits_2); inline;
  59703. begin
  59704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59705. end;
  59706. function TINT_IPC2.getOC2IS : TBits_2; inline;
  59707. begin
  59708. getOC2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59709. end;
  59710. procedure TINT_IPC2.setOC2IP(thebits : TBits_3); inline;
  59711. begin
  59712. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59713. end;
  59714. function TINT_IPC2.getOC2IP : TBits_3; inline;
  59715. begin
  59716. getOC2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59717. end;
  59718. procedure TINT_IPC2.setINT2IS(thebits : TBits_2); inline;
  59719. begin
  59720. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  59721. end;
  59722. function TINT_IPC2.getINT2IS : TBits_2; inline;
  59723. begin
  59724. getINT2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  59725. end;
  59726. procedure TINT_IPC2.setINT2IP(thebits : TBits_3); inline;
  59727. begin
  59728. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  59729. end;
  59730. function TINT_IPC2.getINT2IP : TBits_3; inline;
  59731. begin
  59732. getINT2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  59733. end;
  59734. procedure TINT_IPC2.setw(thebits : TBits_32); inline;
  59735. begin
  59736. pTDefRegMap(@Self)^.val := thebits;
  59737. end;
  59738. function TINT_IPC2.getw : TBits_32; inline;
  59739. begin
  59740. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59741. end;
  59742. procedure TINT_IPC3.setT3IS(thebits : TBits_2); inline;
  59743. begin
  59744. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59745. end;
  59746. function TINT_IPC3.getT3IS : TBits_2; inline;
  59747. begin
  59748. getT3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59749. end;
  59750. procedure TINT_IPC3.setT3IP(thebits : TBits_3); inline;
  59751. begin
  59752. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59753. end;
  59754. function TINT_IPC3.getT3IP : TBits_3; inline;
  59755. begin
  59756. getT3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59757. end;
  59758. procedure TINT_IPC3.setIC3IS(thebits : TBits_2); inline;
  59759. begin
  59760. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59761. end;
  59762. function TINT_IPC3.getIC3IS : TBits_2; inline;
  59763. begin
  59764. getIC3IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59765. end;
  59766. procedure TINT_IPC3.setIC3IP(thebits : TBits_3); inline;
  59767. begin
  59768. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59769. end;
  59770. function TINT_IPC3.getIC3IP : TBits_3; inline;
  59771. begin
  59772. getIC3IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59773. end;
  59774. procedure TINT_IPC3.setOC3IS(thebits : TBits_2); inline;
  59775. begin
  59776. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59777. end;
  59778. function TINT_IPC3.getOC3IS : TBits_2; inline;
  59779. begin
  59780. getOC3IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59781. end;
  59782. procedure TINT_IPC3.setOC3IP(thebits : TBits_3); inline;
  59783. begin
  59784. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59785. end;
  59786. function TINT_IPC3.getOC3IP : TBits_3; inline;
  59787. begin
  59788. getOC3IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59789. end;
  59790. procedure TINT_IPC3.setINT3IS(thebits : TBits_2); inline;
  59791. begin
  59792. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  59793. end;
  59794. function TINT_IPC3.getINT3IS : TBits_2; inline;
  59795. begin
  59796. getINT3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  59797. end;
  59798. procedure TINT_IPC3.setINT3IP(thebits : TBits_3); inline;
  59799. begin
  59800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  59801. end;
  59802. function TINT_IPC3.getINT3IP : TBits_3; inline;
  59803. begin
  59804. getINT3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  59805. end;
  59806. procedure TINT_IPC3.setw(thebits : TBits_32); inline;
  59807. begin
  59808. pTDefRegMap(@Self)^.val := thebits;
  59809. end;
  59810. function TINT_IPC3.getw : TBits_32; inline;
  59811. begin
  59812. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59813. end;
  59814. procedure TINT_IPC4.setT4IS(thebits : TBits_2); inline;
  59815. begin
  59816. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59817. end;
  59818. function TINT_IPC4.getT4IS : TBits_2; inline;
  59819. begin
  59820. getT4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59821. end;
  59822. procedure TINT_IPC4.setT4IP(thebits : TBits_3); inline;
  59823. begin
  59824. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59825. end;
  59826. function TINT_IPC4.getT4IP : TBits_3; inline;
  59827. begin
  59828. getT4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59829. end;
  59830. procedure TINT_IPC4.setIC4IS(thebits : TBits_2); inline;
  59831. begin
  59832. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59833. end;
  59834. function TINT_IPC4.getIC4IS : TBits_2; inline;
  59835. begin
  59836. getIC4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59837. end;
  59838. procedure TINT_IPC4.setIC4IP(thebits : TBits_3); inline;
  59839. begin
  59840. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59841. end;
  59842. function TINT_IPC4.getIC4IP : TBits_3; inline;
  59843. begin
  59844. getIC4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59845. end;
  59846. procedure TINT_IPC4.setOC4IS(thebits : TBits_2); inline;
  59847. begin
  59848. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59849. end;
  59850. function TINT_IPC4.getOC4IS : TBits_2; inline;
  59851. begin
  59852. getOC4IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59853. end;
  59854. procedure TINT_IPC4.setOC4IP(thebits : TBits_3); inline;
  59855. begin
  59856. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59857. end;
  59858. function TINT_IPC4.getOC4IP : TBits_3; inline;
  59859. begin
  59860. getOC4IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59861. end;
  59862. procedure TINT_IPC4.setINT4IS(thebits : TBits_2); inline;
  59863. begin
  59864. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  59865. end;
  59866. function TINT_IPC4.getINT4IS : TBits_2; inline;
  59867. begin
  59868. getINT4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  59869. end;
  59870. procedure TINT_IPC4.setINT4IP(thebits : TBits_3); inline;
  59871. begin
  59872. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  59873. end;
  59874. function TINT_IPC4.getINT4IP : TBits_3; inline;
  59875. begin
  59876. getINT4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  59877. end;
  59878. procedure TINT_IPC4.setw(thebits : TBits_32); inline;
  59879. begin
  59880. pTDefRegMap(@Self)^.val := thebits;
  59881. end;
  59882. function TINT_IPC4.getw : TBits_32; inline;
  59883. begin
  59884. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59885. end;
  59886. procedure TINT_IPC5.setT5IS(thebits : TBits_2); inline;
  59887. begin
  59888. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59889. end;
  59890. function TINT_IPC5.getT5IS : TBits_2; inline;
  59891. begin
  59892. getT5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59893. end;
  59894. procedure TINT_IPC5.setT5IP(thebits : TBits_3); inline;
  59895. begin
  59896. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59897. end;
  59898. function TINT_IPC5.getT5IP : TBits_3; inline;
  59899. begin
  59900. getT5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59901. end;
  59902. procedure TINT_IPC5.setIC5IS(thebits : TBits_2); inline;
  59903. begin
  59904. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59905. end;
  59906. function TINT_IPC5.getIC5IS : TBits_2; inline;
  59907. begin
  59908. getIC5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59909. end;
  59910. procedure TINT_IPC5.setIC5IP(thebits : TBits_3); inline;
  59911. begin
  59912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59913. end;
  59914. function TINT_IPC5.getIC5IP : TBits_3; inline;
  59915. begin
  59916. getIC5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59917. end;
  59918. procedure TINT_IPC5.setOC5IS(thebits : TBits_2); inline;
  59919. begin
  59920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59921. end;
  59922. function TINT_IPC5.getOC5IS : TBits_2; inline;
  59923. begin
  59924. getOC5IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59925. end;
  59926. procedure TINT_IPC5.setOC5IP(thebits : TBits_3); inline;
  59927. begin
  59928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59929. end;
  59930. function TINT_IPC5.getOC5IP : TBits_3; inline;
  59931. begin
  59932. getOC5IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59933. end;
  59934. procedure TINT_IPC5.setw(thebits : TBits_32); inline;
  59935. begin
  59936. pTDefRegMap(@Self)^.val := thebits;
  59937. end;
  59938. function TINT_IPC5.getw : TBits_32; inline;
  59939. begin
  59940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  59941. end;
  59942. procedure TINT_IPC6.setU1IS(thebits : TBits_2); inline;
  59943. begin
  59944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  59945. end;
  59946. function TINT_IPC6.getU1IS : TBits_2; inline;
  59947. begin
  59948. getU1IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  59949. end;
  59950. procedure TINT_IPC6.setU1IP(thebits : TBits_3); inline;
  59951. begin
  59952. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  59953. end;
  59954. function TINT_IPC6.getU1IP : TBits_3; inline;
  59955. begin
  59956. getU1IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  59957. end;
  59958. procedure TINT_IPC6.setI2C1IS(thebits : TBits_2); inline;
  59959. begin
  59960. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  59961. end;
  59962. function TINT_IPC6.getI2C1IS : TBits_2; inline;
  59963. begin
  59964. getI2C1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  59965. end;
  59966. procedure TINT_IPC6.setI2C1IP(thebits : TBits_3); inline;
  59967. begin
  59968. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  59969. end;
  59970. function TINT_IPC6.getI2C1IP : TBits_3; inline;
  59971. begin
  59972. getI2C1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  59973. end;
  59974. procedure TINT_IPC6.setCNIS(thebits : TBits_2); inline;
  59975. begin
  59976. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  59977. end;
  59978. function TINT_IPC6.getCNIS : TBits_2; inline;
  59979. begin
  59980. getCNIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  59981. end;
  59982. procedure TINT_IPC6.setCNIP(thebits : TBits_3); inline;
  59983. begin
  59984. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  59985. end;
  59986. function TINT_IPC6.getCNIP : TBits_3; inline;
  59987. begin
  59988. getCNIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  59989. end;
  59990. procedure TINT_IPC6.setAD1IS(thebits : TBits_2); inline;
  59991. begin
  59992. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  59993. end;
  59994. function TINT_IPC6.getAD1IS : TBits_2; inline;
  59995. begin
  59996. getAD1IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  59997. end;
  59998. procedure TINT_IPC6.setAD1IP(thebits : TBits_3); inline;
  59999. begin
  60000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60001. end;
  60002. function TINT_IPC6.getAD1IP : TBits_3; inline;
  60003. begin
  60004. getAD1IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60005. end;
  60006. procedure TINT_IPC6.setU1AIS(thebits : TBits_2); inline;
  60007. begin
  60008. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60009. end;
  60010. function TINT_IPC6.getU1AIS : TBits_2; inline;
  60011. begin
  60012. getU1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60013. end;
  60014. procedure TINT_IPC6.setU1AIP(thebits : TBits_3); inline;
  60015. begin
  60016. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60017. end;
  60018. function TINT_IPC6.getU1AIP : TBits_3; inline;
  60019. begin
  60020. getU1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60021. end;
  60022. procedure TINT_IPC6.setSPI3IS(thebits : TBits_2); inline;
  60023. begin
  60024. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60025. end;
  60026. function TINT_IPC6.getSPI3IS : TBits_2; inline;
  60027. begin
  60028. getSPI3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60029. end;
  60030. procedure TINT_IPC6.setSPI3IP(thebits : TBits_3); inline;
  60031. begin
  60032. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60033. end;
  60034. function TINT_IPC6.getSPI3IP : TBits_3; inline;
  60035. begin
  60036. getSPI3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60037. end;
  60038. procedure TINT_IPC6.setSPI1AIS(thebits : TBits_2); inline;
  60039. begin
  60040. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60041. end;
  60042. function TINT_IPC6.getSPI1AIS : TBits_2; inline;
  60043. begin
  60044. getSPI1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60045. end;
  60046. procedure TINT_IPC6.setSPI1AIP(thebits : TBits_3); inline;
  60047. begin
  60048. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60049. end;
  60050. function TINT_IPC6.getSPI1AIP : TBits_3; inline;
  60051. begin
  60052. getSPI1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60053. end;
  60054. procedure TINT_IPC6.setI2C3IS(thebits : TBits_2); inline;
  60055. begin
  60056. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60057. end;
  60058. function TINT_IPC6.getI2C3IS : TBits_2; inline;
  60059. begin
  60060. getI2C3IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60061. end;
  60062. procedure TINT_IPC6.setI2C3IP(thebits : TBits_3); inline;
  60063. begin
  60064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60065. end;
  60066. function TINT_IPC6.getI2C3IP : TBits_3; inline;
  60067. begin
  60068. getI2C3IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60069. end;
  60070. procedure TINT_IPC6.setI2C1AIS(thebits : TBits_2); inline;
  60071. begin
  60072. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60073. end;
  60074. function TINT_IPC6.getI2C1AIS : TBits_2; inline;
  60075. begin
  60076. getI2C1AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60077. end;
  60078. procedure TINT_IPC6.setI2C1AIP(thebits : TBits_3); inline;
  60079. begin
  60080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60081. end;
  60082. function TINT_IPC6.getI2C1AIP : TBits_3; inline;
  60083. begin
  60084. getI2C1AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60085. end;
  60086. procedure TINT_IPC6.setw(thebits : TBits_32); inline;
  60087. begin
  60088. pTDefRegMap(@Self)^.val := thebits;
  60089. end;
  60090. function TINT_IPC6.getw : TBits_32; inline;
  60091. begin
  60092. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60093. end;
  60094. procedure TINT_IPC7.setPMPIS(thebits : TBits_2); inline;
  60095. begin
  60096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60097. end;
  60098. function TINT_IPC7.getPMPIS : TBits_2; inline;
  60099. begin
  60100. getPMPIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60101. end;
  60102. procedure TINT_IPC7.setPMPIP(thebits : TBits_3); inline;
  60103. begin
  60104. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60105. end;
  60106. function TINT_IPC7.getPMPIP : TBits_3; inline;
  60107. begin
  60108. getPMPIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60109. end;
  60110. procedure TINT_IPC7.setCMP1IS(thebits : TBits_2); inline;
  60111. begin
  60112. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  60113. end;
  60114. function TINT_IPC7.getCMP1IS : TBits_2; inline;
  60115. begin
  60116. getCMP1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  60117. end;
  60118. procedure TINT_IPC7.setCMP1IP(thebits : TBits_3); inline;
  60119. begin
  60120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  60121. end;
  60122. function TINT_IPC7.getCMP1IP : TBits_3; inline;
  60123. begin
  60124. getCMP1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  60125. end;
  60126. procedure TINT_IPC7.setCMP2IS(thebits : TBits_2); inline;
  60127. begin
  60128. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60129. end;
  60130. function TINT_IPC7.getCMP2IS : TBits_2; inline;
  60131. begin
  60132. getCMP2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60133. end;
  60134. procedure TINT_IPC7.setCMP2IP(thebits : TBits_3); inline;
  60135. begin
  60136. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60137. end;
  60138. function TINT_IPC7.getCMP2IP : TBits_3; inline;
  60139. begin
  60140. getCMP2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60141. end;
  60142. procedure TINT_IPC7.setU3IS(thebits : TBits_2); inline;
  60143. begin
  60144. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60145. end;
  60146. function TINT_IPC7.getU3IS : TBits_2; inline;
  60147. begin
  60148. getU3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60149. end;
  60150. procedure TINT_IPC7.setU3IP(thebits : TBits_3); inline;
  60151. begin
  60152. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60153. end;
  60154. function TINT_IPC7.getU3IP : TBits_3; inline;
  60155. begin
  60156. getU3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60157. end;
  60158. procedure TINT_IPC7.setU2AIS(thebits : TBits_2); inline;
  60159. begin
  60160. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60161. end;
  60162. function TINT_IPC7.getU2AIS : TBits_2; inline;
  60163. begin
  60164. getU2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60165. end;
  60166. procedure TINT_IPC7.setU2AIP(thebits : TBits_3); inline;
  60167. begin
  60168. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60169. end;
  60170. function TINT_IPC7.getU2AIP : TBits_3; inline;
  60171. begin
  60172. getU2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60173. end;
  60174. procedure TINT_IPC7.setSPI2IS(thebits : TBits_2); inline;
  60175. begin
  60176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60177. end;
  60178. function TINT_IPC7.getSPI2IS : TBits_2; inline;
  60179. begin
  60180. getSPI2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60181. end;
  60182. procedure TINT_IPC7.setSPI2IP(thebits : TBits_3); inline;
  60183. begin
  60184. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60185. end;
  60186. function TINT_IPC7.getSPI2IP : TBits_3; inline;
  60187. begin
  60188. getSPI2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60189. end;
  60190. procedure TINT_IPC7.setSPI2AIS(thebits : TBits_2); inline;
  60191. begin
  60192. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60193. end;
  60194. function TINT_IPC7.getSPI2AIS : TBits_2; inline;
  60195. begin
  60196. getSPI2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60197. end;
  60198. procedure TINT_IPC7.setSPI2AIP(thebits : TBits_3); inline;
  60199. begin
  60200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60201. end;
  60202. function TINT_IPC7.getSPI2AIP : TBits_3; inline;
  60203. begin
  60204. getSPI2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60205. end;
  60206. procedure TINT_IPC7.setI2C4IS(thebits : TBits_2); inline;
  60207. begin
  60208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60209. end;
  60210. function TINT_IPC7.getI2C4IS : TBits_2; inline;
  60211. begin
  60212. getI2C4IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60213. end;
  60214. procedure TINT_IPC7.setI2C4IP(thebits : TBits_3); inline;
  60215. begin
  60216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60217. end;
  60218. function TINT_IPC7.getI2C4IP : TBits_3; inline;
  60219. begin
  60220. getI2C4IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60221. end;
  60222. procedure TINT_IPC7.setI2C2AIS(thebits : TBits_2); inline;
  60223. begin
  60224. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60225. end;
  60226. function TINT_IPC7.getI2C2AIS : TBits_2; inline;
  60227. begin
  60228. getI2C2AIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60229. end;
  60230. procedure TINT_IPC7.setI2C2AIP(thebits : TBits_3); inline;
  60231. begin
  60232. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60233. end;
  60234. function TINT_IPC7.getI2C2AIP : TBits_3; inline;
  60235. begin
  60236. getI2C2AIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60237. end;
  60238. procedure TINT_IPC7.setw(thebits : TBits_32); inline;
  60239. begin
  60240. pTDefRegMap(@Self)^.val := thebits;
  60241. end;
  60242. function TINT_IPC7.getw : TBits_32; inline;
  60243. begin
  60244. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60245. end;
  60246. procedure TINT_IPC8.setU2IS(thebits : TBits_2); inline;
  60247. begin
  60248. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60249. end;
  60250. function TINT_IPC8.getU2IS : TBits_2; inline;
  60251. begin
  60252. getU2IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60253. end;
  60254. procedure TINT_IPC8.setU2IP(thebits : TBits_3); inline;
  60255. begin
  60256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60257. end;
  60258. function TINT_IPC8.getU2IP : TBits_3; inline;
  60259. begin
  60260. getU2IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60261. end;
  60262. procedure TINT_IPC8.setFSCMIS(thebits : TBits_2); inline;
  60263. begin
  60264. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60265. end;
  60266. function TINT_IPC8.getFSCMIS : TBits_2; inline;
  60267. begin
  60268. getFSCMIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60269. end;
  60270. procedure TINT_IPC8.setFSCMIP(thebits : TBits_3); inline;
  60271. begin
  60272. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60273. end;
  60274. function TINT_IPC8.getFSCMIP : TBits_3; inline;
  60275. begin
  60276. getFSCMIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60277. end;
  60278. procedure TINT_IPC8.setRTCCIS(thebits : TBits_2); inline;
  60279. begin
  60280. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60281. end;
  60282. function TINT_IPC8.getRTCCIS : TBits_2; inline;
  60283. begin
  60284. getRTCCIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60285. end;
  60286. procedure TINT_IPC8.setRTCCIP(thebits : TBits_3); inline;
  60287. begin
  60288. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60289. end;
  60290. function TINT_IPC8.getRTCCIP : TBits_3; inline;
  60291. begin
  60292. getRTCCIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60293. end;
  60294. procedure TINT_IPC8.setU3AIS(thebits : TBits_2); inline;
  60295. begin
  60296. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60297. end;
  60298. function TINT_IPC8.getU3AIS : TBits_2; inline;
  60299. begin
  60300. getU3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60301. end;
  60302. procedure TINT_IPC8.setU3AIP(thebits : TBits_3); inline;
  60303. begin
  60304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60305. end;
  60306. function TINT_IPC8.getU3AIP : TBits_3; inline;
  60307. begin
  60308. getU3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60309. end;
  60310. procedure TINT_IPC8.setSPI4IS(thebits : TBits_2); inline;
  60311. begin
  60312. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60313. end;
  60314. function TINT_IPC8.getSPI4IS : TBits_2; inline;
  60315. begin
  60316. getSPI4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60317. end;
  60318. procedure TINT_IPC8.setSPI4IP(thebits : TBits_3); inline;
  60319. begin
  60320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60321. end;
  60322. function TINT_IPC8.getSPI4IP : TBits_3; inline;
  60323. begin
  60324. getSPI4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60325. end;
  60326. procedure TINT_IPC8.setSPI3AIS(thebits : TBits_2); inline;
  60327. begin
  60328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60329. end;
  60330. function TINT_IPC8.getSPI3AIS : TBits_2; inline;
  60331. begin
  60332. getSPI3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60333. end;
  60334. procedure TINT_IPC8.setSPI3AIP(thebits : TBits_3); inline;
  60335. begin
  60336. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60337. end;
  60338. function TINT_IPC8.getSPI3AIP : TBits_3; inline;
  60339. begin
  60340. getSPI3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60341. end;
  60342. procedure TINT_IPC8.setI2C5IS(thebits : TBits_2); inline;
  60343. begin
  60344. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60345. end;
  60346. function TINT_IPC8.getI2C5IS : TBits_2; inline;
  60347. begin
  60348. getI2C5IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60349. end;
  60350. procedure TINT_IPC8.setI2C5IP(thebits : TBits_3); inline;
  60351. begin
  60352. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60353. end;
  60354. function TINT_IPC8.getI2C5IP : TBits_3; inline;
  60355. begin
  60356. getI2C5IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60357. end;
  60358. procedure TINT_IPC8.setI2C3AIS(thebits : TBits_2); inline;
  60359. begin
  60360. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60361. end;
  60362. function TINT_IPC8.getI2C3AIS : TBits_2; inline;
  60363. begin
  60364. getI2C3AIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60365. end;
  60366. procedure TINT_IPC8.setI2C3AIP(thebits : TBits_3); inline;
  60367. begin
  60368. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60369. end;
  60370. function TINT_IPC8.getI2C3AIP : TBits_3; inline;
  60371. begin
  60372. getI2C3AIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60373. end;
  60374. procedure TINT_IPC8.setw(thebits : TBits_32); inline;
  60375. begin
  60376. pTDefRegMap(@Self)^.val := thebits;
  60377. end;
  60378. function TINT_IPC8.getw : TBits_32; inline;
  60379. begin
  60380. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60381. end;
  60382. procedure TINT_IPC9.setDMA0IS(thebits : TBits_2); inline;
  60383. begin
  60384. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60385. end;
  60386. function TINT_IPC9.getDMA0IS : TBits_2; inline;
  60387. begin
  60388. getDMA0IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60389. end;
  60390. procedure TINT_IPC9.setDMA0IP(thebits : TBits_3); inline;
  60391. begin
  60392. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60393. end;
  60394. function TINT_IPC9.getDMA0IP : TBits_3; inline;
  60395. begin
  60396. getDMA0IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60397. end;
  60398. procedure TINT_IPC9.setDMA1IS(thebits : TBits_2); inline;
  60399. begin
  60400. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  60401. end;
  60402. function TINT_IPC9.getDMA1IS : TBits_2; inline;
  60403. begin
  60404. getDMA1IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  60405. end;
  60406. procedure TINT_IPC9.setDMA1IP(thebits : TBits_3); inline;
  60407. begin
  60408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  60409. end;
  60410. function TINT_IPC9.getDMA1IP : TBits_3; inline;
  60411. begin
  60412. getDMA1IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  60413. end;
  60414. procedure TINT_IPC9.setDMA2IS(thebits : TBits_2); inline;
  60415. begin
  60416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60417. end;
  60418. function TINT_IPC9.getDMA2IS : TBits_2; inline;
  60419. begin
  60420. getDMA2IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60421. end;
  60422. procedure TINT_IPC9.setDMA2IP(thebits : TBits_3); inline;
  60423. begin
  60424. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60425. end;
  60426. function TINT_IPC9.getDMA2IP : TBits_3; inline;
  60427. begin
  60428. getDMA2IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60429. end;
  60430. procedure TINT_IPC9.setDMA3IS(thebits : TBits_2); inline;
  60431. begin
  60432. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60433. end;
  60434. function TINT_IPC9.getDMA3IS : TBits_2; inline;
  60435. begin
  60436. getDMA3IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60437. end;
  60438. procedure TINT_IPC9.setDMA3IP(thebits : TBits_3); inline;
  60439. begin
  60440. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60441. end;
  60442. function TINT_IPC9.getDMA3IP : TBits_3; inline;
  60443. begin
  60444. getDMA3IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60445. end;
  60446. procedure TINT_IPC9.setw(thebits : TBits_32); inline;
  60447. begin
  60448. pTDefRegMap(@Self)^.val := thebits;
  60449. end;
  60450. function TINT_IPC9.getw : TBits_32; inline;
  60451. begin
  60452. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60453. end;
  60454. procedure TINT_IPC10.setDMA4IS(thebits : TBits_2); inline;
  60455. begin
  60456. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60457. end;
  60458. function TINT_IPC10.getDMA4IS : TBits_2; inline;
  60459. begin
  60460. getDMA4IS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60461. end;
  60462. procedure TINT_IPC10.setDMA4IP(thebits : TBits_3); inline;
  60463. begin
  60464. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60465. end;
  60466. function TINT_IPC10.getDMA4IP : TBits_3; inline;
  60467. begin
  60468. getDMA4IP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60469. end;
  60470. procedure TINT_IPC10.setDMA5IS(thebits : TBits_2); inline;
  60471. begin
  60472. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  60473. end;
  60474. function TINT_IPC10.getDMA5IS : TBits_2; inline;
  60475. begin
  60476. getDMA5IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  60477. end;
  60478. procedure TINT_IPC10.setDMA5IP(thebits : TBits_3); inline;
  60479. begin
  60480. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  60481. end;
  60482. function TINT_IPC10.getDMA5IP : TBits_3; inline;
  60483. begin
  60484. getDMA5IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  60485. end;
  60486. procedure TINT_IPC10.setDMA6IS(thebits : TBits_2); inline;
  60487. begin
  60488. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60489. end;
  60490. function TINT_IPC10.getDMA6IS : TBits_2; inline;
  60491. begin
  60492. getDMA6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60493. end;
  60494. procedure TINT_IPC10.setDMA6IP(thebits : TBits_3); inline;
  60495. begin
  60496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60497. end;
  60498. function TINT_IPC10.getDMA6IP : TBits_3; inline;
  60499. begin
  60500. getDMA6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60501. end;
  60502. procedure TINT_IPC10.setDMA7IS(thebits : TBits_2); inline;
  60503. begin
  60504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60505. end;
  60506. function TINT_IPC10.getDMA7IS : TBits_2; inline;
  60507. begin
  60508. getDMA7IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60509. end;
  60510. procedure TINT_IPC10.setDMA7IP(thebits : TBits_3); inline;
  60511. begin
  60512. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60513. end;
  60514. function TINT_IPC10.getDMA7IP : TBits_3; inline;
  60515. begin
  60516. getDMA7IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60517. end;
  60518. procedure TINT_IPC10.setw(thebits : TBits_32); inline;
  60519. begin
  60520. pTDefRegMap(@Self)^.val := thebits;
  60521. end;
  60522. function TINT_IPC10.getw : TBits_32; inline;
  60523. begin
  60524. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60525. end;
  60526. procedure TINT_IPC11.setFCEIS(thebits : TBits_2); inline;
  60527. begin
  60528. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60529. end;
  60530. function TINT_IPC11.getFCEIS : TBits_2; inline;
  60531. begin
  60532. getFCEIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60533. end;
  60534. procedure TINT_IPC11.setFCEIP(thebits : TBits_3); inline;
  60535. begin
  60536. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60537. end;
  60538. function TINT_IPC11.getFCEIP : TBits_3; inline;
  60539. begin
  60540. getFCEIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60541. end;
  60542. procedure TINT_IPC11.setUSBIS(thebits : TBits_2); inline;
  60543. begin
  60544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  60545. end;
  60546. function TINT_IPC11.getUSBIS : TBits_2; inline;
  60547. begin
  60548. getUSBIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  60549. end;
  60550. procedure TINT_IPC11.setUSBIP(thebits : TBits_3); inline;
  60551. begin
  60552. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  60553. end;
  60554. function TINT_IPC11.getUSBIP : TBits_3; inline;
  60555. begin
  60556. getUSBIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  60557. end;
  60558. procedure TINT_IPC11.setCAN1IS(thebits : TBits_2); inline;
  60559. begin
  60560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60561. end;
  60562. function TINT_IPC11.getCAN1IS : TBits_2; inline;
  60563. begin
  60564. getCAN1IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60565. end;
  60566. procedure TINT_IPC11.setCAN1IP(thebits : TBits_3); inline;
  60567. begin
  60568. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60569. end;
  60570. function TINT_IPC11.getCAN1IP : TBits_3; inline;
  60571. begin
  60572. getCAN1IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60573. end;
  60574. procedure TINT_IPC11.setCAN2IS(thebits : TBits_2); inline;
  60575. begin
  60576. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60577. end;
  60578. function TINT_IPC11.getCAN2IS : TBits_2; inline;
  60579. begin
  60580. getCAN2IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60581. end;
  60582. procedure TINT_IPC11.setCAN2IP(thebits : TBits_3); inline;
  60583. begin
  60584. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60585. end;
  60586. function TINT_IPC11.getCAN2IP : TBits_3; inline;
  60587. begin
  60588. getCAN2IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60589. end;
  60590. procedure TINT_IPC11.setw(thebits : TBits_32); inline;
  60591. begin
  60592. pTDefRegMap(@Self)^.val := thebits;
  60593. end;
  60594. function TINT_IPC11.getw : TBits_32; inline;
  60595. begin
  60596. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60597. end;
  60598. procedure TINT_IPC12.setETHIS(thebits : TBits_2); inline;
  60599. begin
  60600. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  60601. end;
  60602. function TINT_IPC12.getETHIS : TBits_2; inline;
  60603. begin
  60604. getETHIS := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  60605. end;
  60606. procedure TINT_IPC12.setETHIP(thebits : TBits_3); inline;
  60607. begin
  60608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE3 or ( thebits shl 2 );
  60609. end;
  60610. function TINT_IPC12.getETHIP : TBits_3; inline;
  60611. begin
  60612. getETHIP := (pTDefRegMap(@Self)^.val and $0000001C) shr 2;
  60613. end;
  60614. procedure TINT_IPC12.setU4IS(thebits : TBits_2); inline;
  60615. begin
  60616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  60617. end;
  60618. function TINT_IPC12.getU4IS : TBits_2; inline;
  60619. begin
  60620. getU4IS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  60621. end;
  60622. procedure TINT_IPC12.setU4IP(thebits : TBits_3); inline;
  60623. begin
  60624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  60625. end;
  60626. function TINT_IPC12.getU4IP : TBits_3; inline;
  60627. begin
  60628. getU4IP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  60629. end;
  60630. procedure TINT_IPC12.setU6IS(thebits : TBits_2); inline;
  60631. begin
  60632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60633. end;
  60634. function TINT_IPC12.getU6IS : TBits_2; inline;
  60635. begin
  60636. getU6IS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60637. end;
  60638. procedure TINT_IPC12.setU6IP(thebits : TBits_3); inline;
  60639. begin
  60640. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60641. end;
  60642. function TINT_IPC12.getU6IP : TBits_3; inline;
  60643. begin
  60644. getU6IP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60645. end;
  60646. procedure TINT_IPC12.setU5IS(thebits : TBits_2); inline;
  60647. begin
  60648. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60649. end;
  60650. function TINT_IPC12.getU5IS : TBits_2; inline;
  60651. begin
  60652. getU5IS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60653. end;
  60654. procedure TINT_IPC12.setU5IP(thebits : TBits_3); inline;
  60655. begin
  60656. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60657. end;
  60658. function TINT_IPC12.getU5IP : TBits_3; inline;
  60659. begin
  60660. getU5IP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60661. end;
  60662. procedure TINT_IPC12.setU1BIS(thebits : TBits_2); inline;
  60663. begin
  60664. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  60665. end;
  60666. function TINT_IPC12.getU1BIS : TBits_2; inline;
  60667. begin
  60668. getU1BIS := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  60669. end;
  60670. procedure TINT_IPC12.setU1BIP(thebits : TBits_3); inline;
  60671. begin
  60672. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE3FF or ( thebits shl 10 );
  60673. end;
  60674. function TINT_IPC12.getU1BIP : TBits_3; inline;
  60675. begin
  60676. getU1BIP := (pTDefRegMap(@Self)^.val and $00001C00) shr 10;
  60677. end;
  60678. procedure TINT_IPC12.setU2BIS(thebits : TBits_2); inline;
  60679. begin
  60680. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFCFFFF or ( thebits shl 16 );
  60681. end;
  60682. function TINT_IPC12.getU2BIS : TBits_2; inline;
  60683. begin
  60684. getU2BIS := (pTDefRegMap(@Self)^.val and $00030000) shr 16;
  60685. end;
  60686. procedure TINT_IPC12.setU2BIP(thebits : TBits_3); inline;
  60687. begin
  60688. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE3FFFF or ( thebits shl 18 );
  60689. end;
  60690. function TINT_IPC12.getU2BIP : TBits_3; inline;
  60691. begin
  60692. getU2BIP := (pTDefRegMap(@Self)^.val and $001C0000) shr 18;
  60693. end;
  60694. procedure TINT_IPC12.setU3BIS(thebits : TBits_2); inline;
  60695. begin
  60696. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FCFFFFFF or ( thebits shl 24 );
  60697. end;
  60698. function TINT_IPC12.getU3BIS : TBits_2; inline;
  60699. begin
  60700. getU3BIS := (pTDefRegMap(@Self)^.val and $03000000) shr 24;
  60701. end;
  60702. procedure TINT_IPC12.setU3BIP(thebits : TBits_3); inline;
  60703. begin
  60704. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E3FFFFFF or ( thebits shl 26 );
  60705. end;
  60706. function TINT_IPC12.getU3BIP : TBits_3; inline;
  60707. begin
  60708. getU3BIP := (pTDefRegMap(@Self)^.val and $1C000000) shr 26;
  60709. end;
  60710. procedure TINT_IPC12.setw(thebits : TBits_32); inline;
  60711. begin
  60712. pTDefRegMap(@Self)^.val := thebits;
  60713. end;
  60714. function TINT_IPC12.getw : TBits_32; inline;
  60715. begin
  60716. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60717. end;
  60718. procedure TBMX_BMXCON.setBMXARB(thebits : TBits_3); inline;
  60719. begin
  60720. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  60721. end;
  60722. function TBMX_BMXCON.getBMXARB : TBits_3; inline;
  60723. begin
  60724. getBMXARB := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  60725. end;
  60726. procedure TBMX_BMXCON.setBMXWSDRM; inline;
  60727. begin
  60728. pTDefRegMap(@Self)^.&set := $00000040;
  60729. end;
  60730. procedure TBMX_BMXCON.clearBMXWSDRM; inline;
  60731. begin
  60732. pTDefRegMap(@Self)^.clr := $00000040;
  60733. end;
  60734. procedure TBMX_BMXCON.setBMXWSDRM(thebits : TBits_1); inline;
  60735. begin
  60736. if thebits = 0 then
  60737. pTDefRegMap(@Self)^.clr := $00000040
  60738. else
  60739. pTDefRegMap(@Self)^.&set := $00000040;
  60740. end;
  60741. function TBMX_BMXCON.getBMXWSDRM : TBits_1; inline;
  60742. begin
  60743. getBMXWSDRM := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  60744. end;
  60745. procedure TBMX_BMXCON.setBMXERRIS; inline;
  60746. begin
  60747. pTDefRegMap(@Self)^.&set := $00010000;
  60748. end;
  60749. procedure TBMX_BMXCON.clearBMXERRIS; inline;
  60750. begin
  60751. pTDefRegMap(@Self)^.clr := $00010000;
  60752. end;
  60753. procedure TBMX_BMXCON.setBMXERRIS(thebits : TBits_1); inline;
  60754. begin
  60755. if thebits = 0 then
  60756. pTDefRegMap(@Self)^.clr := $00010000
  60757. else
  60758. pTDefRegMap(@Self)^.&set := $00010000;
  60759. end;
  60760. function TBMX_BMXCON.getBMXERRIS : TBits_1; inline;
  60761. begin
  60762. getBMXERRIS := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  60763. end;
  60764. procedure TBMX_BMXCON.setBMXERRDS; inline;
  60765. begin
  60766. pTDefRegMap(@Self)^.&set := $00020000;
  60767. end;
  60768. procedure TBMX_BMXCON.clearBMXERRDS; inline;
  60769. begin
  60770. pTDefRegMap(@Self)^.clr := $00020000;
  60771. end;
  60772. procedure TBMX_BMXCON.setBMXERRDS(thebits : TBits_1); inline;
  60773. begin
  60774. if thebits = 0 then
  60775. pTDefRegMap(@Self)^.clr := $00020000
  60776. else
  60777. pTDefRegMap(@Self)^.&set := $00020000;
  60778. end;
  60779. function TBMX_BMXCON.getBMXERRDS : TBits_1; inline;
  60780. begin
  60781. getBMXERRDS := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  60782. end;
  60783. procedure TBMX_BMXCON.setBMXERRDMA; inline;
  60784. begin
  60785. pTDefRegMap(@Self)^.&set := $00040000;
  60786. end;
  60787. procedure TBMX_BMXCON.clearBMXERRDMA; inline;
  60788. begin
  60789. pTDefRegMap(@Self)^.clr := $00040000;
  60790. end;
  60791. procedure TBMX_BMXCON.setBMXERRDMA(thebits : TBits_1); inline;
  60792. begin
  60793. if thebits = 0 then
  60794. pTDefRegMap(@Self)^.clr := $00040000
  60795. else
  60796. pTDefRegMap(@Self)^.&set := $00040000;
  60797. end;
  60798. function TBMX_BMXCON.getBMXERRDMA : TBits_1; inline;
  60799. begin
  60800. getBMXERRDMA := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  60801. end;
  60802. procedure TBMX_BMXCON.setBMXERRICD; inline;
  60803. begin
  60804. pTDefRegMap(@Self)^.&set := $00080000;
  60805. end;
  60806. procedure TBMX_BMXCON.clearBMXERRICD; inline;
  60807. begin
  60808. pTDefRegMap(@Self)^.clr := $00080000;
  60809. end;
  60810. procedure TBMX_BMXCON.setBMXERRICD(thebits : TBits_1); inline;
  60811. begin
  60812. if thebits = 0 then
  60813. pTDefRegMap(@Self)^.clr := $00080000
  60814. else
  60815. pTDefRegMap(@Self)^.&set := $00080000;
  60816. end;
  60817. function TBMX_BMXCON.getBMXERRICD : TBits_1; inline;
  60818. begin
  60819. getBMXERRICD := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  60820. end;
  60821. procedure TBMX_BMXCON.setBMXERRIXI; inline;
  60822. begin
  60823. pTDefRegMap(@Self)^.&set := $00100000;
  60824. end;
  60825. procedure TBMX_BMXCON.clearBMXERRIXI; inline;
  60826. begin
  60827. pTDefRegMap(@Self)^.clr := $00100000;
  60828. end;
  60829. procedure TBMX_BMXCON.setBMXERRIXI(thebits : TBits_1); inline;
  60830. begin
  60831. if thebits = 0 then
  60832. pTDefRegMap(@Self)^.clr := $00100000
  60833. else
  60834. pTDefRegMap(@Self)^.&set := $00100000;
  60835. end;
  60836. function TBMX_BMXCON.getBMXERRIXI : TBits_1; inline;
  60837. begin
  60838. getBMXERRIXI := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  60839. end;
  60840. procedure TBMX_BMXCON.setBMXCHEDMA; inline;
  60841. begin
  60842. pTDefRegMap(@Self)^.&set := $04000000;
  60843. end;
  60844. procedure TBMX_BMXCON.clearBMXCHEDMA; inline;
  60845. begin
  60846. pTDefRegMap(@Self)^.clr := $04000000;
  60847. end;
  60848. procedure TBMX_BMXCON.setBMXCHEDMA(thebits : TBits_1); inline;
  60849. begin
  60850. if thebits = 0 then
  60851. pTDefRegMap(@Self)^.clr := $04000000
  60852. else
  60853. pTDefRegMap(@Self)^.&set := $04000000;
  60854. end;
  60855. function TBMX_BMXCON.getBMXCHEDMA : TBits_1; inline;
  60856. begin
  60857. getBMXCHEDMA := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  60858. end;
  60859. procedure TBMX_BMXCON.setw(thebits : TBits_32); inline;
  60860. begin
  60861. pTDefRegMap(@Self)^.val := thebits;
  60862. end;
  60863. function TBMX_BMXCON.getw : TBits_32; inline;
  60864. begin
  60865. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60866. end;
  60867. procedure TDMAC_DMACON.setDMABUSY; inline;
  60868. begin
  60869. pTDefRegMap(@Self)^.&set := $00000800;
  60870. end;
  60871. procedure TDMAC_DMACON.clearDMABUSY; inline;
  60872. begin
  60873. pTDefRegMap(@Self)^.clr := $00000800;
  60874. end;
  60875. procedure TDMAC_DMACON.setDMABUSY(thebits : TBits_1); inline;
  60876. begin
  60877. if thebits = 0 then
  60878. pTDefRegMap(@Self)^.clr := $00000800
  60879. else
  60880. pTDefRegMap(@Self)^.&set := $00000800;
  60881. end;
  60882. function TDMAC_DMACON.getDMABUSY : TBits_1; inline;
  60883. begin
  60884. getDMABUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  60885. end;
  60886. procedure TDMAC_DMACON.setSUSPEND; inline;
  60887. begin
  60888. pTDefRegMap(@Self)^.&set := $00001000;
  60889. end;
  60890. procedure TDMAC_DMACON.clearSUSPEND; inline;
  60891. begin
  60892. pTDefRegMap(@Self)^.clr := $00001000;
  60893. end;
  60894. procedure TDMAC_DMACON.setSUSPEND(thebits : TBits_1); inline;
  60895. begin
  60896. if thebits = 0 then
  60897. pTDefRegMap(@Self)^.clr := $00001000
  60898. else
  60899. pTDefRegMap(@Self)^.&set := $00001000;
  60900. end;
  60901. function TDMAC_DMACON.getSUSPEND : TBits_1; inline;
  60902. begin
  60903. getSUSPEND := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  60904. end;
  60905. procedure TDMAC_DMACON.setON; inline;
  60906. begin
  60907. pTDefRegMap(@Self)^.&set := $00008000;
  60908. end;
  60909. procedure TDMAC_DMACON.clearON; inline;
  60910. begin
  60911. pTDefRegMap(@Self)^.clr := $00008000;
  60912. end;
  60913. procedure TDMAC_DMACON.setON(thebits : TBits_1); inline;
  60914. begin
  60915. if thebits = 0 then
  60916. pTDefRegMap(@Self)^.clr := $00008000
  60917. else
  60918. pTDefRegMap(@Self)^.&set := $00008000;
  60919. end;
  60920. function TDMAC_DMACON.getON : TBits_1; inline;
  60921. begin
  60922. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  60923. end;
  60924. procedure TDMAC_DMACON.setw(thebits : TBits_32); inline;
  60925. begin
  60926. pTDefRegMap(@Self)^.val := thebits;
  60927. end;
  60928. function TDMAC_DMACON.getw : TBits_32; inline;
  60929. begin
  60930. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60931. end;
  60932. procedure TDMAC_DMASTAT.setDMACH(thebits : TBits_3); inline;
  60933. begin
  60934. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  60935. end;
  60936. function TDMAC_DMASTAT.getDMACH : TBits_3; inline;
  60937. begin
  60938. getDMACH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  60939. end;
  60940. procedure TDMAC_DMASTAT.setRDWR; inline;
  60941. begin
  60942. pTDefRegMap(@Self)^.&set := $00000008;
  60943. end;
  60944. procedure TDMAC_DMASTAT.clearRDWR; inline;
  60945. begin
  60946. pTDefRegMap(@Self)^.clr := $00000008;
  60947. end;
  60948. procedure TDMAC_DMASTAT.setRDWR(thebits : TBits_1); inline;
  60949. begin
  60950. if thebits = 0 then
  60951. pTDefRegMap(@Self)^.clr := $00000008
  60952. else
  60953. pTDefRegMap(@Self)^.&set := $00000008;
  60954. end;
  60955. function TDMAC_DMASTAT.getRDWR : TBits_1; inline;
  60956. begin
  60957. getRDWR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  60958. end;
  60959. procedure TDMAC_DMASTAT.setw(thebits : TBits_32); inline;
  60960. begin
  60961. pTDefRegMap(@Self)^.val := thebits;
  60962. end;
  60963. function TDMAC_DMASTAT.getw : TBits_32; inline;
  60964. begin
  60965. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  60966. end;
  60967. procedure TDMAC_DCRCCON.setCRCCH(thebits : TBits_3); inline;
  60968. begin
  60969. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  60970. end;
  60971. function TDMAC_DCRCCON.getCRCCH : TBits_3; inline;
  60972. begin
  60973. getCRCCH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  60974. end;
  60975. procedure TDMAC_DCRCCON.setCRCTYP; inline;
  60976. begin
  60977. pTDefRegMap(@Self)^.&set := $00000020;
  60978. end;
  60979. procedure TDMAC_DCRCCON.clearCRCTYP; inline;
  60980. begin
  60981. pTDefRegMap(@Self)^.clr := $00000020;
  60982. end;
  60983. procedure TDMAC_DCRCCON.setCRCTYP(thebits : TBits_1); inline;
  60984. begin
  60985. if thebits = 0 then
  60986. pTDefRegMap(@Self)^.clr := $00000020
  60987. else
  60988. pTDefRegMap(@Self)^.&set := $00000020;
  60989. end;
  60990. function TDMAC_DCRCCON.getCRCTYP : TBits_1; inline;
  60991. begin
  60992. getCRCTYP := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  60993. end;
  60994. procedure TDMAC_DCRCCON.setCRCAPP; inline;
  60995. begin
  60996. pTDefRegMap(@Self)^.&set := $00000040;
  60997. end;
  60998. procedure TDMAC_DCRCCON.clearCRCAPP; inline;
  60999. begin
  61000. pTDefRegMap(@Self)^.clr := $00000040;
  61001. end;
  61002. procedure TDMAC_DCRCCON.setCRCAPP(thebits : TBits_1); inline;
  61003. begin
  61004. if thebits = 0 then
  61005. pTDefRegMap(@Self)^.clr := $00000040
  61006. else
  61007. pTDefRegMap(@Self)^.&set := $00000040;
  61008. end;
  61009. function TDMAC_DCRCCON.getCRCAPP : TBits_1; inline;
  61010. begin
  61011. getCRCAPP := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61012. end;
  61013. procedure TDMAC_DCRCCON.setCRCEN; inline;
  61014. begin
  61015. pTDefRegMap(@Self)^.&set := $00000080;
  61016. end;
  61017. procedure TDMAC_DCRCCON.clearCRCEN; inline;
  61018. begin
  61019. pTDefRegMap(@Self)^.clr := $00000080;
  61020. end;
  61021. procedure TDMAC_DCRCCON.setCRCEN(thebits : TBits_1); inline;
  61022. begin
  61023. if thebits = 0 then
  61024. pTDefRegMap(@Self)^.clr := $00000080
  61025. else
  61026. pTDefRegMap(@Self)^.&set := $00000080;
  61027. end;
  61028. function TDMAC_DCRCCON.getCRCEN : TBits_1; inline;
  61029. begin
  61030. getCRCEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61031. end;
  61032. procedure TDMAC_DCRCCON.setPLEN(thebits : TBits_5); inline;
  61033. begin
  61034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  61035. end;
  61036. function TDMAC_DCRCCON.getPLEN : TBits_5; inline;
  61037. begin
  61038. getPLEN := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  61039. end;
  61040. procedure TDMAC_DCRCCON.setBITO; inline;
  61041. begin
  61042. pTDefRegMap(@Self)^.&set := $01000000;
  61043. end;
  61044. procedure TDMAC_DCRCCON.clearBITO; inline;
  61045. begin
  61046. pTDefRegMap(@Self)^.clr := $01000000;
  61047. end;
  61048. procedure TDMAC_DCRCCON.setBITO(thebits : TBits_1); inline;
  61049. begin
  61050. if thebits = 0 then
  61051. pTDefRegMap(@Self)^.clr := $01000000
  61052. else
  61053. pTDefRegMap(@Self)^.&set := $01000000;
  61054. end;
  61055. function TDMAC_DCRCCON.getBITO : TBits_1; inline;
  61056. begin
  61057. getBITO := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  61058. end;
  61059. procedure TDMAC_DCRCCON.setWBO; inline;
  61060. begin
  61061. pTDefRegMap(@Self)^.&set := $08000000;
  61062. end;
  61063. procedure TDMAC_DCRCCON.clearWBO; inline;
  61064. begin
  61065. pTDefRegMap(@Self)^.clr := $08000000;
  61066. end;
  61067. procedure TDMAC_DCRCCON.setWBO(thebits : TBits_1); inline;
  61068. begin
  61069. if thebits = 0 then
  61070. pTDefRegMap(@Self)^.clr := $08000000
  61071. else
  61072. pTDefRegMap(@Self)^.&set := $08000000;
  61073. end;
  61074. function TDMAC_DCRCCON.getWBO : TBits_1; inline;
  61075. begin
  61076. getWBO := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  61077. end;
  61078. procedure TDMAC_DCRCCON.setBYTO(thebits : TBits_2); inline;
  61079. begin
  61080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $CFFFFFFF or ( thebits shl 28 );
  61081. end;
  61082. function TDMAC_DCRCCON.getBYTO : TBits_2; inline;
  61083. begin
  61084. getBYTO := (pTDefRegMap(@Self)^.val and $30000000) shr 28;
  61085. end;
  61086. procedure TDMAC_DCRCCON.setw(thebits : TBits_32); inline;
  61087. begin
  61088. pTDefRegMap(@Self)^.val := thebits;
  61089. end;
  61090. function TDMAC_DCRCCON.getw : TBits_32; inline;
  61091. begin
  61092. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61093. end;
  61094. procedure TDMAC0_DCH0CON.setCHPRI(thebits : TBits_2); inline;
  61095. begin
  61096. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  61097. end;
  61098. function TDMAC0_DCH0CON.getCHPRI : TBits_2; inline;
  61099. begin
  61100. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  61101. end;
  61102. procedure TDMAC0_DCH0CON.setCHEDET; inline;
  61103. begin
  61104. pTDefRegMap(@Self)^.&set := $00000004;
  61105. end;
  61106. procedure TDMAC0_DCH0CON.clearCHEDET; inline;
  61107. begin
  61108. pTDefRegMap(@Self)^.clr := $00000004;
  61109. end;
  61110. procedure TDMAC0_DCH0CON.setCHEDET(thebits : TBits_1); inline;
  61111. begin
  61112. if thebits = 0 then
  61113. pTDefRegMap(@Self)^.clr := $00000004
  61114. else
  61115. pTDefRegMap(@Self)^.&set := $00000004;
  61116. end;
  61117. function TDMAC0_DCH0CON.getCHEDET : TBits_1; inline;
  61118. begin
  61119. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61120. end;
  61121. procedure TDMAC0_DCH0CON.setCHAEN; inline;
  61122. begin
  61123. pTDefRegMap(@Self)^.&set := $00000010;
  61124. end;
  61125. procedure TDMAC0_DCH0CON.clearCHAEN; inline;
  61126. begin
  61127. pTDefRegMap(@Self)^.clr := $00000010;
  61128. end;
  61129. procedure TDMAC0_DCH0CON.setCHAEN(thebits : TBits_1); inline;
  61130. begin
  61131. if thebits = 0 then
  61132. pTDefRegMap(@Self)^.clr := $00000010
  61133. else
  61134. pTDefRegMap(@Self)^.&set := $00000010;
  61135. end;
  61136. function TDMAC0_DCH0CON.getCHAEN : TBits_1; inline;
  61137. begin
  61138. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61139. end;
  61140. procedure TDMAC0_DCH0CON.setCHCHN; inline;
  61141. begin
  61142. pTDefRegMap(@Self)^.&set := $00000020;
  61143. end;
  61144. procedure TDMAC0_DCH0CON.clearCHCHN; inline;
  61145. begin
  61146. pTDefRegMap(@Self)^.clr := $00000020;
  61147. end;
  61148. procedure TDMAC0_DCH0CON.setCHCHN(thebits : TBits_1); inline;
  61149. begin
  61150. if thebits = 0 then
  61151. pTDefRegMap(@Self)^.clr := $00000020
  61152. else
  61153. pTDefRegMap(@Self)^.&set := $00000020;
  61154. end;
  61155. function TDMAC0_DCH0CON.getCHCHN : TBits_1; inline;
  61156. begin
  61157. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61158. end;
  61159. procedure TDMAC0_DCH0CON.setCHAED; inline;
  61160. begin
  61161. pTDefRegMap(@Self)^.&set := $00000040;
  61162. end;
  61163. procedure TDMAC0_DCH0CON.clearCHAED; inline;
  61164. begin
  61165. pTDefRegMap(@Self)^.clr := $00000040;
  61166. end;
  61167. procedure TDMAC0_DCH0CON.setCHAED(thebits : TBits_1); inline;
  61168. begin
  61169. if thebits = 0 then
  61170. pTDefRegMap(@Self)^.clr := $00000040
  61171. else
  61172. pTDefRegMap(@Self)^.&set := $00000040;
  61173. end;
  61174. function TDMAC0_DCH0CON.getCHAED : TBits_1; inline;
  61175. begin
  61176. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61177. end;
  61178. procedure TDMAC0_DCH0CON.setCHEN; inline;
  61179. begin
  61180. pTDefRegMap(@Self)^.&set := $00000080;
  61181. end;
  61182. procedure TDMAC0_DCH0CON.clearCHEN; inline;
  61183. begin
  61184. pTDefRegMap(@Self)^.clr := $00000080;
  61185. end;
  61186. procedure TDMAC0_DCH0CON.setCHEN(thebits : TBits_1); inline;
  61187. begin
  61188. if thebits = 0 then
  61189. pTDefRegMap(@Self)^.clr := $00000080
  61190. else
  61191. pTDefRegMap(@Self)^.&set := $00000080;
  61192. end;
  61193. function TDMAC0_DCH0CON.getCHEN : TBits_1; inline;
  61194. begin
  61195. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61196. end;
  61197. procedure TDMAC0_DCH0CON.setCHCHNS; inline;
  61198. begin
  61199. pTDefRegMap(@Self)^.&set := $00000100;
  61200. end;
  61201. procedure TDMAC0_DCH0CON.clearCHCHNS; inline;
  61202. begin
  61203. pTDefRegMap(@Self)^.clr := $00000100;
  61204. end;
  61205. procedure TDMAC0_DCH0CON.setCHCHNS(thebits : TBits_1); inline;
  61206. begin
  61207. if thebits = 0 then
  61208. pTDefRegMap(@Self)^.clr := $00000100
  61209. else
  61210. pTDefRegMap(@Self)^.&set := $00000100;
  61211. end;
  61212. function TDMAC0_DCH0CON.getCHCHNS : TBits_1; inline;
  61213. begin
  61214. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61215. end;
  61216. procedure TDMAC0_DCH0CON.setCHBUSY; inline;
  61217. begin
  61218. pTDefRegMap(@Self)^.&set := $00008000;
  61219. end;
  61220. procedure TDMAC0_DCH0CON.clearCHBUSY; inline;
  61221. begin
  61222. pTDefRegMap(@Self)^.clr := $00008000;
  61223. end;
  61224. procedure TDMAC0_DCH0CON.setCHBUSY(thebits : TBits_1); inline;
  61225. begin
  61226. if thebits = 0 then
  61227. pTDefRegMap(@Self)^.clr := $00008000
  61228. else
  61229. pTDefRegMap(@Self)^.&set := $00008000;
  61230. end;
  61231. function TDMAC0_DCH0CON.getCHBUSY : TBits_1; inline;
  61232. begin
  61233. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61234. end;
  61235. procedure TDMAC0_DCH0CON.setw(thebits : TBits_32); inline;
  61236. begin
  61237. pTDefRegMap(@Self)^.val := thebits;
  61238. end;
  61239. function TDMAC0_DCH0CON.getw : TBits_32; inline;
  61240. begin
  61241. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61242. end;
  61243. procedure TDMAC0_DCH0ECON.setAIRQEN; inline;
  61244. begin
  61245. pTDefRegMap(@Self)^.&set := $00000008;
  61246. end;
  61247. procedure TDMAC0_DCH0ECON.clearAIRQEN; inline;
  61248. begin
  61249. pTDefRegMap(@Self)^.clr := $00000008;
  61250. end;
  61251. procedure TDMAC0_DCH0ECON.setAIRQEN(thebits : TBits_1); inline;
  61252. begin
  61253. if thebits = 0 then
  61254. pTDefRegMap(@Self)^.clr := $00000008
  61255. else
  61256. pTDefRegMap(@Self)^.&set := $00000008;
  61257. end;
  61258. function TDMAC0_DCH0ECON.getAIRQEN : TBits_1; inline;
  61259. begin
  61260. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61261. end;
  61262. procedure TDMAC0_DCH0ECON.setSIRQEN; inline;
  61263. begin
  61264. pTDefRegMap(@Self)^.&set := $00000010;
  61265. end;
  61266. procedure TDMAC0_DCH0ECON.clearSIRQEN; inline;
  61267. begin
  61268. pTDefRegMap(@Self)^.clr := $00000010;
  61269. end;
  61270. procedure TDMAC0_DCH0ECON.setSIRQEN(thebits : TBits_1); inline;
  61271. begin
  61272. if thebits = 0 then
  61273. pTDefRegMap(@Self)^.clr := $00000010
  61274. else
  61275. pTDefRegMap(@Self)^.&set := $00000010;
  61276. end;
  61277. function TDMAC0_DCH0ECON.getSIRQEN : TBits_1; inline;
  61278. begin
  61279. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61280. end;
  61281. procedure TDMAC0_DCH0ECON.setPATEN; inline;
  61282. begin
  61283. pTDefRegMap(@Self)^.&set := $00000020;
  61284. end;
  61285. procedure TDMAC0_DCH0ECON.clearPATEN; inline;
  61286. begin
  61287. pTDefRegMap(@Self)^.clr := $00000020;
  61288. end;
  61289. procedure TDMAC0_DCH0ECON.setPATEN(thebits : TBits_1); inline;
  61290. begin
  61291. if thebits = 0 then
  61292. pTDefRegMap(@Self)^.clr := $00000020
  61293. else
  61294. pTDefRegMap(@Self)^.&set := $00000020;
  61295. end;
  61296. function TDMAC0_DCH0ECON.getPATEN : TBits_1; inline;
  61297. begin
  61298. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61299. end;
  61300. procedure TDMAC0_DCH0ECON.setCABORT; inline;
  61301. begin
  61302. pTDefRegMap(@Self)^.&set := $00000040;
  61303. end;
  61304. procedure TDMAC0_DCH0ECON.clearCABORT; inline;
  61305. begin
  61306. pTDefRegMap(@Self)^.clr := $00000040;
  61307. end;
  61308. procedure TDMAC0_DCH0ECON.setCABORT(thebits : TBits_1); inline;
  61309. begin
  61310. if thebits = 0 then
  61311. pTDefRegMap(@Self)^.clr := $00000040
  61312. else
  61313. pTDefRegMap(@Self)^.&set := $00000040;
  61314. end;
  61315. function TDMAC0_DCH0ECON.getCABORT : TBits_1; inline;
  61316. begin
  61317. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61318. end;
  61319. procedure TDMAC0_DCH0ECON.setCFORCE; inline;
  61320. begin
  61321. pTDefRegMap(@Self)^.&set := $00000080;
  61322. end;
  61323. procedure TDMAC0_DCH0ECON.clearCFORCE; inline;
  61324. begin
  61325. pTDefRegMap(@Self)^.clr := $00000080;
  61326. end;
  61327. procedure TDMAC0_DCH0ECON.setCFORCE(thebits : TBits_1); inline;
  61328. begin
  61329. if thebits = 0 then
  61330. pTDefRegMap(@Self)^.clr := $00000080
  61331. else
  61332. pTDefRegMap(@Self)^.&set := $00000080;
  61333. end;
  61334. function TDMAC0_DCH0ECON.getCFORCE : TBits_1; inline;
  61335. begin
  61336. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61337. end;
  61338. procedure TDMAC0_DCH0ECON.setCHSIRQ(thebits : TBits_8); inline;
  61339. begin
  61340. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  61341. end;
  61342. function TDMAC0_DCH0ECON.getCHSIRQ : TBits_8; inline;
  61343. begin
  61344. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  61345. end;
  61346. procedure TDMAC0_DCH0ECON.setCHAIRQ(thebits : TBits_8); inline;
  61347. begin
  61348. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  61349. end;
  61350. function TDMAC0_DCH0ECON.getCHAIRQ : TBits_8; inline;
  61351. begin
  61352. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  61353. end;
  61354. procedure TDMAC0_DCH0ECON.setw(thebits : TBits_32); inline;
  61355. begin
  61356. pTDefRegMap(@Self)^.val := thebits;
  61357. end;
  61358. function TDMAC0_DCH0ECON.getw : TBits_32; inline;
  61359. begin
  61360. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61361. end;
  61362. procedure TDMAC0_DCH0INT.setCHERIF; inline;
  61363. begin
  61364. pTDefRegMap(@Self)^.&set := $00000001;
  61365. end;
  61366. procedure TDMAC0_DCH0INT.clearCHERIF; inline;
  61367. begin
  61368. pTDefRegMap(@Self)^.clr := $00000001;
  61369. end;
  61370. procedure TDMAC0_DCH0INT.setCHERIF(thebits : TBits_1); inline;
  61371. begin
  61372. if thebits = 0 then
  61373. pTDefRegMap(@Self)^.clr := $00000001
  61374. else
  61375. pTDefRegMap(@Self)^.&set := $00000001;
  61376. end;
  61377. function TDMAC0_DCH0INT.getCHERIF : TBits_1; inline;
  61378. begin
  61379. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61380. end;
  61381. procedure TDMAC0_DCH0INT.setCHTAIF; inline;
  61382. begin
  61383. pTDefRegMap(@Self)^.&set := $00000002;
  61384. end;
  61385. procedure TDMAC0_DCH0INT.clearCHTAIF; inline;
  61386. begin
  61387. pTDefRegMap(@Self)^.clr := $00000002;
  61388. end;
  61389. procedure TDMAC0_DCH0INT.setCHTAIF(thebits : TBits_1); inline;
  61390. begin
  61391. if thebits = 0 then
  61392. pTDefRegMap(@Self)^.clr := $00000002
  61393. else
  61394. pTDefRegMap(@Self)^.&set := $00000002;
  61395. end;
  61396. function TDMAC0_DCH0INT.getCHTAIF : TBits_1; inline;
  61397. begin
  61398. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61399. end;
  61400. procedure TDMAC0_DCH0INT.setCHCCIF; inline;
  61401. begin
  61402. pTDefRegMap(@Self)^.&set := $00000004;
  61403. end;
  61404. procedure TDMAC0_DCH0INT.clearCHCCIF; inline;
  61405. begin
  61406. pTDefRegMap(@Self)^.clr := $00000004;
  61407. end;
  61408. procedure TDMAC0_DCH0INT.setCHCCIF(thebits : TBits_1); inline;
  61409. begin
  61410. if thebits = 0 then
  61411. pTDefRegMap(@Self)^.clr := $00000004
  61412. else
  61413. pTDefRegMap(@Self)^.&set := $00000004;
  61414. end;
  61415. function TDMAC0_DCH0INT.getCHCCIF : TBits_1; inline;
  61416. begin
  61417. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61418. end;
  61419. procedure TDMAC0_DCH0INT.setCHBCIF; inline;
  61420. begin
  61421. pTDefRegMap(@Self)^.&set := $00000008;
  61422. end;
  61423. procedure TDMAC0_DCH0INT.clearCHBCIF; inline;
  61424. begin
  61425. pTDefRegMap(@Self)^.clr := $00000008;
  61426. end;
  61427. procedure TDMAC0_DCH0INT.setCHBCIF(thebits : TBits_1); inline;
  61428. begin
  61429. if thebits = 0 then
  61430. pTDefRegMap(@Self)^.clr := $00000008
  61431. else
  61432. pTDefRegMap(@Self)^.&set := $00000008;
  61433. end;
  61434. function TDMAC0_DCH0INT.getCHBCIF : TBits_1; inline;
  61435. begin
  61436. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61437. end;
  61438. procedure TDMAC0_DCH0INT.setCHDHIF; inline;
  61439. begin
  61440. pTDefRegMap(@Self)^.&set := $00000010;
  61441. end;
  61442. procedure TDMAC0_DCH0INT.clearCHDHIF; inline;
  61443. begin
  61444. pTDefRegMap(@Self)^.clr := $00000010;
  61445. end;
  61446. procedure TDMAC0_DCH0INT.setCHDHIF(thebits : TBits_1); inline;
  61447. begin
  61448. if thebits = 0 then
  61449. pTDefRegMap(@Self)^.clr := $00000010
  61450. else
  61451. pTDefRegMap(@Self)^.&set := $00000010;
  61452. end;
  61453. function TDMAC0_DCH0INT.getCHDHIF : TBits_1; inline;
  61454. begin
  61455. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61456. end;
  61457. procedure TDMAC0_DCH0INT.setCHDDIF; inline;
  61458. begin
  61459. pTDefRegMap(@Self)^.&set := $00000020;
  61460. end;
  61461. procedure TDMAC0_DCH0INT.clearCHDDIF; inline;
  61462. begin
  61463. pTDefRegMap(@Self)^.clr := $00000020;
  61464. end;
  61465. procedure TDMAC0_DCH0INT.setCHDDIF(thebits : TBits_1); inline;
  61466. begin
  61467. if thebits = 0 then
  61468. pTDefRegMap(@Self)^.clr := $00000020
  61469. else
  61470. pTDefRegMap(@Self)^.&set := $00000020;
  61471. end;
  61472. function TDMAC0_DCH0INT.getCHDDIF : TBits_1; inline;
  61473. begin
  61474. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61475. end;
  61476. procedure TDMAC0_DCH0INT.setCHSHIF; inline;
  61477. begin
  61478. pTDefRegMap(@Self)^.&set := $00000040;
  61479. end;
  61480. procedure TDMAC0_DCH0INT.clearCHSHIF; inline;
  61481. begin
  61482. pTDefRegMap(@Self)^.clr := $00000040;
  61483. end;
  61484. procedure TDMAC0_DCH0INT.setCHSHIF(thebits : TBits_1); inline;
  61485. begin
  61486. if thebits = 0 then
  61487. pTDefRegMap(@Self)^.clr := $00000040
  61488. else
  61489. pTDefRegMap(@Self)^.&set := $00000040;
  61490. end;
  61491. function TDMAC0_DCH0INT.getCHSHIF : TBits_1; inline;
  61492. begin
  61493. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61494. end;
  61495. procedure TDMAC0_DCH0INT.setCHSDIF; inline;
  61496. begin
  61497. pTDefRegMap(@Self)^.&set := $00000080;
  61498. end;
  61499. procedure TDMAC0_DCH0INT.clearCHSDIF; inline;
  61500. begin
  61501. pTDefRegMap(@Self)^.clr := $00000080;
  61502. end;
  61503. procedure TDMAC0_DCH0INT.setCHSDIF(thebits : TBits_1); inline;
  61504. begin
  61505. if thebits = 0 then
  61506. pTDefRegMap(@Self)^.clr := $00000080
  61507. else
  61508. pTDefRegMap(@Self)^.&set := $00000080;
  61509. end;
  61510. function TDMAC0_DCH0INT.getCHSDIF : TBits_1; inline;
  61511. begin
  61512. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61513. end;
  61514. procedure TDMAC0_DCH0INT.setCHERIE; inline;
  61515. begin
  61516. pTDefRegMap(@Self)^.&set := $00010000;
  61517. end;
  61518. procedure TDMAC0_DCH0INT.clearCHERIE; inline;
  61519. begin
  61520. pTDefRegMap(@Self)^.clr := $00010000;
  61521. end;
  61522. procedure TDMAC0_DCH0INT.setCHERIE(thebits : TBits_1); inline;
  61523. begin
  61524. if thebits = 0 then
  61525. pTDefRegMap(@Self)^.clr := $00010000
  61526. else
  61527. pTDefRegMap(@Self)^.&set := $00010000;
  61528. end;
  61529. function TDMAC0_DCH0INT.getCHERIE : TBits_1; inline;
  61530. begin
  61531. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  61532. end;
  61533. procedure TDMAC0_DCH0INT.setCHTAIE; inline;
  61534. begin
  61535. pTDefRegMap(@Self)^.&set := $00020000;
  61536. end;
  61537. procedure TDMAC0_DCH0INT.clearCHTAIE; inline;
  61538. begin
  61539. pTDefRegMap(@Self)^.clr := $00020000;
  61540. end;
  61541. procedure TDMAC0_DCH0INT.setCHTAIE(thebits : TBits_1); inline;
  61542. begin
  61543. if thebits = 0 then
  61544. pTDefRegMap(@Self)^.clr := $00020000
  61545. else
  61546. pTDefRegMap(@Self)^.&set := $00020000;
  61547. end;
  61548. function TDMAC0_DCH0INT.getCHTAIE : TBits_1; inline;
  61549. begin
  61550. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  61551. end;
  61552. procedure TDMAC0_DCH0INT.setCHCCIE; inline;
  61553. begin
  61554. pTDefRegMap(@Self)^.&set := $00040000;
  61555. end;
  61556. procedure TDMAC0_DCH0INT.clearCHCCIE; inline;
  61557. begin
  61558. pTDefRegMap(@Self)^.clr := $00040000;
  61559. end;
  61560. procedure TDMAC0_DCH0INT.setCHCCIE(thebits : TBits_1); inline;
  61561. begin
  61562. if thebits = 0 then
  61563. pTDefRegMap(@Self)^.clr := $00040000
  61564. else
  61565. pTDefRegMap(@Self)^.&set := $00040000;
  61566. end;
  61567. function TDMAC0_DCH0INT.getCHCCIE : TBits_1; inline;
  61568. begin
  61569. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  61570. end;
  61571. procedure TDMAC0_DCH0INT.setCHBCIE; inline;
  61572. begin
  61573. pTDefRegMap(@Self)^.&set := $00080000;
  61574. end;
  61575. procedure TDMAC0_DCH0INT.clearCHBCIE; inline;
  61576. begin
  61577. pTDefRegMap(@Self)^.clr := $00080000;
  61578. end;
  61579. procedure TDMAC0_DCH0INT.setCHBCIE(thebits : TBits_1); inline;
  61580. begin
  61581. if thebits = 0 then
  61582. pTDefRegMap(@Self)^.clr := $00080000
  61583. else
  61584. pTDefRegMap(@Self)^.&set := $00080000;
  61585. end;
  61586. function TDMAC0_DCH0INT.getCHBCIE : TBits_1; inline;
  61587. begin
  61588. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  61589. end;
  61590. procedure TDMAC0_DCH0INT.setCHDHIE; inline;
  61591. begin
  61592. pTDefRegMap(@Self)^.&set := $00100000;
  61593. end;
  61594. procedure TDMAC0_DCH0INT.clearCHDHIE; inline;
  61595. begin
  61596. pTDefRegMap(@Self)^.clr := $00100000;
  61597. end;
  61598. procedure TDMAC0_DCH0INT.setCHDHIE(thebits : TBits_1); inline;
  61599. begin
  61600. if thebits = 0 then
  61601. pTDefRegMap(@Self)^.clr := $00100000
  61602. else
  61603. pTDefRegMap(@Self)^.&set := $00100000;
  61604. end;
  61605. function TDMAC0_DCH0INT.getCHDHIE : TBits_1; inline;
  61606. begin
  61607. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  61608. end;
  61609. procedure TDMAC0_DCH0INT.setCHDDIE; inline;
  61610. begin
  61611. pTDefRegMap(@Self)^.&set := $00200000;
  61612. end;
  61613. procedure TDMAC0_DCH0INT.clearCHDDIE; inline;
  61614. begin
  61615. pTDefRegMap(@Self)^.clr := $00200000;
  61616. end;
  61617. procedure TDMAC0_DCH0INT.setCHDDIE(thebits : TBits_1); inline;
  61618. begin
  61619. if thebits = 0 then
  61620. pTDefRegMap(@Self)^.clr := $00200000
  61621. else
  61622. pTDefRegMap(@Self)^.&set := $00200000;
  61623. end;
  61624. function TDMAC0_DCH0INT.getCHDDIE : TBits_1; inline;
  61625. begin
  61626. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  61627. end;
  61628. procedure TDMAC0_DCH0INT.setCHSHIE; inline;
  61629. begin
  61630. pTDefRegMap(@Self)^.&set := $00400000;
  61631. end;
  61632. procedure TDMAC0_DCH0INT.clearCHSHIE; inline;
  61633. begin
  61634. pTDefRegMap(@Self)^.clr := $00400000;
  61635. end;
  61636. procedure TDMAC0_DCH0INT.setCHSHIE(thebits : TBits_1); inline;
  61637. begin
  61638. if thebits = 0 then
  61639. pTDefRegMap(@Self)^.clr := $00400000
  61640. else
  61641. pTDefRegMap(@Self)^.&set := $00400000;
  61642. end;
  61643. function TDMAC0_DCH0INT.getCHSHIE : TBits_1; inline;
  61644. begin
  61645. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  61646. end;
  61647. procedure TDMAC0_DCH0INT.setCHSDIE; inline;
  61648. begin
  61649. pTDefRegMap(@Self)^.&set := $00800000;
  61650. end;
  61651. procedure TDMAC0_DCH0INT.clearCHSDIE; inline;
  61652. begin
  61653. pTDefRegMap(@Self)^.clr := $00800000;
  61654. end;
  61655. procedure TDMAC0_DCH0INT.setCHSDIE(thebits : TBits_1); inline;
  61656. begin
  61657. if thebits = 0 then
  61658. pTDefRegMap(@Self)^.clr := $00800000
  61659. else
  61660. pTDefRegMap(@Self)^.&set := $00800000;
  61661. end;
  61662. function TDMAC0_DCH0INT.getCHSDIE : TBits_1; inline;
  61663. begin
  61664. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  61665. end;
  61666. procedure TDMAC0_DCH0INT.setw(thebits : TBits_32); inline;
  61667. begin
  61668. pTDefRegMap(@Self)^.val := thebits;
  61669. end;
  61670. function TDMAC0_DCH0INT.getw : TBits_32; inline;
  61671. begin
  61672. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61673. end;
  61674. procedure TDMAC1_DCH1CON.setCHPRI(thebits : TBits_2); inline;
  61675. begin
  61676. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  61677. end;
  61678. function TDMAC1_DCH1CON.getCHPRI : TBits_2; inline;
  61679. begin
  61680. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  61681. end;
  61682. procedure TDMAC1_DCH1CON.setCHEDET; inline;
  61683. begin
  61684. pTDefRegMap(@Self)^.&set := $00000004;
  61685. end;
  61686. procedure TDMAC1_DCH1CON.clearCHEDET; inline;
  61687. begin
  61688. pTDefRegMap(@Self)^.clr := $00000004;
  61689. end;
  61690. procedure TDMAC1_DCH1CON.setCHEDET(thebits : TBits_1); inline;
  61691. begin
  61692. if thebits = 0 then
  61693. pTDefRegMap(@Self)^.clr := $00000004
  61694. else
  61695. pTDefRegMap(@Self)^.&set := $00000004;
  61696. end;
  61697. function TDMAC1_DCH1CON.getCHEDET : TBits_1; inline;
  61698. begin
  61699. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61700. end;
  61701. procedure TDMAC1_DCH1CON.setCHAEN; inline;
  61702. begin
  61703. pTDefRegMap(@Self)^.&set := $00000010;
  61704. end;
  61705. procedure TDMAC1_DCH1CON.clearCHAEN; inline;
  61706. begin
  61707. pTDefRegMap(@Self)^.clr := $00000010;
  61708. end;
  61709. procedure TDMAC1_DCH1CON.setCHAEN(thebits : TBits_1); inline;
  61710. begin
  61711. if thebits = 0 then
  61712. pTDefRegMap(@Self)^.clr := $00000010
  61713. else
  61714. pTDefRegMap(@Self)^.&set := $00000010;
  61715. end;
  61716. function TDMAC1_DCH1CON.getCHAEN : TBits_1; inline;
  61717. begin
  61718. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61719. end;
  61720. procedure TDMAC1_DCH1CON.setCHCHN; inline;
  61721. begin
  61722. pTDefRegMap(@Self)^.&set := $00000020;
  61723. end;
  61724. procedure TDMAC1_DCH1CON.clearCHCHN; inline;
  61725. begin
  61726. pTDefRegMap(@Self)^.clr := $00000020;
  61727. end;
  61728. procedure TDMAC1_DCH1CON.setCHCHN(thebits : TBits_1); inline;
  61729. begin
  61730. if thebits = 0 then
  61731. pTDefRegMap(@Self)^.clr := $00000020
  61732. else
  61733. pTDefRegMap(@Self)^.&set := $00000020;
  61734. end;
  61735. function TDMAC1_DCH1CON.getCHCHN : TBits_1; inline;
  61736. begin
  61737. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61738. end;
  61739. procedure TDMAC1_DCH1CON.setCHAED; inline;
  61740. begin
  61741. pTDefRegMap(@Self)^.&set := $00000040;
  61742. end;
  61743. procedure TDMAC1_DCH1CON.clearCHAED; inline;
  61744. begin
  61745. pTDefRegMap(@Self)^.clr := $00000040;
  61746. end;
  61747. procedure TDMAC1_DCH1CON.setCHAED(thebits : TBits_1); inline;
  61748. begin
  61749. if thebits = 0 then
  61750. pTDefRegMap(@Self)^.clr := $00000040
  61751. else
  61752. pTDefRegMap(@Self)^.&set := $00000040;
  61753. end;
  61754. function TDMAC1_DCH1CON.getCHAED : TBits_1; inline;
  61755. begin
  61756. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61757. end;
  61758. procedure TDMAC1_DCH1CON.setCHEN; inline;
  61759. begin
  61760. pTDefRegMap(@Self)^.&set := $00000080;
  61761. end;
  61762. procedure TDMAC1_DCH1CON.clearCHEN; inline;
  61763. begin
  61764. pTDefRegMap(@Self)^.clr := $00000080;
  61765. end;
  61766. procedure TDMAC1_DCH1CON.setCHEN(thebits : TBits_1); inline;
  61767. begin
  61768. if thebits = 0 then
  61769. pTDefRegMap(@Self)^.clr := $00000080
  61770. else
  61771. pTDefRegMap(@Self)^.&set := $00000080;
  61772. end;
  61773. function TDMAC1_DCH1CON.getCHEN : TBits_1; inline;
  61774. begin
  61775. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61776. end;
  61777. procedure TDMAC1_DCH1CON.setCHCHNS; inline;
  61778. begin
  61779. pTDefRegMap(@Self)^.&set := $00000100;
  61780. end;
  61781. procedure TDMAC1_DCH1CON.clearCHCHNS; inline;
  61782. begin
  61783. pTDefRegMap(@Self)^.clr := $00000100;
  61784. end;
  61785. procedure TDMAC1_DCH1CON.setCHCHNS(thebits : TBits_1); inline;
  61786. begin
  61787. if thebits = 0 then
  61788. pTDefRegMap(@Self)^.clr := $00000100
  61789. else
  61790. pTDefRegMap(@Self)^.&set := $00000100;
  61791. end;
  61792. function TDMAC1_DCH1CON.getCHCHNS : TBits_1; inline;
  61793. begin
  61794. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  61795. end;
  61796. procedure TDMAC1_DCH1CON.setCHBUSY; inline;
  61797. begin
  61798. pTDefRegMap(@Self)^.&set := $00008000;
  61799. end;
  61800. procedure TDMAC1_DCH1CON.clearCHBUSY; inline;
  61801. begin
  61802. pTDefRegMap(@Self)^.clr := $00008000;
  61803. end;
  61804. procedure TDMAC1_DCH1CON.setCHBUSY(thebits : TBits_1); inline;
  61805. begin
  61806. if thebits = 0 then
  61807. pTDefRegMap(@Self)^.clr := $00008000
  61808. else
  61809. pTDefRegMap(@Self)^.&set := $00008000;
  61810. end;
  61811. function TDMAC1_DCH1CON.getCHBUSY : TBits_1; inline;
  61812. begin
  61813. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  61814. end;
  61815. procedure TDMAC1_DCH1CON.setw(thebits : TBits_32); inline;
  61816. begin
  61817. pTDefRegMap(@Self)^.val := thebits;
  61818. end;
  61819. function TDMAC1_DCH1CON.getw : TBits_32; inline;
  61820. begin
  61821. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61822. end;
  61823. procedure TDMAC1_DCH1ECON.setAIRQEN; inline;
  61824. begin
  61825. pTDefRegMap(@Self)^.&set := $00000008;
  61826. end;
  61827. procedure TDMAC1_DCH1ECON.clearAIRQEN; inline;
  61828. begin
  61829. pTDefRegMap(@Self)^.clr := $00000008;
  61830. end;
  61831. procedure TDMAC1_DCH1ECON.setAIRQEN(thebits : TBits_1); inline;
  61832. begin
  61833. if thebits = 0 then
  61834. pTDefRegMap(@Self)^.clr := $00000008
  61835. else
  61836. pTDefRegMap(@Self)^.&set := $00000008;
  61837. end;
  61838. function TDMAC1_DCH1ECON.getAIRQEN : TBits_1; inline;
  61839. begin
  61840. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  61841. end;
  61842. procedure TDMAC1_DCH1ECON.setSIRQEN; inline;
  61843. begin
  61844. pTDefRegMap(@Self)^.&set := $00000010;
  61845. end;
  61846. procedure TDMAC1_DCH1ECON.clearSIRQEN; inline;
  61847. begin
  61848. pTDefRegMap(@Self)^.clr := $00000010;
  61849. end;
  61850. procedure TDMAC1_DCH1ECON.setSIRQEN(thebits : TBits_1); inline;
  61851. begin
  61852. if thebits = 0 then
  61853. pTDefRegMap(@Self)^.clr := $00000010
  61854. else
  61855. pTDefRegMap(@Self)^.&set := $00000010;
  61856. end;
  61857. function TDMAC1_DCH1ECON.getSIRQEN : TBits_1; inline;
  61858. begin
  61859. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  61860. end;
  61861. procedure TDMAC1_DCH1ECON.setPATEN; inline;
  61862. begin
  61863. pTDefRegMap(@Self)^.&set := $00000020;
  61864. end;
  61865. procedure TDMAC1_DCH1ECON.clearPATEN; inline;
  61866. begin
  61867. pTDefRegMap(@Self)^.clr := $00000020;
  61868. end;
  61869. procedure TDMAC1_DCH1ECON.setPATEN(thebits : TBits_1); inline;
  61870. begin
  61871. if thebits = 0 then
  61872. pTDefRegMap(@Self)^.clr := $00000020
  61873. else
  61874. pTDefRegMap(@Self)^.&set := $00000020;
  61875. end;
  61876. function TDMAC1_DCH1ECON.getPATEN : TBits_1; inline;
  61877. begin
  61878. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  61879. end;
  61880. procedure TDMAC1_DCH1ECON.setCABORT; inline;
  61881. begin
  61882. pTDefRegMap(@Self)^.&set := $00000040;
  61883. end;
  61884. procedure TDMAC1_DCH1ECON.clearCABORT; inline;
  61885. begin
  61886. pTDefRegMap(@Self)^.clr := $00000040;
  61887. end;
  61888. procedure TDMAC1_DCH1ECON.setCABORT(thebits : TBits_1); inline;
  61889. begin
  61890. if thebits = 0 then
  61891. pTDefRegMap(@Self)^.clr := $00000040
  61892. else
  61893. pTDefRegMap(@Self)^.&set := $00000040;
  61894. end;
  61895. function TDMAC1_DCH1ECON.getCABORT : TBits_1; inline;
  61896. begin
  61897. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  61898. end;
  61899. procedure TDMAC1_DCH1ECON.setCFORCE; inline;
  61900. begin
  61901. pTDefRegMap(@Self)^.&set := $00000080;
  61902. end;
  61903. procedure TDMAC1_DCH1ECON.clearCFORCE; inline;
  61904. begin
  61905. pTDefRegMap(@Self)^.clr := $00000080;
  61906. end;
  61907. procedure TDMAC1_DCH1ECON.setCFORCE(thebits : TBits_1); inline;
  61908. begin
  61909. if thebits = 0 then
  61910. pTDefRegMap(@Self)^.clr := $00000080
  61911. else
  61912. pTDefRegMap(@Self)^.&set := $00000080;
  61913. end;
  61914. function TDMAC1_DCH1ECON.getCFORCE : TBits_1; inline;
  61915. begin
  61916. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  61917. end;
  61918. procedure TDMAC1_DCH1ECON.setCHSIRQ(thebits : TBits_8); inline;
  61919. begin
  61920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  61921. end;
  61922. function TDMAC1_DCH1ECON.getCHSIRQ : TBits_8; inline;
  61923. begin
  61924. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  61925. end;
  61926. procedure TDMAC1_DCH1ECON.setCHAIRQ(thebits : TBits_8); inline;
  61927. begin
  61928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  61929. end;
  61930. function TDMAC1_DCH1ECON.getCHAIRQ : TBits_8; inline;
  61931. begin
  61932. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  61933. end;
  61934. procedure TDMAC1_DCH1ECON.setw(thebits : TBits_32); inline;
  61935. begin
  61936. pTDefRegMap(@Self)^.val := thebits;
  61937. end;
  61938. function TDMAC1_DCH1ECON.getw : TBits_32; inline;
  61939. begin
  61940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  61941. end;
  61942. procedure TDMAC1_DCH1INT.setCHERIF; inline;
  61943. begin
  61944. pTDefRegMap(@Self)^.&set := $00000001;
  61945. end;
  61946. procedure TDMAC1_DCH1INT.clearCHERIF; inline;
  61947. begin
  61948. pTDefRegMap(@Self)^.clr := $00000001;
  61949. end;
  61950. procedure TDMAC1_DCH1INT.setCHERIF(thebits : TBits_1); inline;
  61951. begin
  61952. if thebits = 0 then
  61953. pTDefRegMap(@Self)^.clr := $00000001
  61954. else
  61955. pTDefRegMap(@Self)^.&set := $00000001;
  61956. end;
  61957. function TDMAC1_DCH1INT.getCHERIF : TBits_1; inline;
  61958. begin
  61959. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  61960. end;
  61961. procedure TDMAC1_DCH1INT.setCHTAIF; inline;
  61962. begin
  61963. pTDefRegMap(@Self)^.&set := $00000002;
  61964. end;
  61965. procedure TDMAC1_DCH1INT.clearCHTAIF; inline;
  61966. begin
  61967. pTDefRegMap(@Self)^.clr := $00000002;
  61968. end;
  61969. procedure TDMAC1_DCH1INT.setCHTAIF(thebits : TBits_1); inline;
  61970. begin
  61971. if thebits = 0 then
  61972. pTDefRegMap(@Self)^.clr := $00000002
  61973. else
  61974. pTDefRegMap(@Self)^.&set := $00000002;
  61975. end;
  61976. function TDMAC1_DCH1INT.getCHTAIF : TBits_1; inline;
  61977. begin
  61978. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  61979. end;
  61980. procedure TDMAC1_DCH1INT.setCHCCIF; inline;
  61981. begin
  61982. pTDefRegMap(@Self)^.&set := $00000004;
  61983. end;
  61984. procedure TDMAC1_DCH1INT.clearCHCCIF; inline;
  61985. begin
  61986. pTDefRegMap(@Self)^.clr := $00000004;
  61987. end;
  61988. procedure TDMAC1_DCH1INT.setCHCCIF(thebits : TBits_1); inline;
  61989. begin
  61990. if thebits = 0 then
  61991. pTDefRegMap(@Self)^.clr := $00000004
  61992. else
  61993. pTDefRegMap(@Self)^.&set := $00000004;
  61994. end;
  61995. function TDMAC1_DCH1INT.getCHCCIF : TBits_1; inline;
  61996. begin
  61997. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  61998. end;
  61999. procedure TDMAC1_DCH1INT.setCHBCIF; inline;
  62000. begin
  62001. pTDefRegMap(@Self)^.&set := $00000008;
  62002. end;
  62003. procedure TDMAC1_DCH1INT.clearCHBCIF; inline;
  62004. begin
  62005. pTDefRegMap(@Self)^.clr := $00000008;
  62006. end;
  62007. procedure TDMAC1_DCH1INT.setCHBCIF(thebits : TBits_1); inline;
  62008. begin
  62009. if thebits = 0 then
  62010. pTDefRegMap(@Self)^.clr := $00000008
  62011. else
  62012. pTDefRegMap(@Self)^.&set := $00000008;
  62013. end;
  62014. function TDMAC1_DCH1INT.getCHBCIF : TBits_1; inline;
  62015. begin
  62016. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62017. end;
  62018. procedure TDMAC1_DCH1INT.setCHDHIF; inline;
  62019. begin
  62020. pTDefRegMap(@Self)^.&set := $00000010;
  62021. end;
  62022. procedure TDMAC1_DCH1INT.clearCHDHIF; inline;
  62023. begin
  62024. pTDefRegMap(@Self)^.clr := $00000010;
  62025. end;
  62026. procedure TDMAC1_DCH1INT.setCHDHIF(thebits : TBits_1); inline;
  62027. begin
  62028. if thebits = 0 then
  62029. pTDefRegMap(@Self)^.clr := $00000010
  62030. else
  62031. pTDefRegMap(@Self)^.&set := $00000010;
  62032. end;
  62033. function TDMAC1_DCH1INT.getCHDHIF : TBits_1; inline;
  62034. begin
  62035. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62036. end;
  62037. procedure TDMAC1_DCH1INT.setCHDDIF; inline;
  62038. begin
  62039. pTDefRegMap(@Self)^.&set := $00000020;
  62040. end;
  62041. procedure TDMAC1_DCH1INT.clearCHDDIF; inline;
  62042. begin
  62043. pTDefRegMap(@Self)^.clr := $00000020;
  62044. end;
  62045. procedure TDMAC1_DCH1INT.setCHDDIF(thebits : TBits_1); inline;
  62046. begin
  62047. if thebits = 0 then
  62048. pTDefRegMap(@Self)^.clr := $00000020
  62049. else
  62050. pTDefRegMap(@Self)^.&set := $00000020;
  62051. end;
  62052. function TDMAC1_DCH1INT.getCHDDIF : TBits_1; inline;
  62053. begin
  62054. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62055. end;
  62056. procedure TDMAC1_DCH1INT.setCHSHIF; inline;
  62057. begin
  62058. pTDefRegMap(@Self)^.&set := $00000040;
  62059. end;
  62060. procedure TDMAC1_DCH1INT.clearCHSHIF; inline;
  62061. begin
  62062. pTDefRegMap(@Self)^.clr := $00000040;
  62063. end;
  62064. procedure TDMAC1_DCH1INT.setCHSHIF(thebits : TBits_1); inline;
  62065. begin
  62066. if thebits = 0 then
  62067. pTDefRegMap(@Self)^.clr := $00000040
  62068. else
  62069. pTDefRegMap(@Self)^.&set := $00000040;
  62070. end;
  62071. function TDMAC1_DCH1INT.getCHSHIF : TBits_1; inline;
  62072. begin
  62073. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62074. end;
  62075. procedure TDMAC1_DCH1INT.setCHSDIF; inline;
  62076. begin
  62077. pTDefRegMap(@Self)^.&set := $00000080;
  62078. end;
  62079. procedure TDMAC1_DCH1INT.clearCHSDIF; inline;
  62080. begin
  62081. pTDefRegMap(@Self)^.clr := $00000080;
  62082. end;
  62083. procedure TDMAC1_DCH1INT.setCHSDIF(thebits : TBits_1); inline;
  62084. begin
  62085. if thebits = 0 then
  62086. pTDefRegMap(@Self)^.clr := $00000080
  62087. else
  62088. pTDefRegMap(@Self)^.&set := $00000080;
  62089. end;
  62090. function TDMAC1_DCH1INT.getCHSDIF : TBits_1; inline;
  62091. begin
  62092. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62093. end;
  62094. procedure TDMAC1_DCH1INT.setCHERIE; inline;
  62095. begin
  62096. pTDefRegMap(@Self)^.&set := $00010000;
  62097. end;
  62098. procedure TDMAC1_DCH1INT.clearCHERIE; inline;
  62099. begin
  62100. pTDefRegMap(@Self)^.clr := $00010000;
  62101. end;
  62102. procedure TDMAC1_DCH1INT.setCHERIE(thebits : TBits_1); inline;
  62103. begin
  62104. if thebits = 0 then
  62105. pTDefRegMap(@Self)^.clr := $00010000
  62106. else
  62107. pTDefRegMap(@Self)^.&set := $00010000;
  62108. end;
  62109. function TDMAC1_DCH1INT.getCHERIE : TBits_1; inline;
  62110. begin
  62111. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  62112. end;
  62113. procedure TDMAC1_DCH1INT.setCHTAIE; inline;
  62114. begin
  62115. pTDefRegMap(@Self)^.&set := $00020000;
  62116. end;
  62117. procedure TDMAC1_DCH1INT.clearCHTAIE; inline;
  62118. begin
  62119. pTDefRegMap(@Self)^.clr := $00020000;
  62120. end;
  62121. procedure TDMAC1_DCH1INT.setCHTAIE(thebits : TBits_1); inline;
  62122. begin
  62123. if thebits = 0 then
  62124. pTDefRegMap(@Self)^.clr := $00020000
  62125. else
  62126. pTDefRegMap(@Self)^.&set := $00020000;
  62127. end;
  62128. function TDMAC1_DCH1INT.getCHTAIE : TBits_1; inline;
  62129. begin
  62130. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  62131. end;
  62132. procedure TDMAC1_DCH1INT.setCHCCIE; inline;
  62133. begin
  62134. pTDefRegMap(@Self)^.&set := $00040000;
  62135. end;
  62136. procedure TDMAC1_DCH1INT.clearCHCCIE; inline;
  62137. begin
  62138. pTDefRegMap(@Self)^.clr := $00040000;
  62139. end;
  62140. procedure TDMAC1_DCH1INT.setCHCCIE(thebits : TBits_1); inline;
  62141. begin
  62142. if thebits = 0 then
  62143. pTDefRegMap(@Self)^.clr := $00040000
  62144. else
  62145. pTDefRegMap(@Self)^.&set := $00040000;
  62146. end;
  62147. function TDMAC1_DCH1INT.getCHCCIE : TBits_1; inline;
  62148. begin
  62149. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  62150. end;
  62151. procedure TDMAC1_DCH1INT.setCHBCIE; inline;
  62152. begin
  62153. pTDefRegMap(@Self)^.&set := $00080000;
  62154. end;
  62155. procedure TDMAC1_DCH1INT.clearCHBCIE; inline;
  62156. begin
  62157. pTDefRegMap(@Self)^.clr := $00080000;
  62158. end;
  62159. procedure TDMAC1_DCH1INT.setCHBCIE(thebits : TBits_1); inline;
  62160. begin
  62161. if thebits = 0 then
  62162. pTDefRegMap(@Self)^.clr := $00080000
  62163. else
  62164. pTDefRegMap(@Self)^.&set := $00080000;
  62165. end;
  62166. function TDMAC1_DCH1INT.getCHBCIE : TBits_1; inline;
  62167. begin
  62168. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62169. end;
  62170. procedure TDMAC1_DCH1INT.setCHDHIE; inline;
  62171. begin
  62172. pTDefRegMap(@Self)^.&set := $00100000;
  62173. end;
  62174. procedure TDMAC1_DCH1INT.clearCHDHIE; inline;
  62175. begin
  62176. pTDefRegMap(@Self)^.clr := $00100000;
  62177. end;
  62178. procedure TDMAC1_DCH1INT.setCHDHIE(thebits : TBits_1); inline;
  62179. begin
  62180. if thebits = 0 then
  62181. pTDefRegMap(@Self)^.clr := $00100000
  62182. else
  62183. pTDefRegMap(@Self)^.&set := $00100000;
  62184. end;
  62185. function TDMAC1_DCH1INT.getCHDHIE : TBits_1; inline;
  62186. begin
  62187. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  62188. end;
  62189. procedure TDMAC1_DCH1INT.setCHDDIE; inline;
  62190. begin
  62191. pTDefRegMap(@Self)^.&set := $00200000;
  62192. end;
  62193. procedure TDMAC1_DCH1INT.clearCHDDIE; inline;
  62194. begin
  62195. pTDefRegMap(@Self)^.clr := $00200000;
  62196. end;
  62197. procedure TDMAC1_DCH1INT.setCHDDIE(thebits : TBits_1); inline;
  62198. begin
  62199. if thebits = 0 then
  62200. pTDefRegMap(@Self)^.clr := $00200000
  62201. else
  62202. pTDefRegMap(@Self)^.&set := $00200000;
  62203. end;
  62204. function TDMAC1_DCH1INT.getCHDDIE : TBits_1; inline;
  62205. begin
  62206. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  62207. end;
  62208. procedure TDMAC1_DCH1INT.setCHSHIE; inline;
  62209. begin
  62210. pTDefRegMap(@Self)^.&set := $00400000;
  62211. end;
  62212. procedure TDMAC1_DCH1INT.clearCHSHIE; inline;
  62213. begin
  62214. pTDefRegMap(@Self)^.clr := $00400000;
  62215. end;
  62216. procedure TDMAC1_DCH1INT.setCHSHIE(thebits : TBits_1); inline;
  62217. begin
  62218. if thebits = 0 then
  62219. pTDefRegMap(@Self)^.clr := $00400000
  62220. else
  62221. pTDefRegMap(@Self)^.&set := $00400000;
  62222. end;
  62223. function TDMAC1_DCH1INT.getCHSHIE : TBits_1; inline;
  62224. begin
  62225. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  62226. end;
  62227. procedure TDMAC1_DCH1INT.setCHSDIE; inline;
  62228. begin
  62229. pTDefRegMap(@Self)^.&set := $00800000;
  62230. end;
  62231. procedure TDMAC1_DCH1INT.clearCHSDIE; inline;
  62232. begin
  62233. pTDefRegMap(@Self)^.clr := $00800000;
  62234. end;
  62235. procedure TDMAC1_DCH1INT.setCHSDIE(thebits : TBits_1); inline;
  62236. begin
  62237. if thebits = 0 then
  62238. pTDefRegMap(@Self)^.clr := $00800000
  62239. else
  62240. pTDefRegMap(@Self)^.&set := $00800000;
  62241. end;
  62242. function TDMAC1_DCH1INT.getCHSDIE : TBits_1; inline;
  62243. begin
  62244. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62245. end;
  62246. procedure TDMAC1_DCH1INT.setw(thebits : TBits_32); inline;
  62247. begin
  62248. pTDefRegMap(@Self)^.val := thebits;
  62249. end;
  62250. function TDMAC1_DCH1INT.getw : TBits_32; inline;
  62251. begin
  62252. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62253. end;
  62254. procedure TDMAC2_DCH2CON.setCHPRI(thebits : TBits_2); inline;
  62255. begin
  62256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62257. end;
  62258. function TDMAC2_DCH2CON.getCHPRI : TBits_2; inline;
  62259. begin
  62260. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62261. end;
  62262. procedure TDMAC2_DCH2CON.setCHEDET; inline;
  62263. begin
  62264. pTDefRegMap(@Self)^.&set := $00000004;
  62265. end;
  62266. procedure TDMAC2_DCH2CON.clearCHEDET; inline;
  62267. begin
  62268. pTDefRegMap(@Self)^.clr := $00000004;
  62269. end;
  62270. procedure TDMAC2_DCH2CON.setCHEDET(thebits : TBits_1); inline;
  62271. begin
  62272. if thebits = 0 then
  62273. pTDefRegMap(@Self)^.clr := $00000004
  62274. else
  62275. pTDefRegMap(@Self)^.&set := $00000004;
  62276. end;
  62277. function TDMAC2_DCH2CON.getCHEDET : TBits_1; inline;
  62278. begin
  62279. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62280. end;
  62281. procedure TDMAC2_DCH2CON.setCHAEN; inline;
  62282. begin
  62283. pTDefRegMap(@Self)^.&set := $00000010;
  62284. end;
  62285. procedure TDMAC2_DCH2CON.clearCHAEN; inline;
  62286. begin
  62287. pTDefRegMap(@Self)^.clr := $00000010;
  62288. end;
  62289. procedure TDMAC2_DCH2CON.setCHAEN(thebits : TBits_1); inline;
  62290. begin
  62291. if thebits = 0 then
  62292. pTDefRegMap(@Self)^.clr := $00000010
  62293. else
  62294. pTDefRegMap(@Self)^.&set := $00000010;
  62295. end;
  62296. function TDMAC2_DCH2CON.getCHAEN : TBits_1; inline;
  62297. begin
  62298. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62299. end;
  62300. procedure TDMAC2_DCH2CON.setCHCHN; inline;
  62301. begin
  62302. pTDefRegMap(@Self)^.&set := $00000020;
  62303. end;
  62304. procedure TDMAC2_DCH2CON.clearCHCHN; inline;
  62305. begin
  62306. pTDefRegMap(@Self)^.clr := $00000020;
  62307. end;
  62308. procedure TDMAC2_DCH2CON.setCHCHN(thebits : TBits_1); inline;
  62309. begin
  62310. if thebits = 0 then
  62311. pTDefRegMap(@Self)^.clr := $00000020
  62312. else
  62313. pTDefRegMap(@Self)^.&set := $00000020;
  62314. end;
  62315. function TDMAC2_DCH2CON.getCHCHN : TBits_1; inline;
  62316. begin
  62317. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62318. end;
  62319. procedure TDMAC2_DCH2CON.setCHAED; inline;
  62320. begin
  62321. pTDefRegMap(@Self)^.&set := $00000040;
  62322. end;
  62323. procedure TDMAC2_DCH2CON.clearCHAED; inline;
  62324. begin
  62325. pTDefRegMap(@Self)^.clr := $00000040;
  62326. end;
  62327. procedure TDMAC2_DCH2CON.setCHAED(thebits : TBits_1); inline;
  62328. begin
  62329. if thebits = 0 then
  62330. pTDefRegMap(@Self)^.clr := $00000040
  62331. else
  62332. pTDefRegMap(@Self)^.&set := $00000040;
  62333. end;
  62334. function TDMAC2_DCH2CON.getCHAED : TBits_1; inline;
  62335. begin
  62336. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62337. end;
  62338. procedure TDMAC2_DCH2CON.setCHEN; inline;
  62339. begin
  62340. pTDefRegMap(@Self)^.&set := $00000080;
  62341. end;
  62342. procedure TDMAC2_DCH2CON.clearCHEN; inline;
  62343. begin
  62344. pTDefRegMap(@Self)^.clr := $00000080;
  62345. end;
  62346. procedure TDMAC2_DCH2CON.setCHEN(thebits : TBits_1); inline;
  62347. begin
  62348. if thebits = 0 then
  62349. pTDefRegMap(@Self)^.clr := $00000080
  62350. else
  62351. pTDefRegMap(@Self)^.&set := $00000080;
  62352. end;
  62353. function TDMAC2_DCH2CON.getCHEN : TBits_1; inline;
  62354. begin
  62355. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62356. end;
  62357. procedure TDMAC2_DCH2CON.setCHCHNS; inline;
  62358. begin
  62359. pTDefRegMap(@Self)^.&set := $00000100;
  62360. end;
  62361. procedure TDMAC2_DCH2CON.clearCHCHNS; inline;
  62362. begin
  62363. pTDefRegMap(@Self)^.clr := $00000100;
  62364. end;
  62365. procedure TDMAC2_DCH2CON.setCHCHNS(thebits : TBits_1); inline;
  62366. begin
  62367. if thebits = 0 then
  62368. pTDefRegMap(@Self)^.clr := $00000100
  62369. else
  62370. pTDefRegMap(@Self)^.&set := $00000100;
  62371. end;
  62372. function TDMAC2_DCH2CON.getCHCHNS : TBits_1; inline;
  62373. begin
  62374. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62375. end;
  62376. procedure TDMAC2_DCH2CON.setCHBUSY; inline;
  62377. begin
  62378. pTDefRegMap(@Self)^.&set := $00008000;
  62379. end;
  62380. procedure TDMAC2_DCH2CON.clearCHBUSY; inline;
  62381. begin
  62382. pTDefRegMap(@Self)^.clr := $00008000;
  62383. end;
  62384. procedure TDMAC2_DCH2CON.setCHBUSY(thebits : TBits_1); inline;
  62385. begin
  62386. if thebits = 0 then
  62387. pTDefRegMap(@Self)^.clr := $00008000
  62388. else
  62389. pTDefRegMap(@Self)^.&set := $00008000;
  62390. end;
  62391. function TDMAC2_DCH2CON.getCHBUSY : TBits_1; inline;
  62392. begin
  62393. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62394. end;
  62395. procedure TDMAC2_DCH2CON.setw(thebits : TBits_32); inline;
  62396. begin
  62397. pTDefRegMap(@Self)^.val := thebits;
  62398. end;
  62399. function TDMAC2_DCH2CON.getw : TBits_32; inline;
  62400. begin
  62401. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62402. end;
  62403. procedure TDMAC2_DCH2ECON.setAIRQEN; inline;
  62404. begin
  62405. pTDefRegMap(@Self)^.&set := $00000008;
  62406. end;
  62407. procedure TDMAC2_DCH2ECON.clearAIRQEN; inline;
  62408. begin
  62409. pTDefRegMap(@Self)^.clr := $00000008;
  62410. end;
  62411. procedure TDMAC2_DCH2ECON.setAIRQEN(thebits : TBits_1); inline;
  62412. begin
  62413. if thebits = 0 then
  62414. pTDefRegMap(@Self)^.clr := $00000008
  62415. else
  62416. pTDefRegMap(@Self)^.&set := $00000008;
  62417. end;
  62418. function TDMAC2_DCH2ECON.getAIRQEN : TBits_1; inline;
  62419. begin
  62420. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62421. end;
  62422. procedure TDMAC2_DCH2ECON.setSIRQEN; inline;
  62423. begin
  62424. pTDefRegMap(@Self)^.&set := $00000010;
  62425. end;
  62426. procedure TDMAC2_DCH2ECON.clearSIRQEN; inline;
  62427. begin
  62428. pTDefRegMap(@Self)^.clr := $00000010;
  62429. end;
  62430. procedure TDMAC2_DCH2ECON.setSIRQEN(thebits : TBits_1); inline;
  62431. begin
  62432. if thebits = 0 then
  62433. pTDefRegMap(@Self)^.clr := $00000010
  62434. else
  62435. pTDefRegMap(@Self)^.&set := $00000010;
  62436. end;
  62437. function TDMAC2_DCH2ECON.getSIRQEN : TBits_1; inline;
  62438. begin
  62439. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62440. end;
  62441. procedure TDMAC2_DCH2ECON.setPATEN; inline;
  62442. begin
  62443. pTDefRegMap(@Self)^.&set := $00000020;
  62444. end;
  62445. procedure TDMAC2_DCH2ECON.clearPATEN; inline;
  62446. begin
  62447. pTDefRegMap(@Self)^.clr := $00000020;
  62448. end;
  62449. procedure TDMAC2_DCH2ECON.setPATEN(thebits : TBits_1); inline;
  62450. begin
  62451. if thebits = 0 then
  62452. pTDefRegMap(@Self)^.clr := $00000020
  62453. else
  62454. pTDefRegMap(@Self)^.&set := $00000020;
  62455. end;
  62456. function TDMAC2_DCH2ECON.getPATEN : TBits_1; inline;
  62457. begin
  62458. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62459. end;
  62460. procedure TDMAC2_DCH2ECON.setCABORT; inline;
  62461. begin
  62462. pTDefRegMap(@Self)^.&set := $00000040;
  62463. end;
  62464. procedure TDMAC2_DCH2ECON.clearCABORT; inline;
  62465. begin
  62466. pTDefRegMap(@Self)^.clr := $00000040;
  62467. end;
  62468. procedure TDMAC2_DCH2ECON.setCABORT(thebits : TBits_1); inline;
  62469. begin
  62470. if thebits = 0 then
  62471. pTDefRegMap(@Self)^.clr := $00000040
  62472. else
  62473. pTDefRegMap(@Self)^.&set := $00000040;
  62474. end;
  62475. function TDMAC2_DCH2ECON.getCABORT : TBits_1; inline;
  62476. begin
  62477. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62478. end;
  62479. procedure TDMAC2_DCH2ECON.setCFORCE; inline;
  62480. begin
  62481. pTDefRegMap(@Self)^.&set := $00000080;
  62482. end;
  62483. procedure TDMAC2_DCH2ECON.clearCFORCE; inline;
  62484. begin
  62485. pTDefRegMap(@Self)^.clr := $00000080;
  62486. end;
  62487. procedure TDMAC2_DCH2ECON.setCFORCE(thebits : TBits_1); inline;
  62488. begin
  62489. if thebits = 0 then
  62490. pTDefRegMap(@Self)^.clr := $00000080
  62491. else
  62492. pTDefRegMap(@Self)^.&set := $00000080;
  62493. end;
  62494. function TDMAC2_DCH2ECON.getCFORCE : TBits_1; inline;
  62495. begin
  62496. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62497. end;
  62498. procedure TDMAC2_DCH2ECON.setCHSIRQ(thebits : TBits_8); inline;
  62499. begin
  62500. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  62501. end;
  62502. function TDMAC2_DCH2ECON.getCHSIRQ : TBits_8; inline;
  62503. begin
  62504. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  62505. end;
  62506. procedure TDMAC2_DCH2ECON.setCHAIRQ(thebits : TBits_8); inline;
  62507. begin
  62508. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  62509. end;
  62510. function TDMAC2_DCH2ECON.getCHAIRQ : TBits_8; inline;
  62511. begin
  62512. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  62513. end;
  62514. procedure TDMAC2_DCH2ECON.setw(thebits : TBits_32); inline;
  62515. begin
  62516. pTDefRegMap(@Self)^.val := thebits;
  62517. end;
  62518. function TDMAC2_DCH2ECON.getw : TBits_32; inline;
  62519. begin
  62520. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62521. end;
  62522. procedure TDMAC2_DCH2INT.setCHERIF; inline;
  62523. begin
  62524. pTDefRegMap(@Self)^.&set := $00000001;
  62525. end;
  62526. procedure TDMAC2_DCH2INT.clearCHERIF; inline;
  62527. begin
  62528. pTDefRegMap(@Self)^.clr := $00000001;
  62529. end;
  62530. procedure TDMAC2_DCH2INT.setCHERIF(thebits : TBits_1); inline;
  62531. begin
  62532. if thebits = 0 then
  62533. pTDefRegMap(@Self)^.clr := $00000001
  62534. else
  62535. pTDefRegMap(@Self)^.&set := $00000001;
  62536. end;
  62537. function TDMAC2_DCH2INT.getCHERIF : TBits_1; inline;
  62538. begin
  62539. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  62540. end;
  62541. procedure TDMAC2_DCH2INT.setCHTAIF; inline;
  62542. begin
  62543. pTDefRegMap(@Self)^.&set := $00000002;
  62544. end;
  62545. procedure TDMAC2_DCH2INT.clearCHTAIF; inline;
  62546. begin
  62547. pTDefRegMap(@Self)^.clr := $00000002;
  62548. end;
  62549. procedure TDMAC2_DCH2INT.setCHTAIF(thebits : TBits_1); inline;
  62550. begin
  62551. if thebits = 0 then
  62552. pTDefRegMap(@Self)^.clr := $00000002
  62553. else
  62554. pTDefRegMap(@Self)^.&set := $00000002;
  62555. end;
  62556. function TDMAC2_DCH2INT.getCHTAIF : TBits_1; inline;
  62557. begin
  62558. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  62559. end;
  62560. procedure TDMAC2_DCH2INT.setCHCCIF; inline;
  62561. begin
  62562. pTDefRegMap(@Self)^.&set := $00000004;
  62563. end;
  62564. procedure TDMAC2_DCH2INT.clearCHCCIF; inline;
  62565. begin
  62566. pTDefRegMap(@Self)^.clr := $00000004;
  62567. end;
  62568. procedure TDMAC2_DCH2INT.setCHCCIF(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 TDMAC2_DCH2INT.getCHCCIF : TBits_1; inline;
  62576. begin
  62577. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62578. end;
  62579. procedure TDMAC2_DCH2INT.setCHBCIF; inline;
  62580. begin
  62581. pTDefRegMap(@Self)^.&set := $00000008;
  62582. end;
  62583. procedure TDMAC2_DCH2INT.clearCHBCIF; inline;
  62584. begin
  62585. pTDefRegMap(@Self)^.clr := $00000008;
  62586. end;
  62587. procedure TDMAC2_DCH2INT.setCHBCIF(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 TDMAC2_DCH2INT.getCHBCIF : TBits_1; inline;
  62595. begin
  62596. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  62597. end;
  62598. procedure TDMAC2_DCH2INT.setCHDHIF; inline;
  62599. begin
  62600. pTDefRegMap(@Self)^.&set := $00000010;
  62601. end;
  62602. procedure TDMAC2_DCH2INT.clearCHDHIF; inline;
  62603. begin
  62604. pTDefRegMap(@Self)^.clr := $00000010;
  62605. end;
  62606. procedure TDMAC2_DCH2INT.setCHDHIF(thebits : TBits_1); inline;
  62607. begin
  62608. if thebits = 0 then
  62609. pTDefRegMap(@Self)^.clr := $00000010
  62610. else
  62611. pTDefRegMap(@Self)^.&set := $00000010;
  62612. end;
  62613. function TDMAC2_DCH2INT.getCHDHIF : TBits_1; inline;
  62614. begin
  62615. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62616. end;
  62617. procedure TDMAC2_DCH2INT.setCHDDIF; inline;
  62618. begin
  62619. pTDefRegMap(@Self)^.&set := $00000020;
  62620. end;
  62621. procedure TDMAC2_DCH2INT.clearCHDDIF; inline;
  62622. begin
  62623. pTDefRegMap(@Self)^.clr := $00000020;
  62624. end;
  62625. procedure TDMAC2_DCH2INT.setCHDDIF(thebits : TBits_1); inline;
  62626. begin
  62627. if thebits = 0 then
  62628. pTDefRegMap(@Self)^.clr := $00000020
  62629. else
  62630. pTDefRegMap(@Self)^.&set := $00000020;
  62631. end;
  62632. function TDMAC2_DCH2INT.getCHDDIF : TBits_1; inline;
  62633. begin
  62634. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62635. end;
  62636. procedure TDMAC2_DCH2INT.setCHSHIF; inline;
  62637. begin
  62638. pTDefRegMap(@Self)^.&set := $00000040;
  62639. end;
  62640. procedure TDMAC2_DCH2INT.clearCHSHIF; inline;
  62641. begin
  62642. pTDefRegMap(@Self)^.clr := $00000040;
  62643. end;
  62644. procedure TDMAC2_DCH2INT.setCHSHIF(thebits : TBits_1); inline;
  62645. begin
  62646. if thebits = 0 then
  62647. pTDefRegMap(@Self)^.clr := $00000040
  62648. else
  62649. pTDefRegMap(@Self)^.&set := $00000040;
  62650. end;
  62651. function TDMAC2_DCH2INT.getCHSHIF : TBits_1; inline;
  62652. begin
  62653. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62654. end;
  62655. procedure TDMAC2_DCH2INT.setCHSDIF; inline;
  62656. begin
  62657. pTDefRegMap(@Self)^.&set := $00000080;
  62658. end;
  62659. procedure TDMAC2_DCH2INT.clearCHSDIF; inline;
  62660. begin
  62661. pTDefRegMap(@Self)^.clr := $00000080;
  62662. end;
  62663. procedure TDMAC2_DCH2INT.setCHSDIF(thebits : TBits_1); inline;
  62664. begin
  62665. if thebits = 0 then
  62666. pTDefRegMap(@Self)^.clr := $00000080
  62667. else
  62668. pTDefRegMap(@Self)^.&set := $00000080;
  62669. end;
  62670. function TDMAC2_DCH2INT.getCHSDIF : TBits_1; inline;
  62671. begin
  62672. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62673. end;
  62674. procedure TDMAC2_DCH2INT.setCHERIE; inline;
  62675. begin
  62676. pTDefRegMap(@Self)^.&set := $00010000;
  62677. end;
  62678. procedure TDMAC2_DCH2INT.clearCHERIE; inline;
  62679. begin
  62680. pTDefRegMap(@Self)^.clr := $00010000;
  62681. end;
  62682. procedure TDMAC2_DCH2INT.setCHERIE(thebits : TBits_1); inline;
  62683. begin
  62684. if thebits = 0 then
  62685. pTDefRegMap(@Self)^.clr := $00010000
  62686. else
  62687. pTDefRegMap(@Self)^.&set := $00010000;
  62688. end;
  62689. function TDMAC2_DCH2INT.getCHERIE : TBits_1; inline;
  62690. begin
  62691. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  62692. end;
  62693. procedure TDMAC2_DCH2INT.setCHTAIE; inline;
  62694. begin
  62695. pTDefRegMap(@Self)^.&set := $00020000;
  62696. end;
  62697. procedure TDMAC2_DCH2INT.clearCHTAIE; inline;
  62698. begin
  62699. pTDefRegMap(@Self)^.clr := $00020000;
  62700. end;
  62701. procedure TDMAC2_DCH2INT.setCHTAIE(thebits : TBits_1); inline;
  62702. begin
  62703. if thebits = 0 then
  62704. pTDefRegMap(@Self)^.clr := $00020000
  62705. else
  62706. pTDefRegMap(@Self)^.&set := $00020000;
  62707. end;
  62708. function TDMAC2_DCH2INT.getCHTAIE : TBits_1; inline;
  62709. begin
  62710. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  62711. end;
  62712. procedure TDMAC2_DCH2INT.setCHCCIE; inline;
  62713. begin
  62714. pTDefRegMap(@Self)^.&set := $00040000;
  62715. end;
  62716. procedure TDMAC2_DCH2INT.clearCHCCIE; inline;
  62717. begin
  62718. pTDefRegMap(@Self)^.clr := $00040000;
  62719. end;
  62720. procedure TDMAC2_DCH2INT.setCHCCIE(thebits : TBits_1); inline;
  62721. begin
  62722. if thebits = 0 then
  62723. pTDefRegMap(@Self)^.clr := $00040000
  62724. else
  62725. pTDefRegMap(@Self)^.&set := $00040000;
  62726. end;
  62727. function TDMAC2_DCH2INT.getCHCCIE : TBits_1; inline;
  62728. begin
  62729. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  62730. end;
  62731. procedure TDMAC2_DCH2INT.setCHBCIE; inline;
  62732. begin
  62733. pTDefRegMap(@Self)^.&set := $00080000;
  62734. end;
  62735. procedure TDMAC2_DCH2INT.clearCHBCIE; inline;
  62736. begin
  62737. pTDefRegMap(@Self)^.clr := $00080000;
  62738. end;
  62739. procedure TDMAC2_DCH2INT.setCHBCIE(thebits : TBits_1); inline;
  62740. begin
  62741. if thebits = 0 then
  62742. pTDefRegMap(@Self)^.clr := $00080000
  62743. else
  62744. pTDefRegMap(@Self)^.&set := $00080000;
  62745. end;
  62746. function TDMAC2_DCH2INT.getCHBCIE : TBits_1; inline;
  62747. begin
  62748. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  62749. end;
  62750. procedure TDMAC2_DCH2INT.setCHDHIE; inline;
  62751. begin
  62752. pTDefRegMap(@Self)^.&set := $00100000;
  62753. end;
  62754. procedure TDMAC2_DCH2INT.clearCHDHIE; inline;
  62755. begin
  62756. pTDefRegMap(@Self)^.clr := $00100000;
  62757. end;
  62758. procedure TDMAC2_DCH2INT.setCHDHIE(thebits : TBits_1); inline;
  62759. begin
  62760. if thebits = 0 then
  62761. pTDefRegMap(@Self)^.clr := $00100000
  62762. else
  62763. pTDefRegMap(@Self)^.&set := $00100000;
  62764. end;
  62765. function TDMAC2_DCH2INT.getCHDHIE : TBits_1; inline;
  62766. begin
  62767. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  62768. end;
  62769. procedure TDMAC2_DCH2INT.setCHDDIE; inline;
  62770. begin
  62771. pTDefRegMap(@Self)^.&set := $00200000;
  62772. end;
  62773. procedure TDMAC2_DCH2INT.clearCHDDIE; inline;
  62774. begin
  62775. pTDefRegMap(@Self)^.clr := $00200000;
  62776. end;
  62777. procedure TDMAC2_DCH2INT.setCHDDIE(thebits : TBits_1); inline;
  62778. begin
  62779. if thebits = 0 then
  62780. pTDefRegMap(@Self)^.clr := $00200000
  62781. else
  62782. pTDefRegMap(@Self)^.&set := $00200000;
  62783. end;
  62784. function TDMAC2_DCH2INT.getCHDDIE : TBits_1; inline;
  62785. begin
  62786. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  62787. end;
  62788. procedure TDMAC2_DCH2INT.setCHSHIE; inline;
  62789. begin
  62790. pTDefRegMap(@Self)^.&set := $00400000;
  62791. end;
  62792. procedure TDMAC2_DCH2INT.clearCHSHIE; inline;
  62793. begin
  62794. pTDefRegMap(@Self)^.clr := $00400000;
  62795. end;
  62796. procedure TDMAC2_DCH2INT.setCHSHIE(thebits : TBits_1); inline;
  62797. begin
  62798. if thebits = 0 then
  62799. pTDefRegMap(@Self)^.clr := $00400000
  62800. else
  62801. pTDefRegMap(@Self)^.&set := $00400000;
  62802. end;
  62803. function TDMAC2_DCH2INT.getCHSHIE : TBits_1; inline;
  62804. begin
  62805. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  62806. end;
  62807. procedure TDMAC2_DCH2INT.setCHSDIE; inline;
  62808. begin
  62809. pTDefRegMap(@Self)^.&set := $00800000;
  62810. end;
  62811. procedure TDMAC2_DCH2INT.clearCHSDIE; inline;
  62812. begin
  62813. pTDefRegMap(@Self)^.clr := $00800000;
  62814. end;
  62815. procedure TDMAC2_DCH2INT.setCHSDIE(thebits : TBits_1); inline;
  62816. begin
  62817. if thebits = 0 then
  62818. pTDefRegMap(@Self)^.clr := $00800000
  62819. else
  62820. pTDefRegMap(@Self)^.&set := $00800000;
  62821. end;
  62822. function TDMAC2_DCH2INT.getCHSDIE : TBits_1; inline;
  62823. begin
  62824. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  62825. end;
  62826. procedure TDMAC2_DCH2INT.setw(thebits : TBits_32); inline;
  62827. begin
  62828. pTDefRegMap(@Self)^.val := thebits;
  62829. end;
  62830. function TDMAC2_DCH2INT.getw : TBits_32; inline;
  62831. begin
  62832. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62833. end;
  62834. procedure TDMAC3_DCH3CON.setCHPRI(thebits : TBits_2); inline;
  62835. begin
  62836. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  62837. end;
  62838. function TDMAC3_DCH3CON.getCHPRI : TBits_2; inline;
  62839. begin
  62840. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  62841. end;
  62842. procedure TDMAC3_DCH3CON.setCHEDET; inline;
  62843. begin
  62844. pTDefRegMap(@Self)^.&set := $00000004;
  62845. end;
  62846. procedure TDMAC3_DCH3CON.clearCHEDET; inline;
  62847. begin
  62848. pTDefRegMap(@Self)^.clr := $00000004;
  62849. end;
  62850. procedure TDMAC3_DCH3CON.setCHEDET(thebits : TBits_1); inline;
  62851. begin
  62852. if thebits = 0 then
  62853. pTDefRegMap(@Self)^.clr := $00000004
  62854. else
  62855. pTDefRegMap(@Self)^.&set := $00000004;
  62856. end;
  62857. function TDMAC3_DCH3CON.getCHEDET : TBits_1; inline;
  62858. begin
  62859. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  62860. end;
  62861. procedure TDMAC3_DCH3CON.setCHAEN; inline;
  62862. begin
  62863. pTDefRegMap(@Self)^.&set := $00000010;
  62864. end;
  62865. procedure TDMAC3_DCH3CON.clearCHAEN; inline;
  62866. begin
  62867. pTDefRegMap(@Self)^.clr := $00000010;
  62868. end;
  62869. procedure TDMAC3_DCH3CON.setCHAEN(thebits : TBits_1); inline;
  62870. begin
  62871. if thebits = 0 then
  62872. pTDefRegMap(@Self)^.clr := $00000010
  62873. else
  62874. pTDefRegMap(@Self)^.&set := $00000010;
  62875. end;
  62876. function TDMAC3_DCH3CON.getCHAEN : TBits_1; inline;
  62877. begin
  62878. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  62879. end;
  62880. procedure TDMAC3_DCH3CON.setCHCHN; inline;
  62881. begin
  62882. pTDefRegMap(@Self)^.&set := $00000020;
  62883. end;
  62884. procedure TDMAC3_DCH3CON.clearCHCHN; inline;
  62885. begin
  62886. pTDefRegMap(@Self)^.clr := $00000020;
  62887. end;
  62888. procedure TDMAC3_DCH3CON.setCHCHN(thebits : TBits_1); inline;
  62889. begin
  62890. if thebits = 0 then
  62891. pTDefRegMap(@Self)^.clr := $00000020
  62892. else
  62893. pTDefRegMap(@Self)^.&set := $00000020;
  62894. end;
  62895. function TDMAC3_DCH3CON.getCHCHN : TBits_1; inline;
  62896. begin
  62897. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  62898. end;
  62899. procedure TDMAC3_DCH3CON.setCHAED; inline;
  62900. begin
  62901. pTDefRegMap(@Self)^.&set := $00000040;
  62902. end;
  62903. procedure TDMAC3_DCH3CON.clearCHAED; inline;
  62904. begin
  62905. pTDefRegMap(@Self)^.clr := $00000040;
  62906. end;
  62907. procedure TDMAC3_DCH3CON.setCHAED(thebits : TBits_1); inline;
  62908. begin
  62909. if thebits = 0 then
  62910. pTDefRegMap(@Self)^.clr := $00000040
  62911. else
  62912. pTDefRegMap(@Self)^.&set := $00000040;
  62913. end;
  62914. function TDMAC3_DCH3CON.getCHAED : TBits_1; inline;
  62915. begin
  62916. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  62917. end;
  62918. procedure TDMAC3_DCH3CON.setCHEN; inline;
  62919. begin
  62920. pTDefRegMap(@Self)^.&set := $00000080;
  62921. end;
  62922. procedure TDMAC3_DCH3CON.clearCHEN; inline;
  62923. begin
  62924. pTDefRegMap(@Self)^.clr := $00000080;
  62925. end;
  62926. procedure TDMAC3_DCH3CON.setCHEN(thebits : TBits_1); inline;
  62927. begin
  62928. if thebits = 0 then
  62929. pTDefRegMap(@Self)^.clr := $00000080
  62930. else
  62931. pTDefRegMap(@Self)^.&set := $00000080;
  62932. end;
  62933. function TDMAC3_DCH3CON.getCHEN : TBits_1; inline;
  62934. begin
  62935. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  62936. end;
  62937. procedure TDMAC3_DCH3CON.setCHCHNS; inline;
  62938. begin
  62939. pTDefRegMap(@Self)^.&set := $00000100;
  62940. end;
  62941. procedure TDMAC3_DCH3CON.clearCHCHNS; inline;
  62942. begin
  62943. pTDefRegMap(@Self)^.clr := $00000100;
  62944. end;
  62945. procedure TDMAC3_DCH3CON.setCHCHNS(thebits : TBits_1); inline;
  62946. begin
  62947. if thebits = 0 then
  62948. pTDefRegMap(@Self)^.clr := $00000100
  62949. else
  62950. pTDefRegMap(@Self)^.&set := $00000100;
  62951. end;
  62952. function TDMAC3_DCH3CON.getCHCHNS : TBits_1; inline;
  62953. begin
  62954. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  62955. end;
  62956. procedure TDMAC3_DCH3CON.setCHBUSY; inline;
  62957. begin
  62958. pTDefRegMap(@Self)^.&set := $00008000;
  62959. end;
  62960. procedure TDMAC3_DCH3CON.clearCHBUSY; inline;
  62961. begin
  62962. pTDefRegMap(@Self)^.clr := $00008000;
  62963. end;
  62964. procedure TDMAC3_DCH3CON.setCHBUSY(thebits : TBits_1); inline;
  62965. begin
  62966. if thebits = 0 then
  62967. pTDefRegMap(@Self)^.clr := $00008000
  62968. else
  62969. pTDefRegMap(@Self)^.&set := $00008000;
  62970. end;
  62971. function TDMAC3_DCH3CON.getCHBUSY : TBits_1; inline;
  62972. begin
  62973. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  62974. end;
  62975. procedure TDMAC3_DCH3CON.setw(thebits : TBits_32); inline;
  62976. begin
  62977. pTDefRegMap(@Self)^.val := thebits;
  62978. end;
  62979. function TDMAC3_DCH3CON.getw : TBits_32; inline;
  62980. begin
  62981. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  62982. end;
  62983. procedure TDMAC3_DCH3ECON.setAIRQEN; inline;
  62984. begin
  62985. pTDefRegMap(@Self)^.&set := $00000008;
  62986. end;
  62987. procedure TDMAC3_DCH3ECON.clearAIRQEN; inline;
  62988. begin
  62989. pTDefRegMap(@Self)^.clr := $00000008;
  62990. end;
  62991. procedure TDMAC3_DCH3ECON.setAIRQEN(thebits : TBits_1); inline;
  62992. begin
  62993. if thebits = 0 then
  62994. pTDefRegMap(@Self)^.clr := $00000008
  62995. else
  62996. pTDefRegMap(@Self)^.&set := $00000008;
  62997. end;
  62998. function TDMAC3_DCH3ECON.getAIRQEN : TBits_1; inline;
  62999. begin
  63000. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63001. end;
  63002. procedure TDMAC3_DCH3ECON.setSIRQEN; inline;
  63003. begin
  63004. pTDefRegMap(@Self)^.&set := $00000010;
  63005. end;
  63006. procedure TDMAC3_DCH3ECON.clearSIRQEN; inline;
  63007. begin
  63008. pTDefRegMap(@Self)^.clr := $00000010;
  63009. end;
  63010. procedure TDMAC3_DCH3ECON.setSIRQEN(thebits : TBits_1); inline;
  63011. begin
  63012. if thebits = 0 then
  63013. pTDefRegMap(@Self)^.clr := $00000010
  63014. else
  63015. pTDefRegMap(@Self)^.&set := $00000010;
  63016. end;
  63017. function TDMAC3_DCH3ECON.getSIRQEN : TBits_1; inline;
  63018. begin
  63019. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63020. end;
  63021. procedure TDMAC3_DCH3ECON.setPATEN; inline;
  63022. begin
  63023. pTDefRegMap(@Self)^.&set := $00000020;
  63024. end;
  63025. procedure TDMAC3_DCH3ECON.clearPATEN; inline;
  63026. begin
  63027. pTDefRegMap(@Self)^.clr := $00000020;
  63028. end;
  63029. procedure TDMAC3_DCH3ECON.setPATEN(thebits : TBits_1); inline;
  63030. begin
  63031. if thebits = 0 then
  63032. pTDefRegMap(@Self)^.clr := $00000020
  63033. else
  63034. pTDefRegMap(@Self)^.&set := $00000020;
  63035. end;
  63036. function TDMAC3_DCH3ECON.getPATEN : TBits_1; inline;
  63037. begin
  63038. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63039. end;
  63040. procedure TDMAC3_DCH3ECON.setCABORT; inline;
  63041. begin
  63042. pTDefRegMap(@Self)^.&set := $00000040;
  63043. end;
  63044. procedure TDMAC3_DCH3ECON.clearCABORT; inline;
  63045. begin
  63046. pTDefRegMap(@Self)^.clr := $00000040;
  63047. end;
  63048. procedure TDMAC3_DCH3ECON.setCABORT(thebits : TBits_1); inline;
  63049. begin
  63050. if thebits = 0 then
  63051. pTDefRegMap(@Self)^.clr := $00000040
  63052. else
  63053. pTDefRegMap(@Self)^.&set := $00000040;
  63054. end;
  63055. function TDMAC3_DCH3ECON.getCABORT : TBits_1; inline;
  63056. begin
  63057. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63058. end;
  63059. procedure TDMAC3_DCH3ECON.setCFORCE; inline;
  63060. begin
  63061. pTDefRegMap(@Self)^.&set := $00000080;
  63062. end;
  63063. procedure TDMAC3_DCH3ECON.clearCFORCE; inline;
  63064. begin
  63065. pTDefRegMap(@Self)^.clr := $00000080;
  63066. end;
  63067. procedure TDMAC3_DCH3ECON.setCFORCE(thebits : TBits_1); inline;
  63068. begin
  63069. if thebits = 0 then
  63070. pTDefRegMap(@Self)^.clr := $00000080
  63071. else
  63072. pTDefRegMap(@Self)^.&set := $00000080;
  63073. end;
  63074. function TDMAC3_DCH3ECON.getCFORCE : TBits_1; inline;
  63075. begin
  63076. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63077. end;
  63078. procedure TDMAC3_DCH3ECON.setCHSIRQ(thebits : TBits_8); inline;
  63079. begin
  63080. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  63081. end;
  63082. function TDMAC3_DCH3ECON.getCHSIRQ : TBits_8; inline;
  63083. begin
  63084. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  63085. end;
  63086. procedure TDMAC3_DCH3ECON.setCHAIRQ(thebits : TBits_8); inline;
  63087. begin
  63088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  63089. end;
  63090. function TDMAC3_DCH3ECON.getCHAIRQ : TBits_8; inline;
  63091. begin
  63092. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  63093. end;
  63094. procedure TDMAC3_DCH3ECON.setw(thebits : TBits_32); inline;
  63095. begin
  63096. pTDefRegMap(@Self)^.val := thebits;
  63097. end;
  63098. function TDMAC3_DCH3ECON.getw : TBits_32; inline;
  63099. begin
  63100. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63101. end;
  63102. procedure TDMAC3_DCH3INT.setCHERIF; inline;
  63103. begin
  63104. pTDefRegMap(@Self)^.&set := $00000001;
  63105. end;
  63106. procedure TDMAC3_DCH3INT.clearCHERIF; inline;
  63107. begin
  63108. pTDefRegMap(@Self)^.clr := $00000001;
  63109. end;
  63110. procedure TDMAC3_DCH3INT.setCHERIF(thebits : TBits_1); inline;
  63111. begin
  63112. if thebits = 0 then
  63113. pTDefRegMap(@Self)^.clr := $00000001
  63114. else
  63115. pTDefRegMap(@Self)^.&set := $00000001;
  63116. end;
  63117. function TDMAC3_DCH3INT.getCHERIF : TBits_1; inline;
  63118. begin
  63119. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63120. end;
  63121. procedure TDMAC3_DCH3INT.setCHTAIF; inline;
  63122. begin
  63123. pTDefRegMap(@Self)^.&set := $00000002;
  63124. end;
  63125. procedure TDMAC3_DCH3INT.clearCHTAIF; inline;
  63126. begin
  63127. pTDefRegMap(@Self)^.clr := $00000002;
  63128. end;
  63129. procedure TDMAC3_DCH3INT.setCHTAIF(thebits : TBits_1); inline;
  63130. begin
  63131. if thebits = 0 then
  63132. pTDefRegMap(@Self)^.clr := $00000002
  63133. else
  63134. pTDefRegMap(@Self)^.&set := $00000002;
  63135. end;
  63136. function TDMAC3_DCH3INT.getCHTAIF : TBits_1; inline;
  63137. begin
  63138. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63139. end;
  63140. procedure TDMAC3_DCH3INT.setCHCCIF; inline;
  63141. begin
  63142. pTDefRegMap(@Self)^.&set := $00000004;
  63143. end;
  63144. procedure TDMAC3_DCH3INT.clearCHCCIF; inline;
  63145. begin
  63146. pTDefRegMap(@Self)^.clr := $00000004;
  63147. end;
  63148. procedure TDMAC3_DCH3INT.setCHCCIF(thebits : TBits_1); inline;
  63149. begin
  63150. if thebits = 0 then
  63151. pTDefRegMap(@Self)^.clr := $00000004
  63152. else
  63153. pTDefRegMap(@Self)^.&set := $00000004;
  63154. end;
  63155. function TDMAC3_DCH3INT.getCHCCIF : TBits_1; inline;
  63156. begin
  63157. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63158. end;
  63159. procedure TDMAC3_DCH3INT.setCHBCIF; inline;
  63160. begin
  63161. pTDefRegMap(@Self)^.&set := $00000008;
  63162. end;
  63163. procedure TDMAC3_DCH3INT.clearCHBCIF; inline;
  63164. begin
  63165. pTDefRegMap(@Self)^.clr := $00000008;
  63166. end;
  63167. procedure TDMAC3_DCH3INT.setCHBCIF(thebits : TBits_1); inline;
  63168. begin
  63169. if thebits = 0 then
  63170. pTDefRegMap(@Self)^.clr := $00000008
  63171. else
  63172. pTDefRegMap(@Self)^.&set := $00000008;
  63173. end;
  63174. function TDMAC3_DCH3INT.getCHBCIF : TBits_1; inline;
  63175. begin
  63176. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63177. end;
  63178. procedure TDMAC3_DCH3INT.setCHDHIF; inline;
  63179. begin
  63180. pTDefRegMap(@Self)^.&set := $00000010;
  63181. end;
  63182. procedure TDMAC3_DCH3INT.clearCHDHIF; inline;
  63183. begin
  63184. pTDefRegMap(@Self)^.clr := $00000010;
  63185. end;
  63186. procedure TDMAC3_DCH3INT.setCHDHIF(thebits : TBits_1); inline;
  63187. begin
  63188. if thebits = 0 then
  63189. pTDefRegMap(@Self)^.clr := $00000010
  63190. else
  63191. pTDefRegMap(@Self)^.&set := $00000010;
  63192. end;
  63193. function TDMAC3_DCH3INT.getCHDHIF : TBits_1; inline;
  63194. begin
  63195. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63196. end;
  63197. procedure TDMAC3_DCH3INT.setCHDDIF; inline;
  63198. begin
  63199. pTDefRegMap(@Self)^.&set := $00000020;
  63200. end;
  63201. procedure TDMAC3_DCH3INT.clearCHDDIF; inline;
  63202. begin
  63203. pTDefRegMap(@Self)^.clr := $00000020;
  63204. end;
  63205. procedure TDMAC3_DCH3INT.setCHDDIF(thebits : TBits_1); inline;
  63206. begin
  63207. if thebits = 0 then
  63208. pTDefRegMap(@Self)^.clr := $00000020
  63209. else
  63210. pTDefRegMap(@Self)^.&set := $00000020;
  63211. end;
  63212. function TDMAC3_DCH3INT.getCHDDIF : TBits_1; inline;
  63213. begin
  63214. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63215. end;
  63216. procedure TDMAC3_DCH3INT.setCHSHIF; inline;
  63217. begin
  63218. pTDefRegMap(@Self)^.&set := $00000040;
  63219. end;
  63220. procedure TDMAC3_DCH3INT.clearCHSHIF; inline;
  63221. begin
  63222. pTDefRegMap(@Self)^.clr := $00000040;
  63223. end;
  63224. procedure TDMAC3_DCH3INT.setCHSHIF(thebits : TBits_1); inline;
  63225. begin
  63226. if thebits = 0 then
  63227. pTDefRegMap(@Self)^.clr := $00000040
  63228. else
  63229. pTDefRegMap(@Self)^.&set := $00000040;
  63230. end;
  63231. function TDMAC3_DCH3INT.getCHSHIF : TBits_1; inline;
  63232. begin
  63233. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63234. end;
  63235. procedure TDMAC3_DCH3INT.setCHSDIF; inline;
  63236. begin
  63237. pTDefRegMap(@Self)^.&set := $00000080;
  63238. end;
  63239. procedure TDMAC3_DCH3INT.clearCHSDIF; inline;
  63240. begin
  63241. pTDefRegMap(@Self)^.clr := $00000080;
  63242. end;
  63243. procedure TDMAC3_DCH3INT.setCHSDIF(thebits : TBits_1); inline;
  63244. begin
  63245. if thebits = 0 then
  63246. pTDefRegMap(@Self)^.clr := $00000080
  63247. else
  63248. pTDefRegMap(@Self)^.&set := $00000080;
  63249. end;
  63250. function TDMAC3_DCH3INT.getCHSDIF : TBits_1; inline;
  63251. begin
  63252. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63253. end;
  63254. procedure TDMAC3_DCH3INT.setCHERIE; inline;
  63255. begin
  63256. pTDefRegMap(@Self)^.&set := $00010000;
  63257. end;
  63258. procedure TDMAC3_DCH3INT.clearCHERIE; inline;
  63259. begin
  63260. pTDefRegMap(@Self)^.clr := $00010000;
  63261. end;
  63262. procedure TDMAC3_DCH3INT.setCHERIE(thebits : TBits_1); inline;
  63263. begin
  63264. if thebits = 0 then
  63265. pTDefRegMap(@Self)^.clr := $00010000
  63266. else
  63267. pTDefRegMap(@Self)^.&set := $00010000;
  63268. end;
  63269. function TDMAC3_DCH3INT.getCHERIE : TBits_1; inline;
  63270. begin
  63271. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  63272. end;
  63273. procedure TDMAC3_DCH3INT.setCHTAIE; inline;
  63274. begin
  63275. pTDefRegMap(@Self)^.&set := $00020000;
  63276. end;
  63277. procedure TDMAC3_DCH3INT.clearCHTAIE; inline;
  63278. begin
  63279. pTDefRegMap(@Self)^.clr := $00020000;
  63280. end;
  63281. procedure TDMAC3_DCH3INT.setCHTAIE(thebits : TBits_1); inline;
  63282. begin
  63283. if thebits = 0 then
  63284. pTDefRegMap(@Self)^.clr := $00020000
  63285. else
  63286. pTDefRegMap(@Self)^.&set := $00020000;
  63287. end;
  63288. function TDMAC3_DCH3INT.getCHTAIE : TBits_1; inline;
  63289. begin
  63290. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  63291. end;
  63292. procedure TDMAC3_DCH3INT.setCHCCIE; inline;
  63293. begin
  63294. pTDefRegMap(@Self)^.&set := $00040000;
  63295. end;
  63296. procedure TDMAC3_DCH3INT.clearCHCCIE; inline;
  63297. begin
  63298. pTDefRegMap(@Self)^.clr := $00040000;
  63299. end;
  63300. procedure TDMAC3_DCH3INT.setCHCCIE(thebits : TBits_1); inline;
  63301. begin
  63302. if thebits = 0 then
  63303. pTDefRegMap(@Self)^.clr := $00040000
  63304. else
  63305. pTDefRegMap(@Self)^.&set := $00040000;
  63306. end;
  63307. function TDMAC3_DCH3INT.getCHCCIE : TBits_1; inline;
  63308. begin
  63309. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  63310. end;
  63311. procedure TDMAC3_DCH3INT.setCHBCIE; inline;
  63312. begin
  63313. pTDefRegMap(@Self)^.&set := $00080000;
  63314. end;
  63315. procedure TDMAC3_DCH3INT.clearCHBCIE; inline;
  63316. begin
  63317. pTDefRegMap(@Self)^.clr := $00080000;
  63318. end;
  63319. procedure TDMAC3_DCH3INT.setCHBCIE(thebits : TBits_1); inline;
  63320. begin
  63321. if thebits = 0 then
  63322. pTDefRegMap(@Self)^.clr := $00080000
  63323. else
  63324. pTDefRegMap(@Self)^.&set := $00080000;
  63325. end;
  63326. function TDMAC3_DCH3INT.getCHBCIE : TBits_1; inline;
  63327. begin
  63328. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63329. end;
  63330. procedure TDMAC3_DCH3INT.setCHDHIE; inline;
  63331. begin
  63332. pTDefRegMap(@Self)^.&set := $00100000;
  63333. end;
  63334. procedure TDMAC3_DCH3INT.clearCHDHIE; inline;
  63335. begin
  63336. pTDefRegMap(@Self)^.clr := $00100000;
  63337. end;
  63338. procedure TDMAC3_DCH3INT.setCHDHIE(thebits : TBits_1); inline;
  63339. begin
  63340. if thebits = 0 then
  63341. pTDefRegMap(@Self)^.clr := $00100000
  63342. else
  63343. pTDefRegMap(@Self)^.&set := $00100000;
  63344. end;
  63345. function TDMAC3_DCH3INT.getCHDHIE : TBits_1; inline;
  63346. begin
  63347. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  63348. end;
  63349. procedure TDMAC3_DCH3INT.setCHDDIE; inline;
  63350. begin
  63351. pTDefRegMap(@Self)^.&set := $00200000;
  63352. end;
  63353. procedure TDMAC3_DCH3INT.clearCHDDIE; inline;
  63354. begin
  63355. pTDefRegMap(@Self)^.clr := $00200000;
  63356. end;
  63357. procedure TDMAC3_DCH3INT.setCHDDIE(thebits : TBits_1); inline;
  63358. begin
  63359. if thebits = 0 then
  63360. pTDefRegMap(@Self)^.clr := $00200000
  63361. else
  63362. pTDefRegMap(@Self)^.&set := $00200000;
  63363. end;
  63364. function TDMAC3_DCH3INT.getCHDDIE : TBits_1; inline;
  63365. begin
  63366. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  63367. end;
  63368. procedure TDMAC3_DCH3INT.setCHSHIE; inline;
  63369. begin
  63370. pTDefRegMap(@Self)^.&set := $00400000;
  63371. end;
  63372. procedure TDMAC3_DCH3INT.clearCHSHIE; inline;
  63373. begin
  63374. pTDefRegMap(@Self)^.clr := $00400000;
  63375. end;
  63376. procedure TDMAC3_DCH3INT.setCHSHIE(thebits : TBits_1); inline;
  63377. begin
  63378. if thebits = 0 then
  63379. pTDefRegMap(@Self)^.clr := $00400000
  63380. else
  63381. pTDefRegMap(@Self)^.&set := $00400000;
  63382. end;
  63383. function TDMAC3_DCH3INT.getCHSHIE : TBits_1; inline;
  63384. begin
  63385. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  63386. end;
  63387. procedure TDMAC3_DCH3INT.setCHSDIE; inline;
  63388. begin
  63389. pTDefRegMap(@Self)^.&set := $00800000;
  63390. end;
  63391. procedure TDMAC3_DCH3INT.clearCHSDIE; inline;
  63392. begin
  63393. pTDefRegMap(@Self)^.clr := $00800000;
  63394. end;
  63395. procedure TDMAC3_DCH3INT.setCHSDIE(thebits : TBits_1); inline;
  63396. begin
  63397. if thebits = 0 then
  63398. pTDefRegMap(@Self)^.clr := $00800000
  63399. else
  63400. pTDefRegMap(@Self)^.&set := $00800000;
  63401. end;
  63402. function TDMAC3_DCH3INT.getCHSDIE : TBits_1; inline;
  63403. begin
  63404. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  63405. end;
  63406. procedure TDMAC3_DCH3INT.setw(thebits : TBits_32); inline;
  63407. begin
  63408. pTDefRegMap(@Self)^.val := thebits;
  63409. end;
  63410. function TDMAC3_DCH3INT.getw : TBits_32; inline;
  63411. begin
  63412. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63413. end;
  63414. procedure TDMAC4_DCH4CON.setCHPRI(thebits : TBits_2); inline;
  63415. begin
  63416. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63417. end;
  63418. function TDMAC4_DCH4CON.getCHPRI : TBits_2; inline;
  63419. begin
  63420. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  63421. end;
  63422. procedure TDMAC4_DCH4CON.setCHEDET; inline;
  63423. begin
  63424. pTDefRegMap(@Self)^.&set := $00000004;
  63425. end;
  63426. procedure TDMAC4_DCH4CON.clearCHEDET; inline;
  63427. begin
  63428. pTDefRegMap(@Self)^.clr := $00000004;
  63429. end;
  63430. procedure TDMAC4_DCH4CON.setCHEDET(thebits : TBits_1); inline;
  63431. begin
  63432. if thebits = 0 then
  63433. pTDefRegMap(@Self)^.clr := $00000004
  63434. else
  63435. pTDefRegMap(@Self)^.&set := $00000004;
  63436. end;
  63437. function TDMAC4_DCH4CON.getCHEDET : TBits_1; inline;
  63438. begin
  63439. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63440. end;
  63441. procedure TDMAC4_DCH4CON.setCHAEN; inline;
  63442. begin
  63443. pTDefRegMap(@Self)^.&set := $00000010;
  63444. end;
  63445. procedure TDMAC4_DCH4CON.clearCHAEN; inline;
  63446. begin
  63447. pTDefRegMap(@Self)^.clr := $00000010;
  63448. end;
  63449. procedure TDMAC4_DCH4CON.setCHAEN(thebits : TBits_1); inline;
  63450. begin
  63451. if thebits = 0 then
  63452. pTDefRegMap(@Self)^.clr := $00000010
  63453. else
  63454. pTDefRegMap(@Self)^.&set := $00000010;
  63455. end;
  63456. function TDMAC4_DCH4CON.getCHAEN : TBits_1; inline;
  63457. begin
  63458. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63459. end;
  63460. procedure TDMAC4_DCH4CON.setCHCHN; inline;
  63461. begin
  63462. pTDefRegMap(@Self)^.&set := $00000020;
  63463. end;
  63464. procedure TDMAC4_DCH4CON.clearCHCHN; inline;
  63465. begin
  63466. pTDefRegMap(@Self)^.clr := $00000020;
  63467. end;
  63468. procedure TDMAC4_DCH4CON.setCHCHN(thebits : TBits_1); inline;
  63469. begin
  63470. if thebits = 0 then
  63471. pTDefRegMap(@Self)^.clr := $00000020
  63472. else
  63473. pTDefRegMap(@Self)^.&set := $00000020;
  63474. end;
  63475. function TDMAC4_DCH4CON.getCHCHN : TBits_1; inline;
  63476. begin
  63477. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63478. end;
  63479. procedure TDMAC4_DCH4CON.setCHAED; inline;
  63480. begin
  63481. pTDefRegMap(@Self)^.&set := $00000040;
  63482. end;
  63483. procedure TDMAC4_DCH4CON.clearCHAED; inline;
  63484. begin
  63485. pTDefRegMap(@Self)^.clr := $00000040;
  63486. end;
  63487. procedure TDMAC4_DCH4CON.setCHAED(thebits : TBits_1); inline;
  63488. begin
  63489. if thebits = 0 then
  63490. pTDefRegMap(@Self)^.clr := $00000040
  63491. else
  63492. pTDefRegMap(@Self)^.&set := $00000040;
  63493. end;
  63494. function TDMAC4_DCH4CON.getCHAED : TBits_1; inline;
  63495. begin
  63496. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63497. end;
  63498. procedure TDMAC4_DCH4CON.setCHEN; inline;
  63499. begin
  63500. pTDefRegMap(@Self)^.&set := $00000080;
  63501. end;
  63502. procedure TDMAC4_DCH4CON.clearCHEN; inline;
  63503. begin
  63504. pTDefRegMap(@Self)^.clr := $00000080;
  63505. end;
  63506. procedure TDMAC4_DCH4CON.setCHEN(thebits : TBits_1); inline;
  63507. begin
  63508. if thebits = 0 then
  63509. pTDefRegMap(@Self)^.clr := $00000080
  63510. else
  63511. pTDefRegMap(@Self)^.&set := $00000080;
  63512. end;
  63513. function TDMAC4_DCH4CON.getCHEN : TBits_1; inline;
  63514. begin
  63515. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63516. end;
  63517. procedure TDMAC4_DCH4CON.setCHCHNS; inline;
  63518. begin
  63519. pTDefRegMap(@Self)^.&set := $00000100;
  63520. end;
  63521. procedure TDMAC4_DCH4CON.clearCHCHNS; inline;
  63522. begin
  63523. pTDefRegMap(@Self)^.clr := $00000100;
  63524. end;
  63525. procedure TDMAC4_DCH4CON.setCHCHNS(thebits : TBits_1); inline;
  63526. begin
  63527. if thebits = 0 then
  63528. pTDefRegMap(@Self)^.clr := $00000100
  63529. else
  63530. pTDefRegMap(@Self)^.&set := $00000100;
  63531. end;
  63532. function TDMAC4_DCH4CON.getCHCHNS : TBits_1; inline;
  63533. begin
  63534. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  63535. end;
  63536. procedure TDMAC4_DCH4CON.setCHBUSY; inline;
  63537. begin
  63538. pTDefRegMap(@Self)^.&set := $00008000;
  63539. end;
  63540. procedure TDMAC4_DCH4CON.clearCHBUSY; inline;
  63541. begin
  63542. pTDefRegMap(@Self)^.clr := $00008000;
  63543. end;
  63544. procedure TDMAC4_DCH4CON.setCHBUSY(thebits : TBits_1); inline;
  63545. begin
  63546. if thebits = 0 then
  63547. pTDefRegMap(@Self)^.clr := $00008000
  63548. else
  63549. pTDefRegMap(@Self)^.&set := $00008000;
  63550. end;
  63551. function TDMAC4_DCH4CON.getCHBUSY : TBits_1; inline;
  63552. begin
  63553. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  63554. end;
  63555. procedure TDMAC4_DCH4CON.setw(thebits : TBits_32); inline;
  63556. begin
  63557. pTDefRegMap(@Self)^.val := thebits;
  63558. end;
  63559. function TDMAC4_DCH4CON.getw : TBits_32; inline;
  63560. begin
  63561. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63562. end;
  63563. procedure TDMAC4_DCH4ECON.setAIRQEN; inline;
  63564. begin
  63565. pTDefRegMap(@Self)^.&set := $00000008;
  63566. end;
  63567. procedure TDMAC4_DCH4ECON.clearAIRQEN; inline;
  63568. begin
  63569. pTDefRegMap(@Self)^.clr := $00000008;
  63570. end;
  63571. procedure TDMAC4_DCH4ECON.setAIRQEN(thebits : TBits_1); inline;
  63572. begin
  63573. if thebits = 0 then
  63574. pTDefRegMap(@Self)^.clr := $00000008
  63575. else
  63576. pTDefRegMap(@Self)^.&set := $00000008;
  63577. end;
  63578. function TDMAC4_DCH4ECON.getAIRQEN : TBits_1; inline;
  63579. begin
  63580. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63581. end;
  63582. procedure TDMAC4_DCH4ECON.setSIRQEN; inline;
  63583. begin
  63584. pTDefRegMap(@Self)^.&set := $00000010;
  63585. end;
  63586. procedure TDMAC4_DCH4ECON.clearSIRQEN; inline;
  63587. begin
  63588. pTDefRegMap(@Self)^.clr := $00000010;
  63589. end;
  63590. procedure TDMAC4_DCH4ECON.setSIRQEN(thebits : TBits_1); inline;
  63591. begin
  63592. if thebits = 0 then
  63593. pTDefRegMap(@Self)^.clr := $00000010
  63594. else
  63595. pTDefRegMap(@Self)^.&set := $00000010;
  63596. end;
  63597. function TDMAC4_DCH4ECON.getSIRQEN : TBits_1; inline;
  63598. begin
  63599. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63600. end;
  63601. procedure TDMAC4_DCH4ECON.setPATEN; inline;
  63602. begin
  63603. pTDefRegMap(@Self)^.&set := $00000020;
  63604. end;
  63605. procedure TDMAC4_DCH4ECON.clearPATEN; inline;
  63606. begin
  63607. pTDefRegMap(@Self)^.clr := $00000020;
  63608. end;
  63609. procedure TDMAC4_DCH4ECON.setPATEN(thebits : TBits_1); inline;
  63610. begin
  63611. if thebits = 0 then
  63612. pTDefRegMap(@Self)^.clr := $00000020
  63613. else
  63614. pTDefRegMap(@Self)^.&set := $00000020;
  63615. end;
  63616. function TDMAC4_DCH4ECON.getPATEN : TBits_1; inline;
  63617. begin
  63618. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63619. end;
  63620. procedure TDMAC4_DCH4ECON.setCABORT; inline;
  63621. begin
  63622. pTDefRegMap(@Self)^.&set := $00000040;
  63623. end;
  63624. procedure TDMAC4_DCH4ECON.clearCABORT; inline;
  63625. begin
  63626. pTDefRegMap(@Self)^.clr := $00000040;
  63627. end;
  63628. procedure TDMAC4_DCH4ECON.setCABORT(thebits : TBits_1); inline;
  63629. begin
  63630. if thebits = 0 then
  63631. pTDefRegMap(@Self)^.clr := $00000040
  63632. else
  63633. pTDefRegMap(@Self)^.&set := $00000040;
  63634. end;
  63635. function TDMAC4_DCH4ECON.getCABORT : TBits_1; inline;
  63636. begin
  63637. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63638. end;
  63639. procedure TDMAC4_DCH4ECON.setCFORCE; inline;
  63640. begin
  63641. pTDefRegMap(@Self)^.&set := $00000080;
  63642. end;
  63643. procedure TDMAC4_DCH4ECON.clearCFORCE; inline;
  63644. begin
  63645. pTDefRegMap(@Self)^.clr := $00000080;
  63646. end;
  63647. procedure TDMAC4_DCH4ECON.setCFORCE(thebits : TBits_1); inline;
  63648. begin
  63649. if thebits = 0 then
  63650. pTDefRegMap(@Self)^.clr := $00000080
  63651. else
  63652. pTDefRegMap(@Self)^.&set := $00000080;
  63653. end;
  63654. function TDMAC4_DCH4ECON.getCFORCE : TBits_1; inline;
  63655. begin
  63656. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63657. end;
  63658. procedure TDMAC4_DCH4ECON.setCHSIRQ(thebits : TBits_8); inline;
  63659. begin
  63660. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  63661. end;
  63662. function TDMAC4_DCH4ECON.getCHSIRQ : TBits_8; inline;
  63663. begin
  63664. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  63665. end;
  63666. procedure TDMAC4_DCH4ECON.setCHAIRQ(thebits : TBits_8); inline;
  63667. begin
  63668. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  63669. end;
  63670. function TDMAC4_DCH4ECON.getCHAIRQ : TBits_8; inline;
  63671. begin
  63672. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  63673. end;
  63674. procedure TDMAC4_DCH4ECON.setw(thebits : TBits_32); inline;
  63675. begin
  63676. pTDefRegMap(@Self)^.val := thebits;
  63677. end;
  63678. function TDMAC4_DCH4ECON.getw : TBits_32; inline;
  63679. begin
  63680. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63681. end;
  63682. procedure TDMAC4_DCH4INT.setCHERIF; inline;
  63683. begin
  63684. pTDefRegMap(@Self)^.&set := $00000001;
  63685. end;
  63686. procedure TDMAC4_DCH4INT.clearCHERIF; inline;
  63687. begin
  63688. pTDefRegMap(@Self)^.clr := $00000001;
  63689. end;
  63690. procedure TDMAC4_DCH4INT.setCHERIF(thebits : TBits_1); inline;
  63691. begin
  63692. if thebits = 0 then
  63693. pTDefRegMap(@Self)^.clr := $00000001
  63694. else
  63695. pTDefRegMap(@Self)^.&set := $00000001;
  63696. end;
  63697. function TDMAC4_DCH4INT.getCHERIF : TBits_1; inline;
  63698. begin
  63699. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  63700. end;
  63701. procedure TDMAC4_DCH4INT.setCHTAIF; inline;
  63702. begin
  63703. pTDefRegMap(@Self)^.&set := $00000002;
  63704. end;
  63705. procedure TDMAC4_DCH4INT.clearCHTAIF; inline;
  63706. begin
  63707. pTDefRegMap(@Self)^.clr := $00000002;
  63708. end;
  63709. procedure TDMAC4_DCH4INT.setCHTAIF(thebits : TBits_1); inline;
  63710. begin
  63711. if thebits = 0 then
  63712. pTDefRegMap(@Self)^.clr := $00000002
  63713. else
  63714. pTDefRegMap(@Self)^.&set := $00000002;
  63715. end;
  63716. function TDMAC4_DCH4INT.getCHTAIF : TBits_1; inline;
  63717. begin
  63718. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  63719. end;
  63720. procedure TDMAC4_DCH4INT.setCHCCIF; inline;
  63721. begin
  63722. pTDefRegMap(@Self)^.&set := $00000004;
  63723. end;
  63724. procedure TDMAC4_DCH4INT.clearCHCCIF; inline;
  63725. begin
  63726. pTDefRegMap(@Self)^.clr := $00000004;
  63727. end;
  63728. procedure TDMAC4_DCH4INT.setCHCCIF(thebits : TBits_1); inline;
  63729. begin
  63730. if thebits = 0 then
  63731. pTDefRegMap(@Self)^.clr := $00000004
  63732. else
  63733. pTDefRegMap(@Self)^.&set := $00000004;
  63734. end;
  63735. function TDMAC4_DCH4INT.getCHCCIF : TBits_1; inline;
  63736. begin
  63737. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  63738. end;
  63739. procedure TDMAC4_DCH4INT.setCHBCIF; inline;
  63740. begin
  63741. pTDefRegMap(@Self)^.&set := $00000008;
  63742. end;
  63743. procedure TDMAC4_DCH4INT.clearCHBCIF; inline;
  63744. begin
  63745. pTDefRegMap(@Self)^.clr := $00000008;
  63746. end;
  63747. procedure TDMAC4_DCH4INT.setCHBCIF(thebits : TBits_1); inline;
  63748. begin
  63749. if thebits = 0 then
  63750. pTDefRegMap(@Self)^.clr := $00000008
  63751. else
  63752. pTDefRegMap(@Self)^.&set := $00000008;
  63753. end;
  63754. function TDMAC4_DCH4INT.getCHBCIF : TBits_1; inline;
  63755. begin
  63756. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  63757. end;
  63758. procedure TDMAC4_DCH4INT.setCHDHIF; inline;
  63759. begin
  63760. pTDefRegMap(@Self)^.&set := $00000010;
  63761. end;
  63762. procedure TDMAC4_DCH4INT.clearCHDHIF; inline;
  63763. begin
  63764. pTDefRegMap(@Self)^.clr := $00000010;
  63765. end;
  63766. procedure TDMAC4_DCH4INT.setCHDHIF(thebits : TBits_1); inline;
  63767. begin
  63768. if thebits = 0 then
  63769. pTDefRegMap(@Self)^.clr := $00000010
  63770. else
  63771. pTDefRegMap(@Self)^.&set := $00000010;
  63772. end;
  63773. function TDMAC4_DCH4INT.getCHDHIF : TBits_1; inline;
  63774. begin
  63775. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  63776. end;
  63777. procedure TDMAC4_DCH4INT.setCHDDIF; inline;
  63778. begin
  63779. pTDefRegMap(@Self)^.&set := $00000020;
  63780. end;
  63781. procedure TDMAC4_DCH4INT.clearCHDDIF; inline;
  63782. begin
  63783. pTDefRegMap(@Self)^.clr := $00000020;
  63784. end;
  63785. procedure TDMAC4_DCH4INT.setCHDDIF(thebits : TBits_1); inline;
  63786. begin
  63787. if thebits = 0 then
  63788. pTDefRegMap(@Self)^.clr := $00000020
  63789. else
  63790. pTDefRegMap(@Self)^.&set := $00000020;
  63791. end;
  63792. function TDMAC4_DCH4INT.getCHDDIF : TBits_1; inline;
  63793. begin
  63794. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  63795. end;
  63796. procedure TDMAC4_DCH4INT.setCHSHIF; inline;
  63797. begin
  63798. pTDefRegMap(@Self)^.&set := $00000040;
  63799. end;
  63800. procedure TDMAC4_DCH4INT.clearCHSHIF; inline;
  63801. begin
  63802. pTDefRegMap(@Self)^.clr := $00000040;
  63803. end;
  63804. procedure TDMAC4_DCH4INT.setCHSHIF(thebits : TBits_1); inline;
  63805. begin
  63806. if thebits = 0 then
  63807. pTDefRegMap(@Self)^.clr := $00000040
  63808. else
  63809. pTDefRegMap(@Self)^.&set := $00000040;
  63810. end;
  63811. function TDMAC4_DCH4INT.getCHSHIF : TBits_1; inline;
  63812. begin
  63813. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  63814. end;
  63815. procedure TDMAC4_DCH4INT.setCHSDIF; inline;
  63816. begin
  63817. pTDefRegMap(@Self)^.&set := $00000080;
  63818. end;
  63819. procedure TDMAC4_DCH4INT.clearCHSDIF; inline;
  63820. begin
  63821. pTDefRegMap(@Self)^.clr := $00000080;
  63822. end;
  63823. procedure TDMAC4_DCH4INT.setCHSDIF(thebits : TBits_1); inline;
  63824. begin
  63825. if thebits = 0 then
  63826. pTDefRegMap(@Self)^.clr := $00000080
  63827. else
  63828. pTDefRegMap(@Self)^.&set := $00000080;
  63829. end;
  63830. function TDMAC4_DCH4INT.getCHSDIF : TBits_1; inline;
  63831. begin
  63832. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  63833. end;
  63834. procedure TDMAC4_DCH4INT.setCHERIE; inline;
  63835. begin
  63836. pTDefRegMap(@Self)^.&set := $00010000;
  63837. end;
  63838. procedure TDMAC4_DCH4INT.clearCHERIE; inline;
  63839. begin
  63840. pTDefRegMap(@Self)^.clr := $00010000;
  63841. end;
  63842. procedure TDMAC4_DCH4INT.setCHERIE(thebits : TBits_1); inline;
  63843. begin
  63844. if thebits = 0 then
  63845. pTDefRegMap(@Self)^.clr := $00010000
  63846. else
  63847. pTDefRegMap(@Self)^.&set := $00010000;
  63848. end;
  63849. function TDMAC4_DCH4INT.getCHERIE : TBits_1; inline;
  63850. begin
  63851. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  63852. end;
  63853. procedure TDMAC4_DCH4INT.setCHTAIE; inline;
  63854. begin
  63855. pTDefRegMap(@Self)^.&set := $00020000;
  63856. end;
  63857. procedure TDMAC4_DCH4INT.clearCHTAIE; inline;
  63858. begin
  63859. pTDefRegMap(@Self)^.clr := $00020000;
  63860. end;
  63861. procedure TDMAC4_DCH4INT.setCHTAIE(thebits : TBits_1); inline;
  63862. begin
  63863. if thebits = 0 then
  63864. pTDefRegMap(@Self)^.clr := $00020000
  63865. else
  63866. pTDefRegMap(@Self)^.&set := $00020000;
  63867. end;
  63868. function TDMAC4_DCH4INT.getCHTAIE : TBits_1; inline;
  63869. begin
  63870. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  63871. end;
  63872. procedure TDMAC4_DCH4INT.setCHCCIE; inline;
  63873. begin
  63874. pTDefRegMap(@Self)^.&set := $00040000;
  63875. end;
  63876. procedure TDMAC4_DCH4INT.clearCHCCIE; inline;
  63877. begin
  63878. pTDefRegMap(@Self)^.clr := $00040000;
  63879. end;
  63880. procedure TDMAC4_DCH4INT.setCHCCIE(thebits : TBits_1); inline;
  63881. begin
  63882. if thebits = 0 then
  63883. pTDefRegMap(@Self)^.clr := $00040000
  63884. else
  63885. pTDefRegMap(@Self)^.&set := $00040000;
  63886. end;
  63887. function TDMAC4_DCH4INT.getCHCCIE : TBits_1; inline;
  63888. begin
  63889. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  63890. end;
  63891. procedure TDMAC4_DCH4INT.setCHBCIE; inline;
  63892. begin
  63893. pTDefRegMap(@Self)^.&set := $00080000;
  63894. end;
  63895. procedure TDMAC4_DCH4INT.clearCHBCIE; inline;
  63896. begin
  63897. pTDefRegMap(@Self)^.clr := $00080000;
  63898. end;
  63899. procedure TDMAC4_DCH4INT.setCHBCIE(thebits : TBits_1); inline;
  63900. begin
  63901. if thebits = 0 then
  63902. pTDefRegMap(@Self)^.clr := $00080000
  63903. else
  63904. pTDefRegMap(@Self)^.&set := $00080000;
  63905. end;
  63906. function TDMAC4_DCH4INT.getCHBCIE : TBits_1; inline;
  63907. begin
  63908. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  63909. end;
  63910. procedure TDMAC4_DCH4INT.setCHDHIE; inline;
  63911. begin
  63912. pTDefRegMap(@Self)^.&set := $00100000;
  63913. end;
  63914. procedure TDMAC4_DCH4INT.clearCHDHIE; inline;
  63915. begin
  63916. pTDefRegMap(@Self)^.clr := $00100000;
  63917. end;
  63918. procedure TDMAC4_DCH4INT.setCHDHIE(thebits : TBits_1); inline;
  63919. begin
  63920. if thebits = 0 then
  63921. pTDefRegMap(@Self)^.clr := $00100000
  63922. else
  63923. pTDefRegMap(@Self)^.&set := $00100000;
  63924. end;
  63925. function TDMAC4_DCH4INT.getCHDHIE : TBits_1; inline;
  63926. begin
  63927. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  63928. end;
  63929. procedure TDMAC4_DCH4INT.setCHDDIE; inline;
  63930. begin
  63931. pTDefRegMap(@Self)^.&set := $00200000;
  63932. end;
  63933. procedure TDMAC4_DCH4INT.clearCHDDIE; inline;
  63934. begin
  63935. pTDefRegMap(@Self)^.clr := $00200000;
  63936. end;
  63937. procedure TDMAC4_DCH4INT.setCHDDIE(thebits : TBits_1); inline;
  63938. begin
  63939. if thebits = 0 then
  63940. pTDefRegMap(@Self)^.clr := $00200000
  63941. else
  63942. pTDefRegMap(@Self)^.&set := $00200000;
  63943. end;
  63944. function TDMAC4_DCH4INT.getCHDDIE : TBits_1; inline;
  63945. begin
  63946. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  63947. end;
  63948. procedure TDMAC4_DCH4INT.setCHSHIE; inline;
  63949. begin
  63950. pTDefRegMap(@Self)^.&set := $00400000;
  63951. end;
  63952. procedure TDMAC4_DCH4INT.clearCHSHIE; inline;
  63953. begin
  63954. pTDefRegMap(@Self)^.clr := $00400000;
  63955. end;
  63956. procedure TDMAC4_DCH4INT.setCHSHIE(thebits : TBits_1); inline;
  63957. begin
  63958. if thebits = 0 then
  63959. pTDefRegMap(@Self)^.clr := $00400000
  63960. else
  63961. pTDefRegMap(@Self)^.&set := $00400000;
  63962. end;
  63963. function TDMAC4_DCH4INT.getCHSHIE : TBits_1; inline;
  63964. begin
  63965. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  63966. end;
  63967. procedure TDMAC4_DCH4INT.setCHSDIE; inline;
  63968. begin
  63969. pTDefRegMap(@Self)^.&set := $00800000;
  63970. end;
  63971. procedure TDMAC4_DCH4INT.clearCHSDIE; inline;
  63972. begin
  63973. pTDefRegMap(@Self)^.clr := $00800000;
  63974. end;
  63975. procedure TDMAC4_DCH4INT.setCHSDIE(thebits : TBits_1); inline;
  63976. begin
  63977. if thebits = 0 then
  63978. pTDefRegMap(@Self)^.clr := $00800000
  63979. else
  63980. pTDefRegMap(@Self)^.&set := $00800000;
  63981. end;
  63982. function TDMAC4_DCH4INT.getCHSDIE : TBits_1; inline;
  63983. begin
  63984. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  63985. end;
  63986. procedure TDMAC4_DCH4INT.setw(thebits : TBits_32); inline;
  63987. begin
  63988. pTDefRegMap(@Self)^.val := thebits;
  63989. end;
  63990. function TDMAC4_DCH4INT.getw : TBits_32; inline;
  63991. begin
  63992. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  63993. end;
  63994. procedure TDMAC5_DCH5CON.setCHPRI(thebits : TBits_2); inline;
  63995. begin
  63996. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  63997. end;
  63998. function TDMAC5_DCH5CON.getCHPRI : TBits_2; inline;
  63999. begin
  64000. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  64001. end;
  64002. procedure TDMAC5_DCH5CON.setCHEDET; inline;
  64003. begin
  64004. pTDefRegMap(@Self)^.&set := $00000004;
  64005. end;
  64006. procedure TDMAC5_DCH5CON.clearCHEDET; inline;
  64007. begin
  64008. pTDefRegMap(@Self)^.clr := $00000004;
  64009. end;
  64010. procedure TDMAC5_DCH5CON.setCHEDET(thebits : TBits_1); inline;
  64011. begin
  64012. if thebits = 0 then
  64013. pTDefRegMap(@Self)^.clr := $00000004
  64014. else
  64015. pTDefRegMap(@Self)^.&set := $00000004;
  64016. end;
  64017. function TDMAC5_DCH5CON.getCHEDET : TBits_1; inline;
  64018. begin
  64019. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64020. end;
  64021. procedure TDMAC5_DCH5CON.setCHAEN; inline;
  64022. begin
  64023. pTDefRegMap(@Self)^.&set := $00000010;
  64024. end;
  64025. procedure TDMAC5_DCH5CON.clearCHAEN; inline;
  64026. begin
  64027. pTDefRegMap(@Self)^.clr := $00000010;
  64028. end;
  64029. procedure TDMAC5_DCH5CON.setCHAEN(thebits : TBits_1); inline;
  64030. begin
  64031. if thebits = 0 then
  64032. pTDefRegMap(@Self)^.clr := $00000010
  64033. else
  64034. pTDefRegMap(@Self)^.&set := $00000010;
  64035. end;
  64036. function TDMAC5_DCH5CON.getCHAEN : TBits_1; inline;
  64037. begin
  64038. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64039. end;
  64040. procedure TDMAC5_DCH5CON.setCHCHN; inline;
  64041. begin
  64042. pTDefRegMap(@Self)^.&set := $00000020;
  64043. end;
  64044. procedure TDMAC5_DCH5CON.clearCHCHN; inline;
  64045. begin
  64046. pTDefRegMap(@Self)^.clr := $00000020;
  64047. end;
  64048. procedure TDMAC5_DCH5CON.setCHCHN(thebits : TBits_1); inline;
  64049. begin
  64050. if thebits = 0 then
  64051. pTDefRegMap(@Self)^.clr := $00000020
  64052. else
  64053. pTDefRegMap(@Self)^.&set := $00000020;
  64054. end;
  64055. function TDMAC5_DCH5CON.getCHCHN : TBits_1; inline;
  64056. begin
  64057. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64058. end;
  64059. procedure TDMAC5_DCH5CON.setCHAED; inline;
  64060. begin
  64061. pTDefRegMap(@Self)^.&set := $00000040;
  64062. end;
  64063. procedure TDMAC5_DCH5CON.clearCHAED; inline;
  64064. begin
  64065. pTDefRegMap(@Self)^.clr := $00000040;
  64066. end;
  64067. procedure TDMAC5_DCH5CON.setCHAED(thebits : TBits_1); inline;
  64068. begin
  64069. if thebits = 0 then
  64070. pTDefRegMap(@Self)^.clr := $00000040
  64071. else
  64072. pTDefRegMap(@Self)^.&set := $00000040;
  64073. end;
  64074. function TDMAC5_DCH5CON.getCHAED : TBits_1; inline;
  64075. begin
  64076. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64077. end;
  64078. procedure TDMAC5_DCH5CON.setCHEN; inline;
  64079. begin
  64080. pTDefRegMap(@Self)^.&set := $00000080;
  64081. end;
  64082. procedure TDMAC5_DCH5CON.clearCHEN; inline;
  64083. begin
  64084. pTDefRegMap(@Self)^.clr := $00000080;
  64085. end;
  64086. procedure TDMAC5_DCH5CON.setCHEN(thebits : TBits_1); inline;
  64087. begin
  64088. if thebits = 0 then
  64089. pTDefRegMap(@Self)^.clr := $00000080
  64090. else
  64091. pTDefRegMap(@Self)^.&set := $00000080;
  64092. end;
  64093. function TDMAC5_DCH5CON.getCHEN : TBits_1; inline;
  64094. begin
  64095. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64096. end;
  64097. procedure TDMAC5_DCH5CON.setCHCHNS; inline;
  64098. begin
  64099. pTDefRegMap(@Self)^.&set := $00000100;
  64100. end;
  64101. procedure TDMAC5_DCH5CON.clearCHCHNS; inline;
  64102. begin
  64103. pTDefRegMap(@Self)^.clr := $00000100;
  64104. end;
  64105. procedure TDMAC5_DCH5CON.setCHCHNS(thebits : TBits_1); inline;
  64106. begin
  64107. if thebits = 0 then
  64108. pTDefRegMap(@Self)^.clr := $00000100
  64109. else
  64110. pTDefRegMap(@Self)^.&set := $00000100;
  64111. end;
  64112. function TDMAC5_DCH5CON.getCHCHNS : TBits_1; inline;
  64113. begin
  64114. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  64115. end;
  64116. procedure TDMAC5_DCH5CON.setCHBUSY; inline;
  64117. begin
  64118. pTDefRegMap(@Self)^.&set := $00008000;
  64119. end;
  64120. procedure TDMAC5_DCH5CON.clearCHBUSY; inline;
  64121. begin
  64122. pTDefRegMap(@Self)^.clr := $00008000;
  64123. end;
  64124. procedure TDMAC5_DCH5CON.setCHBUSY(thebits : TBits_1); inline;
  64125. begin
  64126. if thebits = 0 then
  64127. pTDefRegMap(@Self)^.clr := $00008000
  64128. else
  64129. pTDefRegMap(@Self)^.&set := $00008000;
  64130. end;
  64131. function TDMAC5_DCH5CON.getCHBUSY : TBits_1; inline;
  64132. begin
  64133. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64134. end;
  64135. procedure TDMAC5_DCH5CON.setw(thebits : TBits_32); inline;
  64136. begin
  64137. pTDefRegMap(@Self)^.val := thebits;
  64138. end;
  64139. function TDMAC5_DCH5CON.getw : TBits_32; inline;
  64140. begin
  64141. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64142. end;
  64143. procedure TDMAC5_DCH5ECON.setAIRQEN; inline;
  64144. begin
  64145. pTDefRegMap(@Self)^.&set := $00000008;
  64146. end;
  64147. procedure TDMAC5_DCH5ECON.clearAIRQEN; inline;
  64148. begin
  64149. pTDefRegMap(@Self)^.clr := $00000008;
  64150. end;
  64151. procedure TDMAC5_DCH5ECON.setAIRQEN(thebits : TBits_1); inline;
  64152. begin
  64153. if thebits = 0 then
  64154. pTDefRegMap(@Self)^.clr := $00000008
  64155. else
  64156. pTDefRegMap(@Self)^.&set := $00000008;
  64157. end;
  64158. function TDMAC5_DCH5ECON.getAIRQEN : TBits_1; inline;
  64159. begin
  64160. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64161. end;
  64162. procedure TDMAC5_DCH5ECON.setSIRQEN; inline;
  64163. begin
  64164. pTDefRegMap(@Self)^.&set := $00000010;
  64165. end;
  64166. procedure TDMAC5_DCH5ECON.clearSIRQEN; inline;
  64167. begin
  64168. pTDefRegMap(@Self)^.clr := $00000010;
  64169. end;
  64170. procedure TDMAC5_DCH5ECON.setSIRQEN(thebits : TBits_1); inline;
  64171. begin
  64172. if thebits = 0 then
  64173. pTDefRegMap(@Self)^.clr := $00000010
  64174. else
  64175. pTDefRegMap(@Self)^.&set := $00000010;
  64176. end;
  64177. function TDMAC5_DCH5ECON.getSIRQEN : TBits_1; inline;
  64178. begin
  64179. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64180. end;
  64181. procedure TDMAC5_DCH5ECON.setPATEN; inline;
  64182. begin
  64183. pTDefRegMap(@Self)^.&set := $00000020;
  64184. end;
  64185. procedure TDMAC5_DCH5ECON.clearPATEN; inline;
  64186. begin
  64187. pTDefRegMap(@Self)^.clr := $00000020;
  64188. end;
  64189. procedure TDMAC5_DCH5ECON.setPATEN(thebits : TBits_1); inline;
  64190. begin
  64191. if thebits = 0 then
  64192. pTDefRegMap(@Self)^.clr := $00000020
  64193. else
  64194. pTDefRegMap(@Self)^.&set := $00000020;
  64195. end;
  64196. function TDMAC5_DCH5ECON.getPATEN : TBits_1; inline;
  64197. begin
  64198. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64199. end;
  64200. procedure TDMAC5_DCH5ECON.setCABORT; inline;
  64201. begin
  64202. pTDefRegMap(@Self)^.&set := $00000040;
  64203. end;
  64204. procedure TDMAC5_DCH5ECON.clearCABORT; inline;
  64205. begin
  64206. pTDefRegMap(@Self)^.clr := $00000040;
  64207. end;
  64208. procedure TDMAC5_DCH5ECON.setCABORT(thebits : TBits_1); inline;
  64209. begin
  64210. if thebits = 0 then
  64211. pTDefRegMap(@Self)^.clr := $00000040
  64212. else
  64213. pTDefRegMap(@Self)^.&set := $00000040;
  64214. end;
  64215. function TDMAC5_DCH5ECON.getCABORT : TBits_1; inline;
  64216. begin
  64217. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64218. end;
  64219. procedure TDMAC5_DCH5ECON.setCFORCE; inline;
  64220. begin
  64221. pTDefRegMap(@Self)^.&set := $00000080;
  64222. end;
  64223. procedure TDMAC5_DCH5ECON.clearCFORCE; inline;
  64224. begin
  64225. pTDefRegMap(@Self)^.clr := $00000080;
  64226. end;
  64227. procedure TDMAC5_DCH5ECON.setCFORCE(thebits : TBits_1); inline;
  64228. begin
  64229. if thebits = 0 then
  64230. pTDefRegMap(@Self)^.clr := $00000080
  64231. else
  64232. pTDefRegMap(@Self)^.&set := $00000080;
  64233. end;
  64234. function TDMAC5_DCH5ECON.getCFORCE : TBits_1; inline;
  64235. begin
  64236. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64237. end;
  64238. procedure TDMAC5_DCH5ECON.setCHSIRQ(thebits : TBits_8); inline;
  64239. begin
  64240. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64241. end;
  64242. function TDMAC5_DCH5ECON.getCHSIRQ : TBits_8; inline;
  64243. begin
  64244. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64245. end;
  64246. procedure TDMAC5_DCH5ECON.setCHAIRQ(thebits : TBits_8); inline;
  64247. begin
  64248. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  64249. end;
  64250. function TDMAC5_DCH5ECON.getCHAIRQ : TBits_8; inline;
  64251. begin
  64252. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  64253. end;
  64254. procedure TDMAC5_DCH5ECON.setw(thebits : TBits_32); inline;
  64255. begin
  64256. pTDefRegMap(@Self)^.val := thebits;
  64257. end;
  64258. function TDMAC5_DCH5ECON.getw : TBits_32; inline;
  64259. begin
  64260. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64261. end;
  64262. procedure TDMAC5_DCH5INT.setCHERIF; inline;
  64263. begin
  64264. pTDefRegMap(@Self)^.&set := $00000001;
  64265. end;
  64266. procedure TDMAC5_DCH5INT.clearCHERIF; inline;
  64267. begin
  64268. pTDefRegMap(@Self)^.clr := $00000001;
  64269. end;
  64270. procedure TDMAC5_DCH5INT.setCHERIF(thebits : TBits_1); inline;
  64271. begin
  64272. if thebits = 0 then
  64273. pTDefRegMap(@Self)^.clr := $00000001
  64274. else
  64275. pTDefRegMap(@Self)^.&set := $00000001;
  64276. end;
  64277. function TDMAC5_DCH5INT.getCHERIF : TBits_1; inline;
  64278. begin
  64279. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64280. end;
  64281. procedure TDMAC5_DCH5INT.setCHTAIF; inline;
  64282. begin
  64283. pTDefRegMap(@Self)^.&set := $00000002;
  64284. end;
  64285. procedure TDMAC5_DCH5INT.clearCHTAIF; inline;
  64286. begin
  64287. pTDefRegMap(@Self)^.clr := $00000002;
  64288. end;
  64289. procedure TDMAC5_DCH5INT.setCHTAIF(thebits : TBits_1); inline;
  64290. begin
  64291. if thebits = 0 then
  64292. pTDefRegMap(@Self)^.clr := $00000002
  64293. else
  64294. pTDefRegMap(@Self)^.&set := $00000002;
  64295. end;
  64296. function TDMAC5_DCH5INT.getCHTAIF : TBits_1; inline;
  64297. begin
  64298. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64299. end;
  64300. procedure TDMAC5_DCH5INT.setCHCCIF; inline;
  64301. begin
  64302. pTDefRegMap(@Self)^.&set := $00000004;
  64303. end;
  64304. procedure TDMAC5_DCH5INT.clearCHCCIF; inline;
  64305. begin
  64306. pTDefRegMap(@Self)^.clr := $00000004;
  64307. end;
  64308. procedure TDMAC5_DCH5INT.setCHCCIF(thebits : TBits_1); inline;
  64309. begin
  64310. if thebits = 0 then
  64311. pTDefRegMap(@Self)^.clr := $00000004
  64312. else
  64313. pTDefRegMap(@Self)^.&set := $00000004;
  64314. end;
  64315. function TDMAC5_DCH5INT.getCHCCIF : TBits_1; inline;
  64316. begin
  64317. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64318. end;
  64319. procedure TDMAC5_DCH5INT.setCHBCIF; inline;
  64320. begin
  64321. pTDefRegMap(@Self)^.&set := $00000008;
  64322. end;
  64323. procedure TDMAC5_DCH5INT.clearCHBCIF; inline;
  64324. begin
  64325. pTDefRegMap(@Self)^.clr := $00000008;
  64326. end;
  64327. procedure TDMAC5_DCH5INT.setCHBCIF(thebits : TBits_1); inline;
  64328. begin
  64329. if thebits = 0 then
  64330. pTDefRegMap(@Self)^.clr := $00000008
  64331. else
  64332. pTDefRegMap(@Self)^.&set := $00000008;
  64333. end;
  64334. function TDMAC5_DCH5INT.getCHBCIF : TBits_1; inline;
  64335. begin
  64336. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64337. end;
  64338. procedure TDMAC5_DCH5INT.setCHDHIF; inline;
  64339. begin
  64340. pTDefRegMap(@Self)^.&set := $00000010;
  64341. end;
  64342. procedure TDMAC5_DCH5INT.clearCHDHIF; inline;
  64343. begin
  64344. pTDefRegMap(@Self)^.clr := $00000010;
  64345. end;
  64346. procedure TDMAC5_DCH5INT.setCHDHIF(thebits : TBits_1); inline;
  64347. begin
  64348. if thebits = 0 then
  64349. pTDefRegMap(@Self)^.clr := $00000010
  64350. else
  64351. pTDefRegMap(@Self)^.&set := $00000010;
  64352. end;
  64353. function TDMAC5_DCH5INT.getCHDHIF : TBits_1; inline;
  64354. begin
  64355. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64356. end;
  64357. procedure TDMAC5_DCH5INT.setCHDDIF; inline;
  64358. begin
  64359. pTDefRegMap(@Self)^.&set := $00000020;
  64360. end;
  64361. procedure TDMAC5_DCH5INT.clearCHDDIF; inline;
  64362. begin
  64363. pTDefRegMap(@Self)^.clr := $00000020;
  64364. end;
  64365. procedure TDMAC5_DCH5INT.setCHDDIF(thebits : TBits_1); inline;
  64366. begin
  64367. if thebits = 0 then
  64368. pTDefRegMap(@Self)^.clr := $00000020
  64369. else
  64370. pTDefRegMap(@Self)^.&set := $00000020;
  64371. end;
  64372. function TDMAC5_DCH5INT.getCHDDIF : TBits_1; inline;
  64373. begin
  64374. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64375. end;
  64376. procedure TDMAC5_DCH5INT.setCHSHIF; inline;
  64377. begin
  64378. pTDefRegMap(@Self)^.&set := $00000040;
  64379. end;
  64380. procedure TDMAC5_DCH5INT.clearCHSHIF; inline;
  64381. begin
  64382. pTDefRegMap(@Self)^.clr := $00000040;
  64383. end;
  64384. procedure TDMAC5_DCH5INT.setCHSHIF(thebits : TBits_1); inline;
  64385. begin
  64386. if thebits = 0 then
  64387. pTDefRegMap(@Self)^.clr := $00000040
  64388. else
  64389. pTDefRegMap(@Self)^.&set := $00000040;
  64390. end;
  64391. function TDMAC5_DCH5INT.getCHSHIF : TBits_1; inline;
  64392. begin
  64393. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64394. end;
  64395. procedure TDMAC5_DCH5INT.setCHSDIF; inline;
  64396. begin
  64397. pTDefRegMap(@Self)^.&set := $00000080;
  64398. end;
  64399. procedure TDMAC5_DCH5INT.clearCHSDIF; inline;
  64400. begin
  64401. pTDefRegMap(@Self)^.clr := $00000080;
  64402. end;
  64403. procedure TDMAC5_DCH5INT.setCHSDIF(thebits : TBits_1); inline;
  64404. begin
  64405. if thebits = 0 then
  64406. pTDefRegMap(@Self)^.clr := $00000080
  64407. else
  64408. pTDefRegMap(@Self)^.&set := $00000080;
  64409. end;
  64410. function TDMAC5_DCH5INT.getCHSDIF : TBits_1; inline;
  64411. begin
  64412. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64413. end;
  64414. procedure TDMAC5_DCH5INT.setCHERIE; inline;
  64415. begin
  64416. pTDefRegMap(@Self)^.&set := $00010000;
  64417. end;
  64418. procedure TDMAC5_DCH5INT.clearCHERIE; inline;
  64419. begin
  64420. pTDefRegMap(@Self)^.clr := $00010000;
  64421. end;
  64422. procedure TDMAC5_DCH5INT.setCHERIE(thebits : TBits_1); inline;
  64423. begin
  64424. if thebits = 0 then
  64425. pTDefRegMap(@Self)^.clr := $00010000
  64426. else
  64427. pTDefRegMap(@Self)^.&set := $00010000;
  64428. end;
  64429. function TDMAC5_DCH5INT.getCHERIE : TBits_1; inline;
  64430. begin
  64431. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  64432. end;
  64433. procedure TDMAC5_DCH5INT.setCHTAIE; inline;
  64434. begin
  64435. pTDefRegMap(@Self)^.&set := $00020000;
  64436. end;
  64437. procedure TDMAC5_DCH5INT.clearCHTAIE; inline;
  64438. begin
  64439. pTDefRegMap(@Self)^.clr := $00020000;
  64440. end;
  64441. procedure TDMAC5_DCH5INT.setCHTAIE(thebits : TBits_1); inline;
  64442. begin
  64443. if thebits = 0 then
  64444. pTDefRegMap(@Self)^.clr := $00020000
  64445. else
  64446. pTDefRegMap(@Self)^.&set := $00020000;
  64447. end;
  64448. function TDMAC5_DCH5INT.getCHTAIE : TBits_1; inline;
  64449. begin
  64450. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  64451. end;
  64452. procedure TDMAC5_DCH5INT.setCHCCIE; inline;
  64453. begin
  64454. pTDefRegMap(@Self)^.&set := $00040000;
  64455. end;
  64456. procedure TDMAC5_DCH5INT.clearCHCCIE; inline;
  64457. begin
  64458. pTDefRegMap(@Self)^.clr := $00040000;
  64459. end;
  64460. procedure TDMAC5_DCH5INT.setCHCCIE(thebits : TBits_1); inline;
  64461. begin
  64462. if thebits = 0 then
  64463. pTDefRegMap(@Self)^.clr := $00040000
  64464. else
  64465. pTDefRegMap(@Self)^.&set := $00040000;
  64466. end;
  64467. function TDMAC5_DCH5INT.getCHCCIE : TBits_1; inline;
  64468. begin
  64469. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  64470. end;
  64471. procedure TDMAC5_DCH5INT.setCHBCIE; inline;
  64472. begin
  64473. pTDefRegMap(@Self)^.&set := $00080000;
  64474. end;
  64475. procedure TDMAC5_DCH5INT.clearCHBCIE; inline;
  64476. begin
  64477. pTDefRegMap(@Self)^.clr := $00080000;
  64478. end;
  64479. procedure TDMAC5_DCH5INT.setCHBCIE(thebits : TBits_1); inline;
  64480. begin
  64481. if thebits = 0 then
  64482. pTDefRegMap(@Self)^.clr := $00080000
  64483. else
  64484. pTDefRegMap(@Self)^.&set := $00080000;
  64485. end;
  64486. function TDMAC5_DCH5INT.getCHBCIE : TBits_1; inline;
  64487. begin
  64488. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  64489. end;
  64490. procedure TDMAC5_DCH5INT.setCHDHIE; inline;
  64491. begin
  64492. pTDefRegMap(@Self)^.&set := $00100000;
  64493. end;
  64494. procedure TDMAC5_DCH5INT.clearCHDHIE; inline;
  64495. begin
  64496. pTDefRegMap(@Self)^.clr := $00100000;
  64497. end;
  64498. procedure TDMAC5_DCH5INT.setCHDHIE(thebits : TBits_1); inline;
  64499. begin
  64500. if thebits = 0 then
  64501. pTDefRegMap(@Self)^.clr := $00100000
  64502. else
  64503. pTDefRegMap(@Self)^.&set := $00100000;
  64504. end;
  64505. function TDMAC5_DCH5INT.getCHDHIE : TBits_1; inline;
  64506. begin
  64507. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  64508. end;
  64509. procedure TDMAC5_DCH5INT.setCHDDIE; inline;
  64510. begin
  64511. pTDefRegMap(@Self)^.&set := $00200000;
  64512. end;
  64513. procedure TDMAC5_DCH5INT.clearCHDDIE; inline;
  64514. begin
  64515. pTDefRegMap(@Self)^.clr := $00200000;
  64516. end;
  64517. procedure TDMAC5_DCH5INT.setCHDDIE(thebits : TBits_1); inline;
  64518. begin
  64519. if thebits = 0 then
  64520. pTDefRegMap(@Self)^.clr := $00200000
  64521. else
  64522. pTDefRegMap(@Self)^.&set := $00200000;
  64523. end;
  64524. function TDMAC5_DCH5INT.getCHDDIE : TBits_1; inline;
  64525. begin
  64526. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  64527. end;
  64528. procedure TDMAC5_DCH5INT.setCHSHIE; inline;
  64529. begin
  64530. pTDefRegMap(@Self)^.&set := $00400000;
  64531. end;
  64532. procedure TDMAC5_DCH5INT.clearCHSHIE; inline;
  64533. begin
  64534. pTDefRegMap(@Self)^.clr := $00400000;
  64535. end;
  64536. procedure TDMAC5_DCH5INT.setCHSHIE(thebits : TBits_1); inline;
  64537. begin
  64538. if thebits = 0 then
  64539. pTDefRegMap(@Self)^.clr := $00400000
  64540. else
  64541. pTDefRegMap(@Self)^.&set := $00400000;
  64542. end;
  64543. function TDMAC5_DCH5INT.getCHSHIE : TBits_1; inline;
  64544. begin
  64545. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  64546. end;
  64547. procedure TDMAC5_DCH5INT.setCHSDIE; inline;
  64548. begin
  64549. pTDefRegMap(@Self)^.&set := $00800000;
  64550. end;
  64551. procedure TDMAC5_DCH5INT.clearCHSDIE; inline;
  64552. begin
  64553. pTDefRegMap(@Self)^.clr := $00800000;
  64554. end;
  64555. procedure TDMAC5_DCH5INT.setCHSDIE(thebits : TBits_1); inline;
  64556. begin
  64557. if thebits = 0 then
  64558. pTDefRegMap(@Self)^.clr := $00800000
  64559. else
  64560. pTDefRegMap(@Self)^.&set := $00800000;
  64561. end;
  64562. function TDMAC5_DCH5INT.getCHSDIE : TBits_1; inline;
  64563. begin
  64564. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  64565. end;
  64566. procedure TDMAC5_DCH5INT.setw(thebits : TBits_32); inline;
  64567. begin
  64568. pTDefRegMap(@Self)^.val := thebits;
  64569. end;
  64570. function TDMAC5_DCH5INT.getw : TBits_32; inline;
  64571. begin
  64572. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64573. end;
  64574. procedure TDMAC6_DCH6CON.setCHPRI(thebits : TBits_2); inline;
  64575. begin
  64576. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  64577. end;
  64578. function TDMAC6_DCH6CON.getCHPRI : TBits_2; inline;
  64579. begin
  64580. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  64581. end;
  64582. procedure TDMAC6_DCH6CON.setCHEDET; inline;
  64583. begin
  64584. pTDefRegMap(@Self)^.&set := $00000004;
  64585. end;
  64586. procedure TDMAC6_DCH6CON.clearCHEDET; inline;
  64587. begin
  64588. pTDefRegMap(@Self)^.clr := $00000004;
  64589. end;
  64590. procedure TDMAC6_DCH6CON.setCHEDET(thebits : TBits_1); inline;
  64591. begin
  64592. if thebits = 0 then
  64593. pTDefRegMap(@Self)^.clr := $00000004
  64594. else
  64595. pTDefRegMap(@Self)^.&set := $00000004;
  64596. end;
  64597. function TDMAC6_DCH6CON.getCHEDET : TBits_1; inline;
  64598. begin
  64599. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64600. end;
  64601. procedure TDMAC6_DCH6CON.setCHAEN; inline;
  64602. begin
  64603. pTDefRegMap(@Self)^.&set := $00000010;
  64604. end;
  64605. procedure TDMAC6_DCH6CON.clearCHAEN; inline;
  64606. begin
  64607. pTDefRegMap(@Self)^.clr := $00000010;
  64608. end;
  64609. procedure TDMAC6_DCH6CON.setCHAEN(thebits : TBits_1); inline;
  64610. begin
  64611. if thebits = 0 then
  64612. pTDefRegMap(@Self)^.clr := $00000010
  64613. else
  64614. pTDefRegMap(@Self)^.&set := $00000010;
  64615. end;
  64616. function TDMAC6_DCH6CON.getCHAEN : TBits_1; inline;
  64617. begin
  64618. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64619. end;
  64620. procedure TDMAC6_DCH6CON.setCHCHN; inline;
  64621. begin
  64622. pTDefRegMap(@Self)^.&set := $00000020;
  64623. end;
  64624. procedure TDMAC6_DCH6CON.clearCHCHN; inline;
  64625. begin
  64626. pTDefRegMap(@Self)^.clr := $00000020;
  64627. end;
  64628. procedure TDMAC6_DCH6CON.setCHCHN(thebits : TBits_1); inline;
  64629. begin
  64630. if thebits = 0 then
  64631. pTDefRegMap(@Self)^.clr := $00000020
  64632. else
  64633. pTDefRegMap(@Self)^.&set := $00000020;
  64634. end;
  64635. function TDMAC6_DCH6CON.getCHCHN : TBits_1; inline;
  64636. begin
  64637. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64638. end;
  64639. procedure TDMAC6_DCH6CON.setCHAED; inline;
  64640. begin
  64641. pTDefRegMap(@Self)^.&set := $00000040;
  64642. end;
  64643. procedure TDMAC6_DCH6CON.clearCHAED; inline;
  64644. begin
  64645. pTDefRegMap(@Self)^.clr := $00000040;
  64646. end;
  64647. procedure TDMAC6_DCH6CON.setCHAED(thebits : TBits_1); inline;
  64648. begin
  64649. if thebits = 0 then
  64650. pTDefRegMap(@Self)^.clr := $00000040
  64651. else
  64652. pTDefRegMap(@Self)^.&set := $00000040;
  64653. end;
  64654. function TDMAC6_DCH6CON.getCHAED : TBits_1; inline;
  64655. begin
  64656. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64657. end;
  64658. procedure TDMAC6_DCH6CON.setCHEN; inline;
  64659. begin
  64660. pTDefRegMap(@Self)^.&set := $00000080;
  64661. end;
  64662. procedure TDMAC6_DCH6CON.clearCHEN; inline;
  64663. begin
  64664. pTDefRegMap(@Self)^.clr := $00000080;
  64665. end;
  64666. procedure TDMAC6_DCH6CON.setCHEN(thebits : TBits_1); inline;
  64667. begin
  64668. if thebits = 0 then
  64669. pTDefRegMap(@Self)^.clr := $00000080
  64670. else
  64671. pTDefRegMap(@Self)^.&set := $00000080;
  64672. end;
  64673. function TDMAC6_DCH6CON.getCHEN : TBits_1; inline;
  64674. begin
  64675. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64676. end;
  64677. procedure TDMAC6_DCH6CON.setCHCHNS; inline;
  64678. begin
  64679. pTDefRegMap(@Self)^.&set := $00000100;
  64680. end;
  64681. procedure TDMAC6_DCH6CON.clearCHCHNS; inline;
  64682. begin
  64683. pTDefRegMap(@Self)^.clr := $00000100;
  64684. end;
  64685. procedure TDMAC6_DCH6CON.setCHCHNS(thebits : TBits_1); inline;
  64686. begin
  64687. if thebits = 0 then
  64688. pTDefRegMap(@Self)^.clr := $00000100
  64689. else
  64690. pTDefRegMap(@Self)^.&set := $00000100;
  64691. end;
  64692. function TDMAC6_DCH6CON.getCHCHNS : TBits_1; inline;
  64693. begin
  64694. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  64695. end;
  64696. procedure TDMAC6_DCH6CON.setCHBUSY; inline;
  64697. begin
  64698. pTDefRegMap(@Self)^.&set := $00008000;
  64699. end;
  64700. procedure TDMAC6_DCH6CON.clearCHBUSY; inline;
  64701. begin
  64702. pTDefRegMap(@Self)^.clr := $00008000;
  64703. end;
  64704. procedure TDMAC6_DCH6CON.setCHBUSY(thebits : TBits_1); inline;
  64705. begin
  64706. if thebits = 0 then
  64707. pTDefRegMap(@Self)^.clr := $00008000
  64708. else
  64709. pTDefRegMap(@Self)^.&set := $00008000;
  64710. end;
  64711. function TDMAC6_DCH6CON.getCHBUSY : TBits_1; inline;
  64712. begin
  64713. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  64714. end;
  64715. procedure TDMAC6_DCH6CON.setw(thebits : TBits_32); inline;
  64716. begin
  64717. pTDefRegMap(@Self)^.val := thebits;
  64718. end;
  64719. function TDMAC6_DCH6CON.getw : TBits_32; inline;
  64720. begin
  64721. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64722. end;
  64723. procedure TDMAC6_DCH6ECON.setAIRQEN; inline;
  64724. begin
  64725. pTDefRegMap(@Self)^.&set := $00000008;
  64726. end;
  64727. procedure TDMAC6_DCH6ECON.clearAIRQEN; inline;
  64728. begin
  64729. pTDefRegMap(@Self)^.clr := $00000008;
  64730. end;
  64731. procedure TDMAC6_DCH6ECON.setAIRQEN(thebits : TBits_1); inline;
  64732. begin
  64733. if thebits = 0 then
  64734. pTDefRegMap(@Self)^.clr := $00000008
  64735. else
  64736. pTDefRegMap(@Self)^.&set := $00000008;
  64737. end;
  64738. function TDMAC6_DCH6ECON.getAIRQEN : TBits_1; inline;
  64739. begin
  64740. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64741. end;
  64742. procedure TDMAC6_DCH6ECON.setSIRQEN; inline;
  64743. begin
  64744. pTDefRegMap(@Self)^.&set := $00000010;
  64745. end;
  64746. procedure TDMAC6_DCH6ECON.clearSIRQEN; inline;
  64747. begin
  64748. pTDefRegMap(@Self)^.clr := $00000010;
  64749. end;
  64750. procedure TDMAC6_DCH6ECON.setSIRQEN(thebits : TBits_1); inline;
  64751. begin
  64752. if thebits = 0 then
  64753. pTDefRegMap(@Self)^.clr := $00000010
  64754. else
  64755. pTDefRegMap(@Self)^.&set := $00000010;
  64756. end;
  64757. function TDMAC6_DCH6ECON.getSIRQEN : TBits_1; inline;
  64758. begin
  64759. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64760. end;
  64761. procedure TDMAC6_DCH6ECON.setPATEN; inline;
  64762. begin
  64763. pTDefRegMap(@Self)^.&set := $00000020;
  64764. end;
  64765. procedure TDMAC6_DCH6ECON.clearPATEN; inline;
  64766. begin
  64767. pTDefRegMap(@Self)^.clr := $00000020;
  64768. end;
  64769. procedure TDMAC6_DCH6ECON.setPATEN(thebits : TBits_1); inline;
  64770. begin
  64771. if thebits = 0 then
  64772. pTDefRegMap(@Self)^.clr := $00000020
  64773. else
  64774. pTDefRegMap(@Self)^.&set := $00000020;
  64775. end;
  64776. function TDMAC6_DCH6ECON.getPATEN : TBits_1; inline;
  64777. begin
  64778. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64779. end;
  64780. procedure TDMAC6_DCH6ECON.setCABORT; inline;
  64781. begin
  64782. pTDefRegMap(@Self)^.&set := $00000040;
  64783. end;
  64784. procedure TDMAC6_DCH6ECON.clearCABORT; inline;
  64785. begin
  64786. pTDefRegMap(@Self)^.clr := $00000040;
  64787. end;
  64788. procedure TDMAC6_DCH6ECON.setCABORT(thebits : TBits_1); inline;
  64789. begin
  64790. if thebits = 0 then
  64791. pTDefRegMap(@Self)^.clr := $00000040
  64792. else
  64793. pTDefRegMap(@Self)^.&set := $00000040;
  64794. end;
  64795. function TDMAC6_DCH6ECON.getCABORT : TBits_1; inline;
  64796. begin
  64797. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64798. end;
  64799. procedure TDMAC6_DCH6ECON.setCFORCE; inline;
  64800. begin
  64801. pTDefRegMap(@Self)^.&set := $00000080;
  64802. end;
  64803. procedure TDMAC6_DCH6ECON.clearCFORCE; inline;
  64804. begin
  64805. pTDefRegMap(@Self)^.clr := $00000080;
  64806. end;
  64807. procedure TDMAC6_DCH6ECON.setCFORCE(thebits : TBits_1); inline;
  64808. begin
  64809. if thebits = 0 then
  64810. pTDefRegMap(@Self)^.clr := $00000080
  64811. else
  64812. pTDefRegMap(@Self)^.&set := $00000080;
  64813. end;
  64814. function TDMAC6_DCH6ECON.getCFORCE : TBits_1; inline;
  64815. begin
  64816. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64817. end;
  64818. procedure TDMAC6_DCH6ECON.setCHSIRQ(thebits : TBits_8); inline;
  64819. begin
  64820. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  64821. end;
  64822. function TDMAC6_DCH6ECON.getCHSIRQ : TBits_8; inline;
  64823. begin
  64824. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  64825. end;
  64826. procedure TDMAC6_DCH6ECON.setCHAIRQ(thebits : TBits_8); inline;
  64827. begin
  64828. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  64829. end;
  64830. function TDMAC6_DCH6ECON.getCHAIRQ : TBits_8; inline;
  64831. begin
  64832. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  64833. end;
  64834. procedure TDMAC6_DCH6ECON.setw(thebits : TBits_32); inline;
  64835. begin
  64836. pTDefRegMap(@Self)^.val := thebits;
  64837. end;
  64838. function TDMAC6_DCH6ECON.getw : TBits_32; inline;
  64839. begin
  64840. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  64841. end;
  64842. procedure TDMAC6_DCH6INT.setCHERIF; inline;
  64843. begin
  64844. pTDefRegMap(@Self)^.&set := $00000001;
  64845. end;
  64846. procedure TDMAC6_DCH6INT.clearCHERIF; inline;
  64847. begin
  64848. pTDefRegMap(@Self)^.clr := $00000001;
  64849. end;
  64850. procedure TDMAC6_DCH6INT.setCHERIF(thebits : TBits_1); inline;
  64851. begin
  64852. if thebits = 0 then
  64853. pTDefRegMap(@Self)^.clr := $00000001
  64854. else
  64855. pTDefRegMap(@Self)^.&set := $00000001;
  64856. end;
  64857. function TDMAC6_DCH6INT.getCHERIF : TBits_1; inline;
  64858. begin
  64859. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  64860. end;
  64861. procedure TDMAC6_DCH6INT.setCHTAIF; inline;
  64862. begin
  64863. pTDefRegMap(@Self)^.&set := $00000002;
  64864. end;
  64865. procedure TDMAC6_DCH6INT.clearCHTAIF; inline;
  64866. begin
  64867. pTDefRegMap(@Self)^.clr := $00000002;
  64868. end;
  64869. procedure TDMAC6_DCH6INT.setCHTAIF(thebits : TBits_1); inline;
  64870. begin
  64871. if thebits = 0 then
  64872. pTDefRegMap(@Self)^.clr := $00000002
  64873. else
  64874. pTDefRegMap(@Self)^.&set := $00000002;
  64875. end;
  64876. function TDMAC6_DCH6INT.getCHTAIF : TBits_1; inline;
  64877. begin
  64878. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  64879. end;
  64880. procedure TDMAC6_DCH6INT.setCHCCIF; inline;
  64881. begin
  64882. pTDefRegMap(@Self)^.&set := $00000004;
  64883. end;
  64884. procedure TDMAC6_DCH6INT.clearCHCCIF; inline;
  64885. begin
  64886. pTDefRegMap(@Self)^.clr := $00000004;
  64887. end;
  64888. procedure TDMAC6_DCH6INT.setCHCCIF(thebits : TBits_1); inline;
  64889. begin
  64890. if thebits = 0 then
  64891. pTDefRegMap(@Self)^.clr := $00000004
  64892. else
  64893. pTDefRegMap(@Self)^.&set := $00000004;
  64894. end;
  64895. function TDMAC6_DCH6INT.getCHCCIF : TBits_1; inline;
  64896. begin
  64897. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  64898. end;
  64899. procedure TDMAC6_DCH6INT.setCHBCIF; inline;
  64900. begin
  64901. pTDefRegMap(@Self)^.&set := $00000008;
  64902. end;
  64903. procedure TDMAC6_DCH6INT.clearCHBCIF; inline;
  64904. begin
  64905. pTDefRegMap(@Self)^.clr := $00000008;
  64906. end;
  64907. procedure TDMAC6_DCH6INT.setCHBCIF(thebits : TBits_1); inline;
  64908. begin
  64909. if thebits = 0 then
  64910. pTDefRegMap(@Self)^.clr := $00000008
  64911. else
  64912. pTDefRegMap(@Self)^.&set := $00000008;
  64913. end;
  64914. function TDMAC6_DCH6INT.getCHBCIF : TBits_1; inline;
  64915. begin
  64916. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  64917. end;
  64918. procedure TDMAC6_DCH6INT.setCHDHIF; inline;
  64919. begin
  64920. pTDefRegMap(@Self)^.&set := $00000010;
  64921. end;
  64922. procedure TDMAC6_DCH6INT.clearCHDHIF; inline;
  64923. begin
  64924. pTDefRegMap(@Self)^.clr := $00000010;
  64925. end;
  64926. procedure TDMAC6_DCH6INT.setCHDHIF(thebits : TBits_1); inline;
  64927. begin
  64928. if thebits = 0 then
  64929. pTDefRegMap(@Self)^.clr := $00000010
  64930. else
  64931. pTDefRegMap(@Self)^.&set := $00000010;
  64932. end;
  64933. function TDMAC6_DCH6INT.getCHDHIF : TBits_1; inline;
  64934. begin
  64935. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  64936. end;
  64937. procedure TDMAC6_DCH6INT.setCHDDIF; inline;
  64938. begin
  64939. pTDefRegMap(@Self)^.&set := $00000020;
  64940. end;
  64941. procedure TDMAC6_DCH6INT.clearCHDDIF; inline;
  64942. begin
  64943. pTDefRegMap(@Self)^.clr := $00000020;
  64944. end;
  64945. procedure TDMAC6_DCH6INT.setCHDDIF(thebits : TBits_1); inline;
  64946. begin
  64947. if thebits = 0 then
  64948. pTDefRegMap(@Self)^.clr := $00000020
  64949. else
  64950. pTDefRegMap(@Self)^.&set := $00000020;
  64951. end;
  64952. function TDMAC6_DCH6INT.getCHDDIF : TBits_1; inline;
  64953. begin
  64954. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  64955. end;
  64956. procedure TDMAC6_DCH6INT.setCHSHIF; inline;
  64957. begin
  64958. pTDefRegMap(@Self)^.&set := $00000040;
  64959. end;
  64960. procedure TDMAC6_DCH6INT.clearCHSHIF; inline;
  64961. begin
  64962. pTDefRegMap(@Self)^.clr := $00000040;
  64963. end;
  64964. procedure TDMAC6_DCH6INT.setCHSHIF(thebits : TBits_1); inline;
  64965. begin
  64966. if thebits = 0 then
  64967. pTDefRegMap(@Self)^.clr := $00000040
  64968. else
  64969. pTDefRegMap(@Self)^.&set := $00000040;
  64970. end;
  64971. function TDMAC6_DCH6INT.getCHSHIF : TBits_1; inline;
  64972. begin
  64973. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  64974. end;
  64975. procedure TDMAC6_DCH6INT.setCHSDIF; inline;
  64976. begin
  64977. pTDefRegMap(@Self)^.&set := $00000080;
  64978. end;
  64979. procedure TDMAC6_DCH6INT.clearCHSDIF; inline;
  64980. begin
  64981. pTDefRegMap(@Self)^.clr := $00000080;
  64982. end;
  64983. procedure TDMAC6_DCH6INT.setCHSDIF(thebits : TBits_1); inline;
  64984. begin
  64985. if thebits = 0 then
  64986. pTDefRegMap(@Self)^.clr := $00000080
  64987. else
  64988. pTDefRegMap(@Self)^.&set := $00000080;
  64989. end;
  64990. function TDMAC6_DCH6INT.getCHSDIF : TBits_1; inline;
  64991. begin
  64992. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  64993. end;
  64994. procedure TDMAC6_DCH6INT.setCHERIE; inline;
  64995. begin
  64996. pTDefRegMap(@Self)^.&set := $00010000;
  64997. end;
  64998. procedure TDMAC6_DCH6INT.clearCHERIE; inline;
  64999. begin
  65000. pTDefRegMap(@Self)^.clr := $00010000;
  65001. end;
  65002. procedure TDMAC6_DCH6INT.setCHERIE(thebits : TBits_1); inline;
  65003. begin
  65004. if thebits = 0 then
  65005. pTDefRegMap(@Self)^.clr := $00010000
  65006. else
  65007. pTDefRegMap(@Self)^.&set := $00010000;
  65008. end;
  65009. function TDMAC6_DCH6INT.getCHERIE : TBits_1; inline;
  65010. begin
  65011. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65012. end;
  65013. procedure TDMAC6_DCH6INT.setCHTAIE; inline;
  65014. begin
  65015. pTDefRegMap(@Self)^.&set := $00020000;
  65016. end;
  65017. procedure TDMAC6_DCH6INT.clearCHTAIE; inline;
  65018. begin
  65019. pTDefRegMap(@Self)^.clr := $00020000;
  65020. end;
  65021. procedure TDMAC6_DCH6INT.setCHTAIE(thebits : TBits_1); inline;
  65022. begin
  65023. if thebits = 0 then
  65024. pTDefRegMap(@Self)^.clr := $00020000
  65025. else
  65026. pTDefRegMap(@Self)^.&set := $00020000;
  65027. end;
  65028. function TDMAC6_DCH6INT.getCHTAIE : TBits_1; inline;
  65029. begin
  65030. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65031. end;
  65032. procedure TDMAC6_DCH6INT.setCHCCIE; inline;
  65033. begin
  65034. pTDefRegMap(@Self)^.&set := $00040000;
  65035. end;
  65036. procedure TDMAC6_DCH6INT.clearCHCCIE; inline;
  65037. begin
  65038. pTDefRegMap(@Self)^.clr := $00040000;
  65039. end;
  65040. procedure TDMAC6_DCH6INT.setCHCCIE(thebits : TBits_1); inline;
  65041. begin
  65042. if thebits = 0 then
  65043. pTDefRegMap(@Self)^.clr := $00040000
  65044. else
  65045. pTDefRegMap(@Self)^.&set := $00040000;
  65046. end;
  65047. function TDMAC6_DCH6INT.getCHCCIE : TBits_1; inline;
  65048. begin
  65049. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65050. end;
  65051. procedure TDMAC6_DCH6INT.setCHBCIE; inline;
  65052. begin
  65053. pTDefRegMap(@Self)^.&set := $00080000;
  65054. end;
  65055. procedure TDMAC6_DCH6INT.clearCHBCIE; inline;
  65056. begin
  65057. pTDefRegMap(@Self)^.clr := $00080000;
  65058. end;
  65059. procedure TDMAC6_DCH6INT.setCHBCIE(thebits : TBits_1); inline;
  65060. begin
  65061. if thebits = 0 then
  65062. pTDefRegMap(@Self)^.clr := $00080000
  65063. else
  65064. pTDefRegMap(@Self)^.&set := $00080000;
  65065. end;
  65066. function TDMAC6_DCH6INT.getCHBCIE : TBits_1; inline;
  65067. begin
  65068. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65069. end;
  65070. procedure TDMAC6_DCH6INT.setCHDHIE; inline;
  65071. begin
  65072. pTDefRegMap(@Self)^.&set := $00100000;
  65073. end;
  65074. procedure TDMAC6_DCH6INT.clearCHDHIE; inline;
  65075. begin
  65076. pTDefRegMap(@Self)^.clr := $00100000;
  65077. end;
  65078. procedure TDMAC6_DCH6INT.setCHDHIE(thebits : TBits_1); inline;
  65079. begin
  65080. if thebits = 0 then
  65081. pTDefRegMap(@Self)^.clr := $00100000
  65082. else
  65083. pTDefRegMap(@Self)^.&set := $00100000;
  65084. end;
  65085. function TDMAC6_DCH6INT.getCHDHIE : TBits_1; inline;
  65086. begin
  65087. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  65088. end;
  65089. procedure TDMAC6_DCH6INT.setCHDDIE; inline;
  65090. begin
  65091. pTDefRegMap(@Self)^.&set := $00200000;
  65092. end;
  65093. procedure TDMAC6_DCH6INT.clearCHDDIE; inline;
  65094. begin
  65095. pTDefRegMap(@Self)^.clr := $00200000;
  65096. end;
  65097. procedure TDMAC6_DCH6INT.setCHDDIE(thebits : TBits_1); inline;
  65098. begin
  65099. if thebits = 0 then
  65100. pTDefRegMap(@Self)^.clr := $00200000
  65101. else
  65102. pTDefRegMap(@Self)^.&set := $00200000;
  65103. end;
  65104. function TDMAC6_DCH6INT.getCHDDIE : TBits_1; inline;
  65105. begin
  65106. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  65107. end;
  65108. procedure TDMAC6_DCH6INT.setCHSHIE; inline;
  65109. begin
  65110. pTDefRegMap(@Self)^.&set := $00400000;
  65111. end;
  65112. procedure TDMAC6_DCH6INT.clearCHSHIE; inline;
  65113. begin
  65114. pTDefRegMap(@Self)^.clr := $00400000;
  65115. end;
  65116. procedure TDMAC6_DCH6INT.setCHSHIE(thebits : TBits_1); inline;
  65117. begin
  65118. if thebits = 0 then
  65119. pTDefRegMap(@Self)^.clr := $00400000
  65120. else
  65121. pTDefRegMap(@Self)^.&set := $00400000;
  65122. end;
  65123. function TDMAC6_DCH6INT.getCHSHIE : TBits_1; inline;
  65124. begin
  65125. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  65126. end;
  65127. procedure TDMAC6_DCH6INT.setCHSDIE; inline;
  65128. begin
  65129. pTDefRegMap(@Self)^.&set := $00800000;
  65130. end;
  65131. procedure TDMAC6_DCH6INT.clearCHSDIE; inline;
  65132. begin
  65133. pTDefRegMap(@Self)^.clr := $00800000;
  65134. end;
  65135. procedure TDMAC6_DCH6INT.setCHSDIE(thebits : TBits_1); inline;
  65136. begin
  65137. if thebits = 0 then
  65138. pTDefRegMap(@Self)^.clr := $00800000
  65139. else
  65140. pTDefRegMap(@Self)^.&set := $00800000;
  65141. end;
  65142. function TDMAC6_DCH6INT.getCHSDIE : TBits_1; inline;
  65143. begin
  65144. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  65145. end;
  65146. procedure TDMAC6_DCH6INT.setw(thebits : TBits_32); inline;
  65147. begin
  65148. pTDefRegMap(@Self)^.val := thebits;
  65149. end;
  65150. function TDMAC6_DCH6INT.getw : TBits_32; inline;
  65151. begin
  65152. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65153. end;
  65154. procedure TDMAC7_DCH7CON.setCHPRI(thebits : TBits_2); inline;
  65155. begin
  65156. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  65157. end;
  65158. function TDMAC7_DCH7CON.getCHPRI : TBits_2; inline;
  65159. begin
  65160. getCHPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  65161. end;
  65162. procedure TDMAC7_DCH7CON.setCHEDET; inline;
  65163. begin
  65164. pTDefRegMap(@Self)^.&set := $00000004;
  65165. end;
  65166. procedure TDMAC7_DCH7CON.clearCHEDET; inline;
  65167. begin
  65168. pTDefRegMap(@Self)^.clr := $00000004;
  65169. end;
  65170. procedure TDMAC7_DCH7CON.setCHEDET(thebits : TBits_1); inline;
  65171. begin
  65172. if thebits = 0 then
  65173. pTDefRegMap(@Self)^.clr := $00000004
  65174. else
  65175. pTDefRegMap(@Self)^.&set := $00000004;
  65176. end;
  65177. function TDMAC7_DCH7CON.getCHEDET : TBits_1; inline;
  65178. begin
  65179. getCHEDET := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65180. end;
  65181. procedure TDMAC7_DCH7CON.setCHAEN; inline;
  65182. begin
  65183. pTDefRegMap(@Self)^.&set := $00000010;
  65184. end;
  65185. procedure TDMAC7_DCH7CON.clearCHAEN; inline;
  65186. begin
  65187. pTDefRegMap(@Self)^.clr := $00000010;
  65188. end;
  65189. procedure TDMAC7_DCH7CON.setCHAEN(thebits : TBits_1); inline;
  65190. begin
  65191. if thebits = 0 then
  65192. pTDefRegMap(@Self)^.clr := $00000010
  65193. else
  65194. pTDefRegMap(@Self)^.&set := $00000010;
  65195. end;
  65196. function TDMAC7_DCH7CON.getCHAEN : TBits_1; inline;
  65197. begin
  65198. getCHAEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65199. end;
  65200. procedure TDMAC7_DCH7CON.setCHCHN; inline;
  65201. begin
  65202. pTDefRegMap(@Self)^.&set := $00000020;
  65203. end;
  65204. procedure TDMAC7_DCH7CON.clearCHCHN; inline;
  65205. begin
  65206. pTDefRegMap(@Self)^.clr := $00000020;
  65207. end;
  65208. procedure TDMAC7_DCH7CON.setCHCHN(thebits : TBits_1); inline;
  65209. begin
  65210. if thebits = 0 then
  65211. pTDefRegMap(@Self)^.clr := $00000020
  65212. else
  65213. pTDefRegMap(@Self)^.&set := $00000020;
  65214. end;
  65215. function TDMAC7_DCH7CON.getCHCHN : TBits_1; inline;
  65216. begin
  65217. getCHCHN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65218. end;
  65219. procedure TDMAC7_DCH7CON.setCHAED; inline;
  65220. begin
  65221. pTDefRegMap(@Self)^.&set := $00000040;
  65222. end;
  65223. procedure TDMAC7_DCH7CON.clearCHAED; inline;
  65224. begin
  65225. pTDefRegMap(@Self)^.clr := $00000040;
  65226. end;
  65227. procedure TDMAC7_DCH7CON.setCHAED(thebits : TBits_1); inline;
  65228. begin
  65229. if thebits = 0 then
  65230. pTDefRegMap(@Self)^.clr := $00000040
  65231. else
  65232. pTDefRegMap(@Self)^.&set := $00000040;
  65233. end;
  65234. function TDMAC7_DCH7CON.getCHAED : TBits_1; inline;
  65235. begin
  65236. getCHAED := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65237. end;
  65238. procedure TDMAC7_DCH7CON.setCHEN; inline;
  65239. begin
  65240. pTDefRegMap(@Self)^.&set := $00000080;
  65241. end;
  65242. procedure TDMAC7_DCH7CON.clearCHEN; inline;
  65243. begin
  65244. pTDefRegMap(@Self)^.clr := $00000080;
  65245. end;
  65246. procedure TDMAC7_DCH7CON.setCHEN(thebits : TBits_1); inline;
  65247. begin
  65248. if thebits = 0 then
  65249. pTDefRegMap(@Self)^.clr := $00000080
  65250. else
  65251. pTDefRegMap(@Self)^.&set := $00000080;
  65252. end;
  65253. function TDMAC7_DCH7CON.getCHEN : TBits_1; inline;
  65254. begin
  65255. getCHEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65256. end;
  65257. procedure TDMAC7_DCH7CON.setCHCHNS; inline;
  65258. begin
  65259. pTDefRegMap(@Self)^.&set := $00000100;
  65260. end;
  65261. procedure TDMAC7_DCH7CON.clearCHCHNS; inline;
  65262. begin
  65263. pTDefRegMap(@Self)^.clr := $00000100;
  65264. end;
  65265. procedure TDMAC7_DCH7CON.setCHCHNS(thebits : TBits_1); inline;
  65266. begin
  65267. if thebits = 0 then
  65268. pTDefRegMap(@Self)^.clr := $00000100
  65269. else
  65270. pTDefRegMap(@Self)^.&set := $00000100;
  65271. end;
  65272. function TDMAC7_DCH7CON.getCHCHNS : TBits_1; inline;
  65273. begin
  65274. getCHCHNS := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  65275. end;
  65276. procedure TDMAC7_DCH7CON.setCHBUSY; inline;
  65277. begin
  65278. pTDefRegMap(@Self)^.&set := $00008000;
  65279. end;
  65280. procedure TDMAC7_DCH7CON.clearCHBUSY; inline;
  65281. begin
  65282. pTDefRegMap(@Self)^.clr := $00008000;
  65283. end;
  65284. procedure TDMAC7_DCH7CON.setCHBUSY(thebits : TBits_1); inline;
  65285. begin
  65286. if thebits = 0 then
  65287. pTDefRegMap(@Self)^.clr := $00008000
  65288. else
  65289. pTDefRegMap(@Self)^.&set := $00008000;
  65290. end;
  65291. function TDMAC7_DCH7CON.getCHBUSY : TBits_1; inline;
  65292. begin
  65293. getCHBUSY := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  65294. end;
  65295. procedure TDMAC7_DCH7CON.setw(thebits : TBits_32); inline;
  65296. begin
  65297. pTDefRegMap(@Self)^.val := thebits;
  65298. end;
  65299. function TDMAC7_DCH7CON.getw : TBits_32; inline;
  65300. begin
  65301. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65302. end;
  65303. procedure TDMAC7_DCH7ECON.setAIRQEN; inline;
  65304. begin
  65305. pTDefRegMap(@Self)^.&set := $00000008;
  65306. end;
  65307. procedure TDMAC7_DCH7ECON.clearAIRQEN; inline;
  65308. begin
  65309. pTDefRegMap(@Self)^.clr := $00000008;
  65310. end;
  65311. procedure TDMAC7_DCH7ECON.setAIRQEN(thebits : TBits_1); inline;
  65312. begin
  65313. if thebits = 0 then
  65314. pTDefRegMap(@Self)^.clr := $00000008
  65315. else
  65316. pTDefRegMap(@Self)^.&set := $00000008;
  65317. end;
  65318. function TDMAC7_DCH7ECON.getAIRQEN : TBits_1; inline;
  65319. begin
  65320. getAIRQEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65321. end;
  65322. procedure TDMAC7_DCH7ECON.setSIRQEN; inline;
  65323. begin
  65324. pTDefRegMap(@Self)^.&set := $00000010;
  65325. end;
  65326. procedure TDMAC7_DCH7ECON.clearSIRQEN; inline;
  65327. begin
  65328. pTDefRegMap(@Self)^.clr := $00000010;
  65329. end;
  65330. procedure TDMAC7_DCH7ECON.setSIRQEN(thebits : TBits_1); inline;
  65331. begin
  65332. if thebits = 0 then
  65333. pTDefRegMap(@Self)^.clr := $00000010
  65334. else
  65335. pTDefRegMap(@Self)^.&set := $00000010;
  65336. end;
  65337. function TDMAC7_DCH7ECON.getSIRQEN : TBits_1; inline;
  65338. begin
  65339. getSIRQEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65340. end;
  65341. procedure TDMAC7_DCH7ECON.setPATEN; inline;
  65342. begin
  65343. pTDefRegMap(@Self)^.&set := $00000020;
  65344. end;
  65345. procedure TDMAC7_DCH7ECON.clearPATEN; inline;
  65346. begin
  65347. pTDefRegMap(@Self)^.clr := $00000020;
  65348. end;
  65349. procedure TDMAC7_DCH7ECON.setPATEN(thebits : TBits_1); inline;
  65350. begin
  65351. if thebits = 0 then
  65352. pTDefRegMap(@Self)^.clr := $00000020
  65353. else
  65354. pTDefRegMap(@Self)^.&set := $00000020;
  65355. end;
  65356. function TDMAC7_DCH7ECON.getPATEN : TBits_1; inline;
  65357. begin
  65358. getPATEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65359. end;
  65360. procedure TDMAC7_DCH7ECON.setCABORT; inline;
  65361. begin
  65362. pTDefRegMap(@Self)^.&set := $00000040;
  65363. end;
  65364. procedure TDMAC7_DCH7ECON.clearCABORT; inline;
  65365. begin
  65366. pTDefRegMap(@Self)^.clr := $00000040;
  65367. end;
  65368. procedure TDMAC7_DCH7ECON.setCABORT(thebits : TBits_1); inline;
  65369. begin
  65370. if thebits = 0 then
  65371. pTDefRegMap(@Self)^.clr := $00000040
  65372. else
  65373. pTDefRegMap(@Self)^.&set := $00000040;
  65374. end;
  65375. function TDMAC7_DCH7ECON.getCABORT : TBits_1; inline;
  65376. begin
  65377. getCABORT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65378. end;
  65379. procedure TDMAC7_DCH7ECON.setCFORCE; inline;
  65380. begin
  65381. pTDefRegMap(@Self)^.&set := $00000080;
  65382. end;
  65383. procedure TDMAC7_DCH7ECON.clearCFORCE; inline;
  65384. begin
  65385. pTDefRegMap(@Self)^.clr := $00000080;
  65386. end;
  65387. procedure TDMAC7_DCH7ECON.setCFORCE(thebits : TBits_1); inline;
  65388. begin
  65389. if thebits = 0 then
  65390. pTDefRegMap(@Self)^.clr := $00000080
  65391. else
  65392. pTDefRegMap(@Self)^.&set := $00000080;
  65393. end;
  65394. function TDMAC7_DCH7ECON.getCFORCE : TBits_1; inline;
  65395. begin
  65396. getCFORCE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65397. end;
  65398. procedure TDMAC7_DCH7ECON.setCHSIRQ(thebits : TBits_8); inline;
  65399. begin
  65400. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  65401. end;
  65402. function TDMAC7_DCH7ECON.getCHSIRQ : TBits_8; inline;
  65403. begin
  65404. getCHSIRQ := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  65405. end;
  65406. procedure TDMAC7_DCH7ECON.setCHAIRQ(thebits : TBits_8); inline;
  65407. begin
  65408. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  65409. end;
  65410. function TDMAC7_DCH7ECON.getCHAIRQ : TBits_8; inline;
  65411. begin
  65412. getCHAIRQ := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  65413. end;
  65414. procedure TDMAC7_DCH7ECON.setw(thebits : TBits_32); inline;
  65415. begin
  65416. pTDefRegMap(@Self)^.val := thebits;
  65417. end;
  65418. function TDMAC7_DCH7ECON.getw : TBits_32; inline;
  65419. begin
  65420. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65421. end;
  65422. procedure TDMAC7_DCH7INT.setCHERIF; inline;
  65423. begin
  65424. pTDefRegMap(@Self)^.&set := $00000001;
  65425. end;
  65426. procedure TDMAC7_DCH7INT.clearCHERIF; inline;
  65427. begin
  65428. pTDefRegMap(@Self)^.clr := $00000001;
  65429. end;
  65430. procedure TDMAC7_DCH7INT.setCHERIF(thebits : TBits_1); inline;
  65431. begin
  65432. if thebits = 0 then
  65433. pTDefRegMap(@Self)^.clr := $00000001
  65434. else
  65435. pTDefRegMap(@Self)^.&set := $00000001;
  65436. end;
  65437. function TDMAC7_DCH7INT.getCHERIF : TBits_1; inline;
  65438. begin
  65439. getCHERIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65440. end;
  65441. procedure TDMAC7_DCH7INT.setCHTAIF; inline;
  65442. begin
  65443. pTDefRegMap(@Self)^.&set := $00000002;
  65444. end;
  65445. procedure TDMAC7_DCH7INT.clearCHTAIF; inline;
  65446. begin
  65447. pTDefRegMap(@Self)^.clr := $00000002;
  65448. end;
  65449. procedure TDMAC7_DCH7INT.setCHTAIF(thebits : TBits_1); inline;
  65450. begin
  65451. if thebits = 0 then
  65452. pTDefRegMap(@Self)^.clr := $00000002
  65453. else
  65454. pTDefRegMap(@Self)^.&set := $00000002;
  65455. end;
  65456. function TDMAC7_DCH7INT.getCHTAIF : TBits_1; inline;
  65457. begin
  65458. getCHTAIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65459. end;
  65460. procedure TDMAC7_DCH7INT.setCHCCIF; inline;
  65461. begin
  65462. pTDefRegMap(@Self)^.&set := $00000004;
  65463. end;
  65464. procedure TDMAC7_DCH7INT.clearCHCCIF; inline;
  65465. begin
  65466. pTDefRegMap(@Self)^.clr := $00000004;
  65467. end;
  65468. procedure TDMAC7_DCH7INT.setCHCCIF(thebits : TBits_1); inline;
  65469. begin
  65470. if thebits = 0 then
  65471. pTDefRegMap(@Self)^.clr := $00000004
  65472. else
  65473. pTDefRegMap(@Self)^.&set := $00000004;
  65474. end;
  65475. function TDMAC7_DCH7INT.getCHCCIF : TBits_1; inline;
  65476. begin
  65477. getCHCCIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65478. end;
  65479. procedure TDMAC7_DCH7INT.setCHBCIF; inline;
  65480. begin
  65481. pTDefRegMap(@Self)^.&set := $00000008;
  65482. end;
  65483. procedure TDMAC7_DCH7INT.clearCHBCIF; inline;
  65484. begin
  65485. pTDefRegMap(@Self)^.clr := $00000008;
  65486. end;
  65487. procedure TDMAC7_DCH7INT.setCHBCIF(thebits : TBits_1); inline;
  65488. begin
  65489. if thebits = 0 then
  65490. pTDefRegMap(@Self)^.clr := $00000008
  65491. else
  65492. pTDefRegMap(@Self)^.&set := $00000008;
  65493. end;
  65494. function TDMAC7_DCH7INT.getCHBCIF : TBits_1; inline;
  65495. begin
  65496. getCHBCIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65497. end;
  65498. procedure TDMAC7_DCH7INT.setCHDHIF; inline;
  65499. begin
  65500. pTDefRegMap(@Self)^.&set := $00000010;
  65501. end;
  65502. procedure TDMAC7_DCH7INT.clearCHDHIF; inline;
  65503. begin
  65504. pTDefRegMap(@Self)^.clr := $00000010;
  65505. end;
  65506. procedure TDMAC7_DCH7INT.setCHDHIF(thebits : TBits_1); inline;
  65507. begin
  65508. if thebits = 0 then
  65509. pTDefRegMap(@Self)^.clr := $00000010
  65510. else
  65511. pTDefRegMap(@Self)^.&set := $00000010;
  65512. end;
  65513. function TDMAC7_DCH7INT.getCHDHIF : TBits_1; inline;
  65514. begin
  65515. getCHDHIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65516. end;
  65517. procedure TDMAC7_DCH7INT.setCHDDIF; inline;
  65518. begin
  65519. pTDefRegMap(@Self)^.&set := $00000020;
  65520. end;
  65521. procedure TDMAC7_DCH7INT.clearCHDDIF; inline;
  65522. begin
  65523. pTDefRegMap(@Self)^.clr := $00000020;
  65524. end;
  65525. procedure TDMAC7_DCH7INT.setCHDDIF(thebits : TBits_1); inline;
  65526. begin
  65527. if thebits = 0 then
  65528. pTDefRegMap(@Self)^.clr := $00000020
  65529. else
  65530. pTDefRegMap(@Self)^.&set := $00000020;
  65531. end;
  65532. function TDMAC7_DCH7INT.getCHDDIF : TBits_1; inline;
  65533. begin
  65534. getCHDDIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65535. end;
  65536. procedure TDMAC7_DCH7INT.setCHSHIF; inline;
  65537. begin
  65538. pTDefRegMap(@Self)^.&set := $00000040;
  65539. end;
  65540. procedure TDMAC7_DCH7INT.clearCHSHIF; inline;
  65541. begin
  65542. pTDefRegMap(@Self)^.clr := $00000040;
  65543. end;
  65544. procedure TDMAC7_DCH7INT.setCHSHIF(thebits : TBits_1); inline;
  65545. begin
  65546. if thebits = 0 then
  65547. pTDefRegMap(@Self)^.clr := $00000040
  65548. else
  65549. pTDefRegMap(@Self)^.&set := $00000040;
  65550. end;
  65551. function TDMAC7_DCH7INT.getCHSHIF : TBits_1; inline;
  65552. begin
  65553. getCHSHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  65554. end;
  65555. procedure TDMAC7_DCH7INT.setCHSDIF; inline;
  65556. begin
  65557. pTDefRegMap(@Self)^.&set := $00000080;
  65558. end;
  65559. procedure TDMAC7_DCH7INT.clearCHSDIF; inline;
  65560. begin
  65561. pTDefRegMap(@Self)^.clr := $00000080;
  65562. end;
  65563. procedure TDMAC7_DCH7INT.setCHSDIF(thebits : TBits_1); inline;
  65564. begin
  65565. if thebits = 0 then
  65566. pTDefRegMap(@Self)^.clr := $00000080
  65567. else
  65568. pTDefRegMap(@Self)^.&set := $00000080;
  65569. end;
  65570. function TDMAC7_DCH7INT.getCHSDIF : TBits_1; inline;
  65571. begin
  65572. getCHSDIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  65573. end;
  65574. procedure TDMAC7_DCH7INT.setCHERIE; inline;
  65575. begin
  65576. pTDefRegMap(@Self)^.&set := $00010000;
  65577. end;
  65578. procedure TDMAC7_DCH7INT.clearCHERIE; inline;
  65579. begin
  65580. pTDefRegMap(@Self)^.clr := $00010000;
  65581. end;
  65582. procedure TDMAC7_DCH7INT.setCHERIE(thebits : TBits_1); inline;
  65583. begin
  65584. if thebits = 0 then
  65585. pTDefRegMap(@Self)^.clr := $00010000
  65586. else
  65587. pTDefRegMap(@Self)^.&set := $00010000;
  65588. end;
  65589. function TDMAC7_DCH7INT.getCHERIE : TBits_1; inline;
  65590. begin
  65591. getCHERIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65592. end;
  65593. procedure TDMAC7_DCH7INT.setCHTAIE; inline;
  65594. begin
  65595. pTDefRegMap(@Self)^.&set := $00020000;
  65596. end;
  65597. procedure TDMAC7_DCH7INT.clearCHTAIE; inline;
  65598. begin
  65599. pTDefRegMap(@Self)^.clr := $00020000;
  65600. end;
  65601. procedure TDMAC7_DCH7INT.setCHTAIE(thebits : TBits_1); inline;
  65602. begin
  65603. if thebits = 0 then
  65604. pTDefRegMap(@Self)^.clr := $00020000
  65605. else
  65606. pTDefRegMap(@Self)^.&set := $00020000;
  65607. end;
  65608. function TDMAC7_DCH7INT.getCHTAIE : TBits_1; inline;
  65609. begin
  65610. getCHTAIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  65611. end;
  65612. procedure TDMAC7_DCH7INT.setCHCCIE; inline;
  65613. begin
  65614. pTDefRegMap(@Self)^.&set := $00040000;
  65615. end;
  65616. procedure TDMAC7_DCH7INT.clearCHCCIE; inline;
  65617. begin
  65618. pTDefRegMap(@Self)^.clr := $00040000;
  65619. end;
  65620. procedure TDMAC7_DCH7INT.setCHCCIE(thebits : TBits_1); inline;
  65621. begin
  65622. if thebits = 0 then
  65623. pTDefRegMap(@Self)^.clr := $00040000
  65624. else
  65625. pTDefRegMap(@Self)^.&set := $00040000;
  65626. end;
  65627. function TDMAC7_DCH7INT.getCHCCIE : TBits_1; inline;
  65628. begin
  65629. getCHCCIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  65630. end;
  65631. procedure TDMAC7_DCH7INT.setCHBCIE; inline;
  65632. begin
  65633. pTDefRegMap(@Self)^.&set := $00080000;
  65634. end;
  65635. procedure TDMAC7_DCH7INT.clearCHBCIE; inline;
  65636. begin
  65637. pTDefRegMap(@Self)^.clr := $00080000;
  65638. end;
  65639. procedure TDMAC7_DCH7INT.setCHBCIE(thebits : TBits_1); inline;
  65640. begin
  65641. if thebits = 0 then
  65642. pTDefRegMap(@Self)^.clr := $00080000
  65643. else
  65644. pTDefRegMap(@Self)^.&set := $00080000;
  65645. end;
  65646. function TDMAC7_DCH7INT.getCHBCIE : TBits_1; inline;
  65647. begin
  65648. getCHBCIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  65649. end;
  65650. procedure TDMAC7_DCH7INT.setCHDHIE; inline;
  65651. begin
  65652. pTDefRegMap(@Self)^.&set := $00100000;
  65653. end;
  65654. procedure TDMAC7_DCH7INT.clearCHDHIE; inline;
  65655. begin
  65656. pTDefRegMap(@Self)^.clr := $00100000;
  65657. end;
  65658. procedure TDMAC7_DCH7INT.setCHDHIE(thebits : TBits_1); inline;
  65659. begin
  65660. if thebits = 0 then
  65661. pTDefRegMap(@Self)^.clr := $00100000
  65662. else
  65663. pTDefRegMap(@Self)^.&set := $00100000;
  65664. end;
  65665. function TDMAC7_DCH7INT.getCHDHIE : TBits_1; inline;
  65666. begin
  65667. getCHDHIE := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  65668. end;
  65669. procedure TDMAC7_DCH7INT.setCHDDIE; inline;
  65670. begin
  65671. pTDefRegMap(@Self)^.&set := $00200000;
  65672. end;
  65673. procedure TDMAC7_DCH7INT.clearCHDDIE; inline;
  65674. begin
  65675. pTDefRegMap(@Self)^.clr := $00200000;
  65676. end;
  65677. procedure TDMAC7_DCH7INT.setCHDDIE(thebits : TBits_1); inline;
  65678. begin
  65679. if thebits = 0 then
  65680. pTDefRegMap(@Self)^.clr := $00200000
  65681. else
  65682. pTDefRegMap(@Self)^.&set := $00200000;
  65683. end;
  65684. function TDMAC7_DCH7INT.getCHDDIE : TBits_1; inline;
  65685. begin
  65686. getCHDDIE := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  65687. end;
  65688. procedure TDMAC7_DCH7INT.setCHSHIE; inline;
  65689. begin
  65690. pTDefRegMap(@Self)^.&set := $00400000;
  65691. end;
  65692. procedure TDMAC7_DCH7INT.clearCHSHIE; inline;
  65693. begin
  65694. pTDefRegMap(@Self)^.clr := $00400000;
  65695. end;
  65696. procedure TDMAC7_DCH7INT.setCHSHIE(thebits : TBits_1); inline;
  65697. begin
  65698. if thebits = 0 then
  65699. pTDefRegMap(@Self)^.clr := $00400000
  65700. else
  65701. pTDefRegMap(@Self)^.&set := $00400000;
  65702. end;
  65703. function TDMAC7_DCH7INT.getCHSHIE : TBits_1; inline;
  65704. begin
  65705. getCHSHIE := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  65706. end;
  65707. procedure TDMAC7_DCH7INT.setCHSDIE; inline;
  65708. begin
  65709. pTDefRegMap(@Self)^.&set := $00800000;
  65710. end;
  65711. procedure TDMAC7_DCH7INT.clearCHSDIE; inline;
  65712. begin
  65713. pTDefRegMap(@Self)^.clr := $00800000;
  65714. end;
  65715. procedure TDMAC7_DCH7INT.setCHSDIE(thebits : TBits_1); inline;
  65716. begin
  65717. if thebits = 0 then
  65718. pTDefRegMap(@Self)^.clr := $00800000
  65719. else
  65720. pTDefRegMap(@Self)^.&set := $00800000;
  65721. end;
  65722. function TDMAC7_DCH7INT.getCHSDIE : TBits_1; inline;
  65723. begin
  65724. getCHSDIE := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  65725. end;
  65726. procedure TDMAC7_DCH7INT.setw(thebits : TBits_32); inline;
  65727. begin
  65728. pTDefRegMap(@Self)^.val := thebits;
  65729. end;
  65730. function TDMAC7_DCH7INT.getw : TBits_32; inline;
  65731. begin
  65732. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65733. end;
  65734. procedure TPCACHE_CHECON.setPFMWS(thebits : TBits_3); inline;
  65735. begin
  65736. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  65737. end;
  65738. function TPCACHE_CHECON.getPFMWS : TBits_3; inline;
  65739. begin
  65740. getPFMWS := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  65741. end;
  65742. procedure TPCACHE_CHECON.setPREFEN(thebits : TBits_2); inline;
  65743. begin
  65744. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFCF or ( thebits shl 4 );
  65745. end;
  65746. function TPCACHE_CHECON.getPREFEN : TBits_2; inline;
  65747. begin
  65748. getPREFEN := (pTDefRegMap(@Self)^.val and $00000030) shr 4;
  65749. end;
  65750. procedure TPCACHE_CHECON.setDCSZ(thebits : TBits_2); inline;
  65751. begin
  65752. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  65753. end;
  65754. function TPCACHE_CHECON.getDCSZ : TBits_2; inline;
  65755. begin
  65756. getDCSZ := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  65757. end;
  65758. procedure TPCACHE_CHECON.setCHECOH; inline;
  65759. begin
  65760. pTDefRegMap(@Self)^.&set := $00010000;
  65761. end;
  65762. procedure TPCACHE_CHECON.clearCHECOH; inline;
  65763. begin
  65764. pTDefRegMap(@Self)^.clr := $00010000;
  65765. end;
  65766. procedure TPCACHE_CHECON.setCHECOH(thebits : TBits_1); inline;
  65767. begin
  65768. if thebits = 0 then
  65769. pTDefRegMap(@Self)^.clr := $00010000
  65770. else
  65771. pTDefRegMap(@Self)^.&set := $00010000;
  65772. end;
  65773. function TPCACHE_CHECON.getCHECOH : TBits_1; inline;
  65774. begin
  65775. getCHECOH := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  65776. end;
  65777. procedure TPCACHE_CHECON.setw(thebits : TBits_32); inline;
  65778. begin
  65779. pTDefRegMap(@Self)^.val := thebits;
  65780. end;
  65781. function TPCACHE_CHECON.getw : TBits_32; inline;
  65782. begin
  65783. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65784. end;
  65785. procedure TPCACHE_CHETAG.setLTYPE; inline;
  65786. begin
  65787. pTDefRegMap(@Self)^.&set := $00000002;
  65788. end;
  65789. procedure TPCACHE_CHETAG.clearLTYPE; inline;
  65790. begin
  65791. pTDefRegMap(@Self)^.clr := $00000002;
  65792. end;
  65793. procedure TPCACHE_CHETAG.setLTYPE(thebits : TBits_1); inline;
  65794. begin
  65795. if thebits = 0 then
  65796. pTDefRegMap(@Self)^.clr := $00000002
  65797. else
  65798. pTDefRegMap(@Self)^.&set := $00000002;
  65799. end;
  65800. function TPCACHE_CHETAG.getLTYPE : TBits_1; inline;
  65801. begin
  65802. getLTYPE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65803. end;
  65804. procedure TPCACHE_CHETAG.setLLOCK; inline;
  65805. begin
  65806. pTDefRegMap(@Self)^.&set := $00000004;
  65807. end;
  65808. procedure TPCACHE_CHETAG.clearLLOCK; inline;
  65809. begin
  65810. pTDefRegMap(@Self)^.clr := $00000004;
  65811. end;
  65812. procedure TPCACHE_CHETAG.setLLOCK(thebits : TBits_1); inline;
  65813. begin
  65814. if thebits = 0 then
  65815. pTDefRegMap(@Self)^.clr := $00000004
  65816. else
  65817. pTDefRegMap(@Self)^.&set := $00000004;
  65818. end;
  65819. function TPCACHE_CHETAG.getLLOCK : TBits_1; inline;
  65820. begin
  65821. getLLOCK := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65822. end;
  65823. procedure TPCACHE_CHETAG.setLVALID; inline;
  65824. begin
  65825. pTDefRegMap(@Self)^.&set := $00000008;
  65826. end;
  65827. procedure TPCACHE_CHETAG.clearLVALID; inline;
  65828. begin
  65829. pTDefRegMap(@Self)^.clr := $00000008;
  65830. end;
  65831. procedure TPCACHE_CHETAG.setLVALID(thebits : TBits_1); inline;
  65832. begin
  65833. if thebits = 0 then
  65834. pTDefRegMap(@Self)^.clr := $00000008
  65835. else
  65836. pTDefRegMap(@Self)^.&set := $00000008;
  65837. end;
  65838. function TPCACHE_CHETAG.getLVALID : TBits_1; inline;
  65839. begin
  65840. getLVALID := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65841. end;
  65842. procedure TPCACHE_CHETAG.setLTAG(thebits : TBits_20); inline;
  65843. begin
  65844. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00000F or ( thebits shl 4 );
  65845. end;
  65846. function TPCACHE_CHETAG.getLTAG : TBits_20; inline;
  65847. begin
  65848. getLTAG := (pTDefRegMap(@Self)^.val and $00FFFFF0) shr 4;
  65849. end;
  65850. procedure TPCACHE_CHETAG.setLTAGBOOT; inline;
  65851. begin
  65852. pTDefRegMap(@Self)^.&set := $80000000;
  65853. end;
  65854. procedure TPCACHE_CHETAG.clearLTAGBOOT; inline;
  65855. begin
  65856. pTDefRegMap(@Self)^.clr := $80000000;
  65857. end;
  65858. procedure TPCACHE_CHETAG.setLTAGBOOT(thebits : TBits_1); inline;
  65859. begin
  65860. if thebits = 0 then
  65861. pTDefRegMap(@Self)^.clr := $80000000
  65862. else
  65863. pTDefRegMap(@Self)^.&set := $80000000;
  65864. end;
  65865. function TPCACHE_CHETAG.getLTAGBOOT : TBits_1; inline;
  65866. begin
  65867. getLTAGBOOT := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  65868. end;
  65869. procedure TPCACHE_CHETAG.setw(thebits : TBits_32); inline;
  65870. begin
  65871. pTDefRegMap(@Self)^.val := thebits;
  65872. end;
  65873. function TPCACHE_CHETAG.getw : TBits_32; inline;
  65874. begin
  65875. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  65876. end;
  65877. procedure TUSB_U1IR.setURSTIF_DETACHIF; inline;
  65878. begin
  65879. pTDefRegMap(@Self)^.&set := $00000001;
  65880. end;
  65881. procedure TUSB_U1IR.clearURSTIF_DETACHIF; inline;
  65882. begin
  65883. pTDefRegMap(@Self)^.clr := $00000001;
  65884. end;
  65885. procedure TUSB_U1IR.setURSTIF_DETACHIF(thebits : TBits_1); inline;
  65886. begin
  65887. if thebits = 0 then
  65888. pTDefRegMap(@Self)^.clr := $00000001
  65889. else
  65890. pTDefRegMap(@Self)^.&set := $00000001;
  65891. end;
  65892. function TUSB_U1IR.getURSTIF_DETACHIF : TBits_1; inline;
  65893. begin
  65894. getURSTIF_DETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  65895. end;
  65896. procedure TUSB_U1IR.setUERRIF; inline;
  65897. begin
  65898. pTDefRegMap(@Self)^.&set := $00000002;
  65899. end;
  65900. procedure TUSB_U1IR.clearUERRIF; inline;
  65901. begin
  65902. pTDefRegMap(@Self)^.clr := $00000002;
  65903. end;
  65904. procedure TUSB_U1IR.setUERRIF(thebits : TBits_1); inline;
  65905. begin
  65906. if thebits = 0 then
  65907. pTDefRegMap(@Self)^.clr := $00000002
  65908. else
  65909. pTDefRegMap(@Self)^.&set := $00000002;
  65910. end;
  65911. function TUSB_U1IR.getUERRIF : TBits_1; inline;
  65912. begin
  65913. getUERRIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  65914. end;
  65915. procedure TUSB_U1IR.setSOFIF; inline;
  65916. begin
  65917. pTDefRegMap(@Self)^.&set := $00000004;
  65918. end;
  65919. procedure TUSB_U1IR.clearSOFIF; inline;
  65920. begin
  65921. pTDefRegMap(@Self)^.clr := $00000004;
  65922. end;
  65923. procedure TUSB_U1IR.setSOFIF(thebits : TBits_1); inline;
  65924. begin
  65925. if thebits = 0 then
  65926. pTDefRegMap(@Self)^.clr := $00000004
  65927. else
  65928. pTDefRegMap(@Self)^.&set := $00000004;
  65929. end;
  65930. function TUSB_U1IR.getSOFIF : TBits_1; inline;
  65931. begin
  65932. getSOFIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  65933. end;
  65934. procedure TUSB_U1IR.setTRNIF; inline;
  65935. begin
  65936. pTDefRegMap(@Self)^.&set := $00000008;
  65937. end;
  65938. procedure TUSB_U1IR.clearTRNIF; inline;
  65939. begin
  65940. pTDefRegMap(@Self)^.clr := $00000008;
  65941. end;
  65942. procedure TUSB_U1IR.setTRNIF(thebits : TBits_1); inline;
  65943. begin
  65944. if thebits = 0 then
  65945. pTDefRegMap(@Self)^.clr := $00000008
  65946. else
  65947. pTDefRegMap(@Self)^.&set := $00000008;
  65948. end;
  65949. function TUSB_U1IR.getTRNIF : TBits_1; inline;
  65950. begin
  65951. getTRNIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  65952. end;
  65953. procedure TUSB_U1IR.setIDLEIF; inline;
  65954. begin
  65955. pTDefRegMap(@Self)^.&set := $00000010;
  65956. end;
  65957. procedure TUSB_U1IR.clearIDLEIF; inline;
  65958. begin
  65959. pTDefRegMap(@Self)^.clr := $00000010;
  65960. end;
  65961. procedure TUSB_U1IR.setIDLEIF(thebits : TBits_1); inline;
  65962. begin
  65963. if thebits = 0 then
  65964. pTDefRegMap(@Self)^.clr := $00000010
  65965. else
  65966. pTDefRegMap(@Self)^.&set := $00000010;
  65967. end;
  65968. function TUSB_U1IR.getIDLEIF : TBits_1; inline;
  65969. begin
  65970. getIDLEIF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  65971. end;
  65972. procedure TUSB_U1IR.setRESUMEIF; inline;
  65973. begin
  65974. pTDefRegMap(@Self)^.&set := $00000020;
  65975. end;
  65976. procedure TUSB_U1IR.clearRESUMEIF; inline;
  65977. begin
  65978. pTDefRegMap(@Self)^.clr := $00000020;
  65979. end;
  65980. procedure TUSB_U1IR.setRESUMEIF(thebits : TBits_1); inline;
  65981. begin
  65982. if thebits = 0 then
  65983. pTDefRegMap(@Self)^.clr := $00000020
  65984. else
  65985. pTDefRegMap(@Self)^.&set := $00000020;
  65986. end;
  65987. function TUSB_U1IR.getRESUMEIF : TBits_1; inline;
  65988. begin
  65989. getRESUMEIF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  65990. end;
  65991. procedure TUSB_U1IR.setATTACHIF; inline;
  65992. begin
  65993. pTDefRegMap(@Self)^.&set := $00000040;
  65994. end;
  65995. procedure TUSB_U1IR.clearATTACHIF; inline;
  65996. begin
  65997. pTDefRegMap(@Self)^.clr := $00000040;
  65998. end;
  65999. procedure TUSB_U1IR.setATTACHIF(thebits : TBits_1); inline;
  66000. begin
  66001. if thebits = 0 then
  66002. pTDefRegMap(@Self)^.clr := $00000040
  66003. else
  66004. pTDefRegMap(@Self)^.&set := $00000040;
  66005. end;
  66006. function TUSB_U1IR.getATTACHIF : TBits_1; inline;
  66007. begin
  66008. getATTACHIF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66009. end;
  66010. procedure TUSB_U1IR.setSTALLIF; inline;
  66011. begin
  66012. pTDefRegMap(@Self)^.&set := $00000080;
  66013. end;
  66014. procedure TUSB_U1IR.clearSTALLIF; inline;
  66015. begin
  66016. pTDefRegMap(@Self)^.clr := $00000080;
  66017. end;
  66018. procedure TUSB_U1IR.setSTALLIF(thebits : TBits_1); inline;
  66019. begin
  66020. if thebits = 0 then
  66021. pTDefRegMap(@Self)^.clr := $00000080
  66022. else
  66023. pTDefRegMap(@Self)^.&set := $00000080;
  66024. end;
  66025. function TUSB_U1IR.getSTALLIF : TBits_1; inline;
  66026. begin
  66027. getSTALLIF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66028. end;
  66029. procedure TUSB_U1IR.setDETACHIF; inline;
  66030. begin
  66031. pTDefRegMap(@Self)^.&set := $00000001;
  66032. end;
  66033. procedure TUSB_U1IR.clearDETACHIF; inline;
  66034. begin
  66035. pTDefRegMap(@Self)^.clr := $00000001;
  66036. end;
  66037. procedure TUSB_U1IR.setDETACHIF(thebits : TBits_1); inline;
  66038. begin
  66039. if thebits = 0 then
  66040. pTDefRegMap(@Self)^.clr := $00000001
  66041. else
  66042. pTDefRegMap(@Self)^.&set := $00000001;
  66043. end;
  66044. function TUSB_U1IR.getDETACHIF : TBits_1; inline;
  66045. begin
  66046. getDETACHIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66047. end;
  66048. procedure TUSB_U1IR.setURSTIF; inline;
  66049. begin
  66050. pTDefRegMap(@Self)^.&set := $00000001;
  66051. end;
  66052. procedure TUSB_U1IR.clearURSTIF; inline;
  66053. begin
  66054. pTDefRegMap(@Self)^.clr := $00000001;
  66055. end;
  66056. procedure TUSB_U1IR.setURSTIF(thebits : TBits_1); inline;
  66057. begin
  66058. if thebits = 0 then
  66059. pTDefRegMap(@Self)^.clr := $00000001
  66060. else
  66061. pTDefRegMap(@Self)^.&set := $00000001;
  66062. end;
  66063. function TUSB_U1IR.getURSTIF : TBits_1; inline;
  66064. begin
  66065. getURSTIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66066. end;
  66067. procedure TUSB_U1IE.setURSTIE_DETACHIE; inline;
  66068. begin
  66069. pTDefRegMap(@Self)^.&set := $00000001;
  66070. end;
  66071. procedure TUSB_U1IE.clearURSTIE_DETACHIE; inline;
  66072. begin
  66073. pTDefRegMap(@Self)^.clr := $00000001;
  66074. end;
  66075. procedure TUSB_U1IE.setURSTIE_DETACHIE(thebits : TBits_1); inline;
  66076. begin
  66077. if thebits = 0 then
  66078. pTDefRegMap(@Self)^.clr := $00000001
  66079. else
  66080. pTDefRegMap(@Self)^.&set := $00000001;
  66081. end;
  66082. function TUSB_U1IE.getURSTIE_DETACHIE : TBits_1; inline;
  66083. begin
  66084. getURSTIE_DETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66085. end;
  66086. procedure TUSB_U1IE.setUERRIE; inline;
  66087. begin
  66088. pTDefRegMap(@Self)^.&set := $00000002;
  66089. end;
  66090. procedure TUSB_U1IE.clearUERRIE; inline;
  66091. begin
  66092. pTDefRegMap(@Self)^.clr := $00000002;
  66093. end;
  66094. procedure TUSB_U1IE.setUERRIE(thebits : TBits_1); inline;
  66095. begin
  66096. if thebits = 0 then
  66097. pTDefRegMap(@Self)^.clr := $00000002
  66098. else
  66099. pTDefRegMap(@Self)^.&set := $00000002;
  66100. end;
  66101. function TUSB_U1IE.getUERRIE : TBits_1; inline;
  66102. begin
  66103. getUERRIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66104. end;
  66105. procedure TUSB_U1IE.setSOFIE; inline;
  66106. begin
  66107. pTDefRegMap(@Self)^.&set := $00000004;
  66108. end;
  66109. procedure TUSB_U1IE.clearSOFIE; inline;
  66110. begin
  66111. pTDefRegMap(@Self)^.clr := $00000004;
  66112. end;
  66113. procedure TUSB_U1IE.setSOFIE(thebits : TBits_1); inline;
  66114. begin
  66115. if thebits = 0 then
  66116. pTDefRegMap(@Self)^.clr := $00000004
  66117. else
  66118. pTDefRegMap(@Self)^.&set := $00000004;
  66119. end;
  66120. function TUSB_U1IE.getSOFIE : TBits_1; inline;
  66121. begin
  66122. getSOFIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66123. end;
  66124. procedure TUSB_U1IE.setTRNIE; inline;
  66125. begin
  66126. pTDefRegMap(@Self)^.&set := $00000008;
  66127. end;
  66128. procedure TUSB_U1IE.clearTRNIE; inline;
  66129. begin
  66130. pTDefRegMap(@Self)^.clr := $00000008;
  66131. end;
  66132. procedure TUSB_U1IE.setTRNIE(thebits : TBits_1); inline;
  66133. begin
  66134. if thebits = 0 then
  66135. pTDefRegMap(@Self)^.clr := $00000008
  66136. else
  66137. pTDefRegMap(@Self)^.&set := $00000008;
  66138. end;
  66139. function TUSB_U1IE.getTRNIE : TBits_1; inline;
  66140. begin
  66141. getTRNIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66142. end;
  66143. procedure TUSB_U1IE.setIDLEIE; inline;
  66144. begin
  66145. pTDefRegMap(@Self)^.&set := $00000010;
  66146. end;
  66147. procedure TUSB_U1IE.clearIDLEIE; inline;
  66148. begin
  66149. pTDefRegMap(@Self)^.clr := $00000010;
  66150. end;
  66151. procedure TUSB_U1IE.setIDLEIE(thebits : TBits_1); inline;
  66152. begin
  66153. if thebits = 0 then
  66154. pTDefRegMap(@Self)^.clr := $00000010
  66155. else
  66156. pTDefRegMap(@Self)^.&set := $00000010;
  66157. end;
  66158. function TUSB_U1IE.getIDLEIE : TBits_1; inline;
  66159. begin
  66160. getIDLEIE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66161. end;
  66162. procedure TUSB_U1IE.setRESUMEIE; inline;
  66163. begin
  66164. pTDefRegMap(@Self)^.&set := $00000020;
  66165. end;
  66166. procedure TUSB_U1IE.clearRESUMEIE; inline;
  66167. begin
  66168. pTDefRegMap(@Self)^.clr := $00000020;
  66169. end;
  66170. procedure TUSB_U1IE.setRESUMEIE(thebits : TBits_1); inline;
  66171. begin
  66172. if thebits = 0 then
  66173. pTDefRegMap(@Self)^.clr := $00000020
  66174. else
  66175. pTDefRegMap(@Self)^.&set := $00000020;
  66176. end;
  66177. function TUSB_U1IE.getRESUMEIE : TBits_1; inline;
  66178. begin
  66179. getRESUMEIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66180. end;
  66181. procedure TUSB_U1IE.setATTACHIE; inline;
  66182. begin
  66183. pTDefRegMap(@Self)^.&set := $00000040;
  66184. end;
  66185. procedure TUSB_U1IE.clearATTACHIE; inline;
  66186. begin
  66187. pTDefRegMap(@Self)^.clr := $00000040;
  66188. end;
  66189. procedure TUSB_U1IE.setATTACHIE(thebits : TBits_1); inline;
  66190. begin
  66191. if thebits = 0 then
  66192. pTDefRegMap(@Self)^.clr := $00000040
  66193. else
  66194. pTDefRegMap(@Self)^.&set := $00000040;
  66195. end;
  66196. function TUSB_U1IE.getATTACHIE : TBits_1; inline;
  66197. begin
  66198. getATTACHIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66199. end;
  66200. procedure TUSB_U1IE.setSTALLIE; inline;
  66201. begin
  66202. pTDefRegMap(@Self)^.&set := $00000080;
  66203. end;
  66204. procedure TUSB_U1IE.clearSTALLIE; inline;
  66205. begin
  66206. pTDefRegMap(@Self)^.clr := $00000080;
  66207. end;
  66208. procedure TUSB_U1IE.setSTALLIE(thebits : TBits_1); inline;
  66209. begin
  66210. if thebits = 0 then
  66211. pTDefRegMap(@Self)^.clr := $00000080
  66212. else
  66213. pTDefRegMap(@Self)^.&set := $00000080;
  66214. end;
  66215. function TUSB_U1IE.getSTALLIE : TBits_1; inline;
  66216. begin
  66217. getSTALLIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66218. end;
  66219. procedure TUSB_U1IE.setDETACHIE; inline;
  66220. begin
  66221. pTDefRegMap(@Self)^.&set := $00000001;
  66222. end;
  66223. procedure TUSB_U1IE.clearDETACHIE; inline;
  66224. begin
  66225. pTDefRegMap(@Self)^.clr := $00000001;
  66226. end;
  66227. procedure TUSB_U1IE.setDETACHIE(thebits : TBits_1); inline;
  66228. begin
  66229. if thebits = 0 then
  66230. pTDefRegMap(@Self)^.clr := $00000001
  66231. else
  66232. pTDefRegMap(@Self)^.&set := $00000001;
  66233. end;
  66234. function TUSB_U1IE.getDETACHIE : TBits_1; inline;
  66235. begin
  66236. getDETACHIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66237. end;
  66238. procedure TUSB_U1IE.setURSTIE; inline;
  66239. begin
  66240. pTDefRegMap(@Self)^.&set := $00000001;
  66241. end;
  66242. procedure TUSB_U1IE.clearURSTIE; inline;
  66243. begin
  66244. pTDefRegMap(@Self)^.clr := $00000001;
  66245. end;
  66246. procedure TUSB_U1IE.setURSTIE(thebits : TBits_1); inline;
  66247. begin
  66248. if thebits = 0 then
  66249. pTDefRegMap(@Self)^.clr := $00000001
  66250. else
  66251. pTDefRegMap(@Self)^.&set := $00000001;
  66252. end;
  66253. function TUSB_U1IE.getURSTIE : TBits_1; inline;
  66254. begin
  66255. getURSTIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66256. end;
  66257. procedure TUSB_U1EIR.setPIDEF; inline;
  66258. begin
  66259. pTDefRegMap(@Self)^.&set := $00000001;
  66260. end;
  66261. procedure TUSB_U1EIR.clearPIDEF; inline;
  66262. begin
  66263. pTDefRegMap(@Self)^.clr := $00000001;
  66264. end;
  66265. procedure TUSB_U1EIR.setPIDEF(thebits : TBits_1); inline;
  66266. begin
  66267. if thebits = 0 then
  66268. pTDefRegMap(@Self)^.clr := $00000001
  66269. else
  66270. pTDefRegMap(@Self)^.&set := $00000001;
  66271. end;
  66272. function TUSB_U1EIR.getPIDEF : TBits_1; inline;
  66273. begin
  66274. getPIDEF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66275. end;
  66276. procedure TUSB_U1EIR.setCRC5EF_EOFEF; inline;
  66277. begin
  66278. pTDefRegMap(@Self)^.&set := $00000002;
  66279. end;
  66280. procedure TUSB_U1EIR.clearCRC5EF_EOFEF; inline;
  66281. begin
  66282. pTDefRegMap(@Self)^.clr := $00000002;
  66283. end;
  66284. procedure TUSB_U1EIR.setCRC5EF_EOFEF(thebits : TBits_1); inline;
  66285. begin
  66286. if thebits = 0 then
  66287. pTDefRegMap(@Self)^.clr := $00000002
  66288. else
  66289. pTDefRegMap(@Self)^.&set := $00000002;
  66290. end;
  66291. function TUSB_U1EIR.getCRC5EF_EOFEF : TBits_1; inline;
  66292. begin
  66293. getCRC5EF_EOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66294. end;
  66295. procedure TUSB_U1EIR.setCRC16EF; inline;
  66296. begin
  66297. pTDefRegMap(@Self)^.&set := $00000004;
  66298. end;
  66299. procedure TUSB_U1EIR.clearCRC16EF; inline;
  66300. begin
  66301. pTDefRegMap(@Self)^.clr := $00000004;
  66302. end;
  66303. procedure TUSB_U1EIR.setCRC16EF(thebits : TBits_1); inline;
  66304. begin
  66305. if thebits = 0 then
  66306. pTDefRegMap(@Self)^.clr := $00000004
  66307. else
  66308. pTDefRegMap(@Self)^.&set := $00000004;
  66309. end;
  66310. function TUSB_U1EIR.getCRC16EF : TBits_1; inline;
  66311. begin
  66312. getCRC16EF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66313. end;
  66314. procedure TUSB_U1EIR.setDFN8EF; inline;
  66315. begin
  66316. pTDefRegMap(@Self)^.&set := $00000008;
  66317. end;
  66318. procedure TUSB_U1EIR.clearDFN8EF; inline;
  66319. begin
  66320. pTDefRegMap(@Self)^.clr := $00000008;
  66321. end;
  66322. procedure TUSB_U1EIR.setDFN8EF(thebits : TBits_1); inline;
  66323. begin
  66324. if thebits = 0 then
  66325. pTDefRegMap(@Self)^.clr := $00000008
  66326. else
  66327. pTDefRegMap(@Self)^.&set := $00000008;
  66328. end;
  66329. function TUSB_U1EIR.getDFN8EF : TBits_1; inline;
  66330. begin
  66331. getDFN8EF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66332. end;
  66333. procedure TUSB_U1EIR.setBTOEF; inline;
  66334. begin
  66335. pTDefRegMap(@Self)^.&set := $00000010;
  66336. end;
  66337. procedure TUSB_U1EIR.clearBTOEF; inline;
  66338. begin
  66339. pTDefRegMap(@Self)^.clr := $00000010;
  66340. end;
  66341. procedure TUSB_U1EIR.setBTOEF(thebits : TBits_1); inline;
  66342. begin
  66343. if thebits = 0 then
  66344. pTDefRegMap(@Self)^.clr := $00000010
  66345. else
  66346. pTDefRegMap(@Self)^.&set := $00000010;
  66347. end;
  66348. function TUSB_U1EIR.getBTOEF : TBits_1; inline;
  66349. begin
  66350. getBTOEF := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66351. end;
  66352. procedure TUSB_U1EIR.setDMAEF; inline;
  66353. begin
  66354. pTDefRegMap(@Self)^.&set := $00000020;
  66355. end;
  66356. procedure TUSB_U1EIR.clearDMAEF; inline;
  66357. begin
  66358. pTDefRegMap(@Self)^.clr := $00000020;
  66359. end;
  66360. procedure TUSB_U1EIR.setDMAEF(thebits : TBits_1); inline;
  66361. begin
  66362. if thebits = 0 then
  66363. pTDefRegMap(@Self)^.clr := $00000020
  66364. else
  66365. pTDefRegMap(@Self)^.&set := $00000020;
  66366. end;
  66367. function TUSB_U1EIR.getDMAEF : TBits_1; inline;
  66368. begin
  66369. getDMAEF := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66370. end;
  66371. procedure TUSB_U1EIR.setBMXEF; inline;
  66372. begin
  66373. pTDefRegMap(@Self)^.&set := $00000040;
  66374. end;
  66375. procedure TUSB_U1EIR.clearBMXEF; inline;
  66376. begin
  66377. pTDefRegMap(@Self)^.clr := $00000040;
  66378. end;
  66379. procedure TUSB_U1EIR.setBMXEF(thebits : TBits_1); inline;
  66380. begin
  66381. if thebits = 0 then
  66382. pTDefRegMap(@Self)^.clr := $00000040
  66383. else
  66384. pTDefRegMap(@Self)^.&set := $00000040;
  66385. end;
  66386. function TUSB_U1EIR.getBMXEF : TBits_1; inline;
  66387. begin
  66388. getBMXEF := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66389. end;
  66390. procedure TUSB_U1EIR.setBTSEF; inline;
  66391. begin
  66392. pTDefRegMap(@Self)^.&set := $00000080;
  66393. end;
  66394. procedure TUSB_U1EIR.clearBTSEF; inline;
  66395. begin
  66396. pTDefRegMap(@Self)^.clr := $00000080;
  66397. end;
  66398. procedure TUSB_U1EIR.setBTSEF(thebits : TBits_1); inline;
  66399. begin
  66400. if thebits = 0 then
  66401. pTDefRegMap(@Self)^.clr := $00000080
  66402. else
  66403. pTDefRegMap(@Self)^.&set := $00000080;
  66404. end;
  66405. function TUSB_U1EIR.getBTSEF : TBits_1; inline;
  66406. begin
  66407. getBTSEF := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66408. end;
  66409. procedure TUSB_U1EIR.setCRC5EF; inline;
  66410. begin
  66411. pTDefRegMap(@Self)^.&set := $00000002;
  66412. end;
  66413. procedure TUSB_U1EIR.clearCRC5EF; inline;
  66414. begin
  66415. pTDefRegMap(@Self)^.clr := $00000002;
  66416. end;
  66417. procedure TUSB_U1EIR.setCRC5EF(thebits : TBits_1); inline;
  66418. begin
  66419. if thebits = 0 then
  66420. pTDefRegMap(@Self)^.clr := $00000002
  66421. else
  66422. pTDefRegMap(@Self)^.&set := $00000002;
  66423. end;
  66424. function TUSB_U1EIR.getCRC5EF : TBits_1; inline;
  66425. begin
  66426. getCRC5EF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66427. end;
  66428. procedure TUSB_U1EIR.setEOFEF; inline;
  66429. begin
  66430. pTDefRegMap(@Self)^.&set := $00000002;
  66431. end;
  66432. procedure TUSB_U1EIR.clearEOFEF; inline;
  66433. begin
  66434. pTDefRegMap(@Self)^.clr := $00000002;
  66435. end;
  66436. procedure TUSB_U1EIR.setEOFEF(thebits : TBits_1); inline;
  66437. begin
  66438. if thebits = 0 then
  66439. pTDefRegMap(@Self)^.clr := $00000002
  66440. else
  66441. pTDefRegMap(@Self)^.&set := $00000002;
  66442. end;
  66443. function TUSB_U1EIR.getEOFEF : TBits_1; inline;
  66444. begin
  66445. getEOFEF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66446. end;
  66447. procedure TUSB_U1EIE.setPIDEE; inline;
  66448. begin
  66449. pTDefRegMap(@Self)^.&set := $00000001;
  66450. end;
  66451. procedure TUSB_U1EIE.clearPIDEE; inline;
  66452. begin
  66453. pTDefRegMap(@Self)^.clr := $00000001;
  66454. end;
  66455. procedure TUSB_U1EIE.setPIDEE(thebits : TBits_1); inline;
  66456. begin
  66457. if thebits = 0 then
  66458. pTDefRegMap(@Self)^.clr := $00000001
  66459. else
  66460. pTDefRegMap(@Self)^.&set := $00000001;
  66461. end;
  66462. function TUSB_U1EIE.getPIDEE : TBits_1; inline;
  66463. begin
  66464. getPIDEE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66465. end;
  66466. procedure TUSB_U1EIE.setCRC5EE_EOFEE; inline;
  66467. begin
  66468. pTDefRegMap(@Self)^.&set := $00000002;
  66469. end;
  66470. procedure TUSB_U1EIE.clearCRC5EE_EOFEE; inline;
  66471. begin
  66472. pTDefRegMap(@Self)^.clr := $00000002;
  66473. end;
  66474. procedure TUSB_U1EIE.setCRC5EE_EOFEE(thebits : TBits_1); inline;
  66475. begin
  66476. if thebits = 0 then
  66477. pTDefRegMap(@Self)^.clr := $00000002
  66478. else
  66479. pTDefRegMap(@Self)^.&set := $00000002;
  66480. end;
  66481. function TUSB_U1EIE.getCRC5EE_EOFEE : TBits_1; inline;
  66482. begin
  66483. getCRC5EE_EOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66484. end;
  66485. procedure TUSB_U1EIE.setCRC16EE; inline;
  66486. begin
  66487. pTDefRegMap(@Self)^.&set := $00000004;
  66488. end;
  66489. procedure TUSB_U1EIE.clearCRC16EE; inline;
  66490. begin
  66491. pTDefRegMap(@Self)^.clr := $00000004;
  66492. end;
  66493. procedure TUSB_U1EIE.setCRC16EE(thebits : TBits_1); inline;
  66494. begin
  66495. if thebits = 0 then
  66496. pTDefRegMap(@Self)^.clr := $00000004
  66497. else
  66498. pTDefRegMap(@Self)^.&set := $00000004;
  66499. end;
  66500. function TUSB_U1EIE.getCRC16EE : TBits_1; inline;
  66501. begin
  66502. getCRC16EE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66503. end;
  66504. procedure TUSB_U1EIE.setDFN8EE; inline;
  66505. begin
  66506. pTDefRegMap(@Self)^.&set := $00000008;
  66507. end;
  66508. procedure TUSB_U1EIE.clearDFN8EE; inline;
  66509. begin
  66510. pTDefRegMap(@Self)^.clr := $00000008;
  66511. end;
  66512. procedure TUSB_U1EIE.setDFN8EE(thebits : TBits_1); inline;
  66513. begin
  66514. if thebits = 0 then
  66515. pTDefRegMap(@Self)^.clr := $00000008
  66516. else
  66517. pTDefRegMap(@Self)^.&set := $00000008;
  66518. end;
  66519. function TUSB_U1EIE.getDFN8EE : TBits_1; inline;
  66520. begin
  66521. getDFN8EE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66522. end;
  66523. procedure TUSB_U1EIE.setBTOEE; inline;
  66524. begin
  66525. pTDefRegMap(@Self)^.&set := $00000010;
  66526. end;
  66527. procedure TUSB_U1EIE.clearBTOEE; inline;
  66528. begin
  66529. pTDefRegMap(@Self)^.clr := $00000010;
  66530. end;
  66531. procedure TUSB_U1EIE.setBTOEE(thebits : TBits_1); inline;
  66532. begin
  66533. if thebits = 0 then
  66534. pTDefRegMap(@Self)^.clr := $00000010
  66535. else
  66536. pTDefRegMap(@Self)^.&set := $00000010;
  66537. end;
  66538. function TUSB_U1EIE.getBTOEE : TBits_1; inline;
  66539. begin
  66540. getBTOEE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66541. end;
  66542. procedure TUSB_U1EIE.setDMAEE; inline;
  66543. begin
  66544. pTDefRegMap(@Self)^.&set := $00000020;
  66545. end;
  66546. procedure TUSB_U1EIE.clearDMAEE; inline;
  66547. begin
  66548. pTDefRegMap(@Self)^.clr := $00000020;
  66549. end;
  66550. procedure TUSB_U1EIE.setDMAEE(thebits : TBits_1); inline;
  66551. begin
  66552. if thebits = 0 then
  66553. pTDefRegMap(@Self)^.clr := $00000020
  66554. else
  66555. pTDefRegMap(@Self)^.&set := $00000020;
  66556. end;
  66557. function TUSB_U1EIE.getDMAEE : TBits_1; inline;
  66558. begin
  66559. getDMAEE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66560. end;
  66561. procedure TUSB_U1EIE.setBMXEE; inline;
  66562. begin
  66563. pTDefRegMap(@Self)^.&set := $00000040;
  66564. end;
  66565. procedure TUSB_U1EIE.clearBMXEE; inline;
  66566. begin
  66567. pTDefRegMap(@Self)^.clr := $00000040;
  66568. end;
  66569. procedure TUSB_U1EIE.setBMXEE(thebits : TBits_1); inline;
  66570. begin
  66571. if thebits = 0 then
  66572. pTDefRegMap(@Self)^.clr := $00000040
  66573. else
  66574. pTDefRegMap(@Self)^.&set := $00000040;
  66575. end;
  66576. function TUSB_U1EIE.getBMXEE : TBits_1; inline;
  66577. begin
  66578. getBMXEE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66579. end;
  66580. procedure TUSB_U1EIE.setBTSEE; inline;
  66581. begin
  66582. pTDefRegMap(@Self)^.&set := $00000080;
  66583. end;
  66584. procedure TUSB_U1EIE.clearBTSEE; inline;
  66585. begin
  66586. pTDefRegMap(@Self)^.clr := $00000080;
  66587. end;
  66588. procedure TUSB_U1EIE.setBTSEE(thebits : TBits_1); inline;
  66589. begin
  66590. if thebits = 0 then
  66591. pTDefRegMap(@Self)^.clr := $00000080
  66592. else
  66593. pTDefRegMap(@Self)^.&set := $00000080;
  66594. end;
  66595. function TUSB_U1EIE.getBTSEE : TBits_1; inline;
  66596. begin
  66597. getBTSEE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66598. end;
  66599. procedure TUSB_U1EIE.setCRC5EE; inline;
  66600. begin
  66601. pTDefRegMap(@Self)^.&set := $00000002;
  66602. end;
  66603. procedure TUSB_U1EIE.clearCRC5EE; inline;
  66604. begin
  66605. pTDefRegMap(@Self)^.clr := $00000002;
  66606. end;
  66607. procedure TUSB_U1EIE.setCRC5EE(thebits : TBits_1); inline;
  66608. begin
  66609. if thebits = 0 then
  66610. pTDefRegMap(@Self)^.clr := $00000002
  66611. else
  66612. pTDefRegMap(@Self)^.&set := $00000002;
  66613. end;
  66614. function TUSB_U1EIE.getCRC5EE : TBits_1; inline;
  66615. begin
  66616. getCRC5EE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66617. end;
  66618. procedure TUSB_U1EIE.setEOFEE; inline;
  66619. begin
  66620. pTDefRegMap(@Self)^.&set := $00000002;
  66621. end;
  66622. procedure TUSB_U1EIE.clearEOFEE; inline;
  66623. begin
  66624. pTDefRegMap(@Self)^.clr := $00000002;
  66625. end;
  66626. procedure TUSB_U1EIE.setEOFEE(thebits : TBits_1); inline;
  66627. begin
  66628. if thebits = 0 then
  66629. pTDefRegMap(@Self)^.clr := $00000002
  66630. else
  66631. pTDefRegMap(@Self)^.&set := $00000002;
  66632. end;
  66633. function TUSB_U1EIE.getEOFEE : TBits_1; inline;
  66634. begin
  66635. getEOFEE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66636. end;
  66637. procedure TUSB_U1STAT.setPPBI; inline;
  66638. begin
  66639. pTDefRegMap(@Self)^.&set := $00000004;
  66640. end;
  66641. procedure TUSB_U1STAT.clearPPBI; inline;
  66642. begin
  66643. pTDefRegMap(@Self)^.clr := $00000004;
  66644. end;
  66645. procedure TUSB_U1STAT.setPPBI(thebits : TBits_1); inline;
  66646. begin
  66647. if thebits = 0 then
  66648. pTDefRegMap(@Self)^.clr := $00000004
  66649. else
  66650. pTDefRegMap(@Self)^.&set := $00000004;
  66651. end;
  66652. function TUSB_U1STAT.getPPBI : TBits_1; inline;
  66653. begin
  66654. getPPBI := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66655. end;
  66656. procedure TUSB_U1STAT.setDIR; inline;
  66657. begin
  66658. pTDefRegMap(@Self)^.&set := $00000008;
  66659. end;
  66660. procedure TUSB_U1STAT.clearDIR; inline;
  66661. begin
  66662. pTDefRegMap(@Self)^.clr := $00000008;
  66663. end;
  66664. procedure TUSB_U1STAT.setDIR(thebits : TBits_1); inline;
  66665. begin
  66666. if thebits = 0 then
  66667. pTDefRegMap(@Self)^.clr := $00000008
  66668. else
  66669. pTDefRegMap(@Self)^.&set := $00000008;
  66670. end;
  66671. function TUSB_U1STAT.getDIR : TBits_1; inline;
  66672. begin
  66673. getDIR := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66674. end;
  66675. procedure TUSB_U1STAT.setENDPT(thebits : TBits_4); inline;
  66676. begin
  66677. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  66678. end;
  66679. function TUSB_U1STAT.getENDPT : TBits_4; inline;
  66680. begin
  66681. getENDPT := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  66682. end;
  66683. procedure TUSB_U1STAT.setENDPT0; inline;
  66684. begin
  66685. pTDefRegMap(@Self)^.&set := $00000010;
  66686. end;
  66687. procedure TUSB_U1STAT.clearENDPT0; inline;
  66688. begin
  66689. pTDefRegMap(@Self)^.clr := $00000010;
  66690. end;
  66691. procedure TUSB_U1STAT.setENDPT0(thebits : TBits_1); inline;
  66692. begin
  66693. if thebits = 0 then
  66694. pTDefRegMap(@Self)^.clr := $00000010
  66695. else
  66696. pTDefRegMap(@Self)^.&set := $00000010;
  66697. end;
  66698. function TUSB_U1STAT.getENDPT0 : TBits_1; inline;
  66699. begin
  66700. getENDPT0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66701. end;
  66702. procedure TUSB_U1STAT.setENDPT1; inline;
  66703. begin
  66704. pTDefRegMap(@Self)^.&set := $00000020;
  66705. end;
  66706. procedure TUSB_U1STAT.clearENDPT1; inline;
  66707. begin
  66708. pTDefRegMap(@Self)^.clr := $00000020;
  66709. end;
  66710. procedure TUSB_U1STAT.setENDPT1(thebits : TBits_1); inline;
  66711. begin
  66712. if thebits = 0 then
  66713. pTDefRegMap(@Self)^.clr := $00000020
  66714. else
  66715. pTDefRegMap(@Self)^.&set := $00000020;
  66716. end;
  66717. function TUSB_U1STAT.getENDPT1 : TBits_1; inline;
  66718. begin
  66719. getENDPT1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66720. end;
  66721. procedure TUSB_U1STAT.setENDPT2; inline;
  66722. begin
  66723. pTDefRegMap(@Self)^.&set := $00000040;
  66724. end;
  66725. procedure TUSB_U1STAT.clearENDPT2; inline;
  66726. begin
  66727. pTDefRegMap(@Self)^.clr := $00000040;
  66728. end;
  66729. procedure TUSB_U1STAT.setENDPT2(thebits : TBits_1); inline;
  66730. begin
  66731. if thebits = 0 then
  66732. pTDefRegMap(@Self)^.clr := $00000040
  66733. else
  66734. pTDefRegMap(@Self)^.&set := $00000040;
  66735. end;
  66736. function TUSB_U1STAT.getENDPT2 : TBits_1; inline;
  66737. begin
  66738. getENDPT2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66739. end;
  66740. procedure TUSB_U1STAT.setENDPT3; inline;
  66741. begin
  66742. pTDefRegMap(@Self)^.&set := $00000080;
  66743. end;
  66744. procedure TUSB_U1STAT.clearENDPT3; inline;
  66745. begin
  66746. pTDefRegMap(@Self)^.clr := $00000080;
  66747. end;
  66748. procedure TUSB_U1STAT.setENDPT3(thebits : TBits_1); inline;
  66749. begin
  66750. if thebits = 0 then
  66751. pTDefRegMap(@Self)^.clr := $00000080
  66752. else
  66753. pTDefRegMap(@Self)^.&set := $00000080;
  66754. end;
  66755. function TUSB_U1STAT.getENDPT3 : TBits_1; inline;
  66756. begin
  66757. getENDPT3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66758. end;
  66759. procedure TUSB_U1CON.setUSBEN_SOFEN; inline;
  66760. begin
  66761. pTDefRegMap(@Self)^.&set := $00000001;
  66762. end;
  66763. procedure TUSB_U1CON.clearUSBEN_SOFEN; inline;
  66764. begin
  66765. pTDefRegMap(@Self)^.clr := $00000001;
  66766. end;
  66767. procedure TUSB_U1CON.setUSBEN_SOFEN(thebits : TBits_1); inline;
  66768. begin
  66769. if thebits = 0 then
  66770. pTDefRegMap(@Self)^.clr := $00000001
  66771. else
  66772. pTDefRegMap(@Self)^.&set := $00000001;
  66773. end;
  66774. function TUSB_U1CON.getUSBEN_SOFEN : TBits_1; inline;
  66775. begin
  66776. getUSBEN_SOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66777. end;
  66778. procedure TUSB_U1CON.setPPBRST; inline;
  66779. begin
  66780. pTDefRegMap(@Self)^.&set := $00000002;
  66781. end;
  66782. procedure TUSB_U1CON.clearPPBRST; inline;
  66783. begin
  66784. pTDefRegMap(@Self)^.clr := $00000002;
  66785. end;
  66786. procedure TUSB_U1CON.setPPBRST(thebits : TBits_1); inline;
  66787. begin
  66788. if thebits = 0 then
  66789. pTDefRegMap(@Self)^.clr := $00000002
  66790. else
  66791. pTDefRegMap(@Self)^.&set := $00000002;
  66792. end;
  66793. function TUSB_U1CON.getPPBRST : TBits_1; inline;
  66794. begin
  66795. getPPBRST := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  66796. end;
  66797. procedure TUSB_U1CON.setRESUME; inline;
  66798. begin
  66799. pTDefRegMap(@Self)^.&set := $00000004;
  66800. end;
  66801. procedure TUSB_U1CON.clearRESUME; inline;
  66802. begin
  66803. pTDefRegMap(@Self)^.clr := $00000004;
  66804. end;
  66805. procedure TUSB_U1CON.setRESUME(thebits : TBits_1); inline;
  66806. begin
  66807. if thebits = 0 then
  66808. pTDefRegMap(@Self)^.clr := $00000004
  66809. else
  66810. pTDefRegMap(@Self)^.&set := $00000004;
  66811. end;
  66812. function TUSB_U1CON.getRESUME : TBits_1; inline;
  66813. begin
  66814. getRESUME := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  66815. end;
  66816. procedure TUSB_U1CON.setHOSTEN; inline;
  66817. begin
  66818. pTDefRegMap(@Self)^.&set := $00000008;
  66819. end;
  66820. procedure TUSB_U1CON.clearHOSTEN; inline;
  66821. begin
  66822. pTDefRegMap(@Self)^.clr := $00000008;
  66823. end;
  66824. procedure TUSB_U1CON.setHOSTEN(thebits : TBits_1); inline;
  66825. begin
  66826. if thebits = 0 then
  66827. pTDefRegMap(@Self)^.clr := $00000008
  66828. else
  66829. pTDefRegMap(@Self)^.&set := $00000008;
  66830. end;
  66831. function TUSB_U1CON.getHOSTEN : TBits_1; inline;
  66832. begin
  66833. getHOSTEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  66834. end;
  66835. procedure TUSB_U1CON.setUSBRST; inline;
  66836. begin
  66837. pTDefRegMap(@Self)^.&set := $00000010;
  66838. end;
  66839. procedure TUSB_U1CON.clearUSBRST; inline;
  66840. begin
  66841. pTDefRegMap(@Self)^.clr := $00000010;
  66842. end;
  66843. procedure TUSB_U1CON.setUSBRST(thebits : TBits_1); inline;
  66844. begin
  66845. if thebits = 0 then
  66846. pTDefRegMap(@Self)^.clr := $00000010
  66847. else
  66848. pTDefRegMap(@Self)^.&set := $00000010;
  66849. end;
  66850. function TUSB_U1CON.getUSBRST : TBits_1; inline;
  66851. begin
  66852. getUSBRST := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  66853. end;
  66854. procedure TUSB_U1CON.setPKTDIS_TOKBUSY; inline;
  66855. begin
  66856. pTDefRegMap(@Self)^.&set := $00000020;
  66857. end;
  66858. procedure TUSB_U1CON.clearPKTDIS_TOKBUSY; inline;
  66859. begin
  66860. pTDefRegMap(@Self)^.clr := $00000020;
  66861. end;
  66862. procedure TUSB_U1CON.setPKTDIS_TOKBUSY(thebits : TBits_1); inline;
  66863. begin
  66864. if thebits = 0 then
  66865. pTDefRegMap(@Self)^.clr := $00000020
  66866. else
  66867. pTDefRegMap(@Self)^.&set := $00000020;
  66868. end;
  66869. function TUSB_U1CON.getPKTDIS_TOKBUSY : TBits_1; inline;
  66870. begin
  66871. getPKTDIS_TOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66872. end;
  66873. procedure TUSB_U1CON.setSE0; inline;
  66874. begin
  66875. pTDefRegMap(@Self)^.&set := $00000040;
  66876. end;
  66877. procedure TUSB_U1CON.clearSE0; inline;
  66878. begin
  66879. pTDefRegMap(@Self)^.clr := $00000040;
  66880. end;
  66881. procedure TUSB_U1CON.setSE0(thebits : TBits_1); inline;
  66882. begin
  66883. if thebits = 0 then
  66884. pTDefRegMap(@Self)^.clr := $00000040
  66885. else
  66886. pTDefRegMap(@Self)^.&set := $00000040;
  66887. end;
  66888. function TUSB_U1CON.getSE0 : TBits_1; inline;
  66889. begin
  66890. getSE0 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  66891. end;
  66892. procedure TUSB_U1CON.setJSTATE; inline;
  66893. begin
  66894. pTDefRegMap(@Self)^.&set := $00000080;
  66895. end;
  66896. procedure TUSB_U1CON.clearJSTATE; inline;
  66897. begin
  66898. pTDefRegMap(@Self)^.clr := $00000080;
  66899. end;
  66900. procedure TUSB_U1CON.setJSTATE(thebits : TBits_1); inline;
  66901. begin
  66902. if thebits = 0 then
  66903. pTDefRegMap(@Self)^.clr := $00000080
  66904. else
  66905. pTDefRegMap(@Self)^.&set := $00000080;
  66906. end;
  66907. function TUSB_U1CON.getJSTATE : TBits_1; inline;
  66908. begin
  66909. getJSTATE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  66910. end;
  66911. procedure TUSB_U1CON.setUSBEN; inline;
  66912. begin
  66913. pTDefRegMap(@Self)^.&set := $00000001;
  66914. end;
  66915. procedure TUSB_U1CON.clearUSBEN; inline;
  66916. begin
  66917. pTDefRegMap(@Self)^.clr := $00000001;
  66918. end;
  66919. procedure TUSB_U1CON.setUSBEN(thebits : TBits_1); inline;
  66920. begin
  66921. if thebits = 0 then
  66922. pTDefRegMap(@Self)^.clr := $00000001
  66923. else
  66924. pTDefRegMap(@Self)^.&set := $00000001;
  66925. end;
  66926. function TUSB_U1CON.getUSBEN : TBits_1; inline;
  66927. begin
  66928. getUSBEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66929. end;
  66930. procedure TUSB_U1CON.setSOFEN; inline;
  66931. begin
  66932. pTDefRegMap(@Self)^.&set := $00000001;
  66933. end;
  66934. procedure TUSB_U1CON.clearSOFEN; inline;
  66935. begin
  66936. pTDefRegMap(@Self)^.clr := $00000001;
  66937. end;
  66938. procedure TUSB_U1CON.setSOFEN(thebits : TBits_1); inline;
  66939. begin
  66940. if thebits = 0 then
  66941. pTDefRegMap(@Self)^.clr := $00000001
  66942. else
  66943. pTDefRegMap(@Self)^.&set := $00000001;
  66944. end;
  66945. function TUSB_U1CON.getSOFEN : TBits_1; inline;
  66946. begin
  66947. getSOFEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  66948. end;
  66949. procedure TUSB_U1CON.setPKTDIS; inline;
  66950. begin
  66951. pTDefRegMap(@Self)^.&set := $00000020;
  66952. end;
  66953. procedure TUSB_U1CON.clearPKTDIS; inline;
  66954. begin
  66955. pTDefRegMap(@Self)^.clr := $00000020;
  66956. end;
  66957. procedure TUSB_U1CON.setPKTDIS(thebits : TBits_1); inline;
  66958. begin
  66959. if thebits = 0 then
  66960. pTDefRegMap(@Self)^.clr := $00000020
  66961. else
  66962. pTDefRegMap(@Self)^.&set := $00000020;
  66963. end;
  66964. function TUSB_U1CON.getPKTDIS : TBits_1; inline;
  66965. begin
  66966. getPKTDIS := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66967. end;
  66968. procedure TUSB_U1CON.setTOKBUSY; inline;
  66969. begin
  66970. pTDefRegMap(@Self)^.&set := $00000020;
  66971. end;
  66972. procedure TUSB_U1CON.clearTOKBUSY; inline;
  66973. begin
  66974. pTDefRegMap(@Self)^.clr := $00000020;
  66975. end;
  66976. procedure TUSB_U1CON.setTOKBUSY(thebits : TBits_1); inline;
  66977. begin
  66978. if thebits = 0 then
  66979. pTDefRegMap(@Self)^.clr := $00000020
  66980. else
  66981. pTDefRegMap(@Self)^.&set := $00000020;
  66982. end;
  66983. function TUSB_U1CON.getTOKBUSY : TBits_1; inline;
  66984. begin
  66985. getTOKBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  66986. end;
  66987. procedure TUSB_U1ADDR.setDEVADDR(thebits : TBits_7); inline;
  66988. begin
  66989. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  66990. end;
  66991. function TUSB_U1ADDR.getDEVADDR : TBits_7; inline;
  66992. begin
  66993. getDEVADDR := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  66994. end;
  66995. procedure TUSB_U1ADDR.setLSPDEN; inline;
  66996. begin
  66997. pTDefRegMap(@Self)^.&set := $00000080;
  66998. end;
  66999. procedure TUSB_U1ADDR.clearLSPDEN; inline;
  67000. begin
  67001. pTDefRegMap(@Self)^.clr := $00000080;
  67002. end;
  67003. procedure TUSB_U1ADDR.setLSPDEN(thebits : TBits_1); inline;
  67004. begin
  67005. if thebits = 0 then
  67006. pTDefRegMap(@Self)^.clr := $00000080
  67007. else
  67008. pTDefRegMap(@Self)^.&set := $00000080;
  67009. end;
  67010. function TUSB_U1ADDR.getLSPDEN : TBits_1; inline;
  67011. begin
  67012. getLSPDEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67013. end;
  67014. procedure TUSB_U1ADDR.setDEVADDR0; inline;
  67015. begin
  67016. pTDefRegMap(@Self)^.&set := $00000001;
  67017. end;
  67018. procedure TUSB_U1ADDR.clearDEVADDR0; inline;
  67019. begin
  67020. pTDefRegMap(@Self)^.clr := $00000001;
  67021. end;
  67022. procedure TUSB_U1ADDR.setDEVADDR0(thebits : TBits_1); inline;
  67023. begin
  67024. if thebits = 0 then
  67025. pTDefRegMap(@Self)^.clr := $00000001
  67026. else
  67027. pTDefRegMap(@Self)^.&set := $00000001;
  67028. end;
  67029. function TUSB_U1ADDR.getDEVADDR0 : TBits_1; inline;
  67030. begin
  67031. getDEVADDR0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67032. end;
  67033. procedure TUSB_U1ADDR.setDEVADDR1; inline;
  67034. begin
  67035. pTDefRegMap(@Self)^.&set := $00000002;
  67036. end;
  67037. procedure TUSB_U1ADDR.clearDEVADDR1; inline;
  67038. begin
  67039. pTDefRegMap(@Self)^.clr := $00000002;
  67040. end;
  67041. procedure TUSB_U1ADDR.setDEVADDR1(thebits : TBits_1); inline;
  67042. begin
  67043. if thebits = 0 then
  67044. pTDefRegMap(@Self)^.clr := $00000002
  67045. else
  67046. pTDefRegMap(@Self)^.&set := $00000002;
  67047. end;
  67048. function TUSB_U1ADDR.getDEVADDR1 : TBits_1; inline;
  67049. begin
  67050. getDEVADDR1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67051. end;
  67052. procedure TUSB_U1ADDR.setDEVADDR2; inline;
  67053. begin
  67054. pTDefRegMap(@Self)^.&set := $00000004;
  67055. end;
  67056. procedure TUSB_U1ADDR.clearDEVADDR2; inline;
  67057. begin
  67058. pTDefRegMap(@Self)^.clr := $00000004;
  67059. end;
  67060. procedure TUSB_U1ADDR.setDEVADDR2(thebits : TBits_1); inline;
  67061. begin
  67062. if thebits = 0 then
  67063. pTDefRegMap(@Self)^.clr := $00000004
  67064. else
  67065. pTDefRegMap(@Self)^.&set := $00000004;
  67066. end;
  67067. function TUSB_U1ADDR.getDEVADDR2 : TBits_1; inline;
  67068. begin
  67069. getDEVADDR2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67070. end;
  67071. procedure TUSB_U1ADDR.setDEVADDR3; inline;
  67072. begin
  67073. pTDefRegMap(@Self)^.&set := $00000008;
  67074. end;
  67075. procedure TUSB_U1ADDR.clearDEVADDR3; inline;
  67076. begin
  67077. pTDefRegMap(@Self)^.clr := $00000008;
  67078. end;
  67079. procedure TUSB_U1ADDR.setDEVADDR3(thebits : TBits_1); inline;
  67080. begin
  67081. if thebits = 0 then
  67082. pTDefRegMap(@Self)^.clr := $00000008
  67083. else
  67084. pTDefRegMap(@Self)^.&set := $00000008;
  67085. end;
  67086. function TUSB_U1ADDR.getDEVADDR3 : TBits_1; inline;
  67087. begin
  67088. getDEVADDR3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67089. end;
  67090. procedure TUSB_U1ADDR.setDEVADDR4; inline;
  67091. begin
  67092. pTDefRegMap(@Self)^.&set := $00000010;
  67093. end;
  67094. procedure TUSB_U1ADDR.clearDEVADDR4; inline;
  67095. begin
  67096. pTDefRegMap(@Self)^.clr := $00000010;
  67097. end;
  67098. procedure TUSB_U1ADDR.setDEVADDR4(thebits : TBits_1); inline;
  67099. begin
  67100. if thebits = 0 then
  67101. pTDefRegMap(@Self)^.clr := $00000010
  67102. else
  67103. pTDefRegMap(@Self)^.&set := $00000010;
  67104. end;
  67105. function TUSB_U1ADDR.getDEVADDR4 : TBits_1; inline;
  67106. begin
  67107. getDEVADDR4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67108. end;
  67109. procedure TUSB_U1ADDR.setDEVADDR5; inline;
  67110. begin
  67111. pTDefRegMap(@Self)^.&set := $00000020;
  67112. end;
  67113. procedure TUSB_U1ADDR.clearDEVADDR5; inline;
  67114. begin
  67115. pTDefRegMap(@Self)^.clr := $00000020;
  67116. end;
  67117. procedure TUSB_U1ADDR.setDEVADDR5(thebits : TBits_1); inline;
  67118. begin
  67119. if thebits = 0 then
  67120. pTDefRegMap(@Self)^.clr := $00000020
  67121. else
  67122. pTDefRegMap(@Self)^.&set := $00000020;
  67123. end;
  67124. function TUSB_U1ADDR.getDEVADDR5 : TBits_1; inline;
  67125. begin
  67126. getDEVADDR5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67127. end;
  67128. procedure TUSB_U1ADDR.setDEVADDR6; inline;
  67129. begin
  67130. pTDefRegMap(@Self)^.&set := $00000040;
  67131. end;
  67132. procedure TUSB_U1ADDR.clearDEVADDR6; inline;
  67133. begin
  67134. pTDefRegMap(@Self)^.clr := $00000040;
  67135. end;
  67136. procedure TUSB_U1ADDR.setDEVADDR6(thebits : TBits_1); inline;
  67137. begin
  67138. if thebits = 0 then
  67139. pTDefRegMap(@Self)^.clr := $00000040
  67140. else
  67141. pTDefRegMap(@Self)^.&set := $00000040;
  67142. end;
  67143. function TUSB_U1ADDR.getDEVADDR6 : TBits_1; inline;
  67144. begin
  67145. getDEVADDR6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67146. end;
  67147. procedure TUSB_U1FRML.setFRML(thebits : TBits_8); inline;
  67148. begin
  67149. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  67150. end;
  67151. function TUSB_U1FRML.getFRML : TBits_8; inline;
  67152. begin
  67153. getFRML := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  67154. end;
  67155. procedure TUSB_U1FRML.setFRM0; inline;
  67156. begin
  67157. pTDefRegMap(@Self)^.&set := $00000001;
  67158. end;
  67159. procedure TUSB_U1FRML.clearFRM0; inline;
  67160. begin
  67161. pTDefRegMap(@Self)^.clr := $00000001;
  67162. end;
  67163. procedure TUSB_U1FRML.setFRM0(thebits : TBits_1); inline;
  67164. begin
  67165. if thebits = 0 then
  67166. pTDefRegMap(@Self)^.clr := $00000001
  67167. else
  67168. pTDefRegMap(@Self)^.&set := $00000001;
  67169. end;
  67170. function TUSB_U1FRML.getFRM0 : TBits_1; inline;
  67171. begin
  67172. getFRM0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67173. end;
  67174. procedure TUSB_U1FRML.setFRM1; inline;
  67175. begin
  67176. pTDefRegMap(@Self)^.&set := $00000002;
  67177. end;
  67178. procedure TUSB_U1FRML.clearFRM1; inline;
  67179. begin
  67180. pTDefRegMap(@Self)^.clr := $00000002;
  67181. end;
  67182. procedure TUSB_U1FRML.setFRM1(thebits : TBits_1); inline;
  67183. begin
  67184. if thebits = 0 then
  67185. pTDefRegMap(@Self)^.clr := $00000002
  67186. else
  67187. pTDefRegMap(@Self)^.&set := $00000002;
  67188. end;
  67189. function TUSB_U1FRML.getFRM1 : TBits_1; inline;
  67190. begin
  67191. getFRM1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67192. end;
  67193. procedure TUSB_U1FRML.setFRM2; inline;
  67194. begin
  67195. pTDefRegMap(@Self)^.&set := $00000004;
  67196. end;
  67197. procedure TUSB_U1FRML.clearFRM2; inline;
  67198. begin
  67199. pTDefRegMap(@Self)^.clr := $00000004;
  67200. end;
  67201. procedure TUSB_U1FRML.setFRM2(thebits : TBits_1); inline;
  67202. begin
  67203. if thebits = 0 then
  67204. pTDefRegMap(@Self)^.clr := $00000004
  67205. else
  67206. pTDefRegMap(@Self)^.&set := $00000004;
  67207. end;
  67208. function TUSB_U1FRML.getFRM2 : TBits_1; inline;
  67209. begin
  67210. getFRM2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67211. end;
  67212. procedure TUSB_U1FRML.setFRM3; inline;
  67213. begin
  67214. pTDefRegMap(@Self)^.&set := $00000008;
  67215. end;
  67216. procedure TUSB_U1FRML.clearFRM3; inline;
  67217. begin
  67218. pTDefRegMap(@Self)^.clr := $00000008;
  67219. end;
  67220. procedure TUSB_U1FRML.setFRM3(thebits : TBits_1); inline;
  67221. begin
  67222. if thebits = 0 then
  67223. pTDefRegMap(@Self)^.clr := $00000008
  67224. else
  67225. pTDefRegMap(@Self)^.&set := $00000008;
  67226. end;
  67227. function TUSB_U1FRML.getFRM3 : TBits_1; inline;
  67228. begin
  67229. getFRM3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67230. end;
  67231. procedure TUSB_U1FRML.setFRM4; inline;
  67232. begin
  67233. pTDefRegMap(@Self)^.&set := $00000010;
  67234. end;
  67235. procedure TUSB_U1FRML.clearFRM4; inline;
  67236. begin
  67237. pTDefRegMap(@Self)^.clr := $00000010;
  67238. end;
  67239. procedure TUSB_U1FRML.setFRM4(thebits : TBits_1); inline;
  67240. begin
  67241. if thebits = 0 then
  67242. pTDefRegMap(@Self)^.clr := $00000010
  67243. else
  67244. pTDefRegMap(@Self)^.&set := $00000010;
  67245. end;
  67246. function TUSB_U1FRML.getFRM4 : TBits_1; inline;
  67247. begin
  67248. getFRM4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67249. end;
  67250. procedure TUSB_U1FRML.setFRM5; inline;
  67251. begin
  67252. pTDefRegMap(@Self)^.&set := $00000020;
  67253. end;
  67254. procedure TUSB_U1FRML.clearFRM5; inline;
  67255. begin
  67256. pTDefRegMap(@Self)^.clr := $00000020;
  67257. end;
  67258. procedure TUSB_U1FRML.setFRM5(thebits : TBits_1); inline;
  67259. begin
  67260. if thebits = 0 then
  67261. pTDefRegMap(@Self)^.clr := $00000020
  67262. else
  67263. pTDefRegMap(@Self)^.&set := $00000020;
  67264. end;
  67265. function TUSB_U1FRML.getFRM5 : TBits_1; inline;
  67266. begin
  67267. getFRM5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67268. end;
  67269. procedure TUSB_U1FRML.setFRM6; inline;
  67270. begin
  67271. pTDefRegMap(@Self)^.&set := $00000040;
  67272. end;
  67273. procedure TUSB_U1FRML.clearFRM6; inline;
  67274. begin
  67275. pTDefRegMap(@Self)^.clr := $00000040;
  67276. end;
  67277. procedure TUSB_U1FRML.setFRM6(thebits : TBits_1); inline;
  67278. begin
  67279. if thebits = 0 then
  67280. pTDefRegMap(@Self)^.clr := $00000040
  67281. else
  67282. pTDefRegMap(@Self)^.&set := $00000040;
  67283. end;
  67284. function TUSB_U1FRML.getFRM6 : TBits_1; inline;
  67285. begin
  67286. getFRM6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67287. end;
  67288. procedure TUSB_U1FRML.setFRM7; inline;
  67289. begin
  67290. pTDefRegMap(@Self)^.&set := $00000080;
  67291. end;
  67292. procedure TUSB_U1FRML.clearFRM7; inline;
  67293. begin
  67294. pTDefRegMap(@Self)^.clr := $00000080;
  67295. end;
  67296. procedure TUSB_U1FRML.setFRM7(thebits : TBits_1); inline;
  67297. begin
  67298. if thebits = 0 then
  67299. pTDefRegMap(@Self)^.clr := $00000080
  67300. else
  67301. pTDefRegMap(@Self)^.&set := $00000080;
  67302. end;
  67303. function TUSB_U1FRML.getFRM7 : TBits_1; inline;
  67304. begin
  67305. getFRM7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67306. end;
  67307. procedure TUSB_U1FRMH.setFRMH(thebits : TBits_3); inline;
  67308. begin
  67309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  67310. end;
  67311. function TUSB_U1FRMH.getFRMH : TBits_3; inline;
  67312. begin
  67313. getFRMH := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  67314. end;
  67315. procedure TUSB_U1FRMH.setFRM8; inline;
  67316. begin
  67317. pTDefRegMap(@Self)^.&set := $00000001;
  67318. end;
  67319. procedure TUSB_U1FRMH.clearFRM8; inline;
  67320. begin
  67321. pTDefRegMap(@Self)^.clr := $00000001;
  67322. end;
  67323. procedure TUSB_U1FRMH.setFRM8(thebits : TBits_1); inline;
  67324. begin
  67325. if thebits = 0 then
  67326. pTDefRegMap(@Self)^.clr := $00000001
  67327. else
  67328. pTDefRegMap(@Self)^.&set := $00000001;
  67329. end;
  67330. function TUSB_U1FRMH.getFRM8 : TBits_1; inline;
  67331. begin
  67332. getFRM8 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67333. end;
  67334. procedure TUSB_U1FRMH.setFRM9; inline;
  67335. begin
  67336. pTDefRegMap(@Self)^.&set := $00000002;
  67337. end;
  67338. procedure TUSB_U1FRMH.clearFRM9; inline;
  67339. begin
  67340. pTDefRegMap(@Self)^.clr := $00000002;
  67341. end;
  67342. procedure TUSB_U1FRMH.setFRM9(thebits : TBits_1); inline;
  67343. begin
  67344. if thebits = 0 then
  67345. pTDefRegMap(@Self)^.clr := $00000002
  67346. else
  67347. pTDefRegMap(@Self)^.&set := $00000002;
  67348. end;
  67349. function TUSB_U1FRMH.getFRM9 : TBits_1; inline;
  67350. begin
  67351. getFRM9 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67352. end;
  67353. procedure TUSB_U1FRMH.setFRM10; inline;
  67354. begin
  67355. pTDefRegMap(@Self)^.&set := $00000004;
  67356. end;
  67357. procedure TUSB_U1FRMH.clearFRM10; inline;
  67358. begin
  67359. pTDefRegMap(@Self)^.clr := $00000004;
  67360. end;
  67361. procedure TUSB_U1FRMH.setFRM10(thebits : TBits_1); inline;
  67362. begin
  67363. if thebits = 0 then
  67364. pTDefRegMap(@Self)^.clr := $00000004
  67365. else
  67366. pTDefRegMap(@Self)^.&set := $00000004;
  67367. end;
  67368. function TUSB_U1FRMH.getFRM10 : TBits_1; inline;
  67369. begin
  67370. getFRM10 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67371. end;
  67372. procedure TUSB_U1TOK.setEP(thebits : TBits_4); inline;
  67373. begin
  67374. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  67375. end;
  67376. function TUSB_U1TOK.getEP : TBits_4; inline;
  67377. begin
  67378. getEP := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  67379. end;
  67380. procedure TUSB_U1TOK.setPID(thebits : TBits_4); inline;
  67381. begin
  67382. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF0F or ( thebits shl 4 );
  67383. end;
  67384. function TUSB_U1TOK.getPID : TBits_4; inline;
  67385. begin
  67386. getPID := (pTDefRegMap(@Self)^.val and $000000F0) shr 4;
  67387. end;
  67388. procedure TUSB_U1TOK.setEP0; inline;
  67389. begin
  67390. pTDefRegMap(@Self)^.&set := $00000001;
  67391. end;
  67392. procedure TUSB_U1TOK.clearEP0; inline;
  67393. begin
  67394. pTDefRegMap(@Self)^.clr := $00000001;
  67395. end;
  67396. procedure TUSB_U1TOK.setEP0(thebits : TBits_1); inline;
  67397. begin
  67398. if thebits = 0 then
  67399. pTDefRegMap(@Self)^.clr := $00000001
  67400. else
  67401. pTDefRegMap(@Self)^.&set := $00000001;
  67402. end;
  67403. function TUSB_U1TOK.getEP0 : TBits_1; inline;
  67404. begin
  67405. getEP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67406. end;
  67407. procedure TUSB_U1TOK.setEP1; inline;
  67408. begin
  67409. pTDefRegMap(@Self)^.&set := $00000002;
  67410. end;
  67411. procedure TUSB_U1TOK.clearEP1; inline;
  67412. begin
  67413. pTDefRegMap(@Self)^.clr := $00000002;
  67414. end;
  67415. procedure TUSB_U1TOK.setEP1(thebits : TBits_1); inline;
  67416. begin
  67417. if thebits = 0 then
  67418. pTDefRegMap(@Self)^.clr := $00000002
  67419. else
  67420. pTDefRegMap(@Self)^.&set := $00000002;
  67421. end;
  67422. function TUSB_U1TOK.getEP1 : TBits_1; inline;
  67423. begin
  67424. getEP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67425. end;
  67426. procedure TUSB_U1TOK.setEP2; inline;
  67427. begin
  67428. pTDefRegMap(@Self)^.&set := $00000004;
  67429. end;
  67430. procedure TUSB_U1TOK.clearEP2; inline;
  67431. begin
  67432. pTDefRegMap(@Self)^.clr := $00000004;
  67433. end;
  67434. procedure TUSB_U1TOK.setEP2(thebits : TBits_1); inline;
  67435. begin
  67436. if thebits = 0 then
  67437. pTDefRegMap(@Self)^.clr := $00000004
  67438. else
  67439. pTDefRegMap(@Self)^.&set := $00000004;
  67440. end;
  67441. function TUSB_U1TOK.getEP2 : TBits_1; inline;
  67442. begin
  67443. getEP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67444. end;
  67445. procedure TUSB_U1TOK.setEP3; inline;
  67446. begin
  67447. pTDefRegMap(@Self)^.&set := $00000008;
  67448. end;
  67449. procedure TUSB_U1TOK.clearEP3; inline;
  67450. begin
  67451. pTDefRegMap(@Self)^.clr := $00000008;
  67452. end;
  67453. procedure TUSB_U1TOK.setEP3(thebits : TBits_1); inline;
  67454. begin
  67455. if thebits = 0 then
  67456. pTDefRegMap(@Self)^.clr := $00000008
  67457. else
  67458. pTDefRegMap(@Self)^.&set := $00000008;
  67459. end;
  67460. function TUSB_U1TOK.getEP3 : TBits_1; inline;
  67461. begin
  67462. getEP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67463. end;
  67464. procedure TUSB_U1TOK.setPID0; inline;
  67465. begin
  67466. pTDefRegMap(@Self)^.&set := $00000010;
  67467. end;
  67468. procedure TUSB_U1TOK.clearPID0; inline;
  67469. begin
  67470. pTDefRegMap(@Self)^.clr := $00000010;
  67471. end;
  67472. procedure TUSB_U1TOK.setPID0(thebits : TBits_1); inline;
  67473. begin
  67474. if thebits = 0 then
  67475. pTDefRegMap(@Self)^.clr := $00000010
  67476. else
  67477. pTDefRegMap(@Self)^.&set := $00000010;
  67478. end;
  67479. function TUSB_U1TOK.getPID0 : TBits_1; inline;
  67480. begin
  67481. getPID0 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67482. end;
  67483. procedure TUSB_U1TOK.setPID1; inline;
  67484. begin
  67485. pTDefRegMap(@Self)^.&set := $00000020;
  67486. end;
  67487. procedure TUSB_U1TOK.clearPID1; inline;
  67488. begin
  67489. pTDefRegMap(@Self)^.clr := $00000020;
  67490. end;
  67491. procedure TUSB_U1TOK.setPID1(thebits : TBits_1); inline;
  67492. begin
  67493. if thebits = 0 then
  67494. pTDefRegMap(@Self)^.clr := $00000020
  67495. else
  67496. pTDefRegMap(@Self)^.&set := $00000020;
  67497. end;
  67498. function TUSB_U1TOK.getPID1 : TBits_1; inline;
  67499. begin
  67500. getPID1 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67501. end;
  67502. procedure TUSB_U1TOK.setPID2; inline;
  67503. begin
  67504. pTDefRegMap(@Self)^.&set := $00000040;
  67505. end;
  67506. procedure TUSB_U1TOK.clearPID2; inline;
  67507. begin
  67508. pTDefRegMap(@Self)^.clr := $00000040;
  67509. end;
  67510. procedure TUSB_U1TOK.setPID2(thebits : TBits_1); inline;
  67511. begin
  67512. if thebits = 0 then
  67513. pTDefRegMap(@Self)^.clr := $00000040
  67514. else
  67515. pTDefRegMap(@Self)^.&set := $00000040;
  67516. end;
  67517. function TUSB_U1TOK.getPID2 : TBits_1; inline;
  67518. begin
  67519. getPID2 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67520. end;
  67521. procedure TUSB_U1TOK.setPID3; inline;
  67522. begin
  67523. pTDefRegMap(@Self)^.&set := $00000080;
  67524. end;
  67525. procedure TUSB_U1TOK.clearPID3; inline;
  67526. begin
  67527. pTDefRegMap(@Self)^.clr := $00000080;
  67528. end;
  67529. procedure TUSB_U1TOK.setPID3(thebits : TBits_1); inline;
  67530. begin
  67531. if thebits = 0 then
  67532. pTDefRegMap(@Self)^.clr := $00000080
  67533. else
  67534. pTDefRegMap(@Self)^.&set := $00000080;
  67535. end;
  67536. function TUSB_U1TOK.getPID3 : TBits_1; inline;
  67537. begin
  67538. getPID3 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67539. end;
  67540. procedure TPORTB_TRISB.setTRISB0; inline;
  67541. begin
  67542. pTDefRegMap(@Self)^.&set := $00000001;
  67543. end;
  67544. procedure TPORTB_TRISB.clearTRISB0; inline;
  67545. begin
  67546. pTDefRegMap(@Self)^.clr := $00000001;
  67547. end;
  67548. procedure TPORTB_TRISB.setTRISB0(thebits : TBits_1); inline;
  67549. begin
  67550. if thebits = 0 then
  67551. pTDefRegMap(@Self)^.clr := $00000001
  67552. else
  67553. pTDefRegMap(@Self)^.&set := $00000001;
  67554. end;
  67555. function TPORTB_TRISB.getTRISB0 : TBits_1; inline;
  67556. begin
  67557. getTRISB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67558. end;
  67559. procedure TPORTB_TRISB.setTRISB1; inline;
  67560. begin
  67561. pTDefRegMap(@Self)^.&set := $00000002;
  67562. end;
  67563. procedure TPORTB_TRISB.clearTRISB1; inline;
  67564. begin
  67565. pTDefRegMap(@Self)^.clr := $00000002;
  67566. end;
  67567. procedure TPORTB_TRISB.setTRISB1(thebits : TBits_1); inline;
  67568. begin
  67569. if thebits = 0 then
  67570. pTDefRegMap(@Self)^.clr := $00000002
  67571. else
  67572. pTDefRegMap(@Self)^.&set := $00000002;
  67573. end;
  67574. function TPORTB_TRISB.getTRISB1 : TBits_1; inline;
  67575. begin
  67576. getTRISB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67577. end;
  67578. procedure TPORTB_TRISB.setTRISB2; inline;
  67579. begin
  67580. pTDefRegMap(@Self)^.&set := $00000004;
  67581. end;
  67582. procedure TPORTB_TRISB.clearTRISB2; inline;
  67583. begin
  67584. pTDefRegMap(@Self)^.clr := $00000004;
  67585. end;
  67586. procedure TPORTB_TRISB.setTRISB2(thebits : TBits_1); inline;
  67587. begin
  67588. if thebits = 0 then
  67589. pTDefRegMap(@Self)^.clr := $00000004
  67590. else
  67591. pTDefRegMap(@Self)^.&set := $00000004;
  67592. end;
  67593. function TPORTB_TRISB.getTRISB2 : TBits_1; inline;
  67594. begin
  67595. getTRISB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67596. end;
  67597. procedure TPORTB_TRISB.setTRISB3; inline;
  67598. begin
  67599. pTDefRegMap(@Self)^.&set := $00000008;
  67600. end;
  67601. procedure TPORTB_TRISB.clearTRISB3; inline;
  67602. begin
  67603. pTDefRegMap(@Self)^.clr := $00000008;
  67604. end;
  67605. procedure TPORTB_TRISB.setTRISB3(thebits : TBits_1); inline;
  67606. begin
  67607. if thebits = 0 then
  67608. pTDefRegMap(@Self)^.clr := $00000008
  67609. else
  67610. pTDefRegMap(@Self)^.&set := $00000008;
  67611. end;
  67612. function TPORTB_TRISB.getTRISB3 : TBits_1; inline;
  67613. begin
  67614. getTRISB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67615. end;
  67616. procedure TPORTB_TRISB.setTRISB4; inline;
  67617. begin
  67618. pTDefRegMap(@Self)^.&set := $00000010;
  67619. end;
  67620. procedure TPORTB_TRISB.clearTRISB4; inline;
  67621. begin
  67622. pTDefRegMap(@Self)^.clr := $00000010;
  67623. end;
  67624. procedure TPORTB_TRISB.setTRISB4(thebits : TBits_1); inline;
  67625. begin
  67626. if thebits = 0 then
  67627. pTDefRegMap(@Self)^.clr := $00000010
  67628. else
  67629. pTDefRegMap(@Self)^.&set := $00000010;
  67630. end;
  67631. function TPORTB_TRISB.getTRISB4 : TBits_1; inline;
  67632. begin
  67633. getTRISB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67634. end;
  67635. procedure TPORTB_TRISB.setTRISB5; inline;
  67636. begin
  67637. pTDefRegMap(@Self)^.&set := $00000020;
  67638. end;
  67639. procedure TPORTB_TRISB.clearTRISB5; inline;
  67640. begin
  67641. pTDefRegMap(@Self)^.clr := $00000020;
  67642. end;
  67643. procedure TPORTB_TRISB.setTRISB5(thebits : TBits_1); inline;
  67644. begin
  67645. if thebits = 0 then
  67646. pTDefRegMap(@Self)^.clr := $00000020
  67647. else
  67648. pTDefRegMap(@Self)^.&set := $00000020;
  67649. end;
  67650. function TPORTB_TRISB.getTRISB5 : TBits_1; inline;
  67651. begin
  67652. getTRISB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67653. end;
  67654. procedure TPORTB_TRISB.setTRISB6; inline;
  67655. begin
  67656. pTDefRegMap(@Self)^.&set := $00000040;
  67657. end;
  67658. procedure TPORTB_TRISB.clearTRISB6; inline;
  67659. begin
  67660. pTDefRegMap(@Self)^.clr := $00000040;
  67661. end;
  67662. procedure TPORTB_TRISB.setTRISB6(thebits : TBits_1); inline;
  67663. begin
  67664. if thebits = 0 then
  67665. pTDefRegMap(@Self)^.clr := $00000040
  67666. else
  67667. pTDefRegMap(@Self)^.&set := $00000040;
  67668. end;
  67669. function TPORTB_TRISB.getTRISB6 : TBits_1; inline;
  67670. begin
  67671. getTRISB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67672. end;
  67673. procedure TPORTB_TRISB.setTRISB7; inline;
  67674. begin
  67675. pTDefRegMap(@Self)^.&set := $00000080;
  67676. end;
  67677. procedure TPORTB_TRISB.clearTRISB7; inline;
  67678. begin
  67679. pTDefRegMap(@Self)^.clr := $00000080;
  67680. end;
  67681. procedure TPORTB_TRISB.setTRISB7(thebits : TBits_1); inline;
  67682. begin
  67683. if thebits = 0 then
  67684. pTDefRegMap(@Self)^.clr := $00000080
  67685. else
  67686. pTDefRegMap(@Self)^.&set := $00000080;
  67687. end;
  67688. function TPORTB_TRISB.getTRISB7 : TBits_1; inline;
  67689. begin
  67690. getTRISB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  67691. end;
  67692. procedure TPORTB_TRISB.setTRISB8; inline;
  67693. begin
  67694. pTDefRegMap(@Self)^.&set := $00000100;
  67695. end;
  67696. procedure TPORTB_TRISB.clearTRISB8; inline;
  67697. begin
  67698. pTDefRegMap(@Self)^.clr := $00000100;
  67699. end;
  67700. procedure TPORTB_TRISB.setTRISB8(thebits : TBits_1); inline;
  67701. begin
  67702. if thebits = 0 then
  67703. pTDefRegMap(@Self)^.clr := $00000100
  67704. else
  67705. pTDefRegMap(@Self)^.&set := $00000100;
  67706. end;
  67707. function TPORTB_TRISB.getTRISB8 : TBits_1; inline;
  67708. begin
  67709. getTRISB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  67710. end;
  67711. procedure TPORTB_TRISB.setTRISB9; inline;
  67712. begin
  67713. pTDefRegMap(@Self)^.&set := $00000200;
  67714. end;
  67715. procedure TPORTB_TRISB.clearTRISB9; inline;
  67716. begin
  67717. pTDefRegMap(@Self)^.clr := $00000200;
  67718. end;
  67719. procedure TPORTB_TRISB.setTRISB9(thebits : TBits_1); inline;
  67720. begin
  67721. if thebits = 0 then
  67722. pTDefRegMap(@Self)^.clr := $00000200
  67723. else
  67724. pTDefRegMap(@Self)^.&set := $00000200;
  67725. end;
  67726. function TPORTB_TRISB.getTRISB9 : TBits_1; inline;
  67727. begin
  67728. getTRISB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  67729. end;
  67730. procedure TPORTB_TRISB.setTRISB10; inline;
  67731. begin
  67732. pTDefRegMap(@Self)^.&set := $00000400;
  67733. end;
  67734. procedure TPORTB_TRISB.clearTRISB10; inline;
  67735. begin
  67736. pTDefRegMap(@Self)^.clr := $00000400;
  67737. end;
  67738. procedure TPORTB_TRISB.setTRISB10(thebits : TBits_1); inline;
  67739. begin
  67740. if thebits = 0 then
  67741. pTDefRegMap(@Self)^.clr := $00000400
  67742. else
  67743. pTDefRegMap(@Self)^.&set := $00000400;
  67744. end;
  67745. function TPORTB_TRISB.getTRISB10 : TBits_1; inline;
  67746. begin
  67747. getTRISB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  67748. end;
  67749. procedure TPORTB_TRISB.setTRISB11; inline;
  67750. begin
  67751. pTDefRegMap(@Self)^.&set := $00000800;
  67752. end;
  67753. procedure TPORTB_TRISB.clearTRISB11; inline;
  67754. begin
  67755. pTDefRegMap(@Self)^.clr := $00000800;
  67756. end;
  67757. procedure TPORTB_TRISB.setTRISB11(thebits : TBits_1); inline;
  67758. begin
  67759. if thebits = 0 then
  67760. pTDefRegMap(@Self)^.clr := $00000800
  67761. else
  67762. pTDefRegMap(@Self)^.&set := $00000800;
  67763. end;
  67764. function TPORTB_TRISB.getTRISB11 : TBits_1; inline;
  67765. begin
  67766. getTRISB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  67767. end;
  67768. procedure TPORTB_TRISB.setTRISB12; inline;
  67769. begin
  67770. pTDefRegMap(@Self)^.&set := $00001000;
  67771. end;
  67772. procedure TPORTB_TRISB.clearTRISB12; inline;
  67773. begin
  67774. pTDefRegMap(@Self)^.clr := $00001000;
  67775. end;
  67776. procedure TPORTB_TRISB.setTRISB12(thebits : TBits_1); inline;
  67777. begin
  67778. if thebits = 0 then
  67779. pTDefRegMap(@Self)^.clr := $00001000
  67780. else
  67781. pTDefRegMap(@Self)^.&set := $00001000;
  67782. end;
  67783. function TPORTB_TRISB.getTRISB12 : TBits_1; inline;
  67784. begin
  67785. getTRISB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  67786. end;
  67787. procedure TPORTB_TRISB.setTRISB13; inline;
  67788. begin
  67789. pTDefRegMap(@Self)^.&set := $00002000;
  67790. end;
  67791. procedure TPORTB_TRISB.clearTRISB13; inline;
  67792. begin
  67793. pTDefRegMap(@Self)^.clr := $00002000;
  67794. end;
  67795. procedure TPORTB_TRISB.setTRISB13(thebits : TBits_1); inline;
  67796. begin
  67797. if thebits = 0 then
  67798. pTDefRegMap(@Self)^.clr := $00002000
  67799. else
  67800. pTDefRegMap(@Self)^.&set := $00002000;
  67801. end;
  67802. function TPORTB_TRISB.getTRISB13 : TBits_1; inline;
  67803. begin
  67804. getTRISB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  67805. end;
  67806. procedure TPORTB_TRISB.setTRISB14; inline;
  67807. begin
  67808. pTDefRegMap(@Self)^.&set := $00004000;
  67809. end;
  67810. procedure TPORTB_TRISB.clearTRISB14; inline;
  67811. begin
  67812. pTDefRegMap(@Self)^.clr := $00004000;
  67813. end;
  67814. procedure TPORTB_TRISB.setTRISB14(thebits : TBits_1); inline;
  67815. begin
  67816. if thebits = 0 then
  67817. pTDefRegMap(@Self)^.clr := $00004000
  67818. else
  67819. pTDefRegMap(@Self)^.&set := $00004000;
  67820. end;
  67821. function TPORTB_TRISB.getTRISB14 : TBits_1; inline;
  67822. begin
  67823. getTRISB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  67824. end;
  67825. procedure TPORTB_TRISB.setTRISB15; inline;
  67826. begin
  67827. pTDefRegMap(@Self)^.&set := $00008000;
  67828. end;
  67829. procedure TPORTB_TRISB.clearTRISB15; inline;
  67830. begin
  67831. pTDefRegMap(@Self)^.clr := $00008000;
  67832. end;
  67833. procedure TPORTB_TRISB.setTRISB15(thebits : TBits_1); inline;
  67834. begin
  67835. if thebits = 0 then
  67836. pTDefRegMap(@Self)^.clr := $00008000
  67837. else
  67838. pTDefRegMap(@Self)^.&set := $00008000;
  67839. end;
  67840. function TPORTB_TRISB.getTRISB15 : TBits_1; inline;
  67841. begin
  67842. getTRISB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  67843. end;
  67844. procedure TPORTB_TRISB.setw(thebits : TBits_32); inline;
  67845. begin
  67846. pTDefRegMap(@Self)^.val := thebits;
  67847. end;
  67848. function TPORTB_TRISB.getw : TBits_32; inline;
  67849. begin
  67850. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  67851. end;
  67852. procedure TPORTB_PORTB.setRB0; inline;
  67853. begin
  67854. pTDefRegMap(@Self)^.&set := $00000001;
  67855. end;
  67856. procedure TPORTB_PORTB.clearRB0; inline;
  67857. begin
  67858. pTDefRegMap(@Self)^.clr := $00000001;
  67859. end;
  67860. procedure TPORTB_PORTB.setRB0(thebits : TBits_1); inline;
  67861. begin
  67862. if thebits = 0 then
  67863. pTDefRegMap(@Self)^.clr := $00000001
  67864. else
  67865. pTDefRegMap(@Self)^.&set := $00000001;
  67866. end;
  67867. function TPORTB_PORTB.getRB0 : TBits_1; inline;
  67868. begin
  67869. getRB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  67870. end;
  67871. procedure TPORTB_PORTB.setRB1; inline;
  67872. begin
  67873. pTDefRegMap(@Self)^.&set := $00000002;
  67874. end;
  67875. procedure TPORTB_PORTB.clearRB1; inline;
  67876. begin
  67877. pTDefRegMap(@Self)^.clr := $00000002;
  67878. end;
  67879. procedure TPORTB_PORTB.setRB1(thebits : TBits_1); inline;
  67880. begin
  67881. if thebits = 0 then
  67882. pTDefRegMap(@Self)^.clr := $00000002
  67883. else
  67884. pTDefRegMap(@Self)^.&set := $00000002;
  67885. end;
  67886. function TPORTB_PORTB.getRB1 : TBits_1; inline;
  67887. begin
  67888. getRB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  67889. end;
  67890. procedure TPORTB_PORTB.setRB2; inline;
  67891. begin
  67892. pTDefRegMap(@Self)^.&set := $00000004;
  67893. end;
  67894. procedure TPORTB_PORTB.clearRB2; inline;
  67895. begin
  67896. pTDefRegMap(@Self)^.clr := $00000004;
  67897. end;
  67898. procedure TPORTB_PORTB.setRB2(thebits : TBits_1); inline;
  67899. begin
  67900. if thebits = 0 then
  67901. pTDefRegMap(@Self)^.clr := $00000004
  67902. else
  67903. pTDefRegMap(@Self)^.&set := $00000004;
  67904. end;
  67905. function TPORTB_PORTB.getRB2 : TBits_1; inline;
  67906. begin
  67907. getRB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  67908. end;
  67909. procedure TPORTB_PORTB.setRB3; inline;
  67910. begin
  67911. pTDefRegMap(@Self)^.&set := $00000008;
  67912. end;
  67913. procedure TPORTB_PORTB.clearRB3; inline;
  67914. begin
  67915. pTDefRegMap(@Self)^.clr := $00000008;
  67916. end;
  67917. procedure TPORTB_PORTB.setRB3(thebits : TBits_1); inline;
  67918. begin
  67919. if thebits = 0 then
  67920. pTDefRegMap(@Self)^.clr := $00000008
  67921. else
  67922. pTDefRegMap(@Self)^.&set := $00000008;
  67923. end;
  67924. function TPORTB_PORTB.getRB3 : TBits_1; inline;
  67925. begin
  67926. getRB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  67927. end;
  67928. procedure TPORTB_PORTB.setRB4; inline;
  67929. begin
  67930. pTDefRegMap(@Self)^.&set := $00000010;
  67931. end;
  67932. procedure TPORTB_PORTB.clearRB4; inline;
  67933. begin
  67934. pTDefRegMap(@Self)^.clr := $00000010;
  67935. end;
  67936. procedure TPORTB_PORTB.setRB4(thebits : TBits_1); inline;
  67937. begin
  67938. if thebits = 0 then
  67939. pTDefRegMap(@Self)^.clr := $00000010
  67940. else
  67941. pTDefRegMap(@Self)^.&set := $00000010;
  67942. end;
  67943. function TPORTB_PORTB.getRB4 : TBits_1; inline;
  67944. begin
  67945. getRB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  67946. end;
  67947. procedure TPORTB_PORTB.setRB5; inline;
  67948. begin
  67949. pTDefRegMap(@Self)^.&set := $00000020;
  67950. end;
  67951. procedure TPORTB_PORTB.clearRB5; inline;
  67952. begin
  67953. pTDefRegMap(@Self)^.clr := $00000020;
  67954. end;
  67955. procedure TPORTB_PORTB.setRB5(thebits : TBits_1); inline;
  67956. begin
  67957. if thebits = 0 then
  67958. pTDefRegMap(@Self)^.clr := $00000020
  67959. else
  67960. pTDefRegMap(@Self)^.&set := $00000020;
  67961. end;
  67962. function TPORTB_PORTB.getRB5 : TBits_1; inline;
  67963. begin
  67964. getRB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  67965. end;
  67966. procedure TPORTB_PORTB.setRB6; inline;
  67967. begin
  67968. pTDefRegMap(@Self)^.&set := $00000040;
  67969. end;
  67970. procedure TPORTB_PORTB.clearRB6; inline;
  67971. begin
  67972. pTDefRegMap(@Self)^.clr := $00000040;
  67973. end;
  67974. procedure TPORTB_PORTB.setRB6(thebits : TBits_1); inline;
  67975. begin
  67976. if thebits = 0 then
  67977. pTDefRegMap(@Self)^.clr := $00000040
  67978. else
  67979. pTDefRegMap(@Self)^.&set := $00000040;
  67980. end;
  67981. function TPORTB_PORTB.getRB6 : TBits_1; inline;
  67982. begin
  67983. getRB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  67984. end;
  67985. procedure TPORTB_PORTB.setRB7; inline;
  67986. begin
  67987. pTDefRegMap(@Self)^.&set := $00000080;
  67988. end;
  67989. procedure TPORTB_PORTB.clearRB7; inline;
  67990. begin
  67991. pTDefRegMap(@Self)^.clr := $00000080;
  67992. end;
  67993. procedure TPORTB_PORTB.setRB7(thebits : TBits_1); inline;
  67994. begin
  67995. if thebits = 0 then
  67996. pTDefRegMap(@Self)^.clr := $00000080
  67997. else
  67998. pTDefRegMap(@Self)^.&set := $00000080;
  67999. end;
  68000. function TPORTB_PORTB.getRB7 : TBits_1; inline;
  68001. begin
  68002. getRB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68003. end;
  68004. procedure TPORTB_PORTB.setRB8; inline;
  68005. begin
  68006. pTDefRegMap(@Self)^.&set := $00000100;
  68007. end;
  68008. procedure TPORTB_PORTB.clearRB8; inline;
  68009. begin
  68010. pTDefRegMap(@Self)^.clr := $00000100;
  68011. end;
  68012. procedure TPORTB_PORTB.setRB8(thebits : TBits_1); inline;
  68013. begin
  68014. if thebits = 0 then
  68015. pTDefRegMap(@Self)^.clr := $00000100
  68016. else
  68017. pTDefRegMap(@Self)^.&set := $00000100;
  68018. end;
  68019. function TPORTB_PORTB.getRB8 : TBits_1; inline;
  68020. begin
  68021. getRB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  68022. end;
  68023. procedure TPORTB_PORTB.setRB9; inline;
  68024. begin
  68025. pTDefRegMap(@Self)^.&set := $00000200;
  68026. end;
  68027. procedure TPORTB_PORTB.clearRB9; inline;
  68028. begin
  68029. pTDefRegMap(@Self)^.clr := $00000200;
  68030. end;
  68031. procedure TPORTB_PORTB.setRB9(thebits : TBits_1); inline;
  68032. begin
  68033. if thebits = 0 then
  68034. pTDefRegMap(@Self)^.clr := $00000200
  68035. else
  68036. pTDefRegMap(@Self)^.&set := $00000200;
  68037. end;
  68038. function TPORTB_PORTB.getRB9 : TBits_1; inline;
  68039. begin
  68040. getRB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  68041. end;
  68042. procedure TPORTB_PORTB.setRB10; inline;
  68043. begin
  68044. pTDefRegMap(@Self)^.&set := $00000400;
  68045. end;
  68046. procedure TPORTB_PORTB.clearRB10; inline;
  68047. begin
  68048. pTDefRegMap(@Self)^.clr := $00000400;
  68049. end;
  68050. procedure TPORTB_PORTB.setRB10(thebits : TBits_1); inline;
  68051. begin
  68052. if thebits = 0 then
  68053. pTDefRegMap(@Self)^.clr := $00000400
  68054. else
  68055. pTDefRegMap(@Self)^.&set := $00000400;
  68056. end;
  68057. function TPORTB_PORTB.getRB10 : TBits_1; inline;
  68058. begin
  68059. getRB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  68060. end;
  68061. procedure TPORTB_PORTB.setRB11; inline;
  68062. begin
  68063. pTDefRegMap(@Self)^.&set := $00000800;
  68064. end;
  68065. procedure TPORTB_PORTB.clearRB11; inline;
  68066. begin
  68067. pTDefRegMap(@Self)^.clr := $00000800;
  68068. end;
  68069. procedure TPORTB_PORTB.setRB11(thebits : TBits_1); inline;
  68070. begin
  68071. if thebits = 0 then
  68072. pTDefRegMap(@Self)^.clr := $00000800
  68073. else
  68074. pTDefRegMap(@Self)^.&set := $00000800;
  68075. end;
  68076. function TPORTB_PORTB.getRB11 : TBits_1; inline;
  68077. begin
  68078. getRB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  68079. end;
  68080. procedure TPORTB_PORTB.setRB12; inline;
  68081. begin
  68082. pTDefRegMap(@Self)^.&set := $00001000;
  68083. end;
  68084. procedure TPORTB_PORTB.clearRB12; inline;
  68085. begin
  68086. pTDefRegMap(@Self)^.clr := $00001000;
  68087. end;
  68088. procedure TPORTB_PORTB.setRB12(thebits : TBits_1); inline;
  68089. begin
  68090. if thebits = 0 then
  68091. pTDefRegMap(@Self)^.clr := $00001000
  68092. else
  68093. pTDefRegMap(@Self)^.&set := $00001000;
  68094. end;
  68095. function TPORTB_PORTB.getRB12 : TBits_1; inline;
  68096. begin
  68097. getRB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68098. end;
  68099. procedure TPORTB_PORTB.setRB13; inline;
  68100. begin
  68101. pTDefRegMap(@Self)^.&set := $00002000;
  68102. end;
  68103. procedure TPORTB_PORTB.clearRB13; inline;
  68104. begin
  68105. pTDefRegMap(@Self)^.clr := $00002000;
  68106. end;
  68107. procedure TPORTB_PORTB.setRB13(thebits : TBits_1); inline;
  68108. begin
  68109. if thebits = 0 then
  68110. pTDefRegMap(@Self)^.clr := $00002000
  68111. else
  68112. pTDefRegMap(@Self)^.&set := $00002000;
  68113. end;
  68114. function TPORTB_PORTB.getRB13 : TBits_1; inline;
  68115. begin
  68116. getRB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68117. end;
  68118. procedure TPORTB_PORTB.setRB14; inline;
  68119. begin
  68120. pTDefRegMap(@Self)^.&set := $00004000;
  68121. end;
  68122. procedure TPORTB_PORTB.clearRB14; inline;
  68123. begin
  68124. pTDefRegMap(@Self)^.clr := $00004000;
  68125. end;
  68126. procedure TPORTB_PORTB.setRB14(thebits : TBits_1); inline;
  68127. begin
  68128. if thebits = 0 then
  68129. pTDefRegMap(@Self)^.clr := $00004000
  68130. else
  68131. pTDefRegMap(@Self)^.&set := $00004000;
  68132. end;
  68133. function TPORTB_PORTB.getRB14 : TBits_1; inline;
  68134. begin
  68135. getRB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68136. end;
  68137. procedure TPORTB_PORTB.setRB15; inline;
  68138. begin
  68139. pTDefRegMap(@Self)^.&set := $00008000;
  68140. end;
  68141. procedure TPORTB_PORTB.clearRB15; inline;
  68142. begin
  68143. pTDefRegMap(@Self)^.clr := $00008000;
  68144. end;
  68145. procedure TPORTB_PORTB.setRB15(thebits : TBits_1); inline;
  68146. begin
  68147. if thebits = 0 then
  68148. pTDefRegMap(@Self)^.clr := $00008000
  68149. else
  68150. pTDefRegMap(@Self)^.&set := $00008000;
  68151. end;
  68152. function TPORTB_PORTB.getRB15 : TBits_1; inline;
  68153. begin
  68154. getRB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68155. end;
  68156. procedure TPORTB_PORTB.setw(thebits : TBits_32); inline;
  68157. begin
  68158. pTDefRegMap(@Self)^.val := thebits;
  68159. end;
  68160. function TPORTB_PORTB.getw : TBits_32; inline;
  68161. begin
  68162. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68163. end;
  68164. procedure TPORTB_LATB.setLATB0; inline;
  68165. begin
  68166. pTDefRegMap(@Self)^.&set := $00000001;
  68167. end;
  68168. procedure TPORTB_LATB.clearLATB0; inline;
  68169. begin
  68170. pTDefRegMap(@Self)^.clr := $00000001;
  68171. end;
  68172. procedure TPORTB_LATB.setLATB0(thebits : TBits_1); inline;
  68173. begin
  68174. if thebits = 0 then
  68175. pTDefRegMap(@Self)^.clr := $00000001
  68176. else
  68177. pTDefRegMap(@Self)^.&set := $00000001;
  68178. end;
  68179. function TPORTB_LATB.getLATB0 : TBits_1; inline;
  68180. begin
  68181. getLATB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68182. end;
  68183. procedure TPORTB_LATB.setLATB1; inline;
  68184. begin
  68185. pTDefRegMap(@Self)^.&set := $00000002;
  68186. end;
  68187. procedure TPORTB_LATB.clearLATB1; inline;
  68188. begin
  68189. pTDefRegMap(@Self)^.clr := $00000002;
  68190. end;
  68191. procedure TPORTB_LATB.setLATB1(thebits : TBits_1); inline;
  68192. begin
  68193. if thebits = 0 then
  68194. pTDefRegMap(@Self)^.clr := $00000002
  68195. else
  68196. pTDefRegMap(@Self)^.&set := $00000002;
  68197. end;
  68198. function TPORTB_LATB.getLATB1 : TBits_1; inline;
  68199. begin
  68200. getLATB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68201. end;
  68202. procedure TPORTB_LATB.setLATB2; inline;
  68203. begin
  68204. pTDefRegMap(@Self)^.&set := $00000004;
  68205. end;
  68206. procedure TPORTB_LATB.clearLATB2; inline;
  68207. begin
  68208. pTDefRegMap(@Self)^.clr := $00000004;
  68209. end;
  68210. procedure TPORTB_LATB.setLATB2(thebits : TBits_1); inline;
  68211. begin
  68212. if thebits = 0 then
  68213. pTDefRegMap(@Self)^.clr := $00000004
  68214. else
  68215. pTDefRegMap(@Self)^.&set := $00000004;
  68216. end;
  68217. function TPORTB_LATB.getLATB2 : TBits_1; inline;
  68218. begin
  68219. getLATB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68220. end;
  68221. procedure TPORTB_LATB.setLATB3; inline;
  68222. begin
  68223. pTDefRegMap(@Self)^.&set := $00000008;
  68224. end;
  68225. procedure TPORTB_LATB.clearLATB3; inline;
  68226. begin
  68227. pTDefRegMap(@Self)^.clr := $00000008;
  68228. end;
  68229. procedure TPORTB_LATB.setLATB3(thebits : TBits_1); inline;
  68230. begin
  68231. if thebits = 0 then
  68232. pTDefRegMap(@Self)^.clr := $00000008
  68233. else
  68234. pTDefRegMap(@Self)^.&set := $00000008;
  68235. end;
  68236. function TPORTB_LATB.getLATB3 : TBits_1; inline;
  68237. begin
  68238. getLATB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68239. end;
  68240. procedure TPORTB_LATB.setLATB4; inline;
  68241. begin
  68242. pTDefRegMap(@Self)^.&set := $00000010;
  68243. end;
  68244. procedure TPORTB_LATB.clearLATB4; inline;
  68245. begin
  68246. pTDefRegMap(@Self)^.clr := $00000010;
  68247. end;
  68248. procedure TPORTB_LATB.setLATB4(thebits : TBits_1); inline;
  68249. begin
  68250. if thebits = 0 then
  68251. pTDefRegMap(@Self)^.clr := $00000010
  68252. else
  68253. pTDefRegMap(@Self)^.&set := $00000010;
  68254. end;
  68255. function TPORTB_LATB.getLATB4 : TBits_1; inline;
  68256. begin
  68257. getLATB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68258. end;
  68259. procedure TPORTB_LATB.setLATB5; inline;
  68260. begin
  68261. pTDefRegMap(@Self)^.&set := $00000020;
  68262. end;
  68263. procedure TPORTB_LATB.clearLATB5; inline;
  68264. begin
  68265. pTDefRegMap(@Self)^.clr := $00000020;
  68266. end;
  68267. procedure TPORTB_LATB.setLATB5(thebits : TBits_1); inline;
  68268. begin
  68269. if thebits = 0 then
  68270. pTDefRegMap(@Self)^.clr := $00000020
  68271. else
  68272. pTDefRegMap(@Self)^.&set := $00000020;
  68273. end;
  68274. function TPORTB_LATB.getLATB5 : TBits_1; inline;
  68275. begin
  68276. getLATB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68277. end;
  68278. procedure TPORTB_LATB.setLATB6; inline;
  68279. begin
  68280. pTDefRegMap(@Self)^.&set := $00000040;
  68281. end;
  68282. procedure TPORTB_LATB.clearLATB6; inline;
  68283. begin
  68284. pTDefRegMap(@Self)^.clr := $00000040;
  68285. end;
  68286. procedure TPORTB_LATB.setLATB6(thebits : TBits_1); inline;
  68287. begin
  68288. if thebits = 0 then
  68289. pTDefRegMap(@Self)^.clr := $00000040
  68290. else
  68291. pTDefRegMap(@Self)^.&set := $00000040;
  68292. end;
  68293. function TPORTB_LATB.getLATB6 : TBits_1; inline;
  68294. begin
  68295. getLATB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68296. end;
  68297. procedure TPORTB_LATB.setLATB7; inline;
  68298. begin
  68299. pTDefRegMap(@Self)^.&set := $00000080;
  68300. end;
  68301. procedure TPORTB_LATB.clearLATB7; inline;
  68302. begin
  68303. pTDefRegMap(@Self)^.clr := $00000080;
  68304. end;
  68305. procedure TPORTB_LATB.setLATB7(thebits : TBits_1); inline;
  68306. begin
  68307. if thebits = 0 then
  68308. pTDefRegMap(@Self)^.clr := $00000080
  68309. else
  68310. pTDefRegMap(@Self)^.&set := $00000080;
  68311. end;
  68312. function TPORTB_LATB.getLATB7 : TBits_1; inline;
  68313. begin
  68314. getLATB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68315. end;
  68316. procedure TPORTB_LATB.setLATB8; inline;
  68317. begin
  68318. pTDefRegMap(@Self)^.&set := $00000100;
  68319. end;
  68320. procedure TPORTB_LATB.clearLATB8; inline;
  68321. begin
  68322. pTDefRegMap(@Self)^.clr := $00000100;
  68323. end;
  68324. procedure TPORTB_LATB.setLATB8(thebits : TBits_1); inline;
  68325. begin
  68326. if thebits = 0 then
  68327. pTDefRegMap(@Self)^.clr := $00000100
  68328. else
  68329. pTDefRegMap(@Self)^.&set := $00000100;
  68330. end;
  68331. function TPORTB_LATB.getLATB8 : TBits_1; inline;
  68332. begin
  68333. getLATB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  68334. end;
  68335. procedure TPORTB_LATB.setLATB9; inline;
  68336. begin
  68337. pTDefRegMap(@Self)^.&set := $00000200;
  68338. end;
  68339. procedure TPORTB_LATB.clearLATB9; inline;
  68340. begin
  68341. pTDefRegMap(@Self)^.clr := $00000200;
  68342. end;
  68343. procedure TPORTB_LATB.setLATB9(thebits : TBits_1); inline;
  68344. begin
  68345. if thebits = 0 then
  68346. pTDefRegMap(@Self)^.clr := $00000200
  68347. else
  68348. pTDefRegMap(@Self)^.&set := $00000200;
  68349. end;
  68350. function TPORTB_LATB.getLATB9 : TBits_1; inline;
  68351. begin
  68352. getLATB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  68353. end;
  68354. procedure TPORTB_LATB.setLATB10; inline;
  68355. begin
  68356. pTDefRegMap(@Self)^.&set := $00000400;
  68357. end;
  68358. procedure TPORTB_LATB.clearLATB10; inline;
  68359. begin
  68360. pTDefRegMap(@Self)^.clr := $00000400;
  68361. end;
  68362. procedure TPORTB_LATB.setLATB10(thebits : TBits_1); inline;
  68363. begin
  68364. if thebits = 0 then
  68365. pTDefRegMap(@Self)^.clr := $00000400
  68366. else
  68367. pTDefRegMap(@Self)^.&set := $00000400;
  68368. end;
  68369. function TPORTB_LATB.getLATB10 : TBits_1; inline;
  68370. begin
  68371. getLATB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  68372. end;
  68373. procedure TPORTB_LATB.setLATB11; inline;
  68374. begin
  68375. pTDefRegMap(@Self)^.&set := $00000800;
  68376. end;
  68377. procedure TPORTB_LATB.clearLATB11; inline;
  68378. begin
  68379. pTDefRegMap(@Self)^.clr := $00000800;
  68380. end;
  68381. procedure TPORTB_LATB.setLATB11(thebits : TBits_1); inline;
  68382. begin
  68383. if thebits = 0 then
  68384. pTDefRegMap(@Self)^.clr := $00000800
  68385. else
  68386. pTDefRegMap(@Self)^.&set := $00000800;
  68387. end;
  68388. function TPORTB_LATB.getLATB11 : TBits_1; inline;
  68389. begin
  68390. getLATB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  68391. end;
  68392. procedure TPORTB_LATB.setLATB12; inline;
  68393. begin
  68394. pTDefRegMap(@Self)^.&set := $00001000;
  68395. end;
  68396. procedure TPORTB_LATB.clearLATB12; inline;
  68397. begin
  68398. pTDefRegMap(@Self)^.clr := $00001000;
  68399. end;
  68400. procedure TPORTB_LATB.setLATB12(thebits : TBits_1); inline;
  68401. begin
  68402. if thebits = 0 then
  68403. pTDefRegMap(@Self)^.clr := $00001000
  68404. else
  68405. pTDefRegMap(@Self)^.&set := $00001000;
  68406. end;
  68407. function TPORTB_LATB.getLATB12 : TBits_1; inline;
  68408. begin
  68409. getLATB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68410. end;
  68411. procedure TPORTB_LATB.setLATB13; inline;
  68412. begin
  68413. pTDefRegMap(@Self)^.&set := $00002000;
  68414. end;
  68415. procedure TPORTB_LATB.clearLATB13; inline;
  68416. begin
  68417. pTDefRegMap(@Self)^.clr := $00002000;
  68418. end;
  68419. procedure TPORTB_LATB.setLATB13(thebits : TBits_1); inline;
  68420. begin
  68421. if thebits = 0 then
  68422. pTDefRegMap(@Self)^.clr := $00002000
  68423. else
  68424. pTDefRegMap(@Self)^.&set := $00002000;
  68425. end;
  68426. function TPORTB_LATB.getLATB13 : TBits_1; inline;
  68427. begin
  68428. getLATB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68429. end;
  68430. procedure TPORTB_LATB.setLATB14; inline;
  68431. begin
  68432. pTDefRegMap(@Self)^.&set := $00004000;
  68433. end;
  68434. procedure TPORTB_LATB.clearLATB14; inline;
  68435. begin
  68436. pTDefRegMap(@Self)^.clr := $00004000;
  68437. end;
  68438. procedure TPORTB_LATB.setLATB14(thebits : TBits_1); inline;
  68439. begin
  68440. if thebits = 0 then
  68441. pTDefRegMap(@Self)^.clr := $00004000
  68442. else
  68443. pTDefRegMap(@Self)^.&set := $00004000;
  68444. end;
  68445. function TPORTB_LATB.getLATB14 : TBits_1; inline;
  68446. begin
  68447. getLATB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68448. end;
  68449. procedure TPORTB_LATB.setLATB15; inline;
  68450. begin
  68451. pTDefRegMap(@Self)^.&set := $00008000;
  68452. end;
  68453. procedure TPORTB_LATB.clearLATB15; inline;
  68454. begin
  68455. pTDefRegMap(@Self)^.clr := $00008000;
  68456. end;
  68457. procedure TPORTB_LATB.setLATB15(thebits : TBits_1); inline;
  68458. begin
  68459. if thebits = 0 then
  68460. pTDefRegMap(@Self)^.clr := $00008000
  68461. else
  68462. pTDefRegMap(@Self)^.&set := $00008000;
  68463. end;
  68464. function TPORTB_LATB.getLATB15 : TBits_1; inline;
  68465. begin
  68466. getLATB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68467. end;
  68468. procedure TPORTB_LATB.setw(thebits : TBits_32); inline;
  68469. begin
  68470. pTDefRegMap(@Self)^.val := thebits;
  68471. end;
  68472. function TPORTB_LATB.getw : TBits_32; inline;
  68473. begin
  68474. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68475. end;
  68476. procedure TPORTB_ODCB.setODCB0; inline;
  68477. begin
  68478. pTDefRegMap(@Self)^.&set := $00000001;
  68479. end;
  68480. procedure TPORTB_ODCB.clearODCB0; inline;
  68481. begin
  68482. pTDefRegMap(@Self)^.clr := $00000001;
  68483. end;
  68484. procedure TPORTB_ODCB.setODCB0(thebits : TBits_1); inline;
  68485. begin
  68486. if thebits = 0 then
  68487. pTDefRegMap(@Self)^.clr := $00000001
  68488. else
  68489. pTDefRegMap(@Self)^.&set := $00000001;
  68490. end;
  68491. function TPORTB_ODCB.getODCB0 : TBits_1; inline;
  68492. begin
  68493. getODCB0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  68494. end;
  68495. procedure TPORTB_ODCB.setODCB1; inline;
  68496. begin
  68497. pTDefRegMap(@Self)^.&set := $00000002;
  68498. end;
  68499. procedure TPORTB_ODCB.clearODCB1; inline;
  68500. begin
  68501. pTDefRegMap(@Self)^.clr := $00000002;
  68502. end;
  68503. procedure TPORTB_ODCB.setODCB1(thebits : TBits_1); inline;
  68504. begin
  68505. if thebits = 0 then
  68506. pTDefRegMap(@Self)^.clr := $00000002
  68507. else
  68508. pTDefRegMap(@Self)^.&set := $00000002;
  68509. end;
  68510. function TPORTB_ODCB.getODCB1 : TBits_1; inline;
  68511. begin
  68512. getODCB1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  68513. end;
  68514. procedure TPORTB_ODCB.setODCB2; inline;
  68515. begin
  68516. pTDefRegMap(@Self)^.&set := $00000004;
  68517. end;
  68518. procedure TPORTB_ODCB.clearODCB2; inline;
  68519. begin
  68520. pTDefRegMap(@Self)^.clr := $00000004;
  68521. end;
  68522. procedure TPORTB_ODCB.setODCB2(thebits : TBits_1); inline;
  68523. begin
  68524. if thebits = 0 then
  68525. pTDefRegMap(@Self)^.clr := $00000004
  68526. else
  68527. pTDefRegMap(@Self)^.&set := $00000004;
  68528. end;
  68529. function TPORTB_ODCB.getODCB2 : TBits_1; inline;
  68530. begin
  68531. getODCB2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  68532. end;
  68533. procedure TPORTB_ODCB.setODCB3; inline;
  68534. begin
  68535. pTDefRegMap(@Self)^.&set := $00000008;
  68536. end;
  68537. procedure TPORTB_ODCB.clearODCB3; inline;
  68538. begin
  68539. pTDefRegMap(@Self)^.clr := $00000008;
  68540. end;
  68541. procedure TPORTB_ODCB.setODCB3(thebits : TBits_1); inline;
  68542. begin
  68543. if thebits = 0 then
  68544. pTDefRegMap(@Self)^.clr := $00000008
  68545. else
  68546. pTDefRegMap(@Self)^.&set := $00000008;
  68547. end;
  68548. function TPORTB_ODCB.getODCB3 : TBits_1; inline;
  68549. begin
  68550. getODCB3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  68551. end;
  68552. procedure TPORTB_ODCB.setODCB4; inline;
  68553. begin
  68554. pTDefRegMap(@Self)^.&set := $00000010;
  68555. end;
  68556. procedure TPORTB_ODCB.clearODCB4; inline;
  68557. begin
  68558. pTDefRegMap(@Self)^.clr := $00000010;
  68559. end;
  68560. procedure TPORTB_ODCB.setODCB4(thebits : TBits_1); inline;
  68561. begin
  68562. if thebits = 0 then
  68563. pTDefRegMap(@Self)^.clr := $00000010
  68564. else
  68565. pTDefRegMap(@Self)^.&set := $00000010;
  68566. end;
  68567. function TPORTB_ODCB.getODCB4 : TBits_1; inline;
  68568. begin
  68569. getODCB4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  68570. end;
  68571. procedure TPORTB_ODCB.setODCB5; inline;
  68572. begin
  68573. pTDefRegMap(@Self)^.&set := $00000020;
  68574. end;
  68575. procedure TPORTB_ODCB.clearODCB5; inline;
  68576. begin
  68577. pTDefRegMap(@Self)^.clr := $00000020;
  68578. end;
  68579. procedure TPORTB_ODCB.setODCB5(thebits : TBits_1); inline;
  68580. begin
  68581. if thebits = 0 then
  68582. pTDefRegMap(@Self)^.clr := $00000020
  68583. else
  68584. pTDefRegMap(@Self)^.&set := $00000020;
  68585. end;
  68586. function TPORTB_ODCB.getODCB5 : TBits_1; inline;
  68587. begin
  68588. getODCB5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  68589. end;
  68590. procedure TPORTB_ODCB.setODCB6; inline;
  68591. begin
  68592. pTDefRegMap(@Self)^.&set := $00000040;
  68593. end;
  68594. procedure TPORTB_ODCB.clearODCB6; inline;
  68595. begin
  68596. pTDefRegMap(@Self)^.clr := $00000040;
  68597. end;
  68598. procedure TPORTB_ODCB.setODCB6(thebits : TBits_1); inline;
  68599. begin
  68600. if thebits = 0 then
  68601. pTDefRegMap(@Self)^.clr := $00000040
  68602. else
  68603. pTDefRegMap(@Self)^.&set := $00000040;
  68604. end;
  68605. function TPORTB_ODCB.getODCB6 : TBits_1; inline;
  68606. begin
  68607. getODCB6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  68608. end;
  68609. procedure TPORTB_ODCB.setODCB7; inline;
  68610. begin
  68611. pTDefRegMap(@Self)^.&set := $00000080;
  68612. end;
  68613. procedure TPORTB_ODCB.clearODCB7; inline;
  68614. begin
  68615. pTDefRegMap(@Self)^.clr := $00000080;
  68616. end;
  68617. procedure TPORTB_ODCB.setODCB7(thebits : TBits_1); inline;
  68618. begin
  68619. if thebits = 0 then
  68620. pTDefRegMap(@Self)^.clr := $00000080
  68621. else
  68622. pTDefRegMap(@Self)^.&set := $00000080;
  68623. end;
  68624. function TPORTB_ODCB.getODCB7 : TBits_1; inline;
  68625. begin
  68626. getODCB7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  68627. end;
  68628. procedure TPORTB_ODCB.setODCB8; inline;
  68629. begin
  68630. pTDefRegMap(@Self)^.&set := $00000100;
  68631. end;
  68632. procedure TPORTB_ODCB.clearODCB8; inline;
  68633. begin
  68634. pTDefRegMap(@Self)^.clr := $00000100;
  68635. end;
  68636. procedure TPORTB_ODCB.setODCB8(thebits : TBits_1); inline;
  68637. begin
  68638. if thebits = 0 then
  68639. pTDefRegMap(@Self)^.clr := $00000100
  68640. else
  68641. pTDefRegMap(@Self)^.&set := $00000100;
  68642. end;
  68643. function TPORTB_ODCB.getODCB8 : TBits_1; inline;
  68644. begin
  68645. getODCB8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  68646. end;
  68647. procedure TPORTB_ODCB.setODCB9; inline;
  68648. begin
  68649. pTDefRegMap(@Self)^.&set := $00000200;
  68650. end;
  68651. procedure TPORTB_ODCB.clearODCB9; inline;
  68652. begin
  68653. pTDefRegMap(@Self)^.clr := $00000200;
  68654. end;
  68655. procedure TPORTB_ODCB.setODCB9(thebits : TBits_1); inline;
  68656. begin
  68657. if thebits = 0 then
  68658. pTDefRegMap(@Self)^.clr := $00000200
  68659. else
  68660. pTDefRegMap(@Self)^.&set := $00000200;
  68661. end;
  68662. function TPORTB_ODCB.getODCB9 : TBits_1; inline;
  68663. begin
  68664. getODCB9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  68665. end;
  68666. procedure TPORTB_ODCB.setODCB10; inline;
  68667. begin
  68668. pTDefRegMap(@Self)^.&set := $00000400;
  68669. end;
  68670. procedure TPORTB_ODCB.clearODCB10; inline;
  68671. begin
  68672. pTDefRegMap(@Self)^.clr := $00000400;
  68673. end;
  68674. procedure TPORTB_ODCB.setODCB10(thebits : TBits_1); inline;
  68675. begin
  68676. if thebits = 0 then
  68677. pTDefRegMap(@Self)^.clr := $00000400
  68678. else
  68679. pTDefRegMap(@Self)^.&set := $00000400;
  68680. end;
  68681. function TPORTB_ODCB.getODCB10 : TBits_1; inline;
  68682. begin
  68683. getODCB10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  68684. end;
  68685. procedure TPORTB_ODCB.setODCB11; inline;
  68686. begin
  68687. pTDefRegMap(@Self)^.&set := $00000800;
  68688. end;
  68689. procedure TPORTB_ODCB.clearODCB11; inline;
  68690. begin
  68691. pTDefRegMap(@Self)^.clr := $00000800;
  68692. end;
  68693. procedure TPORTB_ODCB.setODCB11(thebits : TBits_1); inline;
  68694. begin
  68695. if thebits = 0 then
  68696. pTDefRegMap(@Self)^.clr := $00000800
  68697. else
  68698. pTDefRegMap(@Self)^.&set := $00000800;
  68699. end;
  68700. function TPORTB_ODCB.getODCB11 : TBits_1; inline;
  68701. begin
  68702. getODCB11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  68703. end;
  68704. procedure TPORTB_ODCB.setODCB12; inline;
  68705. begin
  68706. pTDefRegMap(@Self)^.&set := $00001000;
  68707. end;
  68708. procedure TPORTB_ODCB.clearODCB12; inline;
  68709. begin
  68710. pTDefRegMap(@Self)^.clr := $00001000;
  68711. end;
  68712. procedure TPORTB_ODCB.setODCB12(thebits : TBits_1); inline;
  68713. begin
  68714. if thebits = 0 then
  68715. pTDefRegMap(@Self)^.clr := $00001000
  68716. else
  68717. pTDefRegMap(@Self)^.&set := $00001000;
  68718. end;
  68719. function TPORTB_ODCB.getODCB12 : TBits_1; inline;
  68720. begin
  68721. getODCB12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68722. end;
  68723. procedure TPORTB_ODCB.setODCB13; inline;
  68724. begin
  68725. pTDefRegMap(@Self)^.&set := $00002000;
  68726. end;
  68727. procedure TPORTB_ODCB.clearODCB13; inline;
  68728. begin
  68729. pTDefRegMap(@Self)^.clr := $00002000;
  68730. end;
  68731. procedure TPORTB_ODCB.setODCB13(thebits : TBits_1); inline;
  68732. begin
  68733. if thebits = 0 then
  68734. pTDefRegMap(@Self)^.clr := $00002000
  68735. else
  68736. pTDefRegMap(@Self)^.&set := $00002000;
  68737. end;
  68738. function TPORTB_ODCB.getODCB13 : TBits_1; inline;
  68739. begin
  68740. getODCB13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68741. end;
  68742. procedure TPORTB_ODCB.setODCB14; inline;
  68743. begin
  68744. pTDefRegMap(@Self)^.&set := $00004000;
  68745. end;
  68746. procedure TPORTB_ODCB.clearODCB14; inline;
  68747. begin
  68748. pTDefRegMap(@Self)^.clr := $00004000;
  68749. end;
  68750. procedure TPORTB_ODCB.setODCB14(thebits : TBits_1); inline;
  68751. begin
  68752. if thebits = 0 then
  68753. pTDefRegMap(@Self)^.clr := $00004000
  68754. else
  68755. pTDefRegMap(@Self)^.&set := $00004000;
  68756. end;
  68757. function TPORTB_ODCB.getODCB14 : TBits_1; inline;
  68758. begin
  68759. getODCB14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68760. end;
  68761. procedure TPORTB_ODCB.setODCB15; inline;
  68762. begin
  68763. pTDefRegMap(@Self)^.&set := $00008000;
  68764. end;
  68765. procedure TPORTB_ODCB.clearODCB15; inline;
  68766. begin
  68767. pTDefRegMap(@Self)^.clr := $00008000;
  68768. end;
  68769. procedure TPORTB_ODCB.setODCB15(thebits : TBits_1); inline;
  68770. begin
  68771. if thebits = 0 then
  68772. pTDefRegMap(@Self)^.clr := $00008000
  68773. else
  68774. pTDefRegMap(@Self)^.&set := $00008000;
  68775. end;
  68776. function TPORTB_ODCB.getODCB15 : TBits_1; inline;
  68777. begin
  68778. getODCB15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68779. end;
  68780. procedure TPORTB_ODCB.setw(thebits : TBits_32); inline;
  68781. begin
  68782. pTDefRegMap(@Self)^.val := thebits;
  68783. end;
  68784. function TPORTB_ODCB.getw : TBits_32; inline;
  68785. begin
  68786. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68787. end;
  68788. procedure TPORTC_TRISC.setTRISC12; inline;
  68789. begin
  68790. pTDefRegMap(@Self)^.&set := $00001000;
  68791. end;
  68792. procedure TPORTC_TRISC.clearTRISC12; inline;
  68793. begin
  68794. pTDefRegMap(@Self)^.clr := $00001000;
  68795. end;
  68796. procedure TPORTC_TRISC.setTRISC12(thebits : TBits_1); inline;
  68797. begin
  68798. if thebits = 0 then
  68799. pTDefRegMap(@Self)^.clr := $00001000
  68800. else
  68801. pTDefRegMap(@Self)^.&set := $00001000;
  68802. end;
  68803. function TPORTC_TRISC.getTRISC12 : TBits_1; inline;
  68804. begin
  68805. getTRISC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68806. end;
  68807. procedure TPORTC_TRISC.setTRISC13; inline;
  68808. begin
  68809. pTDefRegMap(@Self)^.&set := $00002000;
  68810. end;
  68811. procedure TPORTC_TRISC.clearTRISC13; inline;
  68812. begin
  68813. pTDefRegMap(@Self)^.clr := $00002000;
  68814. end;
  68815. procedure TPORTC_TRISC.setTRISC13(thebits : TBits_1); inline;
  68816. begin
  68817. if thebits = 0 then
  68818. pTDefRegMap(@Self)^.clr := $00002000
  68819. else
  68820. pTDefRegMap(@Self)^.&set := $00002000;
  68821. end;
  68822. function TPORTC_TRISC.getTRISC13 : TBits_1; inline;
  68823. begin
  68824. getTRISC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68825. end;
  68826. procedure TPORTC_TRISC.setTRISC14; inline;
  68827. begin
  68828. pTDefRegMap(@Self)^.&set := $00004000;
  68829. end;
  68830. procedure TPORTC_TRISC.clearTRISC14; inline;
  68831. begin
  68832. pTDefRegMap(@Self)^.clr := $00004000;
  68833. end;
  68834. procedure TPORTC_TRISC.setTRISC14(thebits : TBits_1); inline;
  68835. begin
  68836. if thebits = 0 then
  68837. pTDefRegMap(@Self)^.clr := $00004000
  68838. else
  68839. pTDefRegMap(@Self)^.&set := $00004000;
  68840. end;
  68841. function TPORTC_TRISC.getTRISC14 : TBits_1; inline;
  68842. begin
  68843. getTRISC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68844. end;
  68845. procedure TPORTC_TRISC.setTRISC15; inline;
  68846. begin
  68847. pTDefRegMap(@Self)^.&set := $00008000;
  68848. end;
  68849. procedure TPORTC_TRISC.clearTRISC15; inline;
  68850. begin
  68851. pTDefRegMap(@Self)^.clr := $00008000;
  68852. end;
  68853. procedure TPORTC_TRISC.setTRISC15(thebits : TBits_1); inline;
  68854. begin
  68855. if thebits = 0 then
  68856. pTDefRegMap(@Self)^.clr := $00008000
  68857. else
  68858. pTDefRegMap(@Self)^.&set := $00008000;
  68859. end;
  68860. function TPORTC_TRISC.getTRISC15 : TBits_1; inline;
  68861. begin
  68862. getTRISC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68863. end;
  68864. procedure TPORTC_TRISC.setw(thebits : TBits_32); inline;
  68865. begin
  68866. pTDefRegMap(@Self)^.val := thebits;
  68867. end;
  68868. function TPORTC_TRISC.getw : TBits_32; inline;
  68869. begin
  68870. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68871. end;
  68872. procedure TPORTC_PORTC.setRC12; inline;
  68873. begin
  68874. pTDefRegMap(@Self)^.&set := $00001000;
  68875. end;
  68876. procedure TPORTC_PORTC.clearRC12; inline;
  68877. begin
  68878. pTDefRegMap(@Self)^.clr := $00001000;
  68879. end;
  68880. procedure TPORTC_PORTC.setRC12(thebits : TBits_1); inline;
  68881. begin
  68882. if thebits = 0 then
  68883. pTDefRegMap(@Self)^.clr := $00001000
  68884. else
  68885. pTDefRegMap(@Self)^.&set := $00001000;
  68886. end;
  68887. function TPORTC_PORTC.getRC12 : TBits_1; inline;
  68888. begin
  68889. getRC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68890. end;
  68891. procedure TPORTC_PORTC.setRC13; inline;
  68892. begin
  68893. pTDefRegMap(@Self)^.&set := $00002000;
  68894. end;
  68895. procedure TPORTC_PORTC.clearRC13; inline;
  68896. begin
  68897. pTDefRegMap(@Self)^.clr := $00002000;
  68898. end;
  68899. procedure TPORTC_PORTC.setRC13(thebits : TBits_1); inline;
  68900. begin
  68901. if thebits = 0 then
  68902. pTDefRegMap(@Self)^.clr := $00002000
  68903. else
  68904. pTDefRegMap(@Self)^.&set := $00002000;
  68905. end;
  68906. function TPORTC_PORTC.getRC13 : TBits_1; inline;
  68907. begin
  68908. getRC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68909. end;
  68910. procedure TPORTC_PORTC.setRC14; inline;
  68911. begin
  68912. pTDefRegMap(@Self)^.&set := $00004000;
  68913. end;
  68914. procedure TPORTC_PORTC.clearRC14; inline;
  68915. begin
  68916. pTDefRegMap(@Self)^.clr := $00004000;
  68917. end;
  68918. procedure TPORTC_PORTC.setRC14(thebits : TBits_1); inline;
  68919. begin
  68920. if thebits = 0 then
  68921. pTDefRegMap(@Self)^.clr := $00004000
  68922. else
  68923. pTDefRegMap(@Self)^.&set := $00004000;
  68924. end;
  68925. function TPORTC_PORTC.getRC14 : TBits_1; inline;
  68926. begin
  68927. getRC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  68928. end;
  68929. procedure TPORTC_PORTC.setRC15; inline;
  68930. begin
  68931. pTDefRegMap(@Self)^.&set := $00008000;
  68932. end;
  68933. procedure TPORTC_PORTC.clearRC15; inline;
  68934. begin
  68935. pTDefRegMap(@Self)^.clr := $00008000;
  68936. end;
  68937. procedure TPORTC_PORTC.setRC15(thebits : TBits_1); inline;
  68938. begin
  68939. if thebits = 0 then
  68940. pTDefRegMap(@Self)^.clr := $00008000
  68941. else
  68942. pTDefRegMap(@Self)^.&set := $00008000;
  68943. end;
  68944. function TPORTC_PORTC.getRC15 : TBits_1; inline;
  68945. begin
  68946. getRC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  68947. end;
  68948. procedure TPORTC_PORTC.setw(thebits : TBits_32); inline;
  68949. begin
  68950. pTDefRegMap(@Self)^.val := thebits;
  68951. end;
  68952. function TPORTC_PORTC.getw : TBits_32; inline;
  68953. begin
  68954. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  68955. end;
  68956. procedure TPORTC_LATC.setLATC12; inline;
  68957. begin
  68958. pTDefRegMap(@Self)^.&set := $00001000;
  68959. end;
  68960. procedure TPORTC_LATC.clearLATC12; inline;
  68961. begin
  68962. pTDefRegMap(@Self)^.clr := $00001000;
  68963. end;
  68964. procedure TPORTC_LATC.setLATC12(thebits : TBits_1); inline;
  68965. begin
  68966. if thebits = 0 then
  68967. pTDefRegMap(@Self)^.clr := $00001000
  68968. else
  68969. pTDefRegMap(@Self)^.&set := $00001000;
  68970. end;
  68971. function TPORTC_LATC.getLATC12 : TBits_1; inline;
  68972. begin
  68973. getLATC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  68974. end;
  68975. procedure TPORTC_LATC.setLATC13; inline;
  68976. begin
  68977. pTDefRegMap(@Self)^.&set := $00002000;
  68978. end;
  68979. procedure TPORTC_LATC.clearLATC13; inline;
  68980. begin
  68981. pTDefRegMap(@Self)^.clr := $00002000;
  68982. end;
  68983. procedure TPORTC_LATC.setLATC13(thebits : TBits_1); inline;
  68984. begin
  68985. if thebits = 0 then
  68986. pTDefRegMap(@Self)^.clr := $00002000
  68987. else
  68988. pTDefRegMap(@Self)^.&set := $00002000;
  68989. end;
  68990. function TPORTC_LATC.getLATC13 : TBits_1; inline;
  68991. begin
  68992. getLATC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  68993. end;
  68994. procedure TPORTC_LATC.setLATC14; inline;
  68995. begin
  68996. pTDefRegMap(@Self)^.&set := $00004000;
  68997. end;
  68998. procedure TPORTC_LATC.clearLATC14; inline;
  68999. begin
  69000. pTDefRegMap(@Self)^.clr := $00004000;
  69001. end;
  69002. procedure TPORTC_LATC.setLATC14(thebits : TBits_1); inline;
  69003. begin
  69004. if thebits = 0 then
  69005. pTDefRegMap(@Self)^.clr := $00004000
  69006. else
  69007. pTDefRegMap(@Self)^.&set := $00004000;
  69008. end;
  69009. function TPORTC_LATC.getLATC14 : TBits_1; inline;
  69010. begin
  69011. getLATC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69012. end;
  69013. procedure TPORTC_LATC.setLATC15; inline;
  69014. begin
  69015. pTDefRegMap(@Self)^.&set := $00008000;
  69016. end;
  69017. procedure TPORTC_LATC.clearLATC15; inline;
  69018. begin
  69019. pTDefRegMap(@Self)^.clr := $00008000;
  69020. end;
  69021. procedure TPORTC_LATC.setLATC15(thebits : TBits_1); inline;
  69022. begin
  69023. if thebits = 0 then
  69024. pTDefRegMap(@Self)^.clr := $00008000
  69025. else
  69026. pTDefRegMap(@Self)^.&set := $00008000;
  69027. end;
  69028. function TPORTC_LATC.getLATC15 : TBits_1; inline;
  69029. begin
  69030. getLATC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  69031. end;
  69032. procedure TPORTC_LATC.setw(thebits : TBits_32); inline;
  69033. begin
  69034. pTDefRegMap(@Self)^.val := thebits;
  69035. end;
  69036. function TPORTC_LATC.getw : TBits_32; inline;
  69037. begin
  69038. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69039. end;
  69040. procedure TPORTC_ODCC.setODCC12; inline;
  69041. begin
  69042. pTDefRegMap(@Self)^.&set := $00001000;
  69043. end;
  69044. procedure TPORTC_ODCC.clearODCC12; inline;
  69045. begin
  69046. pTDefRegMap(@Self)^.clr := $00001000;
  69047. end;
  69048. procedure TPORTC_ODCC.setODCC12(thebits : TBits_1); inline;
  69049. begin
  69050. if thebits = 0 then
  69051. pTDefRegMap(@Self)^.clr := $00001000
  69052. else
  69053. pTDefRegMap(@Self)^.&set := $00001000;
  69054. end;
  69055. function TPORTC_ODCC.getODCC12 : TBits_1; inline;
  69056. begin
  69057. getODCC12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  69058. end;
  69059. procedure TPORTC_ODCC.setODCC13; inline;
  69060. begin
  69061. pTDefRegMap(@Self)^.&set := $00002000;
  69062. end;
  69063. procedure TPORTC_ODCC.clearODCC13; inline;
  69064. begin
  69065. pTDefRegMap(@Self)^.clr := $00002000;
  69066. end;
  69067. procedure TPORTC_ODCC.setODCC13(thebits : TBits_1); inline;
  69068. begin
  69069. if thebits = 0 then
  69070. pTDefRegMap(@Self)^.clr := $00002000
  69071. else
  69072. pTDefRegMap(@Self)^.&set := $00002000;
  69073. end;
  69074. function TPORTC_ODCC.getODCC13 : TBits_1; inline;
  69075. begin
  69076. getODCC13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  69077. end;
  69078. procedure TPORTC_ODCC.setODCC14; inline;
  69079. begin
  69080. pTDefRegMap(@Self)^.&set := $00004000;
  69081. end;
  69082. procedure TPORTC_ODCC.clearODCC14; inline;
  69083. begin
  69084. pTDefRegMap(@Self)^.clr := $00004000;
  69085. end;
  69086. procedure TPORTC_ODCC.setODCC14(thebits : TBits_1); inline;
  69087. begin
  69088. if thebits = 0 then
  69089. pTDefRegMap(@Self)^.clr := $00004000
  69090. else
  69091. pTDefRegMap(@Self)^.&set := $00004000;
  69092. end;
  69093. function TPORTC_ODCC.getODCC14 : TBits_1; inline;
  69094. begin
  69095. getODCC14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  69096. end;
  69097. procedure TPORTC_ODCC.setODCC15; inline;
  69098. begin
  69099. pTDefRegMap(@Self)^.&set := $00008000;
  69100. end;
  69101. procedure TPORTC_ODCC.clearODCC15; inline;
  69102. begin
  69103. pTDefRegMap(@Self)^.clr := $00008000;
  69104. end;
  69105. procedure TPORTC_ODCC.setODCC15(thebits : TBits_1); inline;
  69106. begin
  69107. if thebits = 0 then
  69108. pTDefRegMap(@Self)^.clr := $00008000
  69109. else
  69110. pTDefRegMap(@Self)^.&set := $00008000;
  69111. end;
  69112. function TPORTC_ODCC.getODCC15 : TBits_1; inline;
  69113. begin
  69114. getODCC15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  69115. end;
  69116. procedure TPORTC_ODCC.setw(thebits : TBits_32); inline;
  69117. begin
  69118. pTDefRegMap(@Self)^.val := thebits;
  69119. end;
  69120. function TPORTC_ODCC.getw : TBits_32; inline;
  69121. begin
  69122. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69123. end;
  69124. procedure TPORTD_TRISD.setTRISD0; inline;
  69125. begin
  69126. pTDefRegMap(@Self)^.&set := $00000001;
  69127. end;
  69128. procedure TPORTD_TRISD.clearTRISD0; inline;
  69129. begin
  69130. pTDefRegMap(@Self)^.clr := $00000001;
  69131. end;
  69132. procedure TPORTD_TRISD.setTRISD0(thebits : TBits_1); inline;
  69133. begin
  69134. if thebits = 0 then
  69135. pTDefRegMap(@Self)^.clr := $00000001
  69136. else
  69137. pTDefRegMap(@Self)^.&set := $00000001;
  69138. end;
  69139. function TPORTD_TRISD.getTRISD0 : TBits_1; inline;
  69140. begin
  69141. getTRISD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69142. end;
  69143. procedure TPORTD_TRISD.setTRISD1; inline;
  69144. begin
  69145. pTDefRegMap(@Self)^.&set := $00000002;
  69146. end;
  69147. procedure TPORTD_TRISD.clearTRISD1; inline;
  69148. begin
  69149. pTDefRegMap(@Self)^.clr := $00000002;
  69150. end;
  69151. procedure TPORTD_TRISD.setTRISD1(thebits : TBits_1); inline;
  69152. begin
  69153. if thebits = 0 then
  69154. pTDefRegMap(@Self)^.clr := $00000002
  69155. else
  69156. pTDefRegMap(@Self)^.&set := $00000002;
  69157. end;
  69158. function TPORTD_TRISD.getTRISD1 : TBits_1; inline;
  69159. begin
  69160. getTRISD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69161. end;
  69162. procedure TPORTD_TRISD.setTRISD2; inline;
  69163. begin
  69164. pTDefRegMap(@Self)^.&set := $00000004;
  69165. end;
  69166. procedure TPORTD_TRISD.clearTRISD2; inline;
  69167. begin
  69168. pTDefRegMap(@Self)^.clr := $00000004;
  69169. end;
  69170. procedure TPORTD_TRISD.setTRISD2(thebits : TBits_1); inline;
  69171. begin
  69172. if thebits = 0 then
  69173. pTDefRegMap(@Self)^.clr := $00000004
  69174. else
  69175. pTDefRegMap(@Self)^.&set := $00000004;
  69176. end;
  69177. function TPORTD_TRISD.getTRISD2 : TBits_1; inline;
  69178. begin
  69179. getTRISD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69180. end;
  69181. procedure TPORTD_TRISD.setTRISD3; inline;
  69182. begin
  69183. pTDefRegMap(@Self)^.&set := $00000008;
  69184. end;
  69185. procedure TPORTD_TRISD.clearTRISD3; inline;
  69186. begin
  69187. pTDefRegMap(@Self)^.clr := $00000008;
  69188. end;
  69189. procedure TPORTD_TRISD.setTRISD3(thebits : TBits_1); inline;
  69190. begin
  69191. if thebits = 0 then
  69192. pTDefRegMap(@Self)^.clr := $00000008
  69193. else
  69194. pTDefRegMap(@Self)^.&set := $00000008;
  69195. end;
  69196. function TPORTD_TRISD.getTRISD3 : TBits_1; inline;
  69197. begin
  69198. getTRISD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69199. end;
  69200. procedure TPORTD_TRISD.setTRISD4; inline;
  69201. begin
  69202. pTDefRegMap(@Self)^.&set := $00000010;
  69203. end;
  69204. procedure TPORTD_TRISD.clearTRISD4; inline;
  69205. begin
  69206. pTDefRegMap(@Self)^.clr := $00000010;
  69207. end;
  69208. procedure TPORTD_TRISD.setTRISD4(thebits : TBits_1); inline;
  69209. begin
  69210. if thebits = 0 then
  69211. pTDefRegMap(@Self)^.clr := $00000010
  69212. else
  69213. pTDefRegMap(@Self)^.&set := $00000010;
  69214. end;
  69215. function TPORTD_TRISD.getTRISD4 : TBits_1; inline;
  69216. begin
  69217. getTRISD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69218. end;
  69219. procedure TPORTD_TRISD.setTRISD5; inline;
  69220. begin
  69221. pTDefRegMap(@Self)^.&set := $00000020;
  69222. end;
  69223. procedure TPORTD_TRISD.clearTRISD5; inline;
  69224. begin
  69225. pTDefRegMap(@Self)^.clr := $00000020;
  69226. end;
  69227. procedure TPORTD_TRISD.setTRISD5(thebits : TBits_1); inline;
  69228. begin
  69229. if thebits = 0 then
  69230. pTDefRegMap(@Self)^.clr := $00000020
  69231. else
  69232. pTDefRegMap(@Self)^.&set := $00000020;
  69233. end;
  69234. function TPORTD_TRISD.getTRISD5 : TBits_1; inline;
  69235. begin
  69236. getTRISD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69237. end;
  69238. procedure TPORTD_TRISD.setTRISD6; inline;
  69239. begin
  69240. pTDefRegMap(@Self)^.&set := $00000040;
  69241. end;
  69242. procedure TPORTD_TRISD.clearTRISD6; inline;
  69243. begin
  69244. pTDefRegMap(@Self)^.clr := $00000040;
  69245. end;
  69246. procedure TPORTD_TRISD.setTRISD6(thebits : TBits_1); inline;
  69247. begin
  69248. if thebits = 0 then
  69249. pTDefRegMap(@Self)^.clr := $00000040
  69250. else
  69251. pTDefRegMap(@Self)^.&set := $00000040;
  69252. end;
  69253. function TPORTD_TRISD.getTRISD6 : TBits_1; inline;
  69254. begin
  69255. getTRISD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69256. end;
  69257. procedure TPORTD_TRISD.setTRISD7; inline;
  69258. begin
  69259. pTDefRegMap(@Self)^.&set := $00000080;
  69260. end;
  69261. procedure TPORTD_TRISD.clearTRISD7; inline;
  69262. begin
  69263. pTDefRegMap(@Self)^.clr := $00000080;
  69264. end;
  69265. procedure TPORTD_TRISD.setTRISD7(thebits : TBits_1); inline;
  69266. begin
  69267. if thebits = 0 then
  69268. pTDefRegMap(@Self)^.clr := $00000080
  69269. else
  69270. pTDefRegMap(@Self)^.&set := $00000080;
  69271. end;
  69272. function TPORTD_TRISD.getTRISD7 : TBits_1; inline;
  69273. begin
  69274. getTRISD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69275. end;
  69276. procedure TPORTD_TRISD.setTRISD8; inline;
  69277. begin
  69278. pTDefRegMap(@Self)^.&set := $00000100;
  69279. end;
  69280. procedure TPORTD_TRISD.clearTRISD8; inline;
  69281. begin
  69282. pTDefRegMap(@Self)^.clr := $00000100;
  69283. end;
  69284. procedure TPORTD_TRISD.setTRISD8(thebits : TBits_1); inline;
  69285. begin
  69286. if thebits = 0 then
  69287. pTDefRegMap(@Self)^.clr := $00000100
  69288. else
  69289. pTDefRegMap(@Self)^.&set := $00000100;
  69290. end;
  69291. function TPORTD_TRISD.getTRISD8 : TBits_1; inline;
  69292. begin
  69293. getTRISD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69294. end;
  69295. procedure TPORTD_TRISD.setTRISD9; inline;
  69296. begin
  69297. pTDefRegMap(@Self)^.&set := $00000200;
  69298. end;
  69299. procedure TPORTD_TRISD.clearTRISD9; inline;
  69300. begin
  69301. pTDefRegMap(@Self)^.clr := $00000200;
  69302. end;
  69303. procedure TPORTD_TRISD.setTRISD9(thebits : TBits_1); inline;
  69304. begin
  69305. if thebits = 0 then
  69306. pTDefRegMap(@Self)^.clr := $00000200
  69307. else
  69308. pTDefRegMap(@Self)^.&set := $00000200;
  69309. end;
  69310. function TPORTD_TRISD.getTRISD9 : TBits_1; inline;
  69311. begin
  69312. getTRISD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69313. end;
  69314. procedure TPORTD_TRISD.setTRISD10; inline;
  69315. begin
  69316. pTDefRegMap(@Self)^.&set := $00000400;
  69317. end;
  69318. procedure TPORTD_TRISD.clearTRISD10; inline;
  69319. begin
  69320. pTDefRegMap(@Self)^.clr := $00000400;
  69321. end;
  69322. procedure TPORTD_TRISD.setTRISD10(thebits : TBits_1); inline;
  69323. begin
  69324. if thebits = 0 then
  69325. pTDefRegMap(@Self)^.clr := $00000400
  69326. else
  69327. pTDefRegMap(@Self)^.&set := $00000400;
  69328. end;
  69329. function TPORTD_TRISD.getTRISD10 : TBits_1; inline;
  69330. begin
  69331. getTRISD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69332. end;
  69333. procedure TPORTD_TRISD.setTRISD11; inline;
  69334. begin
  69335. pTDefRegMap(@Self)^.&set := $00000800;
  69336. end;
  69337. procedure TPORTD_TRISD.clearTRISD11; inline;
  69338. begin
  69339. pTDefRegMap(@Self)^.clr := $00000800;
  69340. end;
  69341. procedure TPORTD_TRISD.setTRISD11(thebits : TBits_1); inline;
  69342. begin
  69343. if thebits = 0 then
  69344. pTDefRegMap(@Self)^.clr := $00000800
  69345. else
  69346. pTDefRegMap(@Self)^.&set := $00000800;
  69347. end;
  69348. function TPORTD_TRISD.getTRISD11 : TBits_1; inline;
  69349. begin
  69350. getTRISD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  69351. end;
  69352. procedure TPORTD_TRISD.setw(thebits : TBits_32); inline;
  69353. begin
  69354. pTDefRegMap(@Self)^.val := thebits;
  69355. end;
  69356. function TPORTD_TRISD.getw : TBits_32; inline;
  69357. begin
  69358. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69359. end;
  69360. procedure TPORTD_PORTD.setRD0; inline;
  69361. begin
  69362. pTDefRegMap(@Self)^.&set := $00000001;
  69363. end;
  69364. procedure TPORTD_PORTD.clearRD0; inline;
  69365. begin
  69366. pTDefRegMap(@Self)^.clr := $00000001;
  69367. end;
  69368. procedure TPORTD_PORTD.setRD0(thebits : TBits_1); inline;
  69369. begin
  69370. if thebits = 0 then
  69371. pTDefRegMap(@Self)^.clr := $00000001
  69372. else
  69373. pTDefRegMap(@Self)^.&set := $00000001;
  69374. end;
  69375. function TPORTD_PORTD.getRD0 : TBits_1; inline;
  69376. begin
  69377. getRD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69378. end;
  69379. procedure TPORTD_PORTD.setRD1; inline;
  69380. begin
  69381. pTDefRegMap(@Self)^.&set := $00000002;
  69382. end;
  69383. procedure TPORTD_PORTD.clearRD1; inline;
  69384. begin
  69385. pTDefRegMap(@Self)^.clr := $00000002;
  69386. end;
  69387. procedure TPORTD_PORTD.setRD1(thebits : TBits_1); inline;
  69388. begin
  69389. if thebits = 0 then
  69390. pTDefRegMap(@Self)^.clr := $00000002
  69391. else
  69392. pTDefRegMap(@Self)^.&set := $00000002;
  69393. end;
  69394. function TPORTD_PORTD.getRD1 : TBits_1; inline;
  69395. begin
  69396. getRD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69397. end;
  69398. procedure TPORTD_PORTD.setRD2; inline;
  69399. begin
  69400. pTDefRegMap(@Self)^.&set := $00000004;
  69401. end;
  69402. procedure TPORTD_PORTD.clearRD2; inline;
  69403. begin
  69404. pTDefRegMap(@Self)^.clr := $00000004;
  69405. end;
  69406. procedure TPORTD_PORTD.setRD2(thebits : TBits_1); inline;
  69407. begin
  69408. if thebits = 0 then
  69409. pTDefRegMap(@Self)^.clr := $00000004
  69410. else
  69411. pTDefRegMap(@Self)^.&set := $00000004;
  69412. end;
  69413. function TPORTD_PORTD.getRD2 : TBits_1; inline;
  69414. begin
  69415. getRD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69416. end;
  69417. procedure TPORTD_PORTD.setRD3; inline;
  69418. begin
  69419. pTDefRegMap(@Self)^.&set := $00000008;
  69420. end;
  69421. procedure TPORTD_PORTD.clearRD3; inline;
  69422. begin
  69423. pTDefRegMap(@Self)^.clr := $00000008;
  69424. end;
  69425. procedure TPORTD_PORTD.setRD3(thebits : TBits_1); inline;
  69426. begin
  69427. if thebits = 0 then
  69428. pTDefRegMap(@Self)^.clr := $00000008
  69429. else
  69430. pTDefRegMap(@Self)^.&set := $00000008;
  69431. end;
  69432. function TPORTD_PORTD.getRD3 : TBits_1; inline;
  69433. begin
  69434. getRD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69435. end;
  69436. procedure TPORTD_PORTD.setRD4; inline;
  69437. begin
  69438. pTDefRegMap(@Self)^.&set := $00000010;
  69439. end;
  69440. procedure TPORTD_PORTD.clearRD4; inline;
  69441. begin
  69442. pTDefRegMap(@Self)^.clr := $00000010;
  69443. end;
  69444. procedure TPORTD_PORTD.setRD4(thebits : TBits_1); inline;
  69445. begin
  69446. if thebits = 0 then
  69447. pTDefRegMap(@Self)^.clr := $00000010
  69448. else
  69449. pTDefRegMap(@Self)^.&set := $00000010;
  69450. end;
  69451. function TPORTD_PORTD.getRD4 : TBits_1; inline;
  69452. begin
  69453. getRD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69454. end;
  69455. procedure TPORTD_PORTD.setRD5; inline;
  69456. begin
  69457. pTDefRegMap(@Self)^.&set := $00000020;
  69458. end;
  69459. procedure TPORTD_PORTD.clearRD5; inline;
  69460. begin
  69461. pTDefRegMap(@Self)^.clr := $00000020;
  69462. end;
  69463. procedure TPORTD_PORTD.setRD5(thebits : TBits_1); inline;
  69464. begin
  69465. if thebits = 0 then
  69466. pTDefRegMap(@Self)^.clr := $00000020
  69467. else
  69468. pTDefRegMap(@Self)^.&set := $00000020;
  69469. end;
  69470. function TPORTD_PORTD.getRD5 : TBits_1; inline;
  69471. begin
  69472. getRD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69473. end;
  69474. procedure TPORTD_PORTD.setRD6; inline;
  69475. begin
  69476. pTDefRegMap(@Self)^.&set := $00000040;
  69477. end;
  69478. procedure TPORTD_PORTD.clearRD6; inline;
  69479. begin
  69480. pTDefRegMap(@Self)^.clr := $00000040;
  69481. end;
  69482. procedure TPORTD_PORTD.setRD6(thebits : TBits_1); inline;
  69483. begin
  69484. if thebits = 0 then
  69485. pTDefRegMap(@Self)^.clr := $00000040
  69486. else
  69487. pTDefRegMap(@Self)^.&set := $00000040;
  69488. end;
  69489. function TPORTD_PORTD.getRD6 : TBits_1; inline;
  69490. begin
  69491. getRD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69492. end;
  69493. procedure TPORTD_PORTD.setRD7; inline;
  69494. begin
  69495. pTDefRegMap(@Self)^.&set := $00000080;
  69496. end;
  69497. procedure TPORTD_PORTD.clearRD7; inline;
  69498. begin
  69499. pTDefRegMap(@Self)^.clr := $00000080;
  69500. end;
  69501. procedure TPORTD_PORTD.setRD7(thebits : TBits_1); inline;
  69502. begin
  69503. if thebits = 0 then
  69504. pTDefRegMap(@Self)^.clr := $00000080
  69505. else
  69506. pTDefRegMap(@Self)^.&set := $00000080;
  69507. end;
  69508. function TPORTD_PORTD.getRD7 : TBits_1; inline;
  69509. begin
  69510. getRD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69511. end;
  69512. procedure TPORTD_PORTD.setRD8; inline;
  69513. begin
  69514. pTDefRegMap(@Self)^.&set := $00000100;
  69515. end;
  69516. procedure TPORTD_PORTD.clearRD8; inline;
  69517. begin
  69518. pTDefRegMap(@Self)^.clr := $00000100;
  69519. end;
  69520. procedure TPORTD_PORTD.setRD8(thebits : TBits_1); inline;
  69521. begin
  69522. if thebits = 0 then
  69523. pTDefRegMap(@Self)^.clr := $00000100
  69524. else
  69525. pTDefRegMap(@Self)^.&set := $00000100;
  69526. end;
  69527. function TPORTD_PORTD.getRD8 : TBits_1; inline;
  69528. begin
  69529. getRD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69530. end;
  69531. procedure TPORTD_PORTD.setRD9; inline;
  69532. begin
  69533. pTDefRegMap(@Self)^.&set := $00000200;
  69534. end;
  69535. procedure TPORTD_PORTD.clearRD9; inline;
  69536. begin
  69537. pTDefRegMap(@Self)^.clr := $00000200;
  69538. end;
  69539. procedure TPORTD_PORTD.setRD9(thebits : TBits_1); inline;
  69540. begin
  69541. if thebits = 0 then
  69542. pTDefRegMap(@Self)^.clr := $00000200
  69543. else
  69544. pTDefRegMap(@Self)^.&set := $00000200;
  69545. end;
  69546. function TPORTD_PORTD.getRD9 : TBits_1; inline;
  69547. begin
  69548. getRD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69549. end;
  69550. procedure TPORTD_PORTD.setRD10; inline;
  69551. begin
  69552. pTDefRegMap(@Self)^.&set := $00000400;
  69553. end;
  69554. procedure TPORTD_PORTD.clearRD10; inline;
  69555. begin
  69556. pTDefRegMap(@Self)^.clr := $00000400;
  69557. end;
  69558. procedure TPORTD_PORTD.setRD10(thebits : TBits_1); inline;
  69559. begin
  69560. if thebits = 0 then
  69561. pTDefRegMap(@Self)^.clr := $00000400
  69562. else
  69563. pTDefRegMap(@Self)^.&set := $00000400;
  69564. end;
  69565. function TPORTD_PORTD.getRD10 : TBits_1; inline;
  69566. begin
  69567. getRD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69568. end;
  69569. procedure TPORTD_PORTD.setRD11; inline;
  69570. begin
  69571. pTDefRegMap(@Self)^.&set := $00000800;
  69572. end;
  69573. procedure TPORTD_PORTD.clearRD11; inline;
  69574. begin
  69575. pTDefRegMap(@Self)^.clr := $00000800;
  69576. end;
  69577. procedure TPORTD_PORTD.setRD11(thebits : TBits_1); inline;
  69578. begin
  69579. if thebits = 0 then
  69580. pTDefRegMap(@Self)^.clr := $00000800
  69581. else
  69582. pTDefRegMap(@Self)^.&set := $00000800;
  69583. end;
  69584. function TPORTD_PORTD.getRD11 : TBits_1; inline;
  69585. begin
  69586. getRD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  69587. end;
  69588. procedure TPORTD_PORTD.setw(thebits : TBits_32); inline;
  69589. begin
  69590. pTDefRegMap(@Self)^.val := thebits;
  69591. end;
  69592. function TPORTD_PORTD.getw : TBits_32; inline;
  69593. begin
  69594. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69595. end;
  69596. procedure TPORTD_LATD.setLATD0; inline;
  69597. begin
  69598. pTDefRegMap(@Self)^.&set := $00000001;
  69599. end;
  69600. procedure TPORTD_LATD.clearLATD0; inline;
  69601. begin
  69602. pTDefRegMap(@Self)^.clr := $00000001;
  69603. end;
  69604. procedure TPORTD_LATD.setLATD0(thebits : TBits_1); inline;
  69605. begin
  69606. if thebits = 0 then
  69607. pTDefRegMap(@Self)^.clr := $00000001
  69608. else
  69609. pTDefRegMap(@Self)^.&set := $00000001;
  69610. end;
  69611. function TPORTD_LATD.getLATD0 : TBits_1; inline;
  69612. begin
  69613. getLATD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69614. end;
  69615. procedure TPORTD_LATD.setLATD1; inline;
  69616. begin
  69617. pTDefRegMap(@Self)^.&set := $00000002;
  69618. end;
  69619. procedure TPORTD_LATD.clearLATD1; inline;
  69620. begin
  69621. pTDefRegMap(@Self)^.clr := $00000002;
  69622. end;
  69623. procedure TPORTD_LATD.setLATD1(thebits : TBits_1); inline;
  69624. begin
  69625. if thebits = 0 then
  69626. pTDefRegMap(@Self)^.clr := $00000002
  69627. else
  69628. pTDefRegMap(@Self)^.&set := $00000002;
  69629. end;
  69630. function TPORTD_LATD.getLATD1 : TBits_1; inline;
  69631. begin
  69632. getLATD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69633. end;
  69634. procedure TPORTD_LATD.setLATD2; inline;
  69635. begin
  69636. pTDefRegMap(@Self)^.&set := $00000004;
  69637. end;
  69638. procedure TPORTD_LATD.clearLATD2; inline;
  69639. begin
  69640. pTDefRegMap(@Self)^.clr := $00000004;
  69641. end;
  69642. procedure TPORTD_LATD.setLATD2(thebits : TBits_1); inline;
  69643. begin
  69644. if thebits = 0 then
  69645. pTDefRegMap(@Self)^.clr := $00000004
  69646. else
  69647. pTDefRegMap(@Self)^.&set := $00000004;
  69648. end;
  69649. function TPORTD_LATD.getLATD2 : TBits_1; inline;
  69650. begin
  69651. getLATD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69652. end;
  69653. procedure TPORTD_LATD.setLATD3; inline;
  69654. begin
  69655. pTDefRegMap(@Self)^.&set := $00000008;
  69656. end;
  69657. procedure TPORTD_LATD.clearLATD3; inline;
  69658. begin
  69659. pTDefRegMap(@Self)^.clr := $00000008;
  69660. end;
  69661. procedure TPORTD_LATD.setLATD3(thebits : TBits_1); inline;
  69662. begin
  69663. if thebits = 0 then
  69664. pTDefRegMap(@Self)^.clr := $00000008
  69665. else
  69666. pTDefRegMap(@Self)^.&set := $00000008;
  69667. end;
  69668. function TPORTD_LATD.getLATD3 : TBits_1; inline;
  69669. begin
  69670. getLATD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69671. end;
  69672. procedure TPORTD_LATD.setLATD4; inline;
  69673. begin
  69674. pTDefRegMap(@Self)^.&set := $00000010;
  69675. end;
  69676. procedure TPORTD_LATD.clearLATD4; inline;
  69677. begin
  69678. pTDefRegMap(@Self)^.clr := $00000010;
  69679. end;
  69680. procedure TPORTD_LATD.setLATD4(thebits : TBits_1); inline;
  69681. begin
  69682. if thebits = 0 then
  69683. pTDefRegMap(@Self)^.clr := $00000010
  69684. else
  69685. pTDefRegMap(@Self)^.&set := $00000010;
  69686. end;
  69687. function TPORTD_LATD.getLATD4 : TBits_1; inline;
  69688. begin
  69689. getLATD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69690. end;
  69691. procedure TPORTD_LATD.setLATD5; inline;
  69692. begin
  69693. pTDefRegMap(@Self)^.&set := $00000020;
  69694. end;
  69695. procedure TPORTD_LATD.clearLATD5; inline;
  69696. begin
  69697. pTDefRegMap(@Self)^.clr := $00000020;
  69698. end;
  69699. procedure TPORTD_LATD.setLATD5(thebits : TBits_1); inline;
  69700. begin
  69701. if thebits = 0 then
  69702. pTDefRegMap(@Self)^.clr := $00000020
  69703. else
  69704. pTDefRegMap(@Self)^.&set := $00000020;
  69705. end;
  69706. function TPORTD_LATD.getLATD5 : TBits_1; inline;
  69707. begin
  69708. getLATD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69709. end;
  69710. procedure TPORTD_LATD.setLATD6; inline;
  69711. begin
  69712. pTDefRegMap(@Self)^.&set := $00000040;
  69713. end;
  69714. procedure TPORTD_LATD.clearLATD6; inline;
  69715. begin
  69716. pTDefRegMap(@Self)^.clr := $00000040;
  69717. end;
  69718. procedure TPORTD_LATD.setLATD6(thebits : TBits_1); inline;
  69719. begin
  69720. if thebits = 0 then
  69721. pTDefRegMap(@Self)^.clr := $00000040
  69722. else
  69723. pTDefRegMap(@Self)^.&set := $00000040;
  69724. end;
  69725. function TPORTD_LATD.getLATD6 : TBits_1; inline;
  69726. begin
  69727. getLATD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69728. end;
  69729. procedure TPORTD_LATD.setLATD7; inline;
  69730. begin
  69731. pTDefRegMap(@Self)^.&set := $00000080;
  69732. end;
  69733. procedure TPORTD_LATD.clearLATD7; inline;
  69734. begin
  69735. pTDefRegMap(@Self)^.clr := $00000080;
  69736. end;
  69737. procedure TPORTD_LATD.setLATD7(thebits : TBits_1); inline;
  69738. begin
  69739. if thebits = 0 then
  69740. pTDefRegMap(@Self)^.clr := $00000080
  69741. else
  69742. pTDefRegMap(@Self)^.&set := $00000080;
  69743. end;
  69744. function TPORTD_LATD.getLATD7 : TBits_1; inline;
  69745. begin
  69746. getLATD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69747. end;
  69748. procedure TPORTD_LATD.setLATD8; inline;
  69749. begin
  69750. pTDefRegMap(@Self)^.&set := $00000100;
  69751. end;
  69752. procedure TPORTD_LATD.clearLATD8; inline;
  69753. begin
  69754. pTDefRegMap(@Self)^.clr := $00000100;
  69755. end;
  69756. procedure TPORTD_LATD.setLATD8(thebits : TBits_1); inline;
  69757. begin
  69758. if thebits = 0 then
  69759. pTDefRegMap(@Self)^.clr := $00000100
  69760. else
  69761. pTDefRegMap(@Self)^.&set := $00000100;
  69762. end;
  69763. function TPORTD_LATD.getLATD8 : TBits_1; inline;
  69764. begin
  69765. getLATD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  69766. end;
  69767. procedure TPORTD_LATD.setLATD9; inline;
  69768. begin
  69769. pTDefRegMap(@Self)^.&set := $00000200;
  69770. end;
  69771. procedure TPORTD_LATD.clearLATD9; inline;
  69772. begin
  69773. pTDefRegMap(@Self)^.clr := $00000200;
  69774. end;
  69775. procedure TPORTD_LATD.setLATD9(thebits : TBits_1); inline;
  69776. begin
  69777. if thebits = 0 then
  69778. pTDefRegMap(@Self)^.clr := $00000200
  69779. else
  69780. pTDefRegMap(@Self)^.&set := $00000200;
  69781. end;
  69782. function TPORTD_LATD.getLATD9 : TBits_1; inline;
  69783. begin
  69784. getLATD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  69785. end;
  69786. procedure TPORTD_LATD.setLATD10; inline;
  69787. begin
  69788. pTDefRegMap(@Self)^.&set := $00000400;
  69789. end;
  69790. procedure TPORTD_LATD.clearLATD10; inline;
  69791. begin
  69792. pTDefRegMap(@Self)^.clr := $00000400;
  69793. end;
  69794. procedure TPORTD_LATD.setLATD10(thebits : TBits_1); inline;
  69795. begin
  69796. if thebits = 0 then
  69797. pTDefRegMap(@Self)^.clr := $00000400
  69798. else
  69799. pTDefRegMap(@Self)^.&set := $00000400;
  69800. end;
  69801. function TPORTD_LATD.getLATD10 : TBits_1; inline;
  69802. begin
  69803. getLATD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  69804. end;
  69805. procedure TPORTD_LATD.setLATD11; inline;
  69806. begin
  69807. pTDefRegMap(@Self)^.&set := $00000800;
  69808. end;
  69809. procedure TPORTD_LATD.clearLATD11; inline;
  69810. begin
  69811. pTDefRegMap(@Self)^.clr := $00000800;
  69812. end;
  69813. procedure TPORTD_LATD.setLATD11(thebits : TBits_1); inline;
  69814. begin
  69815. if thebits = 0 then
  69816. pTDefRegMap(@Self)^.clr := $00000800
  69817. else
  69818. pTDefRegMap(@Self)^.&set := $00000800;
  69819. end;
  69820. function TPORTD_LATD.getLATD11 : TBits_1; inline;
  69821. begin
  69822. getLATD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  69823. end;
  69824. procedure TPORTD_LATD.setw(thebits : TBits_32); inline;
  69825. begin
  69826. pTDefRegMap(@Self)^.val := thebits;
  69827. end;
  69828. function TPORTD_LATD.getw : TBits_32; inline;
  69829. begin
  69830. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  69831. end;
  69832. procedure TPORTD_ODCD.setODCD0; inline;
  69833. begin
  69834. pTDefRegMap(@Self)^.&set := $00000001;
  69835. end;
  69836. procedure TPORTD_ODCD.clearODCD0; inline;
  69837. begin
  69838. pTDefRegMap(@Self)^.clr := $00000001;
  69839. end;
  69840. procedure TPORTD_ODCD.setODCD0(thebits : TBits_1); inline;
  69841. begin
  69842. if thebits = 0 then
  69843. pTDefRegMap(@Self)^.clr := $00000001
  69844. else
  69845. pTDefRegMap(@Self)^.&set := $00000001;
  69846. end;
  69847. function TPORTD_ODCD.getODCD0 : TBits_1; inline;
  69848. begin
  69849. getODCD0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  69850. end;
  69851. procedure TPORTD_ODCD.setODCD1; inline;
  69852. begin
  69853. pTDefRegMap(@Self)^.&set := $00000002;
  69854. end;
  69855. procedure TPORTD_ODCD.clearODCD1; inline;
  69856. begin
  69857. pTDefRegMap(@Self)^.clr := $00000002;
  69858. end;
  69859. procedure TPORTD_ODCD.setODCD1(thebits : TBits_1); inline;
  69860. begin
  69861. if thebits = 0 then
  69862. pTDefRegMap(@Self)^.clr := $00000002
  69863. else
  69864. pTDefRegMap(@Self)^.&set := $00000002;
  69865. end;
  69866. function TPORTD_ODCD.getODCD1 : TBits_1; inline;
  69867. begin
  69868. getODCD1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  69869. end;
  69870. procedure TPORTD_ODCD.setODCD2; inline;
  69871. begin
  69872. pTDefRegMap(@Self)^.&set := $00000004;
  69873. end;
  69874. procedure TPORTD_ODCD.clearODCD2; inline;
  69875. begin
  69876. pTDefRegMap(@Self)^.clr := $00000004;
  69877. end;
  69878. procedure TPORTD_ODCD.setODCD2(thebits : TBits_1); inline;
  69879. begin
  69880. if thebits = 0 then
  69881. pTDefRegMap(@Self)^.clr := $00000004
  69882. else
  69883. pTDefRegMap(@Self)^.&set := $00000004;
  69884. end;
  69885. function TPORTD_ODCD.getODCD2 : TBits_1; inline;
  69886. begin
  69887. getODCD2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  69888. end;
  69889. procedure TPORTD_ODCD.setODCD3; inline;
  69890. begin
  69891. pTDefRegMap(@Self)^.&set := $00000008;
  69892. end;
  69893. procedure TPORTD_ODCD.clearODCD3; inline;
  69894. begin
  69895. pTDefRegMap(@Self)^.clr := $00000008;
  69896. end;
  69897. procedure TPORTD_ODCD.setODCD3(thebits : TBits_1); inline;
  69898. begin
  69899. if thebits = 0 then
  69900. pTDefRegMap(@Self)^.clr := $00000008
  69901. else
  69902. pTDefRegMap(@Self)^.&set := $00000008;
  69903. end;
  69904. function TPORTD_ODCD.getODCD3 : TBits_1; inline;
  69905. begin
  69906. getODCD3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  69907. end;
  69908. procedure TPORTD_ODCD.setODCD4; inline;
  69909. begin
  69910. pTDefRegMap(@Self)^.&set := $00000010;
  69911. end;
  69912. procedure TPORTD_ODCD.clearODCD4; inline;
  69913. begin
  69914. pTDefRegMap(@Self)^.clr := $00000010;
  69915. end;
  69916. procedure TPORTD_ODCD.setODCD4(thebits : TBits_1); inline;
  69917. begin
  69918. if thebits = 0 then
  69919. pTDefRegMap(@Self)^.clr := $00000010
  69920. else
  69921. pTDefRegMap(@Self)^.&set := $00000010;
  69922. end;
  69923. function TPORTD_ODCD.getODCD4 : TBits_1; inline;
  69924. begin
  69925. getODCD4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  69926. end;
  69927. procedure TPORTD_ODCD.setODCD5; inline;
  69928. begin
  69929. pTDefRegMap(@Self)^.&set := $00000020;
  69930. end;
  69931. procedure TPORTD_ODCD.clearODCD5; inline;
  69932. begin
  69933. pTDefRegMap(@Self)^.clr := $00000020;
  69934. end;
  69935. procedure TPORTD_ODCD.setODCD5(thebits : TBits_1); inline;
  69936. begin
  69937. if thebits = 0 then
  69938. pTDefRegMap(@Self)^.clr := $00000020
  69939. else
  69940. pTDefRegMap(@Self)^.&set := $00000020;
  69941. end;
  69942. function TPORTD_ODCD.getODCD5 : TBits_1; inline;
  69943. begin
  69944. getODCD5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  69945. end;
  69946. procedure TPORTD_ODCD.setODCD6; inline;
  69947. begin
  69948. pTDefRegMap(@Self)^.&set := $00000040;
  69949. end;
  69950. procedure TPORTD_ODCD.clearODCD6; inline;
  69951. begin
  69952. pTDefRegMap(@Self)^.clr := $00000040;
  69953. end;
  69954. procedure TPORTD_ODCD.setODCD6(thebits : TBits_1); inline;
  69955. begin
  69956. if thebits = 0 then
  69957. pTDefRegMap(@Self)^.clr := $00000040
  69958. else
  69959. pTDefRegMap(@Self)^.&set := $00000040;
  69960. end;
  69961. function TPORTD_ODCD.getODCD6 : TBits_1; inline;
  69962. begin
  69963. getODCD6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  69964. end;
  69965. procedure TPORTD_ODCD.setODCD7; inline;
  69966. begin
  69967. pTDefRegMap(@Self)^.&set := $00000080;
  69968. end;
  69969. procedure TPORTD_ODCD.clearODCD7; inline;
  69970. begin
  69971. pTDefRegMap(@Self)^.clr := $00000080;
  69972. end;
  69973. procedure TPORTD_ODCD.setODCD7(thebits : TBits_1); inline;
  69974. begin
  69975. if thebits = 0 then
  69976. pTDefRegMap(@Self)^.clr := $00000080
  69977. else
  69978. pTDefRegMap(@Self)^.&set := $00000080;
  69979. end;
  69980. function TPORTD_ODCD.getODCD7 : TBits_1; inline;
  69981. begin
  69982. getODCD7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  69983. end;
  69984. procedure TPORTD_ODCD.setODCD8; inline;
  69985. begin
  69986. pTDefRegMap(@Self)^.&set := $00000100;
  69987. end;
  69988. procedure TPORTD_ODCD.clearODCD8; inline;
  69989. begin
  69990. pTDefRegMap(@Self)^.clr := $00000100;
  69991. end;
  69992. procedure TPORTD_ODCD.setODCD8(thebits : TBits_1); inline;
  69993. begin
  69994. if thebits = 0 then
  69995. pTDefRegMap(@Self)^.clr := $00000100
  69996. else
  69997. pTDefRegMap(@Self)^.&set := $00000100;
  69998. end;
  69999. function TPORTD_ODCD.getODCD8 : TBits_1; inline;
  70000. begin
  70001. getODCD8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  70002. end;
  70003. procedure TPORTD_ODCD.setODCD9; inline;
  70004. begin
  70005. pTDefRegMap(@Self)^.&set := $00000200;
  70006. end;
  70007. procedure TPORTD_ODCD.clearODCD9; inline;
  70008. begin
  70009. pTDefRegMap(@Self)^.clr := $00000200;
  70010. end;
  70011. procedure TPORTD_ODCD.setODCD9(thebits : TBits_1); inline;
  70012. begin
  70013. if thebits = 0 then
  70014. pTDefRegMap(@Self)^.clr := $00000200
  70015. else
  70016. pTDefRegMap(@Self)^.&set := $00000200;
  70017. end;
  70018. function TPORTD_ODCD.getODCD9 : TBits_1; inline;
  70019. begin
  70020. getODCD9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  70021. end;
  70022. procedure TPORTD_ODCD.setODCD10; inline;
  70023. begin
  70024. pTDefRegMap(@Self)^.&set := $00000400;
  70025. end;
  70026. procedure TPORTD_ODCD.clearODCD10; inline;
  70027. begin
  70028. pTDefRegMap(@Self)^.clr := $00000400;
  70029. end;
  70030. procedure TPORTD_ODCD.setODCD10(thebits : TBits_1); inline;
  70031. begin
  70032. if thebits = 0 then
  70033. pTDefRegMap(@Self)^.clr := $00000400
  70034. else
  70035. pTDefRegMap(@Self)^.&set := $00000400;
  70036. end;
  70037. function TPORTD_ODCD.getODCD10 : TBits_1; inline;
  70038. begin
  70039. getODCD10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  70040. end;
  70041. procedure TPORTD_ODCD.setODCD11; inline;
  70042. begin
  70043. pTDefRegMap(@Self)^.&set := $00000800;
  70044. end;
  70045. procedure TPORTD_ODCD.clearODCD11; inline;
  70046. begin
  70047. pTDefRegMap(@Self)^.clr := $00000800;
  70048. end;
  70049. procedure TPORTD_ODCD.setODCD11(thebits : TBits_1); inline;
  70050. begin
  70051. if thebits = 0 then
  70052. pTDefRegMap(@Self)^.clr := $00000800
  70053. else
  70054. pTDefRegMap(@Self)^.&set := $00000800;
  70055. end;
  70056. function TPORTD_ODCD.getODCD11 : TBits_1; inline;
  70057. begin
  70058. getODCD11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  70059. end;
  70060. procedure TPORTD_ODCD.setw(thebits : TBits_32); inline;
  70061. begin
  70062. pTDefRegMap(@Self)^.val := thebits;
  70063. end;
  70064. function TPORTD_ODCD.getw : TBits_32; inline;
  70065. begin
  70066. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70067. end;
  70068. procedure TPORTE_TRISE.setTRISE0; inline;
  70069. begin
  70070. pTDefRegMap(@Self)^.&set := $00000001;
  70071. end;
  70072. procedure TPORTE_TRISE.clearTRISE0; inline;
  70073. begin
  70074. pTDefRegMap(@Self)^.clr := $00000001;
  70075. end;
  70076. procedure TPORTE_TRISE.setTRISE0(thebits : TBits_1); inline;
  70077. begin
  70078. if thebits = 0 then
  70079. pTDefRegMap(@Self)^.clr := $00000001
  70080. else
  70081. pTDefRegMap(@Self)^.&set := $00000001;
  70082. end;
  70083. function TPORTE_TRISE.getTRISE0 : TBits_1; inline;
  70084. begin
  70085. getTRISE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70086. end;
  70087. procedure TPORTE_TRISE.setTRISE1; inline;
  70088. begin
  70089. pTDefRegMap(@Self)^.&set := $00000002;
  70090. end;
  70091. procedure TPORTE_TRISE.clearTRISE1; inline;
  70092. begin
  70093. pTDefRegMap(@Self)^.clr := $00000002;
  70094. end;
  70095. procedure TPORTE_TRISE.setTRISE1(thebits : TBits_1); inline;
  70096. begin
  70097. if thebits = 0 then
  70098. pTDefRegMap(@Self)^.clr := $00000002
  70099. else
  70100. pTDefRegMap(@Self)^.&set := $00000002;
  70101. end;
  70102. function TPORTE_TRISE.getTRISE1 : TBits_1; inline;
  70103. begin
  70104. getTRISE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70105. end;
  70106. procedure TPORTE_TRISE.setTRISE2; inline;
  70107. begin
  70108. pTDefRegMap(@Self)^.&set := $00000004;
  70109. end;
  70110. procedure TPORTE_TRISE.clearTRISE2; inline;
  70111. begin
  70112. pTDefRegMap(@Self)^.clr := $00000004;
  70113. end;
  70114. procedure TPORTE_TRISE.setTRISE2(thebits : TBits_1); inline;
  70115. begin
  70116. if thebits = 0 then
  70117. pTDefRegMap(@Self)^.clr := $00000004
  70118. else
  70119. pTDefRegMap(@Self)^.&set := $00000004;
  70120. end;
  70121. function TPORTE_TRISE.getTRISE2 : TBits_1; inline;
  70122. begin
  70123. getTRISE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70124. end;
  70125. procedure TPORTE_TRISE.setTRISE3; inline;
  70126. begin
  70127. pTDefRegMap(@Self)^.&set := $00000008;
  70128. end;
  70129. procedure TPORTE_TRISE.clearTRISE3; inline;
  70130. begin
  70131. pTDefRegMap(@Self)^.clr := $00000008;
  70132. end;
  70133. procedure TPORTE_TRISE.setTRISE3(thebits : TBits_1); inline;
  70134. begin
  70135. if thebits = 0 then
  70136. pTDefRegMap(@Self)^.clr := $00000008
  70137. else
  70138. pTDefRegMap(@Self)^.&set := $00000008;
  70139. end;
  70140. function TPORTE_TRISE.getTRISE3 : TBits_1; inline;
  70141. begin
  70142. getTRISE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70143. end;
  70144. procedure TPORTE_TRISE.setTRISE4; inline;
  70145. begin
  70146. pTDefRegMap(@Self)^.&set := $00000010;
  70147. end;
  70148. procedure TPORTE_TRISE.clearTRISE4; inline;
  70149. begin
  70150. pTDefRegMap(@Self)^.clr := $00000010;
  70151. end;
  70152. procedure TPORTE_TRISE.setTRISE4(thebits : TBits_1); inline;
  70153. begin
  70154. if thebits = 0 then
  70155. pTDefRegMap(@Self)^.clr := $00000010
  70156. else
  70157. pTDefRegMap(@Self)^.&set := $00000010;
  70158. end;
  70159. function TPORTE_TRISE.getTRISE4 : TBits_1; inline;
  70160. begin
  70161. getTRISE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70162. end;
  70163. procedure TPORTE_TRISE.setTRISE5; inline;
  70164. begin
  70165. pTDefRegMap(@Self)^.&set := $00000020;
  70166. end;
  70167. procedure TPORTE_TRISE.clearTRISE5; inline;
  70168. begin
  70169. pTDefRegMap(@Self)^.clr := $00000020;
  70170. end;
  70171. procedure TPORTE_TRISE.setTRISE5(thebits : TBits_1); inline;
  70172. begin
  70173. if thebits = 0 then
  70174. pTDefRegMap(@Self)^.clr := $00000020
  70175. else
  70176. pTDefRegMap(@Self)^.&set := $00000020;
  70177. end;
  70178. function TPORTE_TRISE.getTRISE5 : TBits_1; inline;
  70179. begin
  70180. getTRISE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70181. end;
  70182. procedure TPORTE_TRISE.setTRISE6; inline;
  70183. begin
  70184. pTDefRegMap(@Self)^.&set := $00000040;
  70185. end;
  70186. procedure TPORTE_TRISE.clearTRISE6; inline;
  70187. begin
  70188. pTDefRegMap(@Self)^.clr := $00000040;
  70189. end;
  70190. procedure TPORTE_TRISE.setTRISE6(thebits : TBits_1); inline;
  70191. begin
  70192. if thebits = 0 then
  70193. pTDefRegMap(@Self)^.clr := $00000040
  70194. else
  70195. pTDefRegMap(@Self)^.&set := $00000040;
  70196. end;
  70197. function TPORTE_TRISE.getTRISE6 : TBits_1; inline;
  70198. begin
  70199. getTRISE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70200. end;
  70201. procedure TPORTE_TRISE.setTRISE7; inline;
  70202. begin
  70203. pTDefRegMap(@Self)^.&set := $00000080;
  70204. end;
  70205. procedure TPORTE_TRISE.clearTRISE7; inline;
  70206. begin
  70207. pTDefRegMap(@Self)^.clr := $00000080;
  70208. end;
  70209. procedure TPORTE_TRISE.setTRISE7(thebits : TBits_1); inline;
  70210. begin
  70211. if thebits = 0 then
  70212. pTDefRegMap(@Self)^.clr := $00000080
  70213. else
  70214. pTDefRegMap(@Self)^.&set := $00000080;
  70215. end;
  70216. function TPORTE_TRISE.getTRISE7 : TBits_1; inline;
  70217. begin
  70218. getTRISE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70219. end;
  70220. procedure TPORTE_TRISE.setw(thebits : TBits_32); inline;
  70221. begin
  70222. pTDefRegMap(@Self)^.val := thebits;
  70223. end;
  70224. function TPORTE_TRISE.getw : TBits_32; inline;
  70225. begin
  70226. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70227. end;
  70228. procedure TPORTE_PORTE.setRE0; inline;
  70229. begin
  70230. pTDefRegMap(@Self)^.&set := $00000001;
  70231. end;
  70232. procedure TPORTE_PORTE.clearRE0; inline;
  70233. begin
  70234. pTDefRegMap(@Self)^.clr := $00000001;
  70235. end;
  70236. procedure TPORTE_PORTE.setRE0(thebits : TBits_1); inline;
  70237. begin
  70238. if thebits = 0 then
  70239. pTDefRegMap(@Self)^.clr := $00000001
  70240. else
  70241. pTDefRegMap(@Self)^.&set := $00000001;
  70242. end;
  70243. function TPORTE_PORTE.getRE0 : TBits_1; inline;
  70244. begin
  70245. getRE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70246. end;
  70247. procedure TPORTE_PORTE.setRE1; inline;
  70248. begin
  70249. pTDefRegMap(@Self)^.&set := $00000002;
  70250. end;
  70251. procedure TPORTE_PORTE.clearRE1; inline;
  70252. begin
  70253. pTDefRegMap(@Self)^.clr := $00000002;
  70254. end;
  70255. procedure TPORTE_PORTE.setRE1(thebits : TBits_1); inline;
  70256. begin
  70257. if thebits = 0 then
  70258. pTDefRegMap(@Self)^.clr := $00000002
  70259. else
  70260. pTDefRegMap(@Self)^.&set := $00000002;
  70261. end;
  70262. function TPORTE_PORTE.getRE1 : TBits_1; inline;
  70263. begin
  70264. getRE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70265. end;
  70266. procedure TPORTE_PORTE.setRE2; inline;
  70267. begin
  70268. pTDefRegMap(@Self)^.&set := $00000004;
  70269. end;
  70270. procedure TPORTE_PORTE.clearRE2; inline;
  70271. begin
  70272. pTDefRegMap(@Self)^.clr := $00000004;
  70273. end;
  70274. procedure TPORTE_PORTE.setRE2(thebits : TBits_1); inline;
  70275. begin
  70276. if thebits = 0 then
  70277. pTDefRegMap(@Self)^.clr := $00000004
  70278. else
  70279. pTDefRegMap(@Self)^.&set := $00000004;
  70280. end;
  70281. function TPORTE_PORTE.getRE2 : TBits_1; inline;
  70282. begin
  70283. getRE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70284. end;
  70285. procedure TPORTE_PORTE.setRE3; inline;
  70286. begin
  70287. pTDefRegMap(@Self)^.&set := $00000008;
  70288. end;
  70289. procedure TPORTE_PORTE.clearRE3; inline;
  70290. begin
  70291. pTDefRegMap(@Self)^.clr := $00000008;
  70292. end;
  70293. procedure TPORTE_PORTE.setRE3(thebits : TBits_1); inline;
  70294. begin
  70295. if thebits = 0 then
  70296. pTDefRegMap(@Self)^.clr := $00000008
  70297. else
  70298. pTDefRegMap(@Self)^.&set := $00000008;
  70299. end;
  70300. function TPORTE_PORTE.getRE3 : TBits_1; inline;
  70301. begin
  70302. getRE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70303. end;
  70304. procedure TPORTE_PORTE.setRE4; inline;
  70305. begin
  70306. pTDefRegMap(@Self)^.&set := $00000010;
  70307. end;
  70308. procedure TPORTE_PORTE.clearRE4; inline;
  70309. begin
  70310. pTDefRegMap(@Self)^.clr := $00000010;
  70311. end;
  70312. procedure TPORTE_PORTE.setRE4(thebits : TBits_1); inline;
  70313. begin
  70314. if thebits = 0 then
  70315. pTDefRegMap(@Self)^.clr := $00000010
  70316. else
  70317. pTDefRegMap(@Self)^.&set := $00000010;
  70318. end;
  70319. function TPORTE_PORTE.getRE4 : TBits_1; inline;
  70320. begin
  70321. getRE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70322. end;
  70323. procedure TPORTE_PORTE.setRE5; inline;
  70324. begin
  70325. pTDefRegMap(@Self)^.&set := $00000020;
  70326. end;
  70327. procedure TPORTE_PORTE.clearRE5; inline;
  70328. begin
  70329. pTDefRegMap(@Self)^.clr := $00000020;
  70330. end;
  70331. procedure TPORTE_PORTE.setRE5(thebits : TBits_1); inline;
  70332. begin
  70333. if thebits = 0 then
  70334. pTDefRegMap(@Self)^.clr := $00000020
  70335. else
  70336. pTDefRegMap(@Self)^.&set := $00000020;
  70337. end;
  70338. function TPORTE_PORTE.getRE5 : TBits_1; inline;
  70339. begin
  70340. getRE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70341. end;
  70342. procedure TPORTE_PORTE.setRE6; inline;
  70343. begin
  70344. pTDefRegMap(@Self)^.&set := $00000040;
  70345. end;
  70346. procedure TPORTE_PORTE.clearRE6; inline;
  70347. begin
  70348. pTDefRegMap(@Self)^.clr := $00000040;
  70349. end;
  70350. procedure TPORTE_PORTE.setRE6(thebits : TBits_1); inline;
  70351. begin
  70352. if thebits = 0 then
  70353. pTDefRegMap(@Self)^.clr := $00000040
  70354. else
  70355. pTDefRegMap(@Self)^.&set := $00000040;
  70356. end;
  70357. function TPORTE_PORTE.getRE6 : TBits_1; inline;
  70358. begin
  70359. getRE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70360. end;
  70361. procedure TPORTE_PORTE.setRE7; inline;
  70362. begin
  70363. pTDefRegMap(@Self)^.&set := $00000080;
  70364. end;
  70365. procedure TPORTE_PORTE.clearRE7; inline;
  70366. begin
  70367. pTDefRegMap(@Self)^.clr := $00000080;
  70368. end;
  70369. procedure TPORTE_PORTE.setRE7(thebits : TBits_1); inline;
  70370. begin
  70371. if thebits = 0 then
  70372. pTDefRegMap(@Self)^.clr := $00000080
  70373. else
  70374. pTDefRegMap(@Self)^.&set := $00000080;
  70375. end;
  70376. function TPORTE_PORTE.getRE7 : TBits_1; inline;
  70377. begin
  70378. getRE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70379. end;
  70380. procedure TPORTE_PORTE.setw(thebits : TBits_32); inline;
  70381. begin
  70382. pTDefRegMap(@Self)^.val := thebits;
  70383. end;
  70384. function TPORTE_PORTE.getw : TBits_32; inline;
  70385. begin
  70386. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70387. end;
  70388. procedure TPORTE_LATE.setLATE0; inline;
  70389. begin
  70390. pTDefRegMap(@Self)^.&set := $00000001;
  70391. end;
  70392. procedure TPORTE_LATE.clearLATE0; inline;
  70393. begin
  70394. pTDefRegMap(@Self)^.clr := $00000001;
  70395. end;
  70396. procedure TPORTE_LATE.setLATE0(thebits : TBits_1); inline;
  70397. begin
  70398. if thebits = 0 then
  70399. pTDefRegMap(@Self)^.clr := $00000001
  70400. else
  70401. pTDefRegMap(@Self)^.&set := $00000001;
  70402. end;
  70403. function TPORTE_LATE.getLATE0 : TBits_1; inline;
  70404. begin
  70405. getLATE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70406. end;
  70407. procedure TPORTE_LATE.setLATE1; inline;
  70408. begin
  70409. pTDefRegMap(@Self)^.&set := $00000002;
  70410. end;
  70411. procedure TPORTE_LATE.clearLATE1; inline;
  70412. begin
  70413. pTDefRegMap(@Self)^.clr := $00000002;
  70414. end;
  70415. procedure TPORTE_LATE.setLATE1(thebits : TBits_1); inline;
  70416. begin
  70417. if thebits = 0 then
  70418. pTDefRegMap(@Self)^.clr := $00000002
  70419. else
  70420. pTDefRegMap(@Self)^.&set := $00000002;
  70421. end;
  70422. function TPORTE_LATE.getLATE1 : TBits_1; inline;
  70423. begin
  70424. getLATE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70425. end;
  70426. procedure TPORTE_LATE.setLATE2; inline;
  70427. begin
  70428. pTDefRegMap(@Self)^.&set := $00000004;
  70429. end;
  70430. procedure TPORTE_LATE.clearLATE2; inline;
  70431. begin
  70432. pTDefRegMap(@Self)^.clr := $00000004;
  70433. end;
  70434. procedure TPORTE_LATE.setLATE2(thebits : TBits_1); inline;
  70435. begin
  70436. if thebits = 0 then
  70437. pTDefRegMap(@Self)^.clr := $00000004
  70438. else
  70439. pTDefRegMap(@Self)^.&set := $00000004;
  70440. end;
  70441. function TPORTE_LATE.getLATE2 : TBits_1; inline;
  70442. begin
  70443. getLATE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70444. end;
  70445. procedure TPORTE_LATE.setLATE3; inline;
  70446. begin
  70447. pTDefRegMap(@Self)^.&set := $00000008;
  70448. end;
  70449. procedure TPORTE_LATE.clearLATE3; inline;
  70450. begin
  70451. pTDefRegMap(@Self)^.clr := $00000008;
  70452. end;
  70453. procedure TPORTE_LATE.setLATE3(thebits : TBits_1); inline;
  70454. begin
  70455. if thebits = 0 then
  70456. pTDefRegMap(@Self)^.clr := $00000008
  70457. else
  70458. pTDefRegMap(@Self)^.&set := $00000008;
  70459. end;
  70460. function TPORTE_LATE.getLATE3 : TBits_1; inline;
  70461. begin
  70462. getLATE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70463. end;
  70464. procedure TPORTE_LATE.setLATE4; inline;
  70465. begin
  70466. pTDefRegMap(@Self)^.&set := $00000010;
  70467. end;
  70468. procedure TPORTE_LATE.clearLATE4; inline;
  70469. begin
  70470. pTDefRegMap(@Self)^.clr := $00000010;
  70471. end;
  70472. procedure TPORTE_LATE.setLATE4(thebits : TBits_1); inline;
  70473. begin
  70474. if thebits = 0 then
  70475. pTDefRegMap(@Self)^.clr := $00000010
  70476. else
  70477. pTDefRegMap(@Self)^.&set := $00000010;
  70478. end;
  70479. function TPORTE_LATE.getLATE4 : TBits_1; inline;
  70480. begin
  70481. getLATE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70482. end;
  70483. procedure TPORTE_LATE.setLATE5; inline;
  70484. begin
  70485. pTDefRegMap(@Self)^.&set := $00000020;
  70486. end;
  70487. procedure TPORTE_LATE.clearLATE5; inline;
  70488. begin
  70489. pTDefRegMap(@Self)^.clr := $00000020;
  70490. end;
  70491. procedure TPORTE_LATE.setLATE5(thebits : TBits_1); inline;
  70492. begin
  70493. if thebits = 0 then
  70494. pTDefRegMap(@Self)^.clr := $00000020
  70495. else
  70496. pTDefRegMap(@Self)^.&set := $00000020;
  70497. end;
  70498. function TPORTE_LATE.getLATE5 : TBits_1; inline;
  70499. begin
  70500. getLATE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70501. end;
  70502. procedure TPORTE_LATE.setLATE6; inline;
  70503. begin
  70504. pTDefRegMap(@Self)^.&set := $00000040;
  70505. end;
  70506. procedure TPORTE_LATE.clearLATE6; inline;
  70507. begin
  70508. pTDefRegMap(@Self)^.clr := $00000040;
  70509. end;
  70510. procedure TPORTE_LATE.setLATE6(thebits : TBits_1); inline;
  70511. begin
  70512. if thebits = 0 then
  70513. pTDefRegMap(@Self)^.clr := $00000040
  70514. else
  70515. pTDefRegMap(@Self)^.&set := $00000040;
  70516. end;
  70517. function TPORTE_LATE.getLATE6 : TBits_1; inline;
  70518. begin
  70519. getLATE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70520. end;
  70521. procedure TPORTE_LATE.setLATE7; inline;
  70522. begin
  70523. pTDefRegMap(@Self)^.&set := $00000080;
  70524. end;
  70525. procedure TPORTE_LATE.clearLATE7; inline;
  70526. begin
  70527. pTDefRegMap(@Self)^.clr := $00000080;
  70528. end;
  70529. procedure TPORTE_LATE.setLATE7(thebits : TBits_1); inline;
  70530. begin
  70531. if thebits = 0 then
  70532. pTDefRegMap(@Self)^.clr := $00000080
  70533. else
  70534. pTDefRegMap(@Self)^.&set := $00000080;
  70535. end;
  70536. function TPORTE_LATE.getLATE7 : TBits_1; inline;
  70537. begin
  70538. getLATE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70539. end;
  70540. procedure TPORTE_LATE.setw(thebits : TBits_32); inline;
  70541. begin
  70542. pTDefRegMap(@Self)^.val := thebits;
  70543. end;
  70544. function TPORTE_LATE.getw : TBits_32; inline;
  70545. begin
  70546. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70547. end;
  70548. procedure TPORTE_ODCE.setODCE0; inline;
  70549. begin
  70550. pTDefRegMap(@Self)^.&set := $00000001;
  70551. end;
  70552. procedure TPORTE_ODCE.clearODCE0; inline;
  70553. begin
  70554. pTDefRegMap(@Self)^.clr := $00000001;
  70555. end;
  70556. procedure TPORTE_ODCE.setODCE0(thebits : TBits_1); inline;
  70557. begin
  70558. if thebits = 0 then
  70559. pTDefRegMap(@Self)^.clr := $00000001
  70560. else
  70561. pTDefRegMap(@Self)^.&set := $00000001;
  70562. end;
  70563. function TPORTE_ODCE.getODCE0 : TBits_1; inline;
  70564. begin
  70565. getODCE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70566. end;
  70567. procedure TPORTE_ODCE.setODCE1; inline;
  70568. begin
  70569. pTDefRegMap(@Self)^.&set := $00000002;
  70570. end;
  70571. procedure TPORTE_ODCE.clearODCE1; inline;
  70572. begin
  70573. pTDefRegMap(@Self)^.clr := $00000002;
  70574. end;
  70575. procedure TPORTE_ODCE.setODCE1(thebits : TBits_1); inline;
  70576. begin
  70577. if thebits = 0 then
  70578. pTDefRegMap(@Self)^.clr := $00000002
  70579. else
  70580. pTDefRegMap(@Self)^.&set := $00000002;
  70581. end;
  70582. function TPORTE_ODCE.getODCE1 : TBits_1; inline;
  70583. begin
  70584. getODCE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70585. end;
  70586. procedure TPORTE_ODCE.setODCE2; inline;
  70587. begin
  70588. pTDefRegMap(@Self)^.&set := $00000004;
  70589. end;
  70590. procedure TPORTE_ODCE.clearODCE2; inline;
  70591. begin
  70592. pTDefRegMap(@Self)^.clr := $00000004;
  70593. end;
  70594. procedure TPORTE_ODCE.setODCE2(thebits : TBits_1); inline;
  70595. begin
  70596. if thebits = 0 then
  70597. pTDefRegMap(@Self)^.clr := $00000004
  70598. else
  70599. pTDefRegMap(@Self)^.&set := $00000004;
  70600. end;
  70601. function TPORTE_ODCE.getODCE2 : TBits_1; inline;
  70602. begin
  70603. getODCE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70604. end;
  70605. procedure TPORTE_ODCE.setODCE3; inline;
  70606. begin
  70607. pTDefRegMap(@Self)^.&set := $00000008;
  70608. end;
  70609. procedure TPORTE_ODCE.clearODCE3; inline;
  70610. begin
  70611. pTDefRegMap(@Self)^.clr := $00000008;
  70612. end;
  70613. procedure TPORTE_ODCE.setODCE3(thebits : TBits_1); inline;
  70614. begin
  70615. if thebits = 0 then
  70616. pTDefRegMap(@Self)^.clr := $00000008
  70617. else
  70618. pTDefRegMap(@Self)^.&set := $00000008;
  70619. end;
  70620. function TPORTE_ODCE.getODCE3 : TBits_1; inline;
  70621. begin
  70622. getODCE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70623. end;
  70624. procedure TPORTE_ODCE.setODCE4; inline;
  70625. begin
  70626. pTDefRegMap(@Self)^.&set := $00000010;
  70627. end;
  70628. procedure TPORTE_ODCE.clearODCE4; inline;
  70629. begin
  70630. pTDefRegMap(@Self)^.clr := $00000010;
  70631. end;
  70632. procedure TPORTE_ODCE.setODCE4(thebits : TBits_1); inline;
  70633. begin
  70634. if thebits = 0 then
  70635. pTDefRegMap(@Self)^.clr := $00000010
  70636. else
  70637. pTDefRegMap(@Self)^.&set := $00000010;
  70638. end;
  70639. function TPORTE_ODCE.getODCE4 : TBits_1; inline;
  70640. begin
  70641. getODCE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70642. end;
  70643. procedure TPORTE_ODCE.setODCE5; inline;
  70644. begin
  70645. pTDefRegMap(@Self)^.&set := $00000020;
  70646. end;
  70647. procedure TPORTE_ODCE.clearODCE5; inline;
  70648. begin
  70649. pTDefRegMap(@Self)^.clr := $00000020;
  70650. end;
  70651. procedure TPORTE_ODCE.setODCE5(thebits : TBits_1); inline;
  70652. begin
  70653. if thebits = 0 then
  70654. pTDefRegMap(@Self)^.clr := $00000020
  70655. else
  70656. pTDefRegMap(@Self)^.&set := $00000020;
  70657. end;
  70658. function TPORTE_ODCE.getODCE5 : TBits_1; inline;
  70659. begin
  70660. getODCE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70661. end;
  70662. procedure TPORTE_ODCE.setODCE6; inline;
  70663. begin
  70664. pTDefRegMap(@Self)^.&set := $00000040;
  70665. end;
  70666. procedure TPORTE_ODCE.clearODCE6; inline;
  70667. begin
  70668. pTDefRegMap(@Self)^.clr := $00000040;
  70669. end;
  70670. procedure TPORTE_ODCE.setODCE6(thebits : TBits_1); inline;
  70671. begin
  70672. if thebits = 0 then
  70673. pTDefRegMap(@Self)^.clr := $00000040
  70674. else
  70675. pTDefRegMap(@Self)^.&set := $00000040;
  70676. end;
  70677. function TPORTE_ODCE.getODCE6 : TBits_1; inline;
  70678. begin
  70679. getODCE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  70680. end;
  70681. procedure TPORTE_ODCE.setODCE7; inline;
  70682. begin
  70683. pTDefRegMap(@Self)^.&set := $00000080;
  70684. end;
  70685. procedure TPORTE_ODCE.clearODCE7; inline;
  70686. begin
  70687. pTDefRegMap(@Self)^.clr := $00000080;
  70688. end;
  70689. procedure TPORTE_ODCE.setODCE7(thebits : TBits_1); inline;
  70690. begin
  70691. if thebits = 0 then
  70692. pTDefRegMap(@Self)^.clr := $00000080
  70693. else
  70694. pTDefRegMap(@Self)^.&set := $00000080;
  70695. end;
  70696. function TPORTE_ODCE.getODCE7 : TBits_1; inline;
  70697. begin
  70698. getODCE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  70699. end;
  70700. procedure TPORTE_ODCE.setw(thebits : TBits_32); inline;
  70701. begin
  70702. pTDefRegMap(@Self)^.val := thebits;
  70703. end;
  70704. function TPORTE_ODCE.getw : TBits_32; inline;
  70705. begin
  70706. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70707. end;
  70708. procedure TPORTF_TRISF.setTRISF0; inline;
  70709. begin
  70710. pTDefRegMap(@Self)^.&set := $00000001;
  70711. end;
  70712. procedure TPORTF_TRISF.clearTRISF0; inline;
  70713. begin
  70714. pTDefRegMap(@Self)^.clr := $00000001;
  70715. end;
  70716. procedure TPORTF_TRISF.setTRISF0(thebits : TBits_1); inline;
  70717. begin
  70718. if thebits = 0 then
  70719. pTDefRegMap(@Self)^.clr := $00000001
  70720. else
  70721. pTDefRegMap(@Self)^.&set := $00000001;
  70722. end;
  70723. function TPORTF_TRISF.getTRISF0 : TBits_1; inline;
  70724. begin
  70725. getTRISF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70726. end;
  70727. procedure TPORTF_TRISF.setTRISF1; inline;
  70728. begin
  70729. pTDefRegMap(@Self)^.&set := $00000002;
  70730. end;
  70731. procedure TPORTF_TRISF.clearTRISF1; inline;
  70732. begin
  70733. pTDefRegMap(@Self)^.clr := $00000002;
  70734. end;
  70735. procedure TPORTF_TRISF.setTRISF1(thebits : TBits_1); inline;
  70736. begin
  70737. if thebits = 0 then
  70738. pTDefRegMap(@Self)^.clr := $00000002
  70739. else
  70740. pTDefRegMap(@Self)^.&set := $00000002;
  70741. end;
  70742. function TPORTF_TRISF.getTRISF1 : TBits_1; inline;
  70743. begin
  70744. getTRISF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70745. end;
  70746. procedure TPORTF_TRISF.setTRISF2; inline;
  70747. begin
  70748. pTDefRegMap(@Self)^.&set := $00000004;
  70749. end;
  70750. procedure TPORTF_TRISF.clearTRISF2; inline;
  70751. begin
  70752. pTDefRegMap(@Self)^.clr := $00000004;
  70753. end;
  70754. procedure TPORTF_TRISF.setTRISF2(thebits : TBits_1); inline;
  70755. begin
  70756. if thebits = 0 then
  70757. pTDefRegMap(@Self)^.clr := $00000004
  70758. else
  70759. pTDefRegMap(@Self)^.&set := $00000004;
  70760. end;
  70761. function TPORTF_TRISF.getTRISF2 : TBits_1; inline;
  70762. begin
  70763. getTRISF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70764. end;
  70765. procedure TPORTF_TRISF.setTRISF3; inline;
  70766. begin
  70767. pTDefRegMap(@Self)^.&set := $00000008;
  70768. end;
  70769. procedure TPORTF_TRISF.clearTRISF3; inline;
  70770. begin
  70771. pTDefRegMap(@Self)^.clr := $00000008;
  70772. end;
  70773. procedure TPORTF_TRISF.setTRISF3(thebits : TBits_1); inline;
  70774. begin
  70775. if thebits = 0 then
  70776. pTDefRegMap(@Self)^.clr := $00000008
  70777. else
  70778. pTDefRegMap(@Self)^.&set := $00000008;
  70779. end;
  70780. function TPORTF_TRISF.getTRISF3 : TBits_1; inline;
  70781. begin
  70782. getTRISF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70783. end;
  70784. procedure TPORTF_TRISF.setTRISF4; inline;
  70785. begin
  70786. pTDefRegMap(@Self)^.&set := $00000010;
  70787. end;
  70788. procedure TPORTF_TRISF.clearTRISF4; inline;
  70789. begin
  70790. pTDefRegMap(@Self)^.clr := $00000010;
  70791. end;
  70792. procedure TPORTF_TRISF.setTRISF4(thebits : TBits_1); inline;
  70793. begin
  70794. if thebits = 0 then
  70795. pTDefRegMap(@Self)^.clr := $00000010
  70796. else
  70797. pTDefRegMap(@Self)^.&set := $00000010;
  70798. end;
  70799. function TPORTF_TRISF.getTRISF4 : TBits_1; inline;
  70800. begin
  70801. getTRISF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70802. end;
  70803. procedure TPORTF_TRISF.setTRISF5; inline;
  70804. begin
  70805. pTDefRegMap(@Self)^.&set := $00000020;
  70806. end;
  70807. procedure TPORTF_TRISF.clearTRISF5; inline;
  70808. begin
  70809. pTDefRegMap(@Self)^.clr := $00000020;
  70810. end;
  70811. procedure TPORTF_TRISF.setTRISF5(thebits : TBits_1); inline;
  70812. begin
  70813. if thebits = 0 then
  70814. pTDefRegMap(@Self)^.clr := $00000020
  70815. else
  70816. pTDefRegMap(@Self)^.&set := $00000020;
  70817. end;
  70818. function TPORTF_TRISF.getTRISF5 : TBits_1; inline;
  70819. begin
  70820. getTRISF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70821. end;
  70822. procedure TPORTF_TRISF.setw(thebits : TBits_32); inline;
  70823. begin
  70824. pTDefRegMap(@Self)^.val := thebits;
  70825. end;
  70826. function TPORTF_TRISF.getw : TBits_32; inline;
  70827. begin
  70828. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70829. end;
  70830. procedure TPORTF_PORTF.setRF0; inline;
  70831. begin
  70832. pTDefRegMap(@Self)^.&set := $00000001;
  70833. end;
  70834. procedure TPORTF_PORTF.clearRF0; inline;
  70835. begin
  70836. pTDefRegMap(@Self)^.clr := $00000001;
  70837. end;
  70838. procedure TPORTF_PORTF.setRF0(thebits : TBits_1); inline;
  70839. begin
  70840. if thebits = 0 then
  70841. pTDefRegMap(@Self)^.clr := $00000001
  70842. else
  70843. pTDefRegMap(@Self)^.&set := $00000001;
  70844. end;
  70845. function TPORTF_PORTF.getRF0 : TBits_1; inline;
  70846. begin
  70847. getRF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70848. end;
  70849. procedure TPORTF_PORTF.setRF1; inline;
  70850. begin
  70851. pTDefRegMap(@Self)^.&set := $00000002;
  70852. end;
  70853. procedure TPORTF_PORTF.clearRF1; inline;
  70854. begin
  70855. pTDefRegMap(@Self)^.clr := $00000002;
  70856. end;
  70857. procedure TPORTF_PORTF.setRF1(thebits : TBits_1); inline;
  70858. begin
  70859. if thebits = 0 then
  70860. pTDefRegMap(@Self)^.clr := $00000002
  70861. else
  70862. pTDefRegMap(@Self)^.&set := $00000002;
  70863. end;
  70864. function TPORTF_PORTF.getRF1 : TBits_1; inline;
  70865. begin
  70866. getRF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70867. end;
  70868. procedure TPORTF_PORTF.setRF2; inline;
  70869. begin
  70870. pTDefRegMap(@Self)^.&set := $00000004;
  70871. end;
  70872. procedure TPORTF_PORTF.clearRF2; inline;
  70873. begin
  70874. pTDefRegMap(@Self)^.clr := $00000004;
  70875. end;
  70876. procedure TPORTF_PORTF.setRF2(thebits : TBits_1); inline;
  70877. begin
  70878. if thebits = 0 then
  70879. pTDefRegMap(@Self)^.clr := $00000004
  70880. else
  70881. pTDefRegMap(@Self)^.&set := $00000004;
  70882. end;
  70883. function TPORTF_PORTF.getRF2 : TBits_1; inline;
  70884. begin
  70885. getRF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  70886. end;
  70887. procedure TPORTF_PORTF.setRF3; inline;
  70888. begin
  70889. pTDefRegMap(@Self)^.&set := $00000008;
  70890. end;
  70891. procedure TPORTF_PORTF.clearRF3; inline;
  70892. begin
  70893. pTDefRegMap(@Self)^.clr := $00000008;
  70894. end;
  70895. procedure TPORTF_PORTF.setRF3(thebits : TBits_1); inline;
  70896. begin
  70897. if thebits = 0 then
  70898. pTDefRegMap(@Self)^.clr := $00000008
  70899. else
  70900. pTDefRegMap(@Self)^.&set := $00000008;
  70901. end;
  70902. function TPORTF_PORTF.getRF3 : TBits_1; inline;
  70903. begin
  70904. getRF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  70905. end;
  70906. procedure TPORTF_PORTF.setRF4; inline;
  70907. begin
  70908. pTDefRegMap(@Self)^.&set := $00000010;
  70909. end;
  70910. procedure TPORTF_PORTF.clearRF4; inline;
  70911. begin
  70912. pTDefRegMap(@Self)^.clr := $00000010;
  70913. end;
  70914. procedure TPORTF_PORTF.setRF4(thebits : TBits_1); inline;
  70915. begin
  70916. if thebits = 0 then
  70917. pTDefRegMap(@Self)^.clr := $00000010
  70918. else
  70919. pTDefRegMap(@Self)^.&set := $00000010;
  70920. end;
  70921. function TPORTF_PORTF.getRF4 : TBits_1; inline;
  70922. begin
  70923. getRF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  70924. end;
  70925. procedure TPORTF_PORTF.setRF5; inline;
  70926. begin
  70927. pTDefRegMap(@Self)^.&set := $00000020;
  70928. end;
  70929. procedure TPORTF_PORTF.clearRF5; inline;
  70930. begin
  70931. pTDefRegMap(@Self)^.clr := $00000020;
  70932. end;
  70933. procedure TPORTF_PORTF.setRF5(thebits : TBits_1); inline;
  70934. begin
  70935. if thebits = 0 then
  70936. pTDefRegMap(@Self)^.clr := $00000020
  70937. else
  70938. pTDefRegMap(@Self)^.&set := $00000020;
  70939. end;
  70940. function TPORTF_PORTF.getRF5 : TBits_1; inline;
  70941. begin
  70942. getRF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  70943. end;
  70944. procedure TPORTF_PORTF.setw(thebits : TBits_32); inline;
  70945. begin
  70946. pTDefRegMap(@Self)^.val := thebits;
  70947. end;
  70948. function TPORTF_PORTF.getw : TBits_32; inline;
  70949. begin
  70950. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  70951. end;
  70952. procedure TPORTF_LATF.setLATF0; inline;
  70953. begin
  70954. pTDefRegMap(@Self)^.&set := $00000001;
  70955. end;
  70956. procedure TPORTF_LATF.clearLATF0; inline;
  70957. begin
  70958. pTDefRegMap(@Self)^.clr := $00000001;
  70959. end;
  70960. procedure TPORTF_LATF.setLATF0(thebits : TBits_1); inline;
  70961. begin
  70962. if thebits = 0 then
  70963. pTDefRegMap(@Self)^.clr := $00000001
  70964. else
  70965. pTDefRegMap(@Self)^.&set := $00000001;
  70966. end;
  70967. function TPORTF_LATF.getLATF0 : TBits_1; inline;
  70968. begin
  70969. getLATF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  70970. end;
  70971. procedure TPORTF_LATF.setLATF1; inline;
  70972. begin
  70973. pTDefRegMap(@Self)^.&set := $00000002;
  70974. end;
  70975. procedure TPORTF_LATF.clearLATF1; inline;
  70976. begin
  70977. pTDefRegMap(@Self)^.clr := $00000002;
  70978. end;
  70979. procedure TPORTF_LATF.setLATF1(thebits : TBits_1); inline;
  70980. begin
  70981. if thebits = 0 then
  70982. pTDefRegMap(@Self)^.clr := $00000002
  70983. else
  70984. pTDefRegMap(@Self)^.&set := $00000002;
  70985. end;
  70986. function TPORTF_LATF.getLATF1 : TBits_1; inline;
  70987. begin
  70988. getLATF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  70989. end;
  70990. procedure TPORTF_LATF.setLATF2; inline;
  70991. begin
  70992. pTDefRegMap(@Self)^.&set := $00000004;
  70993. end;
  70994. procedure TPORTF_LATF.clearLATF2; inline;
  70995. begin
  70996. pTDefRegMap(@Self)^.clr := $00000004;
  70997. end;
  70998. procedure TPORTF_LATF.setLATF2(thebits : TBits_1); inline;
  70999. begin
  71000. if thebits = 0 then
  71001. pTDefRegMap(@Self)^.clr := $00000004
  71002. else
  71003. pTDefRegMap(@Self)^.&set := $00000004;
  71004. end;
  71005. function TPORTF_LATF.getLATF2 : TBits_1; inline;
  71006. begin
  71007. getLATF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71008. end;
  71009. procedure TPORTF_LATF.setLATF3; inline;
  71010. begin
  71011. pTDefRegMap(@Self)^.&set := $00000008;
  71012. end;
  71013. procedure TPORTF_LATF.clearLATF3; inline;
  71014. begin
  71015. pTDefRegMap(@Self)^.clr := $00000008;
  71016. end;
  71017. procedure TPORTF_LATF.setLATF3(thebits : TBits_1); inline;
  71018. begin
  71019. if thebits = 0 then
  71020. pTDefRegMap(@Self)^.clr := $00000008
  71021. else
  71022. pTDefRegMap(@Self)^.&set := $00000008;
  71023. end;
  71024. function TPORTF_LATF.getLATF3 : TBits_1; inline;
  71025. begin
  71026. getLATF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71027. end;
  71028. procedure TPORTF_LATF.setLATF4; inline;
  71029. begin
  71030. pTDefRegMap(@Self)^.&set := $00000010;
  71031. end;
  71032. procedure TPORTF_LATF.clearLATF4; inline;
  71033. begin
  71034. pTDefRegMap(@Self)^.clr := $00000010;
  71035. end;
  71036. procedure TPORTF_LATF.setLATF4(thebits : TBits_1); inline;
  71037. begin
  71038. if thebits = 0 then
  71039. pTDefRegMap(@Self)^.clr := $00000010
  71040. else
  71041. pTDefRegMap(@Self)^.&set := $00000010;
  71042. end;
  71043. function TPORTF_LATF.getLATF4 : TBits_1; inline;
  71044. begin
  71045. getLATF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71046. end;
  71047. procedure TPORTF_LATF.setLATF5; inline;
  71048. begin
  71049. pTDefRegMap(@Self)^.&set := $00000020;
  71050. end;
  71051. procedure TPORTF_LATF.clearLATF5; inline;
  71052. begin
  71053. pTDefRegMap(@Self)^.clr := $00000020;
  71054. end;
  71055. procedure TPORTF_LATF.setLATF5(thebits : TBits_1); inline;
  71056. begin
  71057. if thebits = 0 then
  71058. pTDefRegMap(@Self)^.clr := $00000020
  71059. else
  71060. pTDefRegMap(@Self)^.&set := $00000020;
  71061. end;
  71062. function TPORTF_LATF.getLATF5 : TBits_1; inline;
  71063. begin
  71064. getLATF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71065. end;
  71066. procedure TPORTF_LATF.setw(thebits : TBits_32); inline;
  71067. begin
  71068. pTDefRegMap(@Self)^.val := thebits;
  71069. end;
  71070. function TPORTF_LATF.getw : TBits_32; inline;
  71071. begin
  71072. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71073. end;
  71074. procedure TPORTF_ODCF.setODCF0; inline;
  71075. begin
  71076. pTDefRegMap(@Self)^.&set := $00000001;
  71077. end;
  71078. procedure TPORTF_ODCF.clearODCF0; inline;
  71079. begin
  71080. pTDefRegMap(@Self)^.clr := $00000001;
  71081. end;
  71082. procedure TPORTF_ODCF.setODCF0(thebits : TBits_1); inline;
  71083. begin
  71084. if thebits = 0 then
  71085. pTDefRegMap(@Self)^.clr := $00000001
  71086. else
  71087. pTDefRegMap(@Self)^.&set := $00000001;
  71088. end;
  71089. function TPORTF_ODCF.getODCF0 : TBits_1; inline;
  71090. begin
  71091. getODCF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71092. end;
  71093. procedure TPORTF_ODCF.setODCF1; inline;
  71094. begin
  71095. pTDefRegMap(@Self)^.&set := $00000002;
  71096. end;
  71097. procedure TPORTF_ODCF.clearODCF1; inline;
  71098. begin
  71099. pTDefRegMap(@Self)^.clr := $00000002;
  71100. end;
  71101. procedure TPORTF_ODCF.setODCF1(thebits : TBits_1); inline;
  71102. begin
  71103. if thebits = 0 then
  71104. pTDefRegMap(@Self)^.clr := $00000002
  71105. else
  71106. pTDefRegMap(@Self)^.&set := $00000002;
  71107. end;
  71108. function TPORTF_ODCF.getODCF1 : TBits_1; inline;
  71109. begin
  71110. getODCF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71111. end;
  71112. procedure TPORTF_ODCF.setODCF2; inline;
  71113. begin
  71114. pTDefRegMap(@Self)^.&set := $00000004;
  71115. end;
  71116. procedure TPORTF_ODCF.clearODCF2; inline;
  71117. begin
  71118. pTDefRegMap(@Self)^.clr := $00000004;
  71119. end;
  71120. procedure TPORTF_ODCF.setODCF2(thebits : TBits_1); inline;
  71121. begin
  71122. if thebits = 0 then
  71123. pTDefRegMap(@Self)^.clr := $00000004
  71124. else
  71125. pTDefRegMap(@Self)^.&set := $00000004;
  71126. end;
  71127. function TPORTF_ODCF.getODCF2 : TBits_1; inline;
  71128. begin
  71129. getODCF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71130. end;
  71131. procedure TPORTF_ODCF.setODCF3; inline;
  71132. begin
  71133. pTDefRegMap(@Self)^.&set := $00000008;
  71134. end;
  71135. procedure TPORTF_ODCF.clearODCF3; inline;
  71136. begin
  71137. pTDefRegMap(@Self)^.clr := $00000008;
  71138. end;
  71139. procedure TPORTF_ODCF.setODCF3(thebits : TBits_1); inline;
  71140. begin
  71141. if thebits = 0 then
  71142. pTDefRegMap(@Self)^.clr := $00000008
  71143. else
  71144. pTDefRegMap(@Self)^.&set := $00000008;
  71145. end;
  71146. function TPORTF_ODCF.getODCF3 : TBits_1; inline;
  71147. begin
  71148. getODCF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71149. end;
  71150. procedure TPORTF_ODCF.setODCF4; inline;
  71151. begin
  71152. pTDefRegMap(@Self)^.&set := $00000010;
  71153. end;
  71154. procedure TPORTF_ODCF.clearODCF4; inline;
  71155. begin
  71156. pTDefRegMap(@Self)^.clr := $00000010;
  71157. end;
  71158. procedure TPORTF_ODCF.setODCF4(thebits : TBits_1); inline;
  71159. begin
  71160. if thebits = 0 then
  71161. pTDefRegMap(@Self)^.clr := $00000010
  71162. else
  71163. pTDefRegMap(@Self)^.&set := $00000010;
  71164. end;
  71165. function TPORTF_ODCF.getODCF4 : TBits_1; inline;
  71166. begin
  71167. getODCF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71168. end;
  71169. procedure TPORTF_ODCF.setODCF5; inline;
  71170. begin
  71171. pTDefRegMap(@Self)^.&set := $00000020;
  71172. end;
  71173. procedure TPORTF_ODCF.clearODCF5; inline;
  71174. begin
  71175. pTDefRegMap(@Self)^.clr := $00000020;
  71176. end;
  71177. procedure TPORTF_ODCF.setODCF5(thebits : TBits_1); inline;
  71178. begin
  71179. if thebits = 0 then
  71180. pTDefRegMap(@Self)^.clr := $00000020
  71181. else
  71182. pTDefRegMap(@Self)^.&set := $00000020;
  71183. end;
  71184. function TPORTF_ODCF.getODCF5 : TBits_1; inline;
  71185. begin
  71186. getODCF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71187. end;
  71188. procedure TPORTF_ODCF.setw(thebits : TBits_32); inline;
  71189. begin
  71190. pTDefRegMap(@Self)^.val := thebits;
  71191. end;
  71192. function TPORTF_ODCF.getw : TBits_32; inline;
  71193. begin
  71194. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71195. end;
  71196. procedure TPORTG_TRISG.setTRISG2; inline;
  71197. begin
  71198. pTDefRegMap(@Self)^.&set := $00000004;
  71199. end;
  71200. procedure TPORTG_TRISG.clearTRISG2; inline;
  71201. begin
  71202. pTDefRegMap(@Self)^.clr := $00000004;
  71203. end;
  71204. procedure TPORTG_TRISG.setTRISG2(thebits : TBits_1); inline;
  71205. begin
  71206. if thebits = 0 then
  71207. pTDefRegMap(@Self)^.clr := $00000004
  71208. else
  71209. pTDefRegMap(@Self)^.&set := $00000004;
  71210. end;
  71211. function TPORTG_TRISG.getTRISG2 : TBits_1; inline;
  71212. begin
  71213. getTRISG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71214. end;
  71215. procedure TPORTG_TRISG.setTRISG3; inline;
  71216. begin
  71217. pTDefRegMap(@Self)^.&set := $00000008;
  71218. end;
  71219. procedure TPORTG_TRISG.clearTRISG3; inline;
  71220. begin
  71221. pTDefRegMap(@Self)^.clr := $00000008;
  71222. end;
  71223. procedure TPORTG_TRISG.setTRISG3(thebits : TBits_1); inline;
  71224. begin
  71225. if thebits = 0 then
  71226. pTDefRegMap(@Self)^.clr := $00000008
  71227. else
  71228. pTDefRegMap(@Self)^.&set := $00000008;
  71229. end;
  71230. function TPORTG_TRISG.getTRISG3 : TBits_1; inline;
  71231. begin
  71232. getTRISG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71233. end;
  71234. procedure TPORTG_TRISG.setTRISG6; inline;
  71235. begin
  71236. pTDefRegMap(@Self)^.&set := $00000040;
  71237. end;
  71238. procedure TPORTG_TRISG.clearTRISG6; inline;
  71239. begin
  71240. pTDefRegMap(@Self)^.clr := $00000040;
  71241. end;
  71242. procedure TPORTG_TRISG.setTRISG6(thebits : TBits_1); inline;
  71243. begin
  71244. if thebits = 0 then
  71245. pTDefRegMap(@Self)^.clr := $00000040
  71246. else
  71247. pTDefRegMap(@Self)^.&set := $00000040;
  71248. end;
  71249. function TPORTG_TRISG.getTRISG6 : TBits_1; inline;
  71250. begin
  71251. getTRISG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71252. end;
  71253. procedure TPORTG_TRISG.setTRISG7; inline;
  71254. begin
  71255. pTDefRegMap(@Self)^.&set := $00000080;
  71256. end;
  71257. procedure TPORTG_TRISG.clearTRISG7; inline;
  71258. begin
  71259. pTDefRegMap(@Self)^.clr := $00000080;
  71260. end;
  71261. procedure TPORTG_TRISG.setTRISG7(thebits : TBits_1); inline;
  71262. begin
  71263. if thebits = 0 then
  71264. pTDefRegMap(@Self)^.clr := $00000080
  71265. else
  71266. pTDefRegMap(@Self)^.&set := $00000080;
  71267. end;
  71268. function TPORTG_TRISG.getTRISG7 : TBits_1; inline;
  71269. begin
  71270. getTRISG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71271. end;
  71272. procedure TPORTG_TRISG.setTRISG8; inline;
  71273. begin
  71274. pTDefRegMap(@Self)^.&set := $00000100;
  71275. end;
  71276. procedure TPORTG_TRISG.clearTRISG8; inline;
  71277. begin
  71278. pTDefRegMap(@Self)^.clr := $00000100;
  71279. end;
  71280. procedure TPORTG_TRISG.setTRISG8(thebits : TBits_1); inline;
  71281. begin
  71282. if thebits = 0 then
  71283. pTDefRegMap(@Self)^.clr := $00000100
  71284. else
  71285. pTDefRegMap(@Self)^.&set := $00000100;
  71286. end;
  71287. function TPORTG_TRISG.getTRISG8 : TBits_1; inline;
  71288. begin
  71289. getTRISG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71290. end;
  71291. procedure TPORTG_TRISG.setTRISG9; inline;
  71292. begin
  71293. pTDefRegMap(@Self)^.&set := $00000200;
  71294. end;
  71295. procedure TPORTG_TRISG.clearTRISG9; inline;
  71296. begin
  71297. pTDefRegMap(@Self)^.clr := $00000200;
  71298. end;
  71299. procedure TPORTG_TRISG.setTRISG9(thebits : TBits_1); inline;
  71300. begin
  71301. if thebits = 0 then
  71302. pTDefRegMap(@Self)^.clr := $00000200
  71303. else
  71304. pTDefRegMap(@Self)^.&set := $00000200;
  71305. end;
  71306. function TPORTG_TRISG.getTRISG9 : TBits_1; inline;
  71307. begin
  71308. getTRISG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71309. end;
  71310. procedure TPORTG_TRISG.setw(thebits : TBits_32); inline;
  71311. begin
  71312. pTDefRegMap(@Self)^.val := thebits;
  71313. end;
  71314. function TPORTG_TRISG.getw : TBits_32; inline;
  71315. begin
  71316. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71317. end;
  71318. procedure TPORTG_PORTG.setRG2; inline;
  71319. begin
  71320. pTDefRegMap(@Self)^.&set := $00000004;
  71321. end;
  71322. procedure TPORTG_PORTG.clearRG2; inline;
  71323. begin
  71324. pTDefRegMap(@Self)^.clr := $00000004;
  71325. end;
  71326. procedure TPORTG_PORTG.setRG2(thebits : TBits_1); inline;
  71327. begin
  71328. if thebits = 0 then
  71329. pTDefRegMap(@Self)^.clr := $00000004
  71330. else
  71331. pTDefRegMap(@Self)^.&set := $00000004;
  71332. end;
  71333. function TPORTG_PORTG.getRG2 : TBits_1; inline;
  71334. begin
  71335. getRG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71336. end;
  71337. procedure TPORTG_PORTG.setRG3; inline;
  71338. begin
  71339. pTDefRegMap(@Self)^.&set := $00000008;
  71340. end;
  71341. procedure TPORTG_PORTG.clearRG3; inline;
  71342. begin
  71343. pTDefRegMap(@Self)^.clr := $00000008;
  71344. end;
  71345. procedure TPORTG_PORTG.setRG3(thebits : TBits_1); inline;
  71346. begin
  71347. if thebits = 0 then
  71348. pTDefRegMap(@Self)^.clr := $00000008
  71349. else
  71350. pTDefRegMap(@Self)^.&set := $00000008;
  71351. end;
  71352. function TPORTG_PORTG.getRG3 : TBits_1; inline;
  71353. begin
  71354. getRG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71355. end;
  71356. procedure TPORTG_PORTG.setRG6; inline;
  71357. begin
  71358. pTDefRegMap(@Self)^.&set := $00000040;
  71359. end;
  71360. procedure TPORTG_PORTG.clearRG6; inline;
  71361. begin
  71362. pTDefRegMap(@Self)^.clr := $00000040;
  71363. end;
  71364. procedure TPORTG_PORTG.setRG6(thebits : TBits_1); inline;
  71365. begin
  71366. if thebits = 0 then
  71367. pTDefRegMap(@Self)^.clr := $00000040
  71368. else
  71369. pTDefRegMap(@Self)^.&set := $00000040;
  71370. end;
  71371. function TPORTG_PORTG.getRG6 : TBits_1; inline;
  71372. begin
  71373. getRG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71374. end;
  71375. procedure TPORTG_PORTG.setRG7; inline;
  71376. begin
  71377. pTDefRegMap(@Self)^.&set := $00000080;
  71378. end;
  71379. procedure TPORTG_PORTG.clearRG7; inline;
  71380. begin
  71381. pTDefRegMap(@Self)^.clr := $00000080;
  71382. end;
  71383. procedure TPORTG_PORTG.setRG7(thebits : TBits_1); inline;
  71384. begin
  71385. if thebits = 0 then
  71386. pTDefRegMap(@Self)^.clr := $00000080
  71387. else
  71388. pTDefRegMap(@Self)^.&set := $00000080;
  71389. end;
  71390. function TPORTG_PORTG.getRG7 : TBits_1; inline;
  71391. begin
  71392. getRG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71393. end;
  71394. procedure TPORTG_PORTG.setRG8; inline;
  71395. begin
  71396. pTDefRegMap(@Self)^.&set := $00000100;
  71397. end;
  71398. procedure TPORTG_PORTG.clearRG8; inline;
  71399. begin
  71400. pTDefRegMap(@Self)^.clr := $00000100;
  71401. end;
  71402. procedure TPORTG_PORTG.setRG8(thebits : TBits_1); inline;
  71403. begin
  71404. if thebits = 0 then
  71405. pTDefRegMap(@Self)^.clr := $00000100
  71406. else
  71407. pTDefRegMap(@Self)^.&set := $00000100;
  71408. end;
  71409. function TPORTG_PORTG.getRG8 : TBits_1; inline;
  71410. begin
  71411. getRG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71412. end;
  71413. procedure TPORTG_PORTG.setRG9; inline;
  71414. begin
  71415. pTDefRegMap(@Self)^.&set := $00000200;
  71416. end;
  71417. procedure TPORTG_PORTG.clearRG9; inline;
  71418. begin
  71419. pTDefRegMap(@Self)^.clr := $00000200;
  71420. end;
  71421. procedure TPORTG_PORTG.setRG9(thebits : TBits_1); inline;
  71422. begin
  71423. if thebits = 0 then
  71424. pTDefRegMap(@Self)^.clr := $00000200
  71425. else
  71426. pTDefRegMap(@Self)^.&set := $00000200;
  71427. end;
  71428. function TPORTG_PORTG.getRG9 : TBits_1; inline;
  71429. begin
  71430. getRG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71431. end;
  71432. procedure TPORTG_PORTG.setw(thebits : TBits_32); inline;
  71433. begin
  71434. pTDefRegMap(@Self)^.val := thebits;
  71435. end;
  71436. function TPORTG_PORTG.getw : TBits_32; inline;
  71437. begin
  71438. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71439. end;
  71440. procedure TPORTG_LATG.setLATG2; inline;
  71441. begin
  71442. pTDefRegMap(@Self)^.&set := $00000004;
  71443. end;
  71444. procedure TPORTG_LATG.clearLATG2; inline;
  71445. begin
  71446. pTDefRegMap(@Self)^.clr := $00000004;
  71447. end;
  71448. procedure TPORTG_LATG.setLATG2(thebits : TBits_1); inline;
  71449. begin
  71450. if thebits = 0 then
  71451. pTDefRegMap(@Self)^.clr := $00000004
  71452. else
  71453. pTDefRegMap(@Self)^.&set := $00000004;
  71454. end;
  71455. function TPORTG_LATG.getLATG2 : TBits_1; inline;
  71456. begin
  71457. getLATG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71458. end;
  71459. procedure TPORTG_LATG.setLATG3; inline;
  71460. begin
  71461. pTDefRegMap(@Self)^.&set := $00000008;
  71462. end;
  71463. procedure TPORTG_LATG.clearLATG3; inline;
  71464. begin
  71465. pTDefRegMap(@Self)^.clr := $00000008;
  71466. end;
  71467. procedure TPORTG_LATG.setLATG3(thebits : TBits_1); inline;
  71468. begin
  71469. if thebits = 0 then
  71470. pTDefRegMap(@Self)^.clr := $00000008
  71471. else
  71472. pTDefRegMap(@Self)^.&set := $00000008;
  71473. end;
  71474. function TPORTG_LATG.getLATG3 : TBits_1; inline;
  71475. begin
  71476. getLATG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71477. end;
  71478. procedure TPORTG_LATG.setLATG6; inline;
  71479. begin
  71480. pTDefRegMap(@Self)^.&set := $00000040;
  71481. end;
  71482. procedure TPORTG_LATG.clearLATG6; inline;
  71483. begin
  71484. pTDefRegMap(@Self)^.clr := $00000040;
  71485. end;
  71486. procedure TPORTG_LATG.setLATG6(thebits : TBits_1); inline;
  71487. begin
  71488. if thebits = 0 then
  71489. pTDefRegMap(@Self)^.clr := $00000040
  71490. else
  71491. pTDefRegMap(@Self)^.&set := $00000040;
  71492. end;
  71493. function TPORTG_LATG.getLATG6 : TBits_1; inline;
  71494. begin
  71495. getLATG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71496. end;
  71497. procedure TPORTG_LATG.setLATG7; inline;
  71498. begin
  71499. pTDefRegMap(@Self)^.&set := $00000080;
  71500. end;
  71501. procedure TPORTG_LATG.clearLATG7; inline;
  71502. begin
  71503. pTDefRegMap(@Self)^.clr := $00000080;
  71504. end;
  71505. procedure TPORTG_LATG.setLATG7(thebits : TBits_1); inline;
  71506. begin
  71507. if thebits = 0 then
  71508. pTDefRegMap(@Self)^.clr := $00000080
  71509. else
  71510. pTDefRegMap(@Self)^.&set := $00000080;
  71511. end;
  71512. function TPORTG_LATG.getLATG7 : TBits_1; inline;
  71513. begin
  71514. getLATG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71515. end;
  71516. procedure TPORTG_LATG.setLATG8; inline;
  71517. begin
  71518. pTDefRegMap(@Self)^.&set := $00000100;
  71519. end;
  71520. procedure TPORTG_LATG.clearLATG8; inline;
  71521. begin
  71522. pTDefRegMap(@Self)^.clr := $00000100;
  71523. end;
  71524. procedure TPORTG_LATG.setLATG8(thebits : TBits_1); inline;
  71525. begin
  71526. if thebits = 0 then
  71527. pTDefRegMap(@Self)^.clr := $00000100
  71528. else
  71529. pTDefRegMap(@Self)^.&set := $00000100;
  71530. end;
  71531. function TPORTG_LATG.getLATG8 : TBits_1; inline;
  71532. begin
  71533. getLATG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71534. end;
  71535. procedure TPORTG_LATG.setLATG9; inline;
  71536. begin
  71537. pTDefRegMap(@Self)^.&set := $00000200;
  71538. end;
  71539. procedure TPORTG_LATG.clearLATG9; inline;
  71540. begin
  71541. pTDefRegMap(@Self)^.clr := $00000200;
  71542. end;
  71543. procedure TPORTG_LATG.setLATG9(thebits : TBits_1); inline;
  71544. begin
  71545. if thebits = 0 then
  71546. pTDefRegMap(@Self)^.clr := $00000200
  71547. else
  71548. pTDefRegMap(@Self)^.&set := $00000200;
  71549. end;
  71550. function TPORTG_LATG.getLATG9 : TBits_1; inline;
  71551. begin
  71552. getLATG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71553. end;
  71554. procedure TPORTG_LATG.setw(thebits : TBits_32); inline;
  71555. begin
  71556. pTDefRegMap(@Self)^.val := thebits;
  71557. end;
  71558. function TPORTG_LATG.getw : TBits_32; inline;
  71559. begin
  71560. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71561. end;
  71562. procedure TPORTG_ODCG.setODCG2; inline;
  71563. begin
  71564. pTDefRegMap(@Self)^.&set := $00000004;
  71565. end;
  71566. procedure TPORTG_ODCG.clearODCG2; inline;
  71567. begin
  71568. pTDefRegMap(@Self)^.clr := $00000004;
  71569. end;
  71570. procedure TPORTG_ODCG.setODCG2(thebits : TBits_1); inline;
  71571. begin
  71572. if thebits = 0 then
  71573. pTDefRegMap(@Self)^.clr := $00000004
  71574. else
  71575. pTDefRegMap(@Self)^.&set := $00000004;
  71576. end;
  71577. function TPORTG_ODCG.getODCG2 : TBits_1; inline;
  71578. begin
  71579. getODCG2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71580. end;
  71581. procedure TPORTG_ODCG.setODCG3; inline;
  71582. begin
  71583. pTDefRegMap(@Self)^.&set := $00000008;
  71584. end;
  71585. procedure TPORTG_ODCG.clearODCG3; inline;
  71586. begin
  71587. pTDefRegMap(@Self)^.clr := $00000008;
  71588. end;
  71589. procedure TPORTG_ODCG.setODCG3(thebits : TBits_1); inline;
  71590. begin
  71591. if thebits = 0 then
  71592. pTDefRegMap(@Self)^.clr := $00000008
  71593. else
  71594. pTDefRegMap(@Self)^.&set := $00000008;
  71595. end;
  71596. function TPORTG_ODCG.getODCG3 : TBits_1; inline;
  71597. begin
  71598. getODCG3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71599. end;
  71600. procedure TPORTG_ODCG.setODCG6; inline;
  71601. begin
  71602. pTDefRegMap(@Self)^.&set := $00000040;
  71603. end;
  71604. procedure TPORTG_ODCG.clearODCG6; inline;
  71605. begin
  71606. pTDefRegMap(@Self)^.clr := $00000040;
  71607. end;
  71608. procedure TPORTG_ODCG.setODCG6(thebits : TBits_1); inline;
  71609. begin
  71610. if thebits = 0 then
  71611. pTDefRegMap(@Self)^.clr := $00000040
  71612. else
  71613. pTDefRegMap(@Self)^.&set := $00000040;
  71614. end;
  71615. function TPORTG_ODCG.getODCG6 : TBits_1; inline;
  71616. begin
  71617. getODCG6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71618. end;
  71619. procedure TPORTG_ODCG.setODCG7; inline;
  71620. begin
  71621. pTDefRegMap(@Self)^.&set := $00000080;
  71622. end;
  71623. procedure TPORTG_ODCG.clearODCG7; inline;
  71624. begin
  71625. pTDefRegMap(@Self)^.clr := $00000080;
  71626. end;
  71627. procedure TPORTG_ODCG.setODCG7(thebits : TBits_1); inline;
  71628. begin
  71629. if thebits = 0 then
  71630. pTDefRegMap(@Self)^.clr := $00000080
  71631. else
  71632. pTDefRegMap(@Self)^.&set := $00000080;
  71633. end;
  71634. function TPORTG_ODCG.getODCG7 : TBits_1; inline;
  71635. begin
  71636. getODCG7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71637. end;
  71638. procedure TPORTG_ODCG.setODCG8; inline;
  71639. begin
  71640. pTDefRegMap(@Self)^.&set := $00000100;
  71641. end;
  71642. procedure TPORTG_ODCG.clearODCG8; inline;
  71643. begin
  71644. pTDefRegMap(@Self)^.clr := $00000100;
  71645. end;
  71646. procedure TPORTG_ODCG.setODCG8(thebits : TBits_1); inline;
  71647. begin
  71648. if thebits = 0 then
  71649. pTDefRegMap(@Self)^.clr := $00000100
  71650. else
  71651. pTDefRegMap(@Self)^.&set := $00000100;
  71652. end;
  71653. function TPORTG_ODCG.getODCG8 : TBits_1; inline;
  71654. begin
  71655. getODCG8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71656. end;
  71657. procedure TPORTG_ODCG.setODCG9; inline;
  71658. begin
  71659. pTDefRegMap(@Self)^.&set := $00000200;
  71660. end;
  71661. procedure TPORTG_ODCG.clearODCG9; inline;
  71662. begin
  71663. pTDefRegMap(@Self)^.clr := $00000200;
  71664. end;
  71665. procedure TPORTG_ODCG.setODCG9(thebits : TBits_1); inline;
  71666. begin
  71667. if thebits = 0 then
  71668. pTDefRegMap(@Self)^.clr := $00000200
  71669. else
  71670. pTDefRegMap(@Self)^.&set := $00000200;
  71671. end;
  71672. function TPORTG_ODCG.getODCG9 : TBits_1; inline;
  71673. begin
  71674. getODCG9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71675. end;
  71676. procedure TPORTG_ODCG.setw(thebits : TBits_32); inline;
  71677. begin
  71678. pTDefRegMap(@Self)^.val := thebits;
  71679. end;
  71680. function TPORTG_ODCG.getw : TBits_32; inline;
  71681. begin
  71682. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71683. end;
  71684. procedure TPORTG_CNCON.setSIDL; inline;
  71685. begin
  71686. pTDefRegMap(@Self)^.&set := $00002000;
  71687. end;
  71688. procedure TPORTG_CNCON.clearSIDL; inline;
  71689. begin
  71690. pTDefRegMap(@Self)^.clr := $00002000;
  71691. end;
  71692. procedure TPORTG_CNCON.setSIDL(thebits : TBits_1); inline;
  71693. begin
  71694. if thebits = 0 then
  71695. pTDefRegMap(@Self)^.clr := $00002000
  71696. else
  71697. pTDefRegMap(@Self)^.&set := $00002000;
  71698. end;
  71699. function TPORTG_CNCON.getSIDL : TBits_1; inline;
  71700. begin
  71701. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71702. end;
  71703. procedure TPORTG_CNCON.setON; inline;
  71704. begin
  71705. pTDefRegMap(@Self)^.&set := $00008000;
  71706. end;
  71707. procedure TPORTG_CNCON.clearON; inline;
  71708. begin
  71709. pTDefRegMap(@Self)^.clr := $00008000;
  71710. end;
  71711. procedure TPORTG_CNCON.setON(thebits : TBits_1); inline;
  71712. begin
  71713. if thebits = 0 then
  71714. pTDefRegMap(@Self)^.clr := $00008000
  71715. else
  71716. pTDefRegMap(@Self)^.&set := $00008000;
  71717. end;
  71718. function TPORTG_CNCON.getON : TBits_1; inline;
  71719. begin
  71720. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  71721. end;
  71722. procedure TPORTG_CNCON.setw(thebits : TBits_32); inline;
  71723. begin
  71724. pTDefRegMap(@Self)^.val := thebits;
  71725. end;
  71726. function TPORTG_CNCON.getw : TBits_32; inline;
  71727. begin
  71728. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  71729. end;
  71730. procedure TPORTG_CNEN.setCNEN0; inline;
  71731. begin
  71732. pTDefRegMap(@Self)^.&set := $00000001;
  71733. end;
  71734. procedure TPORTG_CNEN.clearCNEN0; inline;
  71735. begin
  71736. pTDefRegMap(@Self)^.clr := $00000001;
  71737. end;
  71738. procedure TPORTG_CNEN.setCNEN0(thebits : TBits_1); inline;
  71739. begin
  71740. if thebits = 0 then
  71741. pTDefRegMap(@Self)^.clr := $00000001
  71742. else
  71743. pTDefRegMap(@Self)^.&set := $00000001;
  71744. end;
  71745. function TPORTG_CNEN.getCNEN0 : TBits_1; inline;
  71746. begin
  71747. getCNEN0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  71748. end;
  71749. procedure TPORTG_CNEN.setCNEN1; inline;
  71750. begin
  71751. pTDefRegMap(@Self)^.&set := $00000002;
  71752. end;
  71753. procedure TPORTG_CNEN.clearCNEN1; inline;
  71754. begin
  71755. pTDefRegMap(@Self)^.clr := $00000002;
  71756. end;
  71757. procedure TPORTG_CNEN.setCNEN1(thebits : TBits_1); inline;
  71758. begin
  71759. if thebits = 0 then
  71760. pTDefRegMap(@Self)^.clr := $00000002
  71761. else
  71762. pTDefRegMap(@Self)^.&set := $00000002;
  71763. end;
  71764. function TPORTG_CNEN.getCNEN1 : TBits_1; inline;
  71765. begin
  71766. getCNEN1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  71767. end;
  71768. procedure TPORTG_CNEN.setCNEN2; inline;
  71769. begin
  71770. pTDefRegMap(@Self)^.&set := $00000004;
  71771. end;
  71772. procedure TPORTG_CNEN.clearCNEN2; inline;
  71773. begin
  71774. pTDefRegMap(@Self)^.clr := $00000004;
  71775. end;
  71776. procedure TPORTG_CNEN.setCNEN2(thebits : TBits_1); inline;
  71777. begin
  71778. if thebits = 0 then
  71779. pTDefRegMap(@Self)^.clr := $00000004
  71780. else
  71781. pTDefRegMap(@Self)^.&set := $00000004;
  71782. end;
  71783. function TPORTG_CNEN.getCNEN2 : TBits_1; inline;
  71784. begin
  71785. getCNEN2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  71786. end;
  71787. procedure TPORTG_CNEN.setCNEN3; inline;
  71788. begin
  71789. pTDefRegMap(@Self)^.&set := $00000008;
  71790. end;
  71791. procedure TPORTG_CNEN.clearCNEN3; inline;
  71792. begin
  71793. pTDefRegMap(@Self)^.clr := $00000008;
  71794. end;
  71795. procedure TPORTG_CNEN.setCNEN3(thebits : TBits_1); inline;
  71796. begin
  71797. if thebits = 0 then
  71798. pTDefRegMap(@Self)^.clr := $00000008
  71799. else
  71800. pTDefRegMap(@Self)^.&set := $00000008;
  71801. end;
  71802. function TPORTG_CNEN.getCNEN3 : TBits_1; inline;
  71803. begin
  71804. getCNEN3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  71805. end;
  71806. procedure TPORTG_CNEN.setCNEN4; inline;
  71807. begin
  71808. pTDefRegMap(@Self)^.&set := $00000010;
  71809. end;
  71810. procedure TPORTG_CNEN.clearCNEN4; inline;
  71811. begin
  71812. pTDefRegMap(@Self)^.clr := $00000010;
  71813. end;
  71814. procedure TPORTG_CNEN.setCNEN4(thebits : TBits_1); inline;
  71815. begin
  71816. if thebits = 0 then
  71817. pTDefRegMap(@Self)^.clr := $00000010
  71818. else
  71819. pTDefRegMap(@Self)^.&set := $00000010;
  71820. end;
  71821. function TPORTG_CNEN.getCNEN4 : TBits_1; inline;
  71822. begin
  71823. getCNEN4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  71824. end;
  71825. procedure TPORTG_CNEN.setCNEN5; inline;
  71826. begin
  71827. pTDefRegMap(@Self)^.&set := $00000020;
  71828. end;
  71829. procedure TPORTG_CNEN.clearCNEN5; inline;
  71830. begin
  71831. pTDefRegMap(@Self)^.clr := $00000020;
  71832. end;
  71833. procedure TPORTG_CNEN.setCNEN5(thebits : TBits_1); inline;
  71834. begin
  71835. if thebits = 0 then
  71836. pTDefRegMap(@Self)^.clr := $00000020
  71837. else
  71838. pTDefRegMap(@Self)^.&set := $00000020;
  71839. end;
  71840. function TPORTG_CNEN.getCNEN5 : TBits_1; inline;
  71841. begin
  71842. getCNEN5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  71843. end;
  71844. procedure TPORTG_CNEN.setCNEN6; inline;
  71845. begin
  71846. pTDefRegMap(@Self)^.&set := $00000040;
  71847. end;
  71848. procedure TPORTG_CNEN.clearCNEN6; inline;
  71849. begin
  71850. pTDefRegMap(@Self)^.clr := $00000040;
  71851. end;
  71852. procedure TPORTG_CNEN.setCNEN6(thebits : TBits_1); inline;
  71853. begin
  71854. if thebits = 0 then
  71855. pTDefRegMap(@Self)^.clr := $00000040
  71856. else
  71857. pTDefRegMap(@Self)^.&set := $00000040;
  71858. end;
  71859. function TPORTG_CNEN.getCNEN6 : TBits_1; inline;
  71860. begin
  71861. getCNEN6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  71862. end;
  71863. procedure TPORTG_CNEN.setCNEN7; inline;
  71864. begin
  71865. pTDefRegMap(@Self)^.&set := $00000080;
  71866. end;
  71867. procedure TPORTG_CNEN.clearCNEN7; inline;
  71868. begin
  71869. pTDefRegMap(@Self)^.clr := $00000080;
  71870. end;
  71871. procedure TPORTG_CNEN.setCNEN7(thebits : TBits_1); inline;
  71872. begin
  71873. if thebits = 0 then
  71874. pTDefRegMap(@Self)^.clr := $00000080
  71875. else
  71876. pTDefRegMap(@Self)^.&set := $00000080;
  71877. end;
  71878. function TPORTG_CNEN.getCNEN7 : TBits_1; inline;
  71879. begin
  71880. getCNEN7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  71881. end;
  71882. procedure TPORTG_CNEN.setCNEN8; inline;
  71883. begin
  71884. pTDefRegMap(@Self)^.&set := $00000100;
  71885. end;
  71886. procedure TPORTG_CNEN.clearCNEN8; inline;
  71887. begin
  71888. pTDefRegMap(@Self)^.clr := $00000100;
  71889. end;
  71890. procedure TPORTG_CNEN.setCNEN8(thebits : TBits_1); inline;
  71891. begin
  71892. if thebits = 0 then
  71893. pTDefRegMap(@Self)^.clr := $00000100
  71894. else
  71895. pTDefRegMap(@Self)^.&set := $00000100;
  71896. end;
  71897. function TPORTG_CNEN.getCNEN8 : TBits_1; inline;
  71898. begin
  71899. getCNEN8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  71900. end;
  71901. procedure TPORTG_CNEN.setCNEN9; inline;
  71902. begin
  71903. pTDefRegMap(@Self)^.&set := $00000200;
  71904. end;
  71905. procedure TPORTG_CNEN.clearCNEN9; inline;
  71906. begin
  71907. pTDefRegMap(@Self)^.clr := $00000200;
  71908. end;
  71909. procedure TPORTG_CNEN.setCNEN9(thebits : TBits_1); inline;
  71910. begin
  71911. if thebits = 0 then
  71912. pTDefRegMap(@Self)^.clr := $00000200
  71913. else
  71914. pTDefRegMap(@Self)^.&set := $00000200;
  71915. end;
  71916. function TPORTG_CNEN.getCNEN9 : TBits_1; inline;
  71917. begin
  71918. getCNEN9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  71919. end;
  71920. procedure TPORTG_CNEN.setCNEN10; inline;
  71921. begin
  71922. pTDefRegMap(@Self)^.&set := $00000400;
  71923. end;
  71924. procedure TPORTG_CNEN.clearCNEN10; inline;
  71925. begin
  71926. pTDefRegMap(@Self)^.clr := $00000400;
  71927. end;
  71928. procedure TPORTG_CNEN.setCNEN10(thebits : TBits_1); inline;
  71929. begin
  71930. if thebits = 0 then
  71931. pTDefRegMap(@Self)^.clr := $00000400
  71932. else
  71933. pTDefRegMap(@Self)^.&set := $00000400;
  71934. end;
  71935. function TPORTG_CNEN.getCNEN10 : TBits_1; inline;
  71936. begin
  71937. getCNEN10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  71938. end;
  71939. procedure TPORTG_CNEN.setCNEN11; inline;
  71940. begin
  71941. pTDefRegMap(@Self)^.&set := $00000800;
  71942. end;
  71943. procedure TPORTG_CNEN.clearCNEN11; inline;
  71944. begin
  71945. pTDefRegMap(@Self)^.clr := $00000800;
  71946. end;
  71947. procedure TPORTG_CNEN.setCNEN11(thebits : TBits_1); inline;
  71948. begin
  71949. if thebits = 0 then
  71950. pTDefRegMap(@Self)^.clr := $00000800
  71951. else
  71952. pTDefRegMap(@Self)^.&set := $00000800;
  71953. end;
  71954. function TPORTG_CNEN.getCNEN11 : TBits_1; inline;
  71955. begin
  71956. getCNEN11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  71957. end;
  71958. procedure TPORTG_CNEN.setCNEN12; inline;
  71959. begin
  71960. pTDefRegMap(@Self)^.&set := $00001000;
  71961. end;
  71962. procedure TPORTG_CNEN.clearCNEN12; inline;
  71963. begin
  71964. pTDefRegMap(@Self)^.clr := $00001000;
  71965. end;
  71966. procedure TPORTG_CNEN.setCNEN12(thebits : TBits_1); inline;
  71967. begin
  71968. if thebits = 0 then
  71969. pTDefRegMap(@Self)^.clr := $00001000
  71970. else
  71971. pTDefRegMap(@Self)^.&set := $00001000;
  71972. end;
  71973. function TPORTG_CNEN.getCNEN12 : TBits_1; inline;
  71974. begin
  71975. getCNEN12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  71976. end;
  71977. procedure TPORTG_CNEN.setCNEN13; inline;
  71978. begin
  71979. pTDefRegMap(@Self)^.&set := $00002000;
  71980. end;
  71981. procedure TPORTG_CNEN.clearCNEN13; inline;
  71982. begin
  71983. pTDefRegMap(@Self)^.clr := $00002000;
  71984. end;
  71985. procedure TPORTG_CNEN.setCNEN13(thebits : TBits_1); inline;
  71986. begin
  71987. if thebits = 0 then
  71988. pTDefRegMap(@Self)^.clr := $00002000
  71989. else
  71990. pTDefRegMap(@Self)^.&set := $00002000;
  71991. end;
  71992. function TPORTG_CNEN.getCNEN13 : TBits_1; inline;
  71993. begin
  71994. getCNEN13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  71995. end;
  71996. procedure TPORTG_CNEN.setCNEN14; inline;
  71997. begin
  71998. pTDefRegMap(@Self)^.&set := $00004000;
  71999. end;
  72000. procedure TPORTG_CNEN.clearCNEN14; inline;
  72001. begin
  72002. pTDefRegMap(@Self)^.clr := $00004000;
  72003. end;
  72004. procedure TPORTG_CNEN.setCNEN14(thebits : TBits_1); inline;
  72005. begin
  72006. if thebits = 0 then
  72007. pTDefRegMap(@Self)^.clr := $00004000
  72008. else
  72009. pTDefRegMap(@Self)^.&set := $00004000;
  72010. end;
  72011. function TPORTG_CNEN.getCNEN14 : TBits_1; inline;
  72012. begin
  72013. getCNEN14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72014. end;
  72015. procedure TPORTG_CNEN.setCNEN15; inline;
  72016. begin
  72017. pTDefRegMap(@Self)^.&set := $00008000;
  72018. end;
  72019. procedure TPORTG_CNEN.clearCNEN15; inline;
  72020. begin
  72021. pTDefRegMap(@Self)^.clr := $00008000;
  72022. end;
  72023. procedure TPORTG_CNEN.setCNEN15(thebits : TBits_1); inline;
  72024. begin
  72025. if thebits = 0 then
  72026. pTDefRegMap(@Self)^.clr := $00008000
  72027. else
  72028. pTDefRegMap(@Self)^.&set := $00008000;
  72029. end;
  72030. function TPORTG_CNEN.getCNEN15 : TBits_1; inline;
  72031. begin
  72032. getCNEN15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72033. end;
  72034. procedure TPORTG_CNEN.setCNEN16; inline;
  72035. begin
  72036. pTDefRegMap(@Self)^.&set := $00010000;
  72037. end;
  72038. procedure TPORTG_CNEN.clearCNEN16; inline;
  72039. begin
  72040. pTDefRegMap(@Self)^.clr := $00010000;
  72041. end;
  72042. procedure TPORTG_CNEN.setCNEN16(thebits : TBits_1); inline;
  72043. begin
  72044. if thebits = 0 then
  72045. pTDefRegMap(@Self)^.clr := $00010000
  72046. else
  72047. pTDefRegMap(@Self)^.&set := $00010000;
  72048. end;
  72049. function TPORTG_CNEN.getCNEN16 : TBits_1; inline;
  72050. begin
  72051. getCNEN16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72052. end;
  72053. procedure TPORTG_CNEN.setCNEN17; inline;
  72054. begin
  72055. pTDefRegMap(@Self)^.&set := $00020000;
  72056. end;
  72057. procedure TPORTG_CNEN.clearCNEN17; inline;
  72058. begin
  72059. pTDefRegMap(@Self)^.clr := $00020000;
  72060. end;
  72061. procedure TPORTG_CNEN.setCNEN17(thebits : TBits_1); inline;
  72062. begin
  72063. if thebits = 0 then
  72064. pTDefRegMap(@Self)^.clr := $00020000
  72065. else
  72066. pTDefRegMap(@Self)^.&set := $00020000;
  72067. end;
  72068. function TPORTG_CNEN.getCNEN17 : TBits_1; inline;
  72069. begin
  72070. getCNEN17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72071. end;
  72072. procedure TPORTG_CNEN.setCNEN18; inline;
  72073. begin
  72074. pTDefRegMap(@Self)^.&set := $00040000;
  72075. end;
  72076. procedure TPORTG_CNEN.clearCNEN18; inline;
  72077. begin
  72078. pTDefRegMap(@Self)^.clr := $00040000;
  72079. end;
  72080. procedure TPORTG_CNEN.setCNEN18(thebits : TBits_1); inline;
  72081. begin
  72082. if thebits = 0 then
  72083. pTDefRegMap(@Self)^.clr := $00040000
  72084. else
  72085. pTDefRegMap(@Self)^.&set := $00040000;
  72086. end;
  72087. function TPORTG_CNEN.getCNEN18 : TBits_1; inline;
  72088. begin
  72089. getCNEN18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72090. end;
  72091. procedure TPORTG_CNEN.setw(thebits : TBits_32); inline;
  72092. begin
  72093. pTDefRegMap(@Self)^.val := thebits;
  72094. end;
  72095. function TPORTG_CNEN.getw : TBits_32; inline;
  72096. begin
  72097. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72098. end;
  72099. procedure TPORTG_CNPUE.setCNPUE0; inline;
  72100. begin
  72101. pTDefRegMap(@Self)^.&set := $00000001;
  72102. end;
  72103. procedure TPORTG_CNPUE.clearCNPUE0; inline;
  72104. begin
  72105. pTDefRegMap(@Self)^.clr := $00000001;
  72106. end;
  72107. procedure TPORTG_CNPUE.setCNPUE0(thebits : TBits_1); inline;
  72108. begin
  72109. if thebits = 0 then
  72110. pTDefRegMap(@Self)^.clr := $00000001
  72111. else
  72112. pTDefRegMap(@Self)^.&set := $00000001;
  72113. end;
  72114. function TPORTG_CNPUE.getCNPUE0 : TBits_1; inline;
  72115. begin
  72116. getCNPUE0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72117. end;
  72118. procedure TPORTG_CNPUE.setCNPUE1; inline;
  72119. begin
  72120. pTDefRegMap(@Self)^.&set := $00000002;
  72121. end;
  72122. procedure TPORTG_CNPUE.clearCNPUE1; inline;
  72123. begin
  72124. pTDefRegMap(@Self)^.clr := $00000002;
  72125. end;
  72126. procedure TPORTG_CNPUE.setCNPUE1(thebits : TBits_1); inline;
  72127. begin
  72128. if thebits = 0 then
  72129. pTDefRegMap(@Self)^.clr := $00000002
  72130. else
  72131. pTDefRegMap(@Self)^.&set := $00000002;
  72132. end;
  72133. function TPORTG_CNPUE.getCNPUE1 : TBits_1; inline;
  72134. begin
  72135. getCNPUE1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72136. end;
  72137. procedure TPORTG_CNPUE.setCNPUE2; inline;
  72138. begin
  72139. pTDefRegMap(@Self)^.&set := $00000004;
  72140. end;
  72141. procedure TPORTG_CNPUE.clearCNPUE2; inline;
  72142. begin
  72143. pTDefRegMap(@Self)^.clr := $00000004;
  72144. end;
  72145. procedure TPORTG_CNPUE.setCNPUE2(thebits : TBits_1); inline;
  72146. begin
  72147. if thebits = 0 then
  72148. pTDefRegMap(@Self)^.clr := $00000004
  72149. else
  72150. pTDefRegMap(@Self)^.&set := $00000004;
  72151. end;
  72152. function TPORTG_CNPUE.getCNPUE2 : TBits_1; inline;
  72153. begin
  72154. getCNPUE2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72155. end;
  72156. procedure TPORTG_CNPUE.setCNPUE3; inline;
  72157. begin
  72158. pTDefRegMap(@Self)^.&set := $00000008;
  72159. end;
  72160. procedure TPORTG_CNPUE.clearCNPUE3; inline;
  72161. begin
  72162. pTDefRegMap(@Self)^.clr := $00000008;
  72163. end;
  72164. procedure TPORTG_CNPUE.setCNPUE3(thebits : TBits_1); inline;
  72165. begin
  72166. if thebits = 0 then
  72167. pTDefRegMap(@Self)^.clr := $00000008
  72168. else
  72169. pTDefRegMap(@Self)^.&set := $00000008;
  72170. end;
  72171. function TPORTG_CNPUE.getCNPUE3 : TBits_1; inline;
  72172. begin
  72173. getCNPUE3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72174. end;
  72175. procedure TPORTG_CNPUE.setCNPUE4; inline;
  72176. begin
  72177. pTDefRegMap(@Self)^.&set := $00000010;
  72178. end;
  72179. procedure TPORTG_CNPUE.clearCNPUE4; inline;
  72180. begin
  72181. pTDefRegMap(@Self)^.clr := $00000010;
  72182. end;
  72183. procedure TPORTG_CNPUE.setCNPUE4(thebits : TBits_1); inline;
  72184. begin
  72185. if thebits = 0 then
  72186. pTDefRegMap(@Self)^.clr := $00000010
  72187. else
  72188. pTDefRegMap(@Self)^.&set := $00000010;
  72189. end;
  72190. function TPORTG_CNPUE.getCNPUE4 : TBits_1; inline;
  72191. begin
  72192. getCNPUE4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72193. end;
  72194. procedure TPORTG_CNPUE.setCNPUE5; inline;
  72195. begin
  72196. pTDefRegMap(@Self)^.&set := $00000020;
  72197. end;
  72198. procedure TPORTG_CNPUE.clearCNPUE5; inline;
  72199. begin
  72200. pTDefRegMap(@Self)^.clr := $00000020;
  72201. end;
  72202. procedure TPORTG_CNPUE.setCNPUE5(thebits : TBits_1); inline;
  72203. begin
  72204. if thebits = 0 then
  72205. pTDefRegMap(@Self)^.clr := $00000020
  72206. else
  72207. pTDefRegMap(@Self)^.&set := $00000020;
  72208. end;
  72209. function TPORTG_CNPUE.getCNPUE5 : TBits_1; inline;
  72210. begin
  72211. getCNPUE5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72212. end;
  72213. procedure TPORTG_CNPUE.setCNPUE6; inline;
  72214. begin
  72215. pTDefRegMap(@Self)^.&set := $00000040;
  72216. end;
  72217. procedure TPORTG_CNPUE.clearCNPUE6; inline;
  72218. begin
  72219. pTDefRegMap(@Self)^.clr := $00000040;
  72220. end;
  72221. procedure TPORTG_CNPUE.setCNPUE6(thebits : TBits_1); inline;
  72222. begin
  72223. if thebits = 0 then
  72224. pTDefRegMap(@Self)^.clr := $00000040
  72225. else
  72226. pTDefRegMap(@Self)^.&set := $00000040;
  72227. end;
  72228. function TPORTG_CNPUE.getCNPUE6 : TBits_1; inline;
  72229. begin
  72230. getCNPUE6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72231. end;
  72232. procedure TPORTG_CNPUE.setCNPUE7; inline;
  72233. begin
  72234. pTDefRegMap(@Self)^.&set := $00000080;
  72235. end;
  72236. procedure TPORTG_CNPUE.clearCNPUE7; inline;
  72237. begin
  72238. pTDefRegMap(@Self)^.clr := $00000080;
  72239. end;
  72240. procedure TPORTG_CNPUE.setCNPUE7(thebits : TBits_1); inline;
  72241. begin
  72242. if thebits = 0 then
  72243. pTDefRegMap(@Self)^.clr := $00000080
  72244. else
  72245. pTDefRegMap(@Self)^.&set := $00000080;
  72246. end;
  72247. function TPORTG_CNPUE.getCNPUE7 : TBits_1; inline;
  72248. begin
  72249. getCNPUE7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72250. end;
  72251. procedure TPORTG_CNPUE.setCNPUE8; inline;
  72252. begin
  72253. pTDefRegMap(@Self)^.&set := $00000100;
  72254. end;
  72255. procedure TPORTG_CNPUE.clearCNPUE8; inline;
  72256. begin
  72257. pTDefRegMap(@Self)^.clr := $00000100;
  72258. end;
  72259. procedure TPORTG_CNPUE.setCNPUE8(thebits : TBits_1); inline;
  72260. begin
  72261. if thebits = 0 then
  72262. pTDefRegMap(@Self)^.clr := $00000100
  72263. else
  72264. pTDefRegMap(@Self)^.&set := $00000100;
  72265. end;
  72266. function TPORTG_CNPUE.getCNPUE8 : TBits_1; inline;
  72267. begin
  72268. getCNPUE8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72269. end;
  72270. procedure TPORTG_CNPUE.setCNPUE9; inline;
  72271. begin
  72272. pTDefRegMap(@Self)^.&set := $00000200;
  72273. end;
  72274. procedure TPORTG_CNPUE.clearCNPUE9; inline;
  72275. begin
  72276. pTDefRegMap(@Self)^.clr := $00000200;
  72277. end;
  72278. procedure TPORTG_CNPUE.setCNPUE9(thebits : TBits_1); inline;
  72279. begin
  72280. if thebits = 0 then
  72281. pTDefRegMap(@Self)^.clr := $00000200
  72282. else
  72283. pTDefRegMap(@Self)^.&set := $00000200;
  72284. end;
  72285. function TPORTG_CNPUE.getCNPUE9 : TBits_1; inline;
  72286. begin
  72287. getCNPUE9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72288. end;
  72289. procedure TPORTG_CNPUE.setCNPUE10; inline;
  72290. begin
  72291. pTDefRegMap(@Self)^.&set := $00000400;
  72292. end;
  72293. procedure TPORTG_CNPUE.clearCNPUE10; inline;
  72294. begin
  72295. pTDefRegMap(@Self)^.clr := $00000400;
  72296. end;
  72297. procedure TPORTG_CNPUE.setCNPUE10(thebits : TBits_1); inline;
  72298. begin
  72299. if thebits = 0 then
  72300. pTDefRegMap(@Self)^.clr := $00000400
  72301. else
  72302. pTDefRegMap(@Self)^.&set := $00000400;
  72303. end;
  72304. function TPORTG_CNPUE.getCNPUE10 : TBits_1; inline;
  72305. begin
  72306. getCNPUE10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  72307. end;
  72308. procedure TPORTG_CNPUE.setCNPUE11; inline;
  72309. begin
  72310. pTDefRegMap(@Self)^.&set := $00000800;
  72311. end;
  72312. procedure TPORTG_CNPUE.clearCNPUE11; inline;
  72313. begin
  72314. pTDefRegMap(@Self)^.clr := $00000800;
  72315. end;
  72316. procedure TPORTG_CNPUE.setCNPUE11(thebits : TBits_1); inline;
  72317. begin
  72318. if thebits = 0 then
  72319. pTDefRegMap(@Self)^.clr := $00000800
  72320. else
  72321. pTDefRegMap(@Self)^.&set := $00000800;
  72322. end;
  72323. function TPORTG_CNPUE.getCNPUE11 : TBits_1; inline;
  72324. begin
  72325. getCNPUE11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  72326. end;
  72327. procedure TPORTG_CNPUE.setCNPUE12; inline;
  72328. begin
  72329. pTDefRegMap(@Self)^.&set := $00001000;
  72330. end;
  72331. procedure TPORTG_CNPUE.clearCNPUE12; inline;
  72332. begin
  72333. pTDefRegMap(@Self)^.clr := $00001000;
  72334. end;
  72335. procedure TPORTG_CNPUE.setCNPUE12(thebits : TBits_1); inline;
  72336. begin
  72337. if thebits = 0 then
  72338. pTDefRegMap(@Self)^.clr := $00001000
  72339. else
  72340. pTDefRegMap(@Self)^.&set := $00001000;
  72341. end;
  72342. function TPORTG_CNPUE.getCNPUE12 : TBits_1; inline;
  72343. begin
  72344. getCNPUE12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72345. end;
  72346. procedure TPORTG_CNPUE.setCNPUE13; inline;
  72347. begin
  72348. pTDefRegMap(@Self)^.&set := $00002000;
  72349. end;
  72350. procedure TPORTG_CNPUE.clearCNPUE13; inline;
  72351. begin
  72352. pTDefRegMap(@Self)^.clr := $00002000;
  72353. end;
  72354. procedure TPORTG_CNPUE.setCNPUE13(thebits : TBits_1); inline;
  72355. begin
  72356. if thebits = 0 then
  72357. pTDefRegMap(@Self)^.clr := $00002000
  72358. else
  72359. pTDefRegMap(@Self)^.&set := $00002000;
  72360. end;
  72361. function TPORTG_CNPUE.getCNPUE13 : TBits_1; inline;
  72362. begin
  72363. getCNPUE13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72364. end;
  72365. procedure TPORTG_CNPUE.setCNPUE14; inline;
  72366. begin
  72367. pTDefRegMap(@Self)^.&set := $00004000;
  72368. end;
  72369. procedure TPORTG_CNPUE.clearCNPUE14; inline;
  72370. begin
  72371. pTDefRegMap(@Self)^.clr := $00004000;
  72372. end;
  72373. procedure TPORTG_CNPUE.setCNPUE14(thebits : TBits_1); inline;
  72374. begin
  72375. if thebits = 0 then
  72376. pTDefRegMap(@Self)^.clr := $00004000
  72377. else
  72378. pTDefRegMap(@Self)^.&set := $00004000;
  72379. end;
  72380. function TPORTG_CNPUE.getCNPUE14 : TBits_1; inline;
  72381. begin
  72382. getCNPUE14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72383. end;
  72384. procedure TPORTG_CNPUE.setCNPUE15; inline;
  72385. begin
  72386. pTDefRegMap(@Self)^.&set := $00008000;
  72387. end;
  72388. procedure TPORTG_CNPUE.clearCNPUE15; inline;
  72389. begin
  72390. pTDefRegMap(@Self)^.clr := $00008000;
  72391. end;
  72392. procedure TPORTG_CNPUE.setCNPUE15(thebits : TBits_1); inline;
  72393. begin
  72394. if thebits = 0 then
  72395. pTDefRegMap(@Self)^.clr := $00008000
  72396. else
  72397. pTDefRegMap(@Self)^.&set := $00008000;
  72398. end;
  72399. function TPORTG_CNPUE.getCNPUE15 : TBits_1; inline;
  72400. begin
  72401. getCNPUE15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72402. end;
  72403. procedure TPORTG_CNPUE.setCNPUE16; inline;
  72404. begin
  72405. pTDefRegMap(@Self)^.&set := $00010000;
  72406. end;
  72407. procedure TPORTG_CNPUE.clearCNPUE16; inline;
  72408. begin
  72409. pTDefRegMap(@Self)^.clr := $00010000;
  72410. end;
  72411. procedure TPORTG_CNPUE.setCNPUE16(thebits : TBits_1); inline;
  72412. begin
  72413. if thebits = 0 then
  72414. pTDefRegMap(@Self)^.clr := $00010000
  72415. else
  72416. pTDefRegMap(@Self)^.&set := $00010000;
  72417. end;
  72418. function TPORTG_CNPUE.getCNPUE16 : TBits_1; inline;
  72419. begin
  72420. getCNPUE16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  72421. end;
  72422. procedure TPORTG_CNPUE.setCNPUE17; inline;
  72423. begin
  72424. pTDefRegMap(@Self)^.&set := $00020000;
  72425. end;
  72426. procedure TPORTG_CNPUE.clearCNPUE17; inline;
  72427. begin
  72428. pTDefRegMap(@Self)^.clr := $00020000;
  72429. end;
  72430. procedure TPORTG_CNPUE.setCNPUE17(thebits : TBits_1); inline;
  72431. begin
  72432. if thebits = 0 then
  72433. pTDefRegMap(@Self)^.clr := $00020000
  72434. else
  72435. pTDefRegMap(@Self)^.&set := $00020000;
  72436. end;
  72437. function TPORTG_CNPUE.getCNPUE17 : TBits_1; inline;
  72438. begin
  72439. getCNPUE17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  72440. end;
  72441. procedure TPORTG_CNPUE.setCNPUE18; inline;
  72442. begin
  72443. pTDefRegMap(@Self)^.&set := $00040000;
  72444. end;
  72445. procedure TPORTG_CNPUE.clearCNPUE18; inline;
  72446. begin
  72447. pTDefRegMap(@Self)^.clr := $00040000;
  72448. end;
  72449. procedure TPORTG_CNPUE.setCNPUE18(thebits : TBits_1); inline;
  72450. begin
  72451. if thebits = 0 then
  72452. pTDefRegMap(@Self)^.clr := $00040000
  72453. else
  72454. pTDefRegMap(@Self)^.&set := $00040000;
  72455. end;
  72456. function TPORTG_CNPUE.getCNPUE18 : TBits_1; inline;
  72457. begin
  72458. getCNPUE18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  72459. end;
  72460. procedure TPORTG_CNPUE.setw(thebits : TBits_32); inline;
  72461. begin
  72462. pTDefRegMap(@Self)^.val := thebits;
  72463. end;
  72464. function TPORTG_CNPUE.getw : TBits_32; inline;
  72465. begin
  72466. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72467. end;
  72468. procedure TETH_ETHCON1.setBUFCDEC; inline;
  72469. begin
  72470. pTDefRegMap(@Self)^.&set := $00000001;
  72471. end;
  72472. procedure TETH_ETHCON1.clearBUFCDEC; inline;
  72473. begin
  72474. pTDefRegMap(@Self)^.clr := $00000001;
  72475. end;
  72476. procedure TETH_ETHCON1.setBUFCDEC(thebits : TBits_1); inline;
  72477. begin
  72478. if thebits = 0 then
  72479. pTDefRegMap(@Self)^.clr := $00000001
  72480. else
  72481. pTDefRegMap(@Self)^.&set := $00000001;
  72482. end;
  72483. function TETH_ETHCON1.getBUFCDEC : TBits_1; inline;
  72484. begin
  72485. getBUFCDEC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72486. end;
  72487. procedure TETH_ETHCON1.setMANFC; inline;
  72488. begin
  72489. pTDefRegMap(@Self)^.&set := $00000010;
  72490. end;
  72491. procedure TETH_ETHCON1.clearMANFC; inline;
  72492. begin
  72493. pTDefRegMap(@Self)^.clr := $00000010;
  72494. end;
  72495. procedure TETH_ETHCON1.setMANFC(thebits : TBits_1); inline;
  72496. begin
  72497. if thebits = 0 then
  72498. pTDefRegMap(@Self)^.clr := $00000010
  72499. else
  72500. pTDefRegMap(@Self)^.&set := $00000010;
  72501. end;
  72502. function TETH_ETHCON1.getMANFC : TBits_1; inline;
  72503. begin
  72504. getMANFC := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72505. end;
  72506. procedure TETH_ETHCON1.setAUTOFC; inline;
  72507. begin
  72508. pTDefRegMap(@Self)^.&set := $00000080;
  72509. end;
  72510. procedure TETH_ETHCON1.clearAUTOFC; inline;
  72511. begin
  72512. pTDefRegMap(@Self)^.clr := $00000080;
  72513. end;
  72514. procedure TETH_ETHCON1.setAUTOFC(thebits : TBits_1); inline;
  72515. begin
  72516. if thebits = 0 then
  72517. pTDefRegMap(@Self)^.clr := $00000080
  72518. else
  72519. pTDefRegMap(@Self)^.&set := $00000080;
  72520. end;
  72521. function TETH_ETHCON1.getAUTOFC : TBits_1; inline;
  72522. begin
  72523. getAUTOFC := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72524. end;
  72525. procedure TETH_ETHCON1.setRXEN; inline;
  72526. begin
  72527. pTDefRegMap(@Self)^.&set := $00000100;
  72528. end;
  72529. procedure TETH_ETHCON1.clearRXEN; inline;
  72530. begin
  72531. pTDefRegMap(@Self)^.clr := $00000100;
  72532. end;
  72533. procedure TETH_ETHCON1.setRXEN(thebits : TBits_1); inline;
  72534. begin
  72535. if thebits = 0 then
  72536. pTDefRegMap(@Self)^.clr := $00000100
  72537. else
  72538. pTDefRegMap(@Self)^.&set := $00000100;
  72539. end;
  72540. function TETH_ETHCON1.getRXEN : TBits_1; inline;
  72541. begin
  72542. getRXEN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  72543. end;
  72544. procedure TETH_ETHCON1.setTXRTS; inline;
  72545. begin
  72546. pTDefRegMap(@Self)^.&set := $00000200;
  72547. end;
  72548. procedure TETH_ETHCON1.clearTXRTS; inline;
  72549. begin
  72550. pTDefRegMap(@Self)^.clr := $00000200;
  72551. end;
  72552. procedure TETH_ETHCON1.setTXRTS(thebits : TBits_1); inline;
  72553. begin
  72554. if thebits = 0 then
  72555. pTDefRegMap(@Self)^.clr := $00000200
  72556. else
  72557. pTDefRegMap(@Self)^.&set := $00000200;
  72558. end;
  72559. function TETH_ETHCON1.getTXRTS : TBits_1; inline;
  72560. begin
  72561. getTXRTS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  72562. end;
  72563. procedure TETH_ETHCON1.setSIDL; inline;
  72564. begin
  72565. pTDefRegMap(@Self)^.&set := $00002000;
  72566. end;
  72567. procedure TETH_ETHCON1.clearSIDL; inline;
  72568. begin
  72569. pTDefRegMap(@Self)^.clr := $00002000;
  72570. end;
  72571. procedure TETH_ETHCON1.setSIDL(thebits : TBits_1); inline;
  72572. begin
  72573. if thebits = 0 then
  72574. pTDefRegMap(@Self)^.clr := $00002000
  72575. else
  72576. pTDefRegMap(@Self)^.&set := $00002000;
  72577. end;
  72578. function TETH_ETHCON1.getSIDL : TBits_1; inline;
  72579. begin
  72580. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  72581. end;
  72582. procedure TETH_ETHCON1.setON; inline;
  72583. begin
  72584. pTDefRegMap(@Self)^.&set := $00008000;
  72585. end;
  72586. procedure TETH_ETHCON1.clearON; inline;
  72587. begin
  72588. pTDefRegMap(@Self)^.clr := $00008000;
  72589. end;
  72590. procedure TETH_ETHCON1.setON(thebits : TBits_1); inline;
  72591. begin
  72592. if thebits = 0 then
  72593. pTDefRegMap(@Self)^.clr := $00008000
  72594. else
  72595. pTDefRegMap(@Self)^.&set := $00008000;
  72596. end;
  72597. function TETH_ETHCON1.getON : TBits_1; inline;
  72598. begin
  72599. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72600. end;
  72601. procedure TETH_ETHCON1.setPTV(thebits : TBits_16); inline;
  72602. begin
  72603. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  72604. end;
  72605. function TETH_ETHCON1.getPTV : TBits_16; inline;
  72606. begin
  72607. getPTV := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  72608. end;
  72609. procedure TETH_ETHCON1.setw(thebits : TBits_32); inline;
  72610. begin
  72611. pTDefRegMap(@Self)^.val := thebits;
  72612. end;
  72613. function TETH_ETHCON1.getw : TBits_32; inline;
  72614. begin
  72615. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72616. end;
  72617. procedure TETH_ETHCON2.setRXBUF_SZ(thebits : TBits_7); inline;
  72618. begin
  72619. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF80F or ( thebits shl 4 );
  72620. end;
  72621. function TETH_ETHCON2.getRXBUF_SZ : TBits_7; inline;
  72622. begin
  72623. getRXBUF_SZ := (pTDefRegMap(@Self)^.val and $000007F0) shr 4;
  72624. end;
  72625. procedure TETH_ETHCON2.setw(thebits : TBits_32); inline;
  72626. begin
  72627. pTDefRegMap(@Self)^.val := thebits;
  72628. end;
  72629. function TETH_ETHCON2.getw : TBits_32; inline;
  72630. begin
  72631. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72632. end;
  72633. procedure TETH_ETHTXST.setTXSTADDR(thebits : TBits_30); inline;
  72634. begin
  72635. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
  72636. end;
  72637. function TETH_ETHTXST.getTXSTADDR : TBits_30; inline;
  72638. begin
  72639. getTXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
  72640. end;
  72641. procedure TETH_ETHTXST.setw(thebits : TBits_32); inline;
  72642. begin
  72643. pTDefRegMap(@Self)^.val := thebits;
  72644. end;
  72645. function TETH_ETHTXST.getw : TBits_32; inline;
  72646. begin
  72647. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72648. end;
  72649. procedure TETH_ETHRXST.setRXSTADDR(thebits : TBits_30); inline;
  72650. begin
  72651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $00000003 or ( thebits shl 2 );
  72652. end;
  72653. function TETH_ETHRXST.getRXSTADDR : TBits_30; inline;
  72654. begin
  72655. getRXSTADDR := (pTDefRegMap(@Self)^.val and $FFFFFFFC) shr 2;
  72656. end;
  72657. procedure TETH_ETHRXST.setw(thebits : TBits_32); inline;
  72658. begin
  72659. pTDefRegMap(@Self)^.val := thebits;
  72660. end;
  72661. function TETH_ETHRXST.getw : TBits_32; inline;
  72662. begin
  72663. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72664. end;
  72665. procedure TETH_ETHHT0.setw(thebits : TBits_32); inline;
  72666. begin
  72667. pTDefRegMap(@Self)^.val := thebits;
  72668. end;
  72669. function TETH_ETHHT0.getw : TBits_32; inline;
  72670. begin
  72671. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72672. end;
  72673. procedure TETH_ETHHT0.setHTLOWER(thebits : TBits_32); inline;
  72674. begin
  72675. pTDefRegMap(@Self)^.val := thebits;
  72676. end;
  72677. function TETH_ETHHT0.getHTLOWER : TBits_32; inline;
  72678. begin
  72679. getHTLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72680. end;
  72681. procedure TETH_ETHHT1.setw(thebits : TBits_32); inline;
  72682. begin
  72683. pTDefRegMap(@Self)^.val := thebits;
  72684. end;
  72685. function TETH_ETHHT1.getw : TBits_32; inline;
  72686. begin
  72687. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72688. end;
  72689. procedure TETH_ETHHT1.setHTUPPER(thebits : TBits_32); inline;
  72690. begin
  72691. pTDefRegMap(@Self)^.val := thebits;
  72692. end;
  72693. function TETH_ETHHT1.getHTUPPER : TBits_32; inline;
  72694. begin
  72695. getHTUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72696. end;
  72697. procedure TETH_ETHPMM0.setw(thebits : TBits_32); inline;
  72698. begin
  72699. pTDefRegMap(@Self)^.val := thebits;
  72700. end;
  72701. function TETH_ETHPMM0.getw : TBits_32; inline;
  72702. begin
  72703. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72704. end;
  72705. procedure TETH_ETHPMM0.setPMMLOWER(thebits : TBits_32); inline;
  72706. begin
  72707. pTDefRegMap(@Self)^.val := thebits;
  72708. end;
  72709. function TETH_ETHPMM0.getPMMLOWER : TBits_32; inline;
  72710. begin
  72711. getPMMLOWER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72712. end;
  72713. procedure TETH_ETHPMM1.setw(thebits : TBits_32); inline;
  72714. begin
  72715. pTDefRegMap(@Self)^.val := thebits;
  72716. end;
  72717. function TETH_ETHPMM1.getw : TBits_32; inline;
  72718. begin
  72719. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72720. end;
  72721. procedure TETH_ETHPMM1.setPMMUPPER(thebits : TBits_32); inline;
  72722. begin
  72723. pTDefRegMap(@Self)^.val := thebits;
  72724. end;
  72725. function TETH_ETHPMM1.getPMMUPPER : TBits_32; inline;
  72726. begin
  72727. getPMMUPPER := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72728. end;
  72729. procedure TETH_ETHPMCS.setPMCS(thebits : TBits_16); inline;
  72730. begin
  72731. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  72732. end;
  72733. function TETH_ETHPMCS.getPMCS : TBits_16; inline;
  72734. begin
  72735. getPMCS := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  72736. end;
  72737. procedure TETH_ETHPMCS.setw(thebits : TBits_32); inline;
  72738. begin
  72739. pTDefRegMap(@Self)^.val := thebits;
  72740. end;
  72741. function TETH_ETHPMCS.getw : TBits_32; inline;
  72742. begin
  72743. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72744. end;
  72745. procedure TETH_ETHPMO.setPMO(thebits : TBits_16); inline;
  72746. begin
  72747. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  72748. end;
  72749. function TETH_ETHPMO.getPMO : TBits_16; inline;
  72750. begin
  72751. getPMO := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  72752. end;
  72753. procedure TETH_ETHPMO.setw(thebits : TBits_32); inline;
  72754. begin
  72755. pTDefRegMap(@Self)^.val := thebits;
  72756. end;
  72757. function TETH_ETHPMO.getw : TBits_32; inline;
  72758. begin
  72759. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72760. end;
  72761. procedure TETH_ETHRXFC.setBCEN; inline;
  72762. begin
  72763. pTDefRegMap(@Self)^.&set := $00000001;
  72764. end;
  72765. procedure TETH_ETHRXFC.clearBCEN; inline;
  72766. begin
  72767. pTDefRegMap(@Self)^.clr := $00000001;
  72768. end;
  72769. procedure TETH_ETHRXFC.setBCEN(thebits : TBits_1); inline;
  72770. begin
  72771. if thebits = 0 then
  72772. pTDefRegMap(@Self)^.clr := $00000001
  72773. else
  72774. pTDefRegMap(@Self)^.&set := $00000001;
  72775. end;
  72776. function TETH_ETHRXFC.getBCEN : TBits_1; inline;
  72777. begin
  72778. getBCEN := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  72779. end;
  72780. procedure TETH_ETHRXFC.setMCEN; inline;
  72781. begin
  72782. pTDefRegMap(@Self)^.&set := $00000002;
  72783. end;
  72784. procedure TETH_ETHRXFC.clearMCEN; inline;
  72785. begin
  72786. pTDefRegMap(@Self)^.clr := $00000002;
  72787. end;
  72788. procedure TETH_ETHRXFC.setMCEN(thebits : TBits_1); inline;
  72789. begin
  72790. if thebits = 0 then
  72791. pTDefRegMap(@Self)^.clr := $00000002
  72792. else
  72793. pTDefRegMap(@Self)^.&set := $00000002;
  72794. end;
  72795. function TETH_ETHRXFC.getMCEN : TBits_1; inline;
  72796. begin
  72797. getMCEN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  72798. end;
  72799. procedure TETH_ETHRXFC.setNOTMEEN; inline;
  72800. begin
  72801. pTDefRegMap(@Self)^.&set := $00000004;
  72802. end;
  72803. procedure TETH_ETHRXFC.clearNOTMEEN; inline;
  72804. begin
  72805. pTDefRegMap(@Self)^.clr := $00000004;
  72806. end;
  72807. procedure TETH_ETHRXFC.setNOTMEEN(thebits : TBits_1); inline;
  72808. begin
  72809. if thebits = 0 then
  72810. pTDefRegMap(@Self)^.clr := $00000004
  72811. else
  72812. pTDefRegMap(@Self)^.&set := $00000004;
  72813. end;
  72814. function TETH_ETHRXFC.getNOTMEEN : TBits_1; inline;
  72815. begin
  72816. getNOTMEEN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  72817. end;
  72818. procedure TETH_ETHRXFC.setUCEN; inline;
  72819. begin
  72820. pTDefRegMap(@Self)^.&set := $00000008;
  72821. end;
  72822. procedure TETH_ETHRXFC.clearUCEN; inline;
  72823. begin
  72824. pTDefRegMap(@Self)^.clr := $00000008;
  72825. end;
  72826. procedure TETH_ETHRXFC.setUCEN(thebits : TBits_1); inline;
  72827. begin
  72828. if thebits = 0 then
  72829. pTDefRegMap(@Self)^.clr := $00000008
  72830. else
  72831. pTDefRegMap(@Self)^.&set := $00000008;
  72832. end;
  72833. function TETH_ETHRXFC.getUCEN : TBits_1; inline;
  72834. begin
  72835. getUCEN := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  72836. end;
  72837. procedure TETH_ETHRXFC.setRUNTEN; inline;
  72838. begin
  72839. pTDefRegMap(@Self)^.&set := $00000010;
  72840. end;
  72841. procedure TETH_ETHRXFC.clearRUNTEN; inline;
  72842. begin
  72843. pTDefRegMap(@Self)^.clr := $00000010;
  72844. end;
  72845. procedure TETH_ETHRXFC.setRUNTEN(thebits : TBits_1); inline;
  72846. begin
  72847. if thebits = 0 then
  72848. pTDefRegMap(@Self)^.clr := $00000010
  72849. else
  72850. pTDefRegMap(@Self)^.&set := $00000010;
  72851. end;
  72852. function TETH_ETHRXFC.getRUNTEN : TBits_1; inline;
  72853. begin
  72854. getRUNTEN := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  72855. end;
  72856. procedure TETH_ETHRXFC.setRUNTERREN; inline;
  72857. begin
  72858. pTDefRegMap(@Self)^.&set := $00000020;
  72859. end;
  72860. procedure TETH_ETHRXFC.clearRUNTERREN; inline;
  72861. begin
  72862. pTDefRegMap(@Self)^.clr := $00000020;
  72863. end;
  72864. procedure TETH_ETHRXFC.setRUNTERREN(thebits : TBits_1); inline;
  72865. begin
  72866. if thebits = 0 then
  72867. pTDefRegMap(@Self)^.clr := $00000020
  72868. else
  72869. pTDefRegMap(@Self)^.&set := $00000020;
  72870. end;
  72871. function TETH_ETHRXFC.getRUNTERREN : TBits_1; inline;
  72872. begin
  72873. getRUNTERREN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  72874. end;
  72875. procedure TETH_ETHRXFC.setCRCOKEN; inline;
  72876. begin
  72877. pTDefRegMap(@Self)^.&set := $00000040;
  72878. end;
  72879. procedure TETH_ETHRXFC.clearCRCOKEN; inline;
  72880. begin
  72881. pTDefRegMap(@Self)^.clr := $00000040;
  72882. end;
  72883. procedure TETH_ETHRXFC.setCRCOKEN(thebits : TBits_1); inline;
  72884. begin
  72885. if thebits = 0 then
  72886. pTDefRegMap(@Self)^.clr := $00000040
  72887. else
  72888. pTDefRegMap(@Self)^.&set := $00000040;
  72889. end;
  72890. function TETH_ETHRXFC.getCRCOKEN : TBits_1; inline;
  72891. begin
  72892. getCRCOKEN := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  72893. end;
  72894. procedure TETH_ETHRXFC.setCRCERREN; inline;
  72895. begin
  72896. pTDefRegMap(@Self)^.&set := $00000080;
  72897. end;
  72898. procedure TETH_ETHRXFC.clearCRCERREN; inline;
  72899. begin
  72900. pTDefRegMap(@Self)^.clr := $00000080;
  72901. end;
  72902. procedure TETH_ETHRXFC.setCRCERREN(thebits : TBits_1); inline;
  72903. begin
  72904. if thebits = 0 then
  72905. pTDefRegMap(@Self)^.clr := $00000080
  72906. else
  72907. pTDefRegMap(@Self)^.&set := $00000080;
  72908. end;
  72909. function TETH_ETHRXFC.getCRCERREN : TBits_1; inline;
  72910. begin
  72911. getCRCERREN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  72912. end;
  72913. procedure TETH_ETHRXFC.setPMMODE(thebits : TBits_4); inline;
  72914. begin
  72915. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF0FF or ( thebits shl 8 );
  72916. end;
  72917. function TETH_ETHRXFC.getPMMODE : TBits_4; inline;
  72918. begin
  72919. getPMMODE := (pTDefRegMap(@Self)^.val and $00000F00) shr 8;
  72920. end;
  72921. procedure TETH_ETHRXFC.setNOTPM; inline;
  72922. begin
  72923. pTDefRegMap(@Self)^.&set := $00001000;
  72924. end;
  72925. procedure TETH_ETHRXFC.clearNOTPM; inline;
  72926. begin
  72927. pTDefRegMap(@Self)^.clr := $00001000;
  72928. end;
  72929. procedure TETH_ETHRXFC.setNOTPM(thebits : TBits_1); inline;
  72930. begin
  72931. if thebits = 0 then
  72932. pTDefRegMap(@Self)^.clr := $00001000
  72933. else
  72934. pTDefRegMap(@Self)^.&set := $00001000;
  72935. end;
  72936. function TETH_ETHRXFC.getNOTPM : TBits_1; inline;
  72937. begin
  72938. getNOTPM := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  72939. end;
  72940. procedure TETH_ETHRXFC.setMPEN; inline;
  72941. begin
  72942. pTDefRegMap(@Self)^.&set := $00004000;
  72943. end;
  72944. procedure TETH_ETHRXFC.clearMPEN; inline;
  72945. begin
  72946. pTDefRegMap(@Self)^.clr := $00004000;
  72947. end;
  72948. procedure TETH_ETHRXFC.setMPEN(thebits : TBits_1); inline;
  72949. begin
  72950. if thebits = 0 then
  72951. pTDefRegMap(@Self)^.clr := $00004000
  72952. else
  72953. pTDefRegMap(@Self)^.&set := $00004000;
  72954. end;
  72955. function TETH_ETHRXFC.getMPEN : TBits_1; inline;
  72956. begin
  72957. getMPEN := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  72958. end;
  72959. procedure TETH_ETHRXFC.setHTEN; inline;
  72960. begin
  72961. pTDefRegMap(@Self)^.&set := $00008000;
  72962. end;
  72963. procedure TETH_ETHRXFC.clearHTEN; inline;
  72964. begin
  72965. pTDefRegMap(@Self)^.clr := $00008000;
  72966. end;
  72967. procedure TETH_ETHRXFC.setHTEN(thebits : TBits_1); inline;
  72968. begin
  72969. if thebits = 0 then
  72970. pTDefRegMap(@Self)^.clr := $00008000
  72971. else
  72972. pTDefRegMap(@Self)^.&set := $00008000;
  72973. end;
  72974. function TETH_ETHRXFC.getHTEN : TBits_1; inline;
  72975. begin
  72976. getHTEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  72977. end;
  72978. procedure TETH_ETHRXFC.setw(thebits : TBits_32); inline;
  72979. begin
  72980. pTDefRegMap(@Self)^.val := thebits;
  72981. end;
  72982. function TETH_ETHRXFC.getw : TBits_32; inline;
  72983. begin
  72984. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  72985. end;
  72986. procedure TETH_ETHRXWM.setRXEWM(thebits : TBits_8); inline;
  72987. begin
  72988. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  72989. end;
  72990. function TETH_ETHRXWM.getRXEWM : TBits_8; inline;
  72991. begin
  72992. getRXEWM := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  72993. end;
  72994. procedure TETH_ETHRXWM.setRXFWM(thebits : TBits_8); inline;
  72995. begin
  72996. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  72997. end;
  72998. function TETH_ETHRXWM.getRXFWM : TBits_8; inline;
  72999. begin
  73000. getRXFWM := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  73001. end;
  73002. procedure TETH_ETHRXWM.setw(thebits : TBits_32); inline;
  73003. begin
  73004. pTDefRegMap(@Self)^.val := thebits;
  73005. end;
  73006. function TETH_ETHRXWM.getw : TBits_32; inline;
  73007. begin
  73008. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73009. end;
  73010. procedure TETH_ETHIEN.setRXOVFLWIE; inline;
  73011. begin
  73012. pTDefRegMap(@Self)^.&set := $00000001;
  73013. end;
  73014. procedure TETH_ETHIEN.clearRXOVFLWIE; inline;
  73015. begin
  73016. pTDefRegMap(@Self)^.clr := $00000001;
  73017. end;
  73018. procedure TETH_ETHIEN.setRXOVFLWIE(thebits : TBits_1); inline;
  73019. begin
  73020. if thebits = 0 then
  73021. pTDefRegMap(@Self)^.clr := $00000001
  73022. else
  73023. pTDefRegMap(@Self)^.&set := $00000001;
  73024. end;
  73025. function TETH_ETHIEN.getRXOVFLWIE : TBits_1; inline;
  73026. begin
  73027. getRXOVFLWIE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73028. end;
  73029. procedure TETH_ETHIEN.setRXBUFNAIE; inline;
  73030. begin
  73031. pTDefRegMap(@Self)^.&set := $00000002;
  73032. end;
  73033. procedure TETH_ETHIEN.clearRXBUFNAIE; inline;
  73034. begin
  73035. pTDefRegMap(@Self)^.clr := $00000002;
  73036. end;
  73037. procedure TETH_ETHIEN.setRXBUFNAIE(thebits : TBits_1); inline;
  73038. begin
  73039. if thebits = 0 then
  73040. pTDefRegMap(@Self)^.clr := $00000002
  73041. else
  73042. pTDefRegMap(@Self)^.&set := $00000002;
  73043. end;
  73044. function TETH_ETHIEN.getRXBUFNAIE : TBits_1; inline;
  73045. begin
  73046. getRXBUFNAIE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73047. end;
  73048. procedure TETH_ETHIEN.setTXABORTIE; inline;
  73049. begin
  73050. pTDefRegMap(@Self)^.&set := $00000004;
  73051. end;
  73052. procedure TETH_ETHIEN.clearTXABORTIE; inline;
  73053. begin
  73054. pTDefRegMap(@Self)^.clr := $00000004;
  73055. end;
  73056. procedure TETH_ETHIEN.setTXABORTIE(thebits : TBits_1); inline;
  73057. begin
  73058. if thebits = 0 then
  73059. pTDefRegMap(@Self)^.clr := $00000004
  73060. else
  73061. pTDefRegMap(@Self)^.&set := $00000004;
  73062. end;
  73063. function TETH_ETHIEN.getTXABORTIE : TBits_1; inline;
  73064. begin
  73065. getTXABORTIE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73066. end;
  73067. procedure TETH_ETHIEN.setTXDONEIE; inline;
  73068. begin
  73069. pTDefRegMap(@Self)^.&set := $00000008;
  73070. end;
  73071. procedure TETH_ETHIEN.clearTXDONEIE; inline;
  73072. begin
  73073. pTDefRegMap(@Self)^.clr := $00000008;
  73074. end;
  73075. procedure TETH_ETHIEN.setTXDONEIE(thebits : TBits_1); inline;
  73076. begin
  73077. if thebits = 0 then
  73078. pTDefRegMap(@Self)^.clr := $00000008
  73079. else
  73080. pTDefRegMap(@Self)^.&set := $00000008;
  73081. end;
  73082. function TETH_ETHIEN.getTXDONEIE : TBits_1; inline;
  73083. begin
  73084. getTXDONEIE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73085. end;
  73086. procedure TETH_ETHIEN.setRXACTIE; inline;
  73087. begin
  73088. pTDefRegMap(@Self)^.&set := $00000020;
  73089. end;
  73090. procedure TETH_ETHIEN.clearRXACTIE; inline;
  73091. begin
  73092. pTDefRegMap(@Self)^.clr := $00000020;
  73093. end;
  73094. procedure TETH_ETHIEN.setRXACTIE(thebits : TBits_1); inline;
  73095. begin
  73096. if thebits = 0 then
  73097. pTDefRegMap(@Self)^.clr := $00000020
  73098. else
  73099. pTDefRegMap(@Self)^.&set := $00000020;
  73100. end;
  73101. function TETH_ETHIEN.getRXACTIE : TBits_1; inline;
  73102. begin
  73103. getRXACTIE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73104. end;
  73105. procedure TETH_ETHIEN.setPKTPENDIE; inline;
  73106. begin
  73107. pTDefRegMap(@Self)^.&set := $00000040;
  73108. end;
  73109. procedure TETH_ETHIEN.clearPKTPENDIE; inline;
  73110. begin
  73111. pTDefRegMap(@Self)^.clr := $00000040;
  73112. end;
  73113. procedure TETH_ETHIEN.setPKTPENDIE(thebits : TBits_1); inline;
  73114. begin
  73115. if thebits = 0 then
  73116. pTDefRegMap(@Self)^.clr := $00000040
  73117. else
  73118. pTDefRegMap(@Self)^.&set := $00000040;
  73119. end;
  73120. function TETH_ETHIEN.getPKTPENDIE : TBits_1; inline;
  73121. begin
  73122. getPKTPENDIE := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73123. end;
  73124. procedure TETH_ETHIEN.setRXDONEIE; inline;
  73125. begin
  73126. pTDefRegMap(@Self)^.&set := $00000080;
  73127. end;
  73128. procedure TETH_ETHIEN.clearRXDONEIE; inline;
  73129. begin
  73130. pTDefRegMap(@Self)^.clr := $00000080;
  73131. end;
  73132. procedure TETH_ETHIEN.setRXDONEIE(thebits : TBits_1); inline;
  73133. begin
  73134. if thebits = 0 then
  73135. pTDefRegMap(@Self)^.clr := $00000080
  73136. else
  73137. pTDefRegMap(@Self)^.&set := $00000080;
  73138. end;
  73139. function TETH_ETHIEN.getRXDONEIE : TBits_1; inline;
  73140. begin
  73141. getRXDONEIE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73142. end;
  73143. procedure TETH_ETHIEN.setFWMARKIE; inline;
  73144. begin
  73145. pTDefRegMap(@Self)^.&set := $00000100;
  73146. end;
  73147. procedure TETH_ETHIEN.clearFWMARKIE; inline;
  73148. begin
  73149. pTDefRegMap(@Self)^.clr := $00000100;
  73150. end;
  73151. procedure TETH_ETHIEN.setFWMARKIE(thebits : TBits_1); inline;
  73152. begin
  73153. if thebits = 0 then
  73154. pTDefRegMap(@Self)^.clr := $00000100
  73155. else
  73156. pTDefRegMap(@Self)^.&set := $00000100;
  73157. end;
  73158. function TETH_ETHIEN.getFWMARKIE : TBits_1; inline;
  73159. begin
  73160. getFWMARKIE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73161. end;
  73162. procedure TETH_ETHIEN.setEWMARKIE; inline;
  73163. begin
  73164. pTDefRegMap(@Self)^.&set := $00000200;
  73165. end;
  73166. procedure TETH_ETHIEN.clearEWMARKIE; inline;
  73167. begin
  73168. pTDefRegMap(@Self)^.clr := $00000200;
  73169. end;
  73170. procedure TETH_ETHIEN.setEWMARKIE(thebits : TBits_1); inline;
  73171. begin
  73172. if thebits = 0 then
  73173. pTDefRegMap(@Self)^.clr := $00000200
  73174. else
  73175. pTDefRegMap(@Self)^.&set := $00000200;
  73176. end;
  73177. function TETH_ETHIEN.getEWMARKIE : TBits_1; inline;
  73178. begin
  73179. getEWMARKIE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73180. end;
  73181. procedure TETH_ETHIEN.setRXBUSEIE; inline;
  73182. begin
  73183. pTDefRegMap(@Self)^.&set := $00002000;
  73184. end;
  73185. procedure TETH_ETHIEN.clearRXBUSEIE; inline;
  73186. begin
  73187. pTDefRegMap(@Self)^.clr := $00002000;
  73188. end;
  73189. procedure TETH_ETHIEN.setRXBUSEIE(thebits : TBits_1); inline;
  73190. begin
  73191. if thebits = 0 then
  73192. pTDefRegMap(@Self)^.clr := $00002000
  73193. else
  73194. pTDefRegMap(@Self)^.&set := $00002000;
  73195. end;
  73196. function TETH_ETHIEN.getRXBUSEIE : TBits_1; inline;
  73197. begin
  73198. getRXBUSEIE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73199. end;
  73200. procedure TETH_ETHIEN.setTXBUSEIE; inline;
  73201. begin
  73202. pTDefRegMap(@Self)^.&set := $00004000;
  73203. end;
  73204. procedure TETH_ETHIEN.clearTXBUSEIE; inline;
  73205. begin
  73206. pTDefRegMap(@Self)^.clr := $00004000;
  73207. end;
  73208. procedure TETH_ETHIEN.setTXBUSEIE(thebits : TBits_1); inline;
  73209. begin
  73210. if thebits = 0 then
  73211. pTDefRegMap(@Self)^.clr := $00004000
  73212. else
  73213. pTDefRegMap(@Self)^.&set := $00004000;
  73214. end;
  73215. function TETH_ETHIEN.getTXBUSEIE : TBits_1; inline;
  73216. begin
  73217. getTXBUSEIE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73218. end;
  73219. procedure TETH_ETHIEN.setw(thebits : TBits_32); inline;
  73220. begin
  73221. pTDefRegMap(@Self)^.val := thebits;
  73222. end;
  73223. function TETH_ETHIEN.getw : TBits_32; inline;
  73224. begin
  73225. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73226. end;
  73227. procedure TETH_ETHIRQ.setRXOVFLW; inline;
  73228. begin
  73229. pTDefRegMap(@Self)^.&set := $00000001;
  73230. end;
  73231. procedure TETH_ETHIRQ.clearRXOVFLW; inline;
  73232. begin
  73233. pTDefRegMap(@Self)^.clr := $00000001;
  73234. end;
  73235. procedure TETH_ETHIRQ.setRXOVFLW(thebits : TBits_1); inline;
  73236. begin
  73237. if thebits = 0 then
  73238. pTDefRegMap(@Self)^.clr := $00000001
  73239. else
  73240. pTDefRegMap(@Self)^.&set := $00000001;
  73241. end;
  73242. function TETH_ETHIRQ.getRXOVFLW : TBits_1; inline;
  73243. begin
  73244. getRXOVFLW := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73245. end;
  73246. procedure TETH_ETHIRQ.setRXBUFNA; inline;
  73247. begin
  73248. pTDefRegMap(@Self)^.&set := $00000002;
  73249. end;
  73250. procedure TETH_ETHIRQ.clearRXBUFNA; inline;
  73251. begin
  73252. pTDefRegMap(@Self)^.clr := $00000002;
  73253. end;
  73254. procedure TETH_ETHIRQ.setRXBUFNA(thebits : TBits_1); inline;
  73255. begin
  73256. if thebits = 0 then
  73257. pTDefRegMap(@Self)^.clr := $00000002
  73258. else
  73259. pTDefRegMap(@Self)^.&set := $00000002;
  73260. end;
  73261. function TETH_ETHIRQ.getRXBUFNA : TBits_1; inline;
  73262. begin
  73263. getRXBUFNA := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73264. end;
  73265. procedure TETH_ETHIRQ.setTXABORT; inline;
  73266. begin
  73267. pTDefRegMap(@Self)^.&set := $00000004;
  73268. end;
  73269. procedure TETH_ETHIRQ.clearTXABORT; inline;
  73270. begin
  73271. pTDefRegMap(@Self)^.clr := $00000004;
  73272. end;
  73273. procedure TETH_ETHIRQ.setTXABORT(thebits : TBits_1); inline;
  73274. begin
  73275. if thebits = 0 then
  73276. pTDefRegMap(@Self)^.clr := $00000004
  73277. else
  73278. pTDefRegMap(@Self)^.&set := $00000004;
  73279. end;
  73280. function TETH_ETHIRQ.getTXABORT : TBits_1; inline;
  73281. begin
  73282. getTXABORT := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73283. end;
  73284. procedure TETH_ETHIRQ.setTXDONE; inline;
  73285. begin
  73286. pTDefRegMap(@Self)^.&set := $00000008;
  73287. end;
  73288. procedure TETH_ETHIRQ.clearTXDONE; inline;
  73289. begin
  73290. pTDefRegMap(@Self)^.clr := $00000008;
  73291. end;
  73292. procedure TETH_ETHIRQ.setTXDONE(thebits : TBits_1); inline;
  73293. begin
  73294. if thebits = 0 then
  73295. pTDefRegMap(@Self)^.clr := $00000008
  73296. else
  73297. pTDefRegMap(@Self)^.&set := $00000008;
  73298. end;
  73299. function TETH_ETHIRQ.getTXDONE : TBits_1; inline;
  73300. begin
  73301. getTXDONE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73302. end;
  73303. procedure TETH_ETHIRQ.setRXACT; inline;
  73304. begin
  73305. pTDefRegMap(@Self)^.&set := $00000020;
  73306. end;
  73307. procedure TETH_ETHIRQ.clearRXACT; inline;
  73308. begin
  73309. pTDefRegMap(@Self)^.clr := $00000020;
  73310. end;
  73311. procedure TETH_ETHIRQ.setRXACT(thebits : TBits_1); inline;
  73312. begin
  73313. if thebits = 0 then
  73314. pTDefRegMap(@Self)^.clr := $00000020
  73315. else
  73316. pTDefRegMap(@Self)^.&set := $00000020;
  73317. end;
  73318. function TETH_ETHIRQ.getRXACT : TBits_1; inline;
  73319. begin
  73320. getRXACT := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73321. end;
  73322. procedure TETH_ETHIRQ.setPKTPEND; inline;
  73323. begin
  73324. pTDefRegMap(@Self)^.&set := $00000040;
  73325. end;
  73326. procedure TETH_ETHIRQ.clearPKTPEND; inline;
  73327. begin
  73328. pTDefRegMap(@Self)^.clr := $00000040;
  73329. end;
  73330. procedure TETH_ETHIRQ.setPKTPEND(thebits : TBits_1); inline;
  73331. begin
  73332. if thebits = 0 then
  73333. pTDefRegMap(@Self)^.clr := $00000040
  73334. else
  73335. pTDefRegMap(@Self)^.&set := $00000040;
  73336. end;
  73337. function TETH_ETHIRQ.getPKTPEND : TBits_1; inline;
  73338. begin
  73339. getPKTPEND := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73340. end;
  73341. procedure TETH_ETHIRQ.setRXDONE; inline;
  73342. begin
  73343. pTDefRegMap(@Self)^.&set := $00000080;
  73344. end;
  73345. procedure TETH_ETHIRQ.clearRXDONE; inline;
  73346. begin
  73347. pTDefRegMap(@Self)^.clr := $00000080;
  73348. end;
  73349. procedure TETH_ETHIRQ.setRXDONE(thebits : TBits_1); inline;
  73350. begin
  73351. if thebits = 0 then
  73352. pTDefRegMap(@Self)^.clr := $00000080
  73353. else
  73354. pTDefRegMap(@Self)^.&set := $00000080;
  73355. end;
  73356. function TETH_ETHIRQ.getRXDONE : TBits_1; inline;
  73357. begin
  73358. getRXDONE := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73359. end;
  73360. procedure TETH_ETHIRQ.setFWMARK; inline;
  73361. begin
  73362. pTDefRegMap(@Self)^.&set := $00000100;
  73363. end;
  73364. procedure TETH_ETHIRQ.clearFWMARK; inline;
  73365. begin
  73366. pTDefRegMap(@Self)^.clr := $00000100;
  73367. end;
  73368. procedure TETH_ETHIRQ.setFWMARK(thebits : TBits_1); inline;
  73369. begin
  73370. if thebits = 0 then
  73371. pTDefRegMap(@Self)^.clr := $00000100
  73372. else
  73373. pTDefRegMap(@Self)^.&set := $00000100;
  73374. end;
  73375. function TETH_ETHIRQ.getFWMARK : TBits_1; inline;
  73376. begin
  73377. getFWMARK := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73378. end;
  73379. procedure TETH_ETHIRQ.setEWMARK; inline;
  73380. begin
  73381. pTDefRegMap(@Self)^.&set := $00000200;
  73382. end;
  73383. procedure TETH_ETHIRQ.clearEWMARK; inline;
  73384. begin
  73385. pTDefRegMap(@Self)^.clr := $00000200;
  73386. end;
  73387. procedure TETH_ETHIRQ.setEWMARK(thebits : TBits_1); inline;
  73388. begin
  73389. if thebits = 0 then
  73390. pTDefRegMap(@Self)^.clr := $00000200
  73391. else
  73392. pTDefRegMap(@Self)^.&set := $00000200;
  73393. end;
  73394. function TETH_ETHIRQ.getEWMARK : TBits_1; inline;
  73395. begin
  73396. getEWMARK := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73397. end;
  73398. procedure TETH_ETHIRQ.setRXBUSE; inline;
  73399. begin
  73400. pTDefRegMap(@Self)^.&set := $00002000;
  73401. end;
  73402. procedure TETH_ETHIRQ.clearRXBUSE; inline;
  73403. begin
  73404. pTDefRegMap(@Self)^.clr := $00002000;
  73405. end;
  73406. procedure TETH_ETHIRQ.setRXBUSE(thebits : TBits_1); inline;
  73407. begin
  73408. if thebits = 0 then
  73409. pTDefRegMap(@Self)^.clr := $00002000
  73410. else
  73411. pTDefRegMap(@Self)^.&set := $00002000;
  73412. end;
  73413. function TETH_ETHIRQ.getRXBUSE : TBits_1; inline;
  73414. begin
  73415. getRXBUSE := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  73416. end;
  73417. procedure TETH_ETHIRQ.setTXBUSE; inline;
  73418. begin
  73419. pTDefRegMap(@Self)^.&set := $00004000;
  73420. end;
  73421. procedure TETH_ETHIRQ.clearTXBUSE; inline;
  73422. begin
  73423. pTDefRegMap(@Self)^.clr := $00004000;
  73424. end;
  73425. procedure TETH_ETHIRQ.setTXBUSE(thebits : TBits_1); inline;
  73426. begin
  73427. if thebits = 0 then
  73428. pTDefRegMap(@Self)^.clr := $00004000
  73429. else
  73430. pTDefRegMap(@Self)^.&set := $00004000;
  73431. end;
  73432. function TETH_ETHIRQ.getTXBUSE : TBits_1; inline;
  73433. begin
  73434. getTXBUSE := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73435. end;
  73436. procedure TETH_ETHIRQ.setw(thebits : TBits_32); inline;
  73437. begin
  73438. pTDefRegMap(@Self)^.val := thebits;
  73439. end;
  73440. function TETH_ETHIRQ.getw : TBits_32; inline;
  73441. begin
  73442. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73443. end;
  73444. procedure TETH_ETHSTAT.setRXBUSY; inline;
  73445. begin
  73446. pTDefRegMap(@Self)^.&set := $00000020;
  73447. end;
  73448. procedure TETH_ETHSTAT.clearRXBUSY; inline;
  73449. begin
  73450. pTDefRegMap(@Self)^.clr := $00000020;
  73451. end;
  73452. procedure TETH_ETHSTAT.setRXBUSY(thebits : TBits_1); inline;
  73453. begin
  73454. if thebits = 0 then
  73455. pTDefRegMap(@Self)^.clr := $00000020
  73456. else
  73457. pTDefRegMap(@Self)^.&set := $00000020;
  73458. end;
  73459. function TETH_ETHSTAT.getRXBUSY : TBits_1; inline;
  73460. begin
  73461. getRXBUSY := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  73462. end;
  73463. procedure TETH_ETHSTAT.setTXBUSY; inline;
  73464. begin
  73465. pTDefRegMap(@Self)^.&set := $00000040;
  73466. end;
  73467. procedure TETH_ETHSTAT.clearTXBUSY; inline;
  73468. begin
  73469. pTDefRegMap(@Self)^.clr := $00000040;
  73470. end;
  73471. procedure TETH_ETHSTAT.setTXBUSY(thebits : TBits_1); inline;
  73472. begin
  73473. if thebits = 0 then
  73474. pTDefRegMap(@Self)^.clr := $00000040
  73475. else
  73476. pTDefRegMap(@Self)^.&set := $00000040;
  73477. end;
  73478. function TETH_ETHSTAT.getTXBUSY : TBits_1; inline;
  73479. begin
  73480. getTXBUSY := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  73481. end;
  73482. procedure TETH_ETHSTAT.setBUSY; inline;
  73483. begin
  73484. pTDefRegMap(@Self)^.&set := $00000080;
  73485. end;
  73486. procedure TETH_ETHSTAT.clearBUSY; inline;
  73487. begin
  73488. pTDefRegMap(@Self)^.clr := $00000080;
  73489. end;
  73490. procedure TETH_ETHSTAT.setBUSY(thebits : TBits_1); inline;
  73491. begin
  73492. if thebits = 0 then
  73493. pTDefRegMap(@Self)^.clr := $00000080
  73494. else
  73495. pTDefRegMap(@Self)^.&set := $00000080;
  73496. end;
  73497. function TETH_ETHSTAT.getBUSY : TBits_1; inline;
  73498. begin
  73499. getBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73500. end;
  73501. procedure TETH_ETHSTAT.setBUFCNT(thebits : TBits_8); inline;
  73502. begin
  73503. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF00FFFF or ( thebits shl 16 );
  73504. end;
  73505. function TETH_ETHSTAT.getBUFCNT : TBits_8; inline;
  73506. begin
  73507. getBUFCNT := (pTDefRegMap(@Self)^.val and $00FF0000) shr 16;
  73508. end;
  73509. procedure TETH_ETHSTAT.setETHBUSY; inline;
  73510. begin
  73511. pTDefRegMap(@Self)^.&set := $00000080;
  73512. end;
  73513. procedure TETH_ETHSTAT.clearETHBUSY; inline;
  73514. begin
  73515. pTDefRegMap(@Self)^.clr := $00000080;
  73516. end;
  73517. procedure TETH_ETHSTAT.setETHBUSY(thebits : TBits_1); inline;
  73518. begin
  73519. if thebits = 0 then
  73520. pTDefRegMap(@Self)^.clr := $00000080
  73521. else
  73522. pTDefRegMap(@Self)^.&set := $00000080;
  73523. end;
  73524. function TETH_ETHSTAT.getETHBUSY : TBits_1; inline;
  73525. begin
  73526. getETHBUSY := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  73527. end;
  73528. procedure TETH_ETHSTAT.setw(thebits : TBits_32); inline;
  73529. begin
  73530. pTDefRegMap(@Self)^.val := thebits;
  73531. end;
  73532. function TETH_ETHSTAT.getw : TBits_32; inline;
  73533. begin
  73534. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73535. end;
  73536. procedure TETH_ETHRXOVFLOW.setRXOVFLWCNT(thebits : TBits_16); inline;
  73537. begin
  73538. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73539. end;
  73540. function TETH_ETHRXOVFLOW.getRXOVFLWCNT : TBits_16; inline;
  73541. begin
  73542. getRXOVFLWCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73543. end;
  73544. procedure TETH_ETHRXOVFLOW.setw(thebits : TBits_32); inline;
  73545. begin
  73546. pTDefRegMap(@Self)^.val := thebits;
  73547. end;
  73548. function TETH_ETHRXOVFLOW.getw : TBits_32; inline;
  73549. begin
  73550. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73551. end;
  73552. procedure TETH_ETHFRMTXOK.setFRMTXOKCNT(thebits : TBits_16); inline;
  73553. begin
  73554. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73555. end;
  73556. function TETH_ETHFRMTXOK.getFRMTXOKCNT : TBits_16; inline;
  73557. begin
  73558. getFRMTXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73559. end;
  73560. procedure TETH_ETHFRMTXOK.setw(thebits : TBits_32); inline;
  73561. begin
  73562. pTDefRegMap(@Self)^.val := thebits;
  73563. end;
  73564. function TETH_ETHFRMTXOK.getw : TBits_32; inline;
  73565. begin
  73566. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73567. end;
  73568. procedure TETH_ETHSCOLFRM.setSCOLFRMCNT(thebits : TBits_16); inline;
  73569. begin
  73570. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73571. end;
  73572. function TETH_ETHSCOLFRM.getSCOLFRMCNT : TBits_16; inline;
  73573. begin
  73574. getSCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73575. end;
  73576. procedure TETH_ETHSCOLFRM.setw(thebits : TBits_32); inline;
  73577. begin
  73578. pTDefRegMap(@Self)^.val := thebits;
  73579. end;
  73580. function TETH_ETHSCOLFRM.getw : TBits_32; inline;
  73581. begin
  73582. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73583. end;
  73584. procedure TETH_ETHMCOLFRM.setMCOLFRMCNT(thebits : TBits_16); inline;
  73585. begin
  73586. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73587. end;
  73588. function TETH_ETHMCOLFRM.getMCOLFRMCNT : TBits_16; inline;
  73589. begin
  73590. getMCOLFRMCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73591. end;
  73592. procedure TETH_ETHMCOLFRM.setMCOLFRM_CNT(thebits : TBits_16); inline;
  73593. begin
  73594. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73595. end;
  73596. function TETH_ETHMCOLFRM.getMCOLFRM_CNT : TBits_16; inline;
  73597. begin
  73598. getMCOLFRM_CNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73599. end;
  73600. procedure TETH_ETHMCOLFRM.setw(thebits : TBits_32); inline;
  73601. begin
  73602. pTDefRegMap(@Self)^.val := thebits;
  73603. end;
  73604. function TETH_ETHMCOLFRM.getw : TBits_32; inline;
  73605. begin
  73606. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73607. end;
  73608. procedure TETH_ETHFRMRXOK.setFRMRXOKCNT(thebits : TBits_16); inline;
  73609. begin
  73610. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73611. end;
  73612. function TETH_ETHFRMRXOK.getFRMRXOKCNT : TBits_16; inline;
  73613. begin
  73614. getFRMRXOKCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73615. end;
  73616. procedure TETH_ETHFRMRXOK.setw(thebits : TBits_32); inline;
  73617. begin
  73618. pTDefRegMap(@Self)^.val := thebits;
  73619. end;
  73620. function TETH_ETHFRMRXOK.getw : TBits_32; inline;
  73621. begin
  73622. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73623. end;
  73624. procedure TETH_ETHFCSERR.setFCSERRCNT(thebits : TBits_16); inline;
  73625. begin
  73626. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73627. end;
  73628. function TETH_ETHFCSERR.getFCSERRCNT : TBits_16; inline;
  73629. begin
  73630. getFCSERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73631. end;
  73632. procedure TETH_ETHFCSERR.setw(thebits : TBits_32); inline;
  73633. begin
  73634. pTDefRegMap(@Self)^.val := thebits;
  73635. end;
  73636. function TETH_ETHFCSERR.getw : TBits_32; inline;
  73637. begin
  73638. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73639. end;
  73640. procedure TETH_ETHALGNERR.setALGNERRCNT(thebits : TBits_16); inline;
  73641. begin
  73642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  73643. end;
  73644. function TETH_ETHALGNERR.getALGNERRCNT : TBits_16; inline;
  73645. begin
  73646. getALGNERRCNT := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  73647. end;
  73648. procedure TETH_ETHALGNERR.setw(thebits : TBits_32); inline;
  73649. begin
  73650. pTDefRegMap(@Self)^.val := thebits;
  73651. end;
  73652. function TETH_ETHALGNERR.getw : TBits_32; inline;
  73653. begin
  73654. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73655. end;
  73656. procedure TETH_EMAC1CFG1.setRXENABLE; inline;
  73657. begin
  73658. pTDefRegMap(@Self)^.&set := $00000001;
  73659. end;
  73660. procedure TETH_EMAC1CFG1.clearRXENABLE; inline;
  73661. begin
  73662. pTDefRegMap(@Self)^.clr := $00000001;
  73663. end;
  73664. procedure TETH_EMAC1CFG1.setRXENABLE(thebits : TBits_1); inline;
  73665. begin
  73666. if thebits = 0 then
  73667. pTDefRegMap(@Self)^.clr := $00000001
  73668. else
  73669. pTDefRegMap(@Self)^.&set := $00000001;
  73670. end;
  73671. function TETH_EMAC1CFG1.getRXENABLE : TBits_1; inline;
  73672. begin
  73673. getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73674. end;
  73675. procedure TETH_EMAC1CFG1.setPASSALL; inline;
  73676. begin
  73677. pTDefRegMap(@Self)^.&set := $00000002;
  73678. end;
  73679. procedure TETH_EMAC1CFG1.clearPASSALL; inline;
  73680. begin
  73681. pTDefRegMap(@Self)^.clr := $00000002;
  73682. end;
  73683. procedure TETH_EMAC1CFG1.setPASSALL(thebits : TBits_1); inline;
  73684. begin
  73685. if thebits = 0 then
  73686. pTDefRegMap(@Self)^.clr := $00000002
  73687. else
  73688. pTDefRegMap(@Self)^.&set := $00000002;
  73689. end;
  73690. function TETH_EMAC1CFG1.getPASSALL : TBits_1; inline;
  73691. begin
  73692. getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73693. end;
  73694. procedure TETH_EMAC1CFG1.setRXPAUSE; inline;
  73695. begin
  73696. pTDefRegMap(@Self)^.&set := $00000004;
  73697. end;
  73698. procedure TETH_EMAC1CFG1.clearRXPAUSE; inline;
  73699. begin
  73700. pTDefRegMap(@Self)^.clr := $00000004;
  73701. end;
  73702. procedure TETH_EMAC1CFG1.setRXPAUSE(thebits : TBits_1); inline;
  73703. begin
  73704. if thebits = 0 then
  73705. pTDefRegMap(@Self)^.clr := $00000004
  73706. else
  73707. pTDefRegMap(@Self)^.&set := $00000004;
  73708. end;
  73709. function TETH_EMAC1CFG1.getRXPAUSE : TBits_1; inline;
  73710. begin
  73711. getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73712. end;
  73713. procedure TETH_EMAC1CFG1.setTXPAUSE; inline;
  73714. begin
  73715. pTDefRegMap(@Self)^.&set := $00000008;
  73716. end;
  73717. procedure TETH_EMAC1CFG1.clearTXPAUSE; inline;
  73718. begin
  73719. pTDefRegMap(@Self)^.clr := $00000008;
  73720. end;
  73721. procedure TETH_EMAC1CFG1.setTXPAUSE(thebits : TBits_1); inline;
  73722. begin
  73723. if thebits = 0 then
  73724. pTDefRegMap(@Self)^.clr := $00000008
  73725. else
  73726. pTDefRegMap(@Self)^.&set := $00000008;
  73727. end;
  73728. function TETH_EMAC1CFG1.getTXPAUSE : TBits_1; inline;
  73729. begin
  73730. getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73731. end;
  73732. procedure TETH_EMAC1CFG1.setLOOPBACK; inline;
  73733. begin
  73734. pTDefRegMap(@Self)^.&set := $00000010;
  73735. end;
  73736. procedure TETH_EMAC1CFG1.clearLOOPBACK; inline;
  73737. begin
  73738. pTDefRegMap(@Self)^.clr := $00000010;
  73739. end;
  73740. procedure TETH_EMAC1CFG1.setLOOPBACK(thebits : TBits_1); inline;
  73741. begin
  73742. if thebits = 0 then
  73743. pTDefRegMap(@Self)^.clr := $00000010
  73744. else
  73745. pTDefRegMap(@Self)^.&set := $00000010;
  73746. end;
  73747. function TETH_EMAC1CFG1.getLOOPBACK : TBits_1; inline;
  73748. begin
  73749. getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73750. end;
  73751. procedure TETH_EMAC1CFG1.setRESETTFUN; inline;
  73752. begin
  73753. pTDefRegMap(@Self)^.&set := $00000100;
  73754. end;
  73755. procedure TETH_EMAC1CFG1.clearRESETTFUN; inline;
  73756. begin
  73757. pTDefRegMap(@Self)^.clr := $00000100;
  73758. end;
  73759. procedure TETH_EMAC1CFG1.setRESETTFUN(thebits : TBits_1); inline;
  73760. begin
  73761. if thebits = 0 then
  73762. pTDefRegMap(@Self)^.clr := $00000100
  73763. else
  73764. pTDefRegMap(@Self)^.&set := $00000100;
  73765. end;
  73766. function TETH_EMAC1CFG1.getRESETTFUN : TBits_1; inline;
  73767. begin
  73768. getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73769. end;
  73770. procedure TETH_EMAC1CFG1.setRESETTMCS; inline;
  73771. begin
  73772. pTDefRegMap(@Self)^.&set := $00000200;
  73773. end;
  73774. procedure TETH_EMAC1CFG1.clearRESETTMCS; inline;
  73775. begin
  73776. pTDefRegMap(@Self)^.clr := $00000200;
  73777. end;
  73778. procedure TETH_EMAC1CFG1.setRESETTMCS(thebits : TBits_1); inline;
  73779. begin
  73780. if thebits = 0 then
  73781. pTDefRegMap(@Self)^.clr := $00000200
  73782. else
  73783. pTDefRegMap(@Self)^.&set := $00000200;
  73784. end;
  73785. function TETH_EMAC1CFG1.getRESETTMCS : TBits_1; inline;
  73786. begin
  73787. getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  73788. end;
  73789. procedure TETH_EMAC1CFG1.setRESETRFUN; inline;
  73790. begin
  73791. pTDefRegMap(@Self)^.&set := $00000400;
  73792. end;
  73793. procedure TETH_EMAC1CFG1.clearRESETRFUN; inline;
  73794. begin
  73795. pTDefRegMap(@Self)^.clr := $00000400;
  73796. end;
  73797. procedure TETH_EMAC1CFG1.setRESETRFUN(thebits : TBits_1); inline;
  73798. begin
  73799. if thebits = 0 then
  73800. pTDefRegMap(@Self)^.clr := $00000400
  73801. else
  73802. pTDefRegMap(@Self)^.&set := $00000400;
  73803. end;
  73804. function TETH_EMAC1CFG1.getRESETRFUN : TBits_1; inline;
  73805. begin
  73806. getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  73807. end;
  73808. procedure TETH_EMAC1CFG1.setRESETRMCS; inline;
  73809. begin
  73810. pTDefRegMap(@Self)^.&set := $00000800;
  73811. end;
  73812. procedure TETH_EMAC1CFG1.clearRESETRMCS; inline;
  73813. begin
  73814. pTDefRegMap(@Self)^.clr := $00000800;
  73815. end;
  73816. procedure TETH_EMAC1CFG1.setRESETRMCS(thebits : TBits_1); inline;
  73817. begin
  73818. if thebits = 0 then
  73819. pTDefRegMap(@Self)^.clr := $00000800
  73820. else
  73821. pTDefRegMap(@Self)^.&set := $00000800;
  73822. end;
  73823. function TETH_EMAC1CFG1.getRESETRMCS : TBits_1; inline;
  73824. begin
  73825. getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  73826. end;
  73827. procedure TETH_EMAC1CFG1.setSIMRESET; inline;
  73828. begin
  73829. pTDefRegMap(@Self)^.&set := $00004000;
  73830. end;
  73831. procedure TETH_EMAC1CFG1.clearSIMRESET; inline;
  73832. begin
  73833. pTDefRegMap(@Self)^.clr := $00004000;
  73834. end;
  73835. procedure TETH_EMAC1CFG1.setSIMRESET(thebits : TBits_1); inline;
  73836. begin
  73837. if thebits = 0 then
  73838. pTDefRegMap(@Self)^.clr := $00004000
  73839. else
  73840. pTDefRegMap(@Self)^.&set := $00004000;
  73841. end;
  73842. function TETH_EMAC1CFG1.getSIMRESET : TBits_1; inline;
  73843. begin
  73844. getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  73845. end;
  73846. procedure TETH_EMAC1CFG1.setSOFTRESET; inline;
  73847. begin
  73848. pTDefRegMap(@Self)^.&set := $00008000;
  73849. end;
  73850. procedure TETH_EMAC1CFG1.clearSOFTRESET; inline;
  73851. begin
  73852. pTDefRegMap(@Self)^.clr := $00008000;
  73853. end;
  73854. procedure TETH_EMAC1CFG1.setSOFTRESET(thebits : TBits_1); inline;
  73855. begin
  73856. if thebits = 0 then
  73857. pTDefRegMap(@Self)^.clr := $00008000
  73858. else
  73859. pTDefRegMap(@Self)^.&set := $00008000;
  73860. end;
  73861. function TETH_EMAC1CFG1.getSOFTRESET : TBits_1; inline;
  73862. begin
  73863. getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  73864. end;
  73865. procedure TETH_EMAC1CFG1.setw(thebits : TBits_32); inline;
  73866. begin
  73867. pTDefRegMap(@Self)^.val := thebits;
  73868. end;
  73869. function TETH_EMAC1CFG1.getw : TBits_32; inline;
  73870. begin
  73871. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  73872. end;
  73873. procedure TETH_EMACxCFG1.setRXENABLE; inline;
  73874. begin
  73875. pTDefRegMap(@Self)^.&set := $00000001;
  73876. end;
  73877. procedure TETH_EMACxCFG1.clearRXENABLE; inline;
  73878. begin
  73879. pTDefRegMap(@Self)^.clr := $00000001;
  73880. end;
  73881. procedure TETH_EMACxCFG1.setRXENABLE(thebits : TBits_1); inline;
  73882. begin
  73883. if thebits = 0 then
  73884. pTDefRegMap(@Self)^.clr := $00000001
  73885. else
  73886. pTDefRegMap(@Self)^.&set := $00000001;
  73887. end;
  73888. function TETH_EMACxCFG1.getRXENABLE : TBits_1; inline;
  73889. begin
  73890. getRXENABLE := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  73891. end;
  73892. procedure TETH_EMACxCFG1.setPASSALL; inline;
  73893. begin
  73894. pTDefRegMap(@Self)^.&set := $00000002;
  73895. end;
  73896. procedure TETH_EMACxCFG1.clearPASSALL; inline;
  73897. begin
  73898. pTDefRegMap(@Self)^.clr := $00000002;
  73899. end;
  73900. procedure TETH_EMACxCFG1.setPASSALL(thebits : TBits_1); inline;
  73901. begin
  73902. if thebits = 0 then
  73903. pTDefRegMap(@Self)^.clr := $00000002
  73904. else
  73905. pTDefRegMap(@Self)^.&set := $00000002;
  73906. end;
  73907. function TETH_EMACxCFG1.getPASSALL : TBits_1; inline;
  73908. begin
  73909. getPASSALL := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  73910. end;
  73911. procedure TETH_EMACxCFG1.setRXPAUSE; inline;
  73912. begin
  73913. pTDefRegMap(@Self)^.&set := $00000004;
  73914. end;
  73915. procedure TETH_EMACxCFG1.clearRXPAUSE; inline;
  73916. begin
  73917. pTDefRegMap(@Self)^.clr := $00000004;
  73918. end;
  73919. procedure TETH_EMACxCFG1.setRXPAUSE(thebits : TBits_1); inline;
  73920. begin
  73921. if thebits = 0 then
  73922. pTDefRegMap(@Self)^.clr := $00000004
  73923. else
  73924. pTDefRegMap(@Self)^.&set := $00000004;
  73925. end;
  73926. function TETH_EMACxCFG1.getRXPAUSE : TBits_1; inline;
  73927. begin
  73928. getRXPAUSE := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  73929. end;
  73930. procedure TETH_EMACxCFG1.setTXPAUSE; inline;
  73931. begin
  73932. pTDefRegMap(@Self)^.&set := $00000008;
  73933. end;
  73934. procedure TETH_EMACxCFG1.clearTXPAUSE; inline;
  73935. begin
  73936. pTDefRegMap(@Self)^.clr := $00000008;
  73937. end;
  73938. procedure TETH_EMACxCFG1.setTXPAUSE(thebits : TBits_1); inline;
  73939. begin
  73940. if thebits = 0 then
  73941. pTDefRegMap(@Self)^.clr := $00000008
  73942. else
  73943. pTDefRegMap(@Self)^.&set := $00000008;
  73944. end;
  73945. function TETH_EMACxCFG1.getTXPAUSE : TBits_1; inline;
  73946. begin
  73947. getTXPAUSE := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  73948. end;
  73949. procedure TETH_EMACxCFG1.setLOOPBACK; inline;
  73950. begin
  73951. pTDefRegMap(@Self)^.&set := $00000010;
  73952. end;
  73953. procedure TETH_EMACxCFG1.clearLOOPBACK; inline;
  73954. begin
  73955. pTDefRegMap(@Self)^.clr := $00000010;
  73956. end;
  73957. procedure TETH_EMACxCFG1.setLOOPBACK(thebits : TBits_1); inline;
  73958. begin
  73959. if thebits = 0 then
  73960. pTDefRegMap(@Self)^.clr := $00000010
  73961. else
  73962. pTDefRegMap(@Self)^.&set := $00000010;
  73963. end;
  73964. function TETH_EMACxCFG1.getLOOPBACK : TBits_1; inline;
  73965. begin
  73966. getLOOPBACK := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  73967. end;
  73968. procedure TETH_EMACxCFG1.setRESETTFUN; inline;
  73969. begin
  73970. pTDefRegMap(@Self)^.&set := $00000100;
  73971. end;
  73972. procedure TETH_EMACxCFG1.clearRESETTFUN; inline;
  73973. begin
  73974. pTDefRegMap(@Self)^.clr := $00000100;
  73975. end;
  73976. procedure TETH_EMACxCFG1.setRESETTFUN(thebits : TBits_1); inline;
  73977. begin
  73978. if thebits = 0 then
  73979. pTDefRegMap(@Self)^.clr := $00000100
  73980. else
  73981. pTDefRegMap(@Self)^.&set := $00000100;
  73982. end;
  73983. function TETH_EMACxCFG1.getRESETTFUN : TBits_1; inline;
  73984. begin
  73985. getRESETTFUN := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  73986. end;
  73987. procedure TETH_EMACxCFG1.setRESETTMCS; inline;
  73988. begin
  73989. pTDefRegMap(@Self)^.&set := $00000200;
  73990. end;
  73991. procedure TETH_EMACxCFG1.clearRESETTMCS; inline;
  73992. begin
  73993. pTDefRegMap(@Self)^.clr := $00000200;
  73994. end;
  73995. procedure TETH_EMACxCFG1.setRESETTMCS(thebits : TBits_1); inline;
  73996. begin
  73997. if thebits = 0 then
  73998. pTDefRegMap(@Self)^.clr := $00000200
  73999. else
  74000. pTDefRegMap(@Self)^.&set := $00000200;
  74001. end;
  74002. function TETH_EMACxCFG1.getRESETTMCS : TBits_1; inline;
  74003. begin
  74004. getRESETTMCS := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74005. end;
  74006. procedure TETH_EMACxCFG1.setRESETRFUN; inline;
  74007. begin
  74008. pTDefRegMap(@Self)^.&set := $00000400;
  74009. end;
  74010. procedure TETH_EMACxCFG1.clearRESETRFUN; inline;
  74011. begin
  74012. pTDefRegMap(@Self)^.clr := $00000400;
  74013. end;
  74014. procedure TETH_EMACxCFG1.setRESETRFUN(thebits : TBits_1); inline;
  74015. begin
  74016. if thebits = 0 then
  74017. pTDefRegMap(@Self)^.clr := $00000400
  74018. else
  74019. pTDefRegMap(@Self)^.&set := $00000400;
  74020. end;
  74021. function TETH_EMACxCFG1.getRESETRFUN : TBits_1; inline;
  74022. begin
  74023. getRESETRFUN := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  74024. end;
  74025. procedure TETH_EMACxCFG1.setRESETRMCS; inline;
  74026. begin
  74027. pTDefRegMap(@Self)^.&set := $00000800;
  74028. end;
  74029. procedure TETH_EMACxCFG1.clearRESETRMCS; inline;
  74030. begin
  74031. pTDefRegMap(@Self)^.clr := $00000800;
  74032. end;
  74033. procedure TETH_EMACxCFG1.setRESETRMCS(thebits : TBits_1); inline;
  74034. begin
  74035. if thebits = 0 then
  74036. pTDefRegMap(@Self)^.clr := $00000800
  74037. else
  74038. pTDefRegMap(@Self)^.&set := $00000800;
  74039. end;
  74040. function TETH_EMACxCFG1.getRESETRMCS : TBits_1; inline;
  74041. begin
  74042. getRESETRMCS := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  74043. end;
  74044. procedure TETH_EMACxCFG1.setSIMRESET; inline;
  74045. begin
  74046. pTDefRegMap(@Self)^.&set := $00004000;
  74047. end;
  74048. procedure TETH_EMACxCFG1.clearSIMRESET; inline;
  74049. begin
  74050. pTDefRegMap(@Self)^.clr := $00004000;
  74051. end;
  74052. procedure TETH_EMACxCFG1.setSIMRESET(thebits : TBits_1); inline;
  74053. begin
  74054. if thebits = 0 then
  74055. pTDefRegMap(@Self)^.clr := $00004000
  74056. else
  74057. pTDefRegMap(@Self)^.&set := $00004000;
  74058. end;
  74059. function TETH_EMACxCFG1.getSIMRESET : TBits_1; inline;
  74060. begin
  74061. getSIMRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74062. end;
  74063. procedure TETH_EMACxCFG1.setSOFTRESET; inline;
  74064. begin
  74065. pTDefRegMap(@Self)^.&set := $00008000;
  74066. end;
  74067. procedure TETH_EMACxCFG1.clearSOFTRESET; inline;
  74068. begin
  74069. pTDefRegMap(@Self)^.clr := $00008000;
  74070. end;
  74071. procedure TETH_EMACxCFG1.setSOFTRESET(thebits : TBits_1); inline;
  74072. begin
  74073. if thebits = 0 then
  74074. pTDefRegMap(@Self)^.clr := $00008000
  74075. else
  74076. pTDefRegMap(@Self)^.&set := $00008000;
  74077. end;
  74078. function TETH_EMACxCFG1.getSOFTRESET : TBits_1; inline;
  74079. begin
  74080. getSOFTRESET := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  74081. end;
  74082. procedure TETH_EMACxCFG1.setw(thebits : TBits_32); inline;
  74083. begin
  74084. pTDefRegMap(@Self)^.val := thebits;
  74085. end;
  74086. function TETH_EMACxCFG1.getw : TBits_32; inline;
  74087. begin
  74088. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74089. end;
  74090. procedure TETH_EMAC1CFG2.setFULLDPLX; inline;
  74091. begin
  74092. pTDefRegMap(@Self)^.&set := $00000001;
  74093. end;
  74094. procedure TETH_EMAC1CFG2.clearFULLDPLX; inline;
  74095. begin
  74096. pTDefRegMap(@Self)^.clr := $00000001;
  74097. end;
  74098. procedure TETH_EMAC1CFG2.setFULLDPLX(thebits : TBits_1); inline;
  74099. begin
  74100. if thebits = 0 then
  74101. pTDefRegMap(@Self)^.clr := $00000001
  74102. else
  74103. pTDefRegMap(@Self)^.&set := $00000001;
  74104. end;
  74105. function TETH_EMAC1CFG2.getFULLDPLX : TBits_1; inline;
  74106. begin
  74107. getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74108. end;
  74109. procedure TETH_EMAC1CFG2.setLENGTHCK; inline;
  74110. begin
  74111. pTDefRegMap(@Self)^.&set := $00000002;
  74112. end;
  74113. procedure TETH_EMAC1CFG2.clearLENGTHCK; inline;
  74114. begin
  74115. pTDefRegMap(@Self)^.clr := $00000002;
  74116. end;
  74117. procedure TETH_EMAC1CFG2.setLENGTHCK(thebits : TBits_1); inline;
  74118. begin
  74119. if thebits = 0 then
  74120. pTDefRegMap(@Self)^.clr := $00000002
  74121. else
  74122. pTDefRegMap(@Self)^.&set := $00000002;
  74123. end;
  74124. function TETH_EMAC1CFG2.getLENGTHCK : TBits_1; inline;
  74125. begin
  74126. getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74127. end;
  74128. procedure TETH_EMAC1CFG2.setHUGEFRM; inline;
  74129. begin
  74130. pTDefRegMap(@Self)^.&set := $00000004;
  74131. end;
  74132. procedure TETH_EMAC1CFG2.clearHUGEFRM; inline;
  74133. begin
  74134. pTDefRegMap(@Self)^.clr := $00000004;
  74135. end;
  74136. procedure TETH_EMAC1CFG2.setHUGEFRM(thebits : TBits_1); inline;
  74137. begin
  74138. if thebits = 0 then
  74139. pTDefRegMap(@Self)^.clr := $00000004
  74140. else
  74141. pTDefRegMap(@Self)^.&set := $00000004;
  74142. end;
  74143. function TETH_EMAC1CFG2.getHUGEFRM : TBits_1; inline;
  74144. begin
  74145. getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74146. end;
  74147. procedure TETH_EMAC1CFG2.setDELAYCRC; inline;
  74148. begin
  74149. pTDefRegMap(@Self)^.&set := $00000008;
  74150. end;
  74151. procedure TETH_EMAC1CFG2.clearDELAYCRC; inline;
  74152. begin
  74153. pTDefRegMap(@Self)^.clr := $00000008;
  74154. end;
  74155. procedure TETH_EMAC1CFG2.setDELAYCRC(thebits : TBits_1); inline;
  74156. begin
  74157. if thebits = 0 then
  74158. pTDefRegMap(@Self)^.clr := $00000008
  74159. else
  74160. pTDefRegMap(@Self)^.&set := $00000008;
  74161. end;
  74162. function TETH_EMAC1CFG2.getDELAYCRC : TBits_1; inline;
  74163. begin
  74164. getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74165. end;
  74166. procedure TETH_EMAC1CFG2.setCRCENABLE; inline;
  74167. begin
  74168. pTDefRegMap(@Self)^.&set := $00000010;
  74169. end;
  74170. procedure TETH_EMAC1CFG2.clearCRCENABLE; inline;
  74171. begin
  74172. pTDefRegMap(@Self)^.clr := $00000010;
  74173. end;
  74174. procedure TETH_EMAC1CFG2.setCRCENABLE(thebits : TBits_1); inline;
  74175. begin
  74176. if thebits = 0 then
  74177. pTDefRegMap(@Self)^.clr := $00000010
  74178. else
  74179. pTDefRegMap(@Self)^.&set := $00000010;
  74180. end;
  74181. function TETH_EMAC1CFG2.getCRCENABLE : TBits_1; inline;
  74182. begin
  74183. getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74184. end;
  74185. procedure TETH_EMAC1CFG2.setPADENABLE; inline;
  74186. begin
  74187. pTDefRegMap(@Self)^.&set := $00000020;
  74188. end;
  74189. procedure TETH_EMAC1CFG2.clearPADENABLE; inline;
  74190. begin
  74191. pTDefRegMap(@Self)^.clr := $00000020;
  74192. end;
  74193. procedure TETH_EMAC1CFG2.setPADENABLE(thebits : TBits_1); inline;
  74194. begin
  74195. if thebits = 0 then
  74196. pTDefRegMap(@Self)^.clr := $00000020
  74197. else
  74198. pTDefRegMap(@Self)^.&set := $00000020;
  74199. end;
  74200. function TETH_EMAC1CFG2.getPADENABLE : TBits_1; inline;
  74201. begin
  74202. getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74203. end;
  74204. procedure TETH_EMAC1CFG2.setVLANPAD; inline;
  74205. begin
  74206. pTDefRegMap(@Self)^.&set := $00000040;
  74207. end;
  74208. procedure TETH_EMAC1CFG2.clearVLANPAD; inline;
  74209. begin
  74210. pTDefRegMap(@Self)^.clr := $00000040;
  74211. end;
  74212. procedure TETH_EMAC1CFG2.setVLANPAD(thebits : TBits_1); inline;
  74213. begin
  74214. if thebits = 0 then
  74215. pTDefRegMap(@Self)^.clr := $00000040
  74216. else
  74217. pTDefRegMap(@Self)^.&set := $00000040;
  74218. end;
  74219. function TETH_EMAC1CFG2.getVLANPAD : TBits_1; inline;
  74220. begin
  74221. getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74222. end;
  74223. procedure TETH_EMAC1CFG2.setAUTOPAD; inline;
  74224. begin
  74225. pTDefRegMap(@Self)^.&set := $00000080;
  74226. end;
  74227. procedure TETH_EMAC1CFG2.clearAUTOPAD; inline;
  74228. begin
  74229. pTDefRegMap(@Self)^.clr := $00000080;
  74230. end;
  74231. procedure TETH_EMAC1CFG2.setAUTOPAD(thebits : TBits_1); inline;
  74232. begin
  74233. if thebits = 0 then
  74234. pTDefRegMap(@Self)^.clr := $00000080
  74235. else
  74236. pTDefRegMap(@Self)^.&set := $00000080;
  74237. end;
  74238. function TETH_EMAC1CFG2.getAUTOPAD : TBits_1; inline;
  74239. begin
  74240. getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74241. end;
  74242. procedure TETH_EMAC1CFG2.setPUREPRE; inline;
  74243. begin
  74244. pTDefRegMap(@Self)^.&set := $00000100;
  74245. end;
  74246. procedure TETH_EMAC1CFG2.clearPUREPRE; inline;
  74247. begin
  74248. pTDefRegMap(@Self)^.clr := $00000100;
  74249. end;
  74250. procedure TETH_EMAC1CFG2.setPUREPRE(thebits : TBits_1); inline;
  74251. begin
  74252. if thebits = 0 then
  74253. pTDefRegMap(@Self)^.clr := $00000100
  74254. else
  74255. pTDefRegMap(@Self)^.&set := $00000100;
  74256. end;
  74257. function TETH_EMAC1CFG2.getPUREPRE : TBits_1; inline;
  74258. begin
  74259. getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74260. end;
  74261. procedure TETH_EMAC1CFG2.setLONGPRE; inline;
  74262. begin
  74263. pTDefRegMap(@Self)^.&set := $00000200;
  74264. end;
  74265. procedure TETH_EMAC1CFG2.clearLONGPRE; inline;
  74266. begin
  74267. pTDefRegMap(@Self)^.clr := $00000200;
  74268. end;
  74269. procedure TETH_EMAC1CFG2.setLONGPRE(thebits : TBits_1); inline;
  74270. begin
  74271. if thebits = 0 then
  74272. pTDefRegMap(@Self)^.clr := $00000200
  74273. else
  74274. pTDefRegMap(@Self)^.&set := $00000200;
  74275. end;
  74276. function TETH_EMAC1CFG2.getLONGPRE : TBits_1; inline;
  74277. begin
  74278. getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74279. end;
  74280. procedure TETH_EMAC1CFG2.setNOBKOFF; inline;
  74281. begin
  74282. pTDefRegMap(@Self)^.&set := $00001000;
  74283. end;
  74284. procedure TETH_EMAC1CFG2.clearNOBKOFF; inline;
  74285. begin
  74286. pTDefRegMap(@Self)^.clr := $00001000;
  74287. end;
  74288. procedure TETH_EMAC1CFG2.setNOBKOFF(thebits : TBits_1); inline;
  74289. begin
  74290. if thebits = 0 then
  74291. pTDefRegMap(@Self)^.clr := $00001000
  74292. else
  74293. pTDefRegMap(@Self)^.&set := $00001000;
  74294. end;
  74295. function TETH_EMAC1CFG2.getNOBKOFF : TBits_1; inline;
  74296. begin
  74297. getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74298. end;
  74299. procedure TETH_EMAC1CFG2.setBPNOBKOFF; inline;
  74300. begin
  74301. pTDefRegMap(@Self)^.&set := $00002000;
  74302. end;
  74303. procedure TETH_EMAC1CFG2.clearBPNOBKOFF; inline;
  74304. begin
  74305. pTDefRegMap(@Self)^.clr := $00002000;
  74306. end;
  74307. procedure TETH_EMAC1CFG2.setBPNOBKOFF(thebits : TBits_1); inline;
  74308. begin
  74309. if thebits = 0 then
  74310. pTDefRegMap(@Self)^.clr := $00002000
  74311. else
  74312. pTDefRegMap(@Self)^.&set := $00002000;
  74313. end;
  74314. function TETH_EMAC1CFG2.getBPNOBKOFF : TBits_1; inline;
  74315. begin
  74316. getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74317. end;
  74318. procedure TETH_EMAC1CFG2.setEXCESSDFR; inline;
  74319. begin
  74320. pTDefRegMap(@Self)^.&set := $00004000;
  74321. end;
  74322. procedure TETH_EMAC1CFG2.clearEXCESSDFR; inline;
  74323. begin
  74324. pTDefRegMap(@Self)^.clr := $00004000;
  74325. end;
  74326. procedure TETH_EMAC1CFG2.setEXCESSDFR(thebits : TBits_1); inline;
  74327. begin
  74328. if thebits = 0 then
  74329. pTDefRegMap(@Self)^.clr := $00004000
  74330. else
  74331. pTDefRegMap(@Self)^.&set := $00004000;
  74332. end;
  74333. function TETH_EMAC1CFG2.getEXCESSDFR : TBits_1; inline;
  74334. begin
  74335. getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74336. end;
  74337. procedure TETH_EMAC1CFG2.setw(thebits : TBits_32); inline;
  74338. begin
  74339. pTDefRegMap(@Self)^.val := thebits;
  74340. end;
  74341. function TETH_EMAC1CFG2.getw : TBits_32; inline;
  74342. begin
  74343. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74344. end;
  74345. procedure TETH_EMACxCFG2.setFULLDPLX; inline;
  74346. begin
  74347. pTDefRegMap(@Self)^.&set := $00000001;
  74348. end;
  74349. procedure TETH_EMACxCFG2.clearFULLDPLX; inline;
  74350. begin
  74351. pTDefRegMap(@Self)^.clr := $00000001;
  74352. end;
  74353. procedure TETH_EMACxCFG2.setFULLDPLX(thebits : TBits_1); inline;
  74354. begin
  74355. if thebits = 0 then
  74356. pTDefRegMap(@Self)^.clr := $00000001
  74357. else
  74358. pTDefRegMap(@Self)^.&set := $00000001;
  74359. end;
  74360. function TETH_EMACxCFG2.getFULLDPLX : TBits_1; inline;
  74361. begin
  74362. getFULLDPLX := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74363. end;
  74364. procedure TETH_EMACxCFG2.setLENGTHCK; inline;
  74365. begin
  74366. pTDefRegMap(@Self)^.&set := $00000002;
  74367. end;
  74368. procedure TETH_EMACxCFG2.clearLENGTHCK; inline;
  74369. begin
  74370. pTDefRegMap(@Self)^.clr := $00000002;
  74371. end;
  74372. procedure TETH_EMACxCFG2.setLENGTHCK(thebits : TBits_1); inline;
  74373. begin
  74374. if thebits = 0 then
  74375. pTDefRegMap(@Self)^.clr := $00000002
  74376. else
  74377. pTDefRegMap(@Self)^.&set := $00000002;
  74378. end;
  74379. function TETH_EMACxCFG2.getLENGTHCK : TBits_1; inline;
  74380. begin
  74381. getLENGTHCK := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74382. end;
  74383. procedure TETH_EMACxCFG2.setHUGEFRM; inline;
  74384. begin
  74385. pTDefRegMap(@Self)^.&set := $00000004;
  74386. end;
  74387. procedure TETH_EMACxCFG2.clearHUGEFRM; inline;
  74388. begin
  74389. pTDefRegMap(@Self)^.clr := $00000004;
  74390. end;
  74391. procedure TETH_EMACxCFG2.setHUGEFRM(thebits : TBits_1); inline;
  74392. begin
  74393. if thebits = 0 then
  74394. pTDefRegMap(@Self)^.clr := $00000004
  74395. else
  74396. pTDefRegMap(@Self)^.&set := $00000004;
  74397. end;
  74398. function TETH_EMACxCFG2.getHUGEFRM : TBits_1; inline;
  74399. begin
  74400. getHUGEFRM := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74401. end;
  74402. procedure TETH_EMACxCFG2.setDELAYCRC; inline;
  74403. begin
  74404. pTDefRegMap(@Self)^.&set := $00000008;
  74405. end;
  74406. procedure TETH_EMACxCFG2.clearDELAYCRC; inline;
  74407. begin
  74408. pTDefRegMap(@Self)^.clr := $00000008;
  74409. end;
  74410. procedure TETH_EMACxCFG2.setDELAYCRC(thebits : TBits_1); inline;
  74411. begin
  74412. if thebits = 0 then
  74413. pTDefRegMap(@Self)^.clr := $00000008
  74414. else
  74415. pTDefRegMap(@Self)^.&set := $00000008;
  74416. end;
  74417. function TETH_EMACxCFG2.getDELAYCRC : TBits_1; inline;
  74418. begin
  74419. getDELAYCRC := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  74420. end;
  74421. procedure TETH_EMACxCFG2.setCRCENABLE; inline;
  74422. begin
  74423. pTDefRegMap(@Self)^.&set := $00000010;
  74424. end;
  74425. procedure TETH_EMACxCFG2.clearCRCENABLE; inline;
  74426. begin
  74427. pTDefRegMap(@Self)^.clr := $00000010;
  74428. end;
  74429. procedure TETH_EMACxCFG2.setCRCENABLE(thebits : TBits_1); inline;
  74430. begin
  74431. if thebits = 0 then
  74432. pTDefRegMap(@Self)^.clr := $00000010
  74433. else
  74434. pTDefRegMap(@Self)^.&set := $00000010;
  74435. end;
  74436. function TETH_EMACxCFG2.getCRCENABLE : TBits_1; inline;
  74437. begin
  74438. getCRCENABLE := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  74439. end;
  74440. procedure TETH_EMACxCFG2.setPADENABLE; inline;
  74441. begin
  74442. pTDefRegMap(@Self)^.&set := $00000020;
  74443. end;
  74444. procedure TETH_EMACxCFG2.clearPADENABLE; inline;
  74445. begin
  74446. pTDefRegMap(@Self)^.clr := $00000020;
  74447. end;
  74448. procedure TETH_EMACxCFG2.setPADENABLE(thebits : TBits_1); inline;
  74449. begin
  74450. if thebits = 0 then
  74451. pTDefRegMap(@Self)^.clr := $00000020
  74452. else
  74453. pTDefRegMap(@Self)^.&set := $00000020;
  74454. end;
  74455. function TETH_EMACxCFG2.getPADENABLE : TBits_1; inline;
  74456. begin
  74457. getPADENABLE := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  74458. end;
  74459. procedure TETH_EMACxCFG2.setVLANPAD; inline;
  74460. begin
  74461. pTDefRegMap(@Self)^.&set := $00000040;
  74462. end;
  74463. procedure TETH_EMACxCFG2.clearVLANPAD; inline;
  74464. begin
  74465. pTDefRegMap(@Self)^.clr := $00000040;
  74466. end;
  74467. procedure TETH_EMACxCFG2.setVLANPAD(thebits : TBits_1); inline;
  74468. begin
  74469. if thebits = 0 then
  74470. pTDefRegMap(@Self)^.clr := $00000040
  74471. else
  74472. pTDefRegMap(@Self)^.&set := $00000040;
  74473. end;
  74474. function TETH_EMACxCFG2.getVLANPAD : TBits_1; inline;
  74475. begin
  74476. getVLANPAD := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  74477. end;
  74478. procedure TETH_EMACxCFG2.setAUTOPAD; inline;
  74479. begin
  74480. pTDefRegMap(@Self)^.&set := $00000080;
  74481. end;
  74482. procedure TETH_EMACxCFG2.clearAUTOPAD; inline;
  74483. begin
  74484. pTDefRegMap(@Self)^.clr := $00000080;
  74485. end;
  74486. procedure TETH_EMACxCFG2.setAUTOPAD(thebits : TBits_1); inline;
  74487. begin
  74488. if thebits = 0 then
  74489. pTDefRegMap(@Self)^.clr := $00000080
  74490. else
  74491. pTDefRegMap(@Self)^.&set := $00000080;
  74492. end;
  74493. function TETH_EMACxCFG2.getAUTOPAD : TBits_1; inline;
  74494. begin
  74495. getAUTOPAD := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  74496. end;
  74497. procedure TETH_EMACxCFG2.setPUREPRE; inline;
  74498. begin
  74499. pTDefRegMap(@Self)^.&set := $00000100;
  74500. end;
  74501. procedure TETH_EMACxCFG2.clearPUREPRE; inline;
  74502. begin
  74503. pTDefRegMap(@Self)^.clr := $00000100;
  74504. end;
  74505. procedure TETH_EMACxCFG2.setPUREPRE(thebits : TBits_1); inline;
  74506. begin
  74507. if thebits = 0 then
  74508. pTDefRegMap(@Self)^.clr := $00000100
  74509. else
  74510. pTDefRegMap(@Self)^.&set := $00000100;
  74511. end;
  74512. function TETH_EMACxCFG2.getPUREPRE : TBits_1; inline;
  74513. begin
  74514. getPUREPRE := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74515. end;
  74516. procedure TETH_EMACxCFG2.setLONGPRE; inline;
  74517. begin
  74518. pTDefRegMap(@Self)^.&set := $00000200;
  74519. end;
  74520. procedure TETH_EMACxCFG2.clearLONGPRE; inline;
  74521. begin
  74522. pTDefRegMap(@Self)^.clr := $00000200;
  74523. end;
  74524. procedure TETH_EMACxCFG2.setLONGPRE(thebits : TBits_1); inline;
  74525. begin
  74526. if thebits = 0 then
  74527. pTDefRegMap(@Self)^.clr := $00000200
  74528. else
  74529. pTDefRegMap(@Self)^.&set := $00000200;
  74530. end;
  74531. function TETH_EMACxCFG2.getLONGPRE : TBits_1; inline;
  74532. begin
  74533. getLONGPRE := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  74534. end;
  74535. procedure TETH_EMACxCFG2.setNOBKOFF; inline;
  74536. begin
  74537. pTDefRegMap(@Self)^.&set := $00001000;
  74538. end;
  74539. procedure TETH_EMACxCFG2.clearNOBKOFF; inline;
  74540. begin
  74541. pTDefRegMap(@Self)^.clr := $00001000;
  74542. end;
  74543. procedure TETH_EMACxCFG2.setNOBKOFF(thebits : TBits_1); inline;
  74544. begin
  74545. if thebits = 0 then
  74546. pTDefRegMap(@Self)^.clr := $00001000
  74547. else
  74548. pTDefRegMap(@Self)^.&set := $00001000;
  74549. end;
  74550. function TETH_EMACxCFG2.getNOBKOFF : TBits_1; inline;
  74551. begin
  74552. getNOBKOFF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  74553. end;
  74554. procedure TETH_EMACxCFG2.setBPNOBKOFF; inline;
  74555. begin
  74556. pTDefRegMap(@Self)^.&set := $00002000;
  74557. end;
  74558. procedure TETH_EMACxCFG2.clearBPNOBKOFF; inline;
  74559. begin
  74560. pTDefRegMap(@Self)^.clr := $00002000;
  74561. end;
  74562. procedure TETH_EMACxCFG2.setBPNOBKOFF(thebits : TBits_1); inline;
  74563. begin
  74564. if thebits = 0 then
  74565. pTDefRegMap(@Self)^.clr := $00002000
  74566. else
  74567. pTDefRegMap(@Self)^.&set := $00002000;
  74568. end;
  74569. function TETH_EMACxCFG2.getBPNOBKOFF : TBits_1; inline;
  74570. begin
  74571. getBPNOBKOFF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  74572. end;
  74573. procedure TETH_EMACxCFG2.setEXCESSDFR; inline;
  74574. begin
  74575. pTDefRegMap(@Self)^.&set := $00004000;
  74576. end;
  74577. procedure TETH_EMACxCFG2.clearEXCESSDFR; inline;
  74578. begin
  74579. pTDefRegMap(@Self)^.clr := $00004000;
  74580. end;
  74581. procedure TETH_EMACxCFG2.setEXCESSDFR(thebits : TBits_1); inline;
  74582. begin
  74583. if thebits = 0 then
  74584. pTDefRegMap(@Self)^.clr := $00004000
  74585. else
  74586. pTDefRegMap(@Self)^.&set := $00004000;
  74587. end;
  74588. function TETH_EMACxCFG2.getEXCESSDFR : TBits_1; inline;
  74589. begin
  74590. getEXCESSDFR := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  74591. end;
  74592. procedure TETH_EMACxCFG2.setw(thebits : TBits_32); inline;
  74593. begin
  74594. pTDefRegMap(@Self)^.val := thebits;
  74595. end;
  74596. function TETH_EMACxCFG2.getw : TBits_32; inline;
  74597. begin
  74598. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74599. end;
  74600. procedure TETH_EMAC1IPGT.setB2BIPKTGP(thebits : TBits_7); inline;
  74601. begin
  74602. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  74603. end;
  74604. function TETH_EMAC1IPGT.getB2BIPKTGP : TBits_7; inline;
  74605. begin
  74606. getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  74607. end;
  74608. procedure TETH_EMAC1IPGT.setw(thebits : TBits_32); inline;
  74609. begin
  74610. pTDefRegMap(@Self)^.val := thebits;
  74611. end;
  74612. function TETH_EMAC1IPGT.getw : TBits_32; inline;
  74613. begin
  74614. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74615. end;
  74616. procedure TETH_EMACxIPGT.setB2BIPKTGP(thebits : TBits_7); inline;
  74617. begin
  74618. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  74619. end;
  74620. function TETH_EMACxIPGT.getB2BIPKTGP : TBits_7; inline;
  74621. begin
  74622. getB2BIPKTGP := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  74623. end;
  74624. procedure TETH_EMACxIPGT.setw(thebits : TBits_32); inline;
  74625. begin
  74626. pTDefRegMap(@Self)^.val := thebits;
  74627. end;
  74628. function TETH_EMACxIPGT.getw : TBits_32; inline;
  74629. begin
  74630. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74631. end;
  74632. procedure TETH_EMAC1IPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
  74633. begin
  74634. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  74635. end;
  74636. function TETH_EMAC1IPGR.getNB2BIPKTGP2 : TBits_7; inline;
  74637. begin
  74638. getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  74639. end;
  74640. procedure TETH_EMAC1IPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
  74641. begin
  74642. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
  74643. end;
  74644. function TETH_EMAC1IPGR.getNB2BIPKTGP1 : TBits_7; inline;
  74645. begin
  74646. getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
  74647. end;
  74648. procedure TETH_EMAC1IPGR.setw(thebits : TBits_32); inline;
  74649. begin
  74650. pTDefRegMap(@Self)^.val := thebits;
  74651. end;
  74652. function TETH_EMAC1IPGR.getw : TBits_32; inline;
  74653. begin
  74654. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74655. end;
  74656. procedure TETH_EMACxIPGR.setNB2BIPKTGP2(thebits : TBits_7); inline;
  74657. begin
  74658. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  74659. end;
  74660. function TETH_EMACxIPGR.getNB2BIPKTGP2 : TBits_7; inline;
  74661. begin
  74662. getNB2BIPKTGP2 := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  74663. end;
  74664. procedure TETH_EMACxIPGR.setNB2BIPKTGP1(thebits : TBits_7); inline;
  74665. begin
  74666. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF80FF or ( thebits shl 8 );
  74667. end;
  74668. function TETH_EMACxIPGR.getNB2BIPKTGP1 : TBits_7; inline;
  74669. begin
  74670. getNB2BIPKTGP1 := (pTDefRegMap(@Self)^.val and $00007F00) shr 8;
  74671. end;
  74672. procedure TETH_EMACxIPGR.setw(thebits : TBits_32); inline;
  74673. begin
  74674. pTDefRegMap(@Self)^.val := thebits;
  74675. end;
  74676. function TETH_EMACxIPGR.getw : TBits_32; inline;
  74677. begin
  74678. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74679. end;
  74680. procedure TETH_EMAC1CLRT.setRETX(thebits : TBits_4); inline;
  74681. begin
  74682. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  74683. end;
  74684. function TETH_EMAC1CLRT.getRETX : TBits_4; inline;
  74685. begin
  74686. getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  74687. end;
  74688. procedure TETH_EMAC1CLRT.setCWINDOW(thebits : TBits_6); inline;
  74689. begin
  74690. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
  74691. end;
  74692. function TETH_EMAC1CLRT.getCWINDOW : TBits_6; inline;
  74693. begin
  74694. getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
  74695. end;
  74696. procedure TETH_EMAC1CLRT.setw(thebits : TBits_32); inline;
  74697. begin
  74698. pTDefRegMap(@Self)^.val := thebits;
  74699. end;
  74700. function TETH_EMAC1CLRT.getw : TBits_32; inline;
  74701. begin
  74702. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74703. end;
  74704. procedure TETH_EMACxCLRT.setRETX(thebits : TBits_4); inline;
  74705. begin
  74706. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF0 or ( thebits shl 0 );
  74707. end;
  74708. function TETH_EMACxCLRT.getRETX : TBits_4; inline;
  74709. begin
  74710. getRETX := (pTDefRegMap(@Self)^.val and $0000000F) shr 0;
  74711. end;
  74712. procedure TETH_EMACxCLRT.setCWINDOW(thebits : TBits_6); inline;
  74713. begin
  74714. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC0FF or ( thebits shl 8 );
  74715. end;
  74716. function TETH_EMACxCLRT.getCWINDOW : TBits_6; inline;
  74717. begin
  74718. getCWINDOW := (pTDefRegMap(@Self)^.val and $00003F00) shr 8;
  74719. end;
  74720. procedure TETH_EMACxCLRT.setw(thebits : TBits_32); inline;
  74721. begin
  74722. pTDefRegMap(@Self)^.val := thebits;
  74723. end;
  74724. function TETH_EMACxCLRT.getw : TBits_32; inline;
  74725. begin
  74726. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74727. end;
  74728. procedure TETH_EMAC1MAXF.setMACMAXF(thebits : TBits_16); inline;
  74729. begin
  74730. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  74731. end;
  74732. function TETH_EMAC1MAXF.getMACMAXF : TBits_16; inline;
  74733. begin
  74734. getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  74735. end;
  74736. procedure TETH_EMAC1MAXF.setw(thebits : TBits_32); inline;
  74737. begin
  74738. pTDefRegMap(@Self)^.val := thebits;
  74739. end;
  74740. function TETH_EMAC1MAXF.getw : TBits_32; inline;
  74741. begin
  74742. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74743. end;
  74744. procedure TETH_EMACxMAXF.setMACMAXF(thebits : TBits_16); inline;
  74745. begin
  74746. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  74747. end;
  74748. function TETH_EMACxMAXF.getMACMAXF : TBits_16; inline;
  74749. begin
  74750. getMACMAXF := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  74751. end;
  74752. procedure TETH_EMACxMAXF.setw(thebits : TBits_32); inline;
  74753. begin
  74754. pTDefRegMap(@Self)^.val := thebits;
  74755. end;
  74756. function TETH_EMACxMAXF.getw : TBits_32; inline;
  74757. begin
  74758. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74759. end;
  74760. procedure TETH_EMAC1SUPP.setSPEEDRMII; inline;
  74761. begin
  74762. pTDefRegMap(@Self)^.&set := $00000100;
  74763. end;
  74764. procedure TETH_EMAC1SUPP.clearSPEEDRMII; inline;
  74765. begin
  74766. pTDefRegMap(@Self)^.clr := $00000100;
  74767. end;
  74768. procedure TETH_EMAC1SUPP.setSPEEDRMII(thebits : TBits_1); inline;
  74769. begin
  74770. if thebits = 0 then
  74771. pTDefRegMap(@Self)^.clr := $00000100
  74772. else
  74773. pTDefRegMap(@Self)^.&set := $00000100;
  74774. end;
  74775. function TETH_EMAC1SUPP.getSPEEDRMII : TBits_1; inline;
  74776. begin
  74777. getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74778. end;
  74779. procedure TETH_EMAC1SUPP.setRESETRMII; inline;
  74780. begin
  74781. pTDefRegMap(@Self)^.&set := $00000800;
  74782. end;
  74783. procedure TETH_EMAC1SUPP.clearRESETRMII; inline;
  74784. begin
  74785. pTDefRegMap(@Self)^.clr := $00000800;
  74786. end;
  74787. procedure TETH_EMAC1SUPP.setRESETRMII(thebits : TBits_1); inline;
  74788. begin
  74789. if thebits = 0 then
  74790. pTDefRegMap(@Self)^.clr := $00000800
  74791. else
  74792. pTDefRegMap(@Self)^.&set := $00000800;
  74793. end;
  74794. function TETH_EMAC1SUPP.getRESETRMII : TBits_1; inline;
  74795. begin
  74796. getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  74797. end;
  74798. procedure TETH_EMAC1SUPP.setw(thebits : TBits_32); inline;
  74799. begin
  74800. pTDefRegMap(@Self)^.val := thebits;
  74801. end;
  74802. function TETH_EMAC1SUPP.getw : TBits_32; inline;
  74803. begin
  74804. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74805. end;
  74806. procedure TETH_EMACxSUPP.setSPEEDRMII; inline;
  74807. begin
  74808. pTDefRegMap(@Self)^.&set := $00000100;
  74809. end;
  74810. procedure TETH_EMACxSUPP.clearSPEEDRMII; inline;
  74811. begin
  74812. pTDefRegMap(@Self)^.clr := $00000100;
  74813. end;
  74814. procedure TETH_EMACxSUPP.setSPEEDRMII(thebits : TBits_1); inline;
  74815. begin
  74816. if thebits = 0 then
  74817. pTDefRegMap(@Self)^.clr := $00000100
  74818. else
  74819. pTDefRegMap(@Self)^.&set := $00000100;
  74820. end;
  74821. function TETH_EMACxSUPP.getSPEEDRMII : TBits_1; inline;
  74822. begin
  74823. getSPEEDRMII := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  74824. end;
  74825. procedure TETH_EMACxSUPP.setRESETRMII; inline;
  74826. begin
  74827. pTDefRegMap(@Self)^.&set := $00000800;
  74828. end;
  74829. procedure TETH_EMACxSUPP.clearRESETRMII; inline;
  74830. begin
  74831. pTDefRegMap(@Self)^.clr := $00000800;
  74832. end;
  74833. procedure TETH_EMACxSUPP.setRESETRMII(thebits : TBits_1); inline;
  74834. begin
  74835. if thebits = 0 then
  74836. pTDefRegMap(@Self)^.clr := $00000800
  74837. else
  74838. pTDefRegMap(@Self)^.&set := $00000800;
  74839. end;
  74840. function TETH_EMACxSUPP.getRESETRMII : TBits_1; inline;
  74841. begin
  74842. getRESETRMII := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  74843. end;
  74844. procedure TETH_EMACxSUPP.setw(thebits : TBits_32); inline;
  74845. begin
  74846. pTDefRegMap(@Self)^.val := thebits;
  74847. end;
  74848. function TETH_EMACxSUPP.getw : TBits_32; inline;
  74849. begin
  74850. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74851. end;
  74852. procedure TETH_EMAC1TEST.setSHRTQNTA; inline;
  74853. begin
  74854. pTDefRegMap(@Self)^.&set := $00000001;
  74855. end;
  74856. procedure TETH_EMAC1TEST.clearSHRTQNTA; inline;
  74857. begin
  74858. pTDefRegMap(@Self)^.clr := $00000001;
  74859. end;
  74860. procedure TETH_EMAC1TEST.setSHRTQNTA(thebits : TBits_1); inline;
  74861. begin
  74862. if thebits = 0 then
  74863. pTDefRegMap(@Self)^.clr := $00000001
  74864. else
  74865. pTDefRegMap(@Self)^.&set := $00000001;
  74866. end;
  74867. function TETH_EMAC1TEST.getSHRTQNTA : TBits_1; inline;
  74868. begin
  74869. getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74870. end;
  74871. procedure TETH_EMAC1TEST.setTESTPAUSE; inline;
  74872. begin
  74873. pTDefRegMap(@Self)^.&set := $00000002;
  74874. end;
  74875. procedure TETH_EMAC1TEST.clearTESTPAUSE; inline;
  74876. begin
  74877. pTDefRegMap(@Self)^.clr := $00000002;
  74878. end;
  74879. procedure TETH_EMAC1TEST.setTESTPAUSE(thebits : TBits_1); inline;
  74880. begin
  74881. if thebits = 0 then
  74882. pTDefRegMap(@Self)^.clr := $00000002
  74883. else
  74884. pTDefRegMap(@Self)^.&set := $00000002;
  74885. end;
  74886. function TETH_EMAC1TEST.getTESTPAUSE : TBits_1; inline;
  74887. begin
  74888. getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74889. end;
  74890. procedure TETH_EMAC1TEST.setTESTBP; inline;
  74891. begin
  74892. pTDefRegMap(@Self)^.&set := $00000004;
  74893. end;
  74894. procedure TETH_EMAC1TEST.clearTESTBP; inline;
  74895. begin
  74896. pTDefRegMap(@Self)^.clr := $00000004;
  74897. end;
  74898. procedure TETH_EMAC1TEST.setTESTBP(thebits : TBits_1); inline;
  74899. begin
  74900. if thebits = 0 then
  74901. pTDefRegMap(@Self)^.clr := $00000004
  74902. else
  74903. pTDefRegMap(@Self)^.&set := $00000004;
  74904. end;
  74905. function TETH_EMAC1TEST.getTESTBP : TBits_1; inline;
  74906. begin
  74907. getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74908. end;
  74909. procedure TETH_EMAC1TEST.setw(thebits : TBits_32); inline;
  74910. begin
  74911. pTDefRegMap(@Self)^.val := thebits;
  74912. end;
  74913. function TETH_EMAC1TEST.getw : TBits_32; inline;
  74914. begin
  74915. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74916. end;
  74917. procedure TETH_EMACxTEST.setSHRTQNTA; inline;
  74918. begin
  74919. pTDefRegMap(@Self)^.&set := $00000001;
  74920. end;
  74921. procedure TETH_EMACxTEST.clearSHRTQNTA; inline;
  74922. begin
  74923. pTDefRegMap(@Self)^.clr := $00000001;
  74924. end;
  74925. procedure TETH_EMACxTEST.setSHRTQNTA(thebits : TBits_1); inline;
  74926. begin
  74927. if thebits = 0 then
  74928. pTDefRegMap(@Self)^.clr := $00000001
  74929. else
  74930. pTDefRegMap(@Self)^.&set := $00000001;
  74931. end;
  74932. function TETH_EMACxTEST.getSHRTQNTA : TBits_1; inline;
  74933. begin
  74934. getSHRTQNTA := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  74935. end;
  74936. procedure TETH_EMACxTEST.setTESTPAUSE; inline;
  74937. begin
  74938. pTDefRegMap(@Self)^.&set := $00000002;
  74939. end;
  74940. procedure TETH_EMACxTEST.clearTESTPAUSE; inline;
  74941. begin
  74942. pTDefRegMap(@Self)^.clr := $00000002;
  74943. end;
  74944. procedure TETH_EMACxTEST.setTESTPAUSE(thebits : TBits_1); inline;
  74945. begin
  74946. if thebits = 0 then
  74947. pTDefRegMap(@Self)^.clr := $00000002
  74948. else
  74949. pTDefRegMap(@Self)^.&set := $00000002;
  74950. end;
  74951. function TETH_EMACxTEST.getTESTPAUSE : TBits_1; inline;
  74952. begin
  74953. getTESTPAUSE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  74954. end;
  74955. procedure TETH_EMACxTEST.setTESTBP; inline;
  74956. begin
  74957. pTDefRegMap(@Self)^.&set := $00000004;
  74958. end;
  74959. procedure TETH_EMACxTEST.clearTESTBP; inline;
  74960. begin
  74961. pTDefRegMap(@Self)^.clr := $00000004;
  74962. end;
  74963. procedure TETH_EMACxTEST.setTESTBP(thebits : TBits_1); inline;
  74964. begin
  74965. if thebits = 0 then
  74966. pTDefRegMap(@Self)^.clr := $00000004
  74967. else
  74968. pTDefRegMap(@Self)^.&set := $00000004;
  74969. end;
  74970. function TETH_EMACxTEST.getTESTBP : TBits_1; inline;
  74971. begin
  74972. getTESTBP := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  74973. end;
  74974. procedure TETH_EMACxTEST.setw(thebits : TBits_32); inline;
  74975. begin
  74976. pTDefRegMap(@Self)^.val := thebits;
  74977. end;
  74978. function TETH_EMACxTEST.getw : TBits_32; inline;
  74979. begin
  74980. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  74981. end;
  74982. procedure TETH_EMAC1MCFG.setSCANINC; inline;
  74983. begin
  74984. pTDefRegMap(@Self)^.&set := $00000001;
  74985. end;
  74986. procedure TETH_EMAC1MCFG.clearSCANINC; inline;
  74987. begin
  74988. pTDefRegMap(@Self)^.clr := $00000001;
  74989. end;
  74990. procedure TETH_EMAC1MCFG.setSCANINC(thebits : TBits_1); inline;
  74991. begin
  74992. if thebits = 0 then
  74993. pTDefRegMap(@Self)^.clr := $00000001
  74994. else
  74995. pTDefRegMap(@Self)^.&set := $00000001;
  74996. end;
  74997. function TETH_EMAC1MCFG.getSCANINC : TBits_1; inline;
  74998. begin
  74999. getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75000. end;
  75001. procedure TETH_EMAC1MCFG.setNOPRE; inline;
  75002. begin
  75003. pTDefRegMap(@Self)^.&set := $00000002;
  75004. end;
  75005. procedure TETH_EMAC1MCFG.clearNOPRE; inline;
  75006. begin
  75007. pTDefRegMap(@Self)^.clr := $00000002;
  75008. end;
  75009. procedure TETH_EMAC1MCFG.setNOPRE(thebits : TBits_1); inline;
  75010. begin
  75011. if thebits = 0 then
  75012. pTDefRegMap(@Self)^.clr := $00000002
  75013. else
  75014. pTDefRegMap(@Self)^.&set := $00000002;
  75015. end;
  75016. function TETH_EMAC1MCFG.getNOPRE : TBits_1; inline;
  75017. begin
  75018. getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75019. end;
  75020. procedure TETH_EMAC1MCFG.setCLKSEL(thebits : TBits_4); inline;
  75021. begin
  75022. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  75023. end;
  75024. function TETH_EMAC1MCFG.getCLKSEL : TBits_4; inline;
  75025. begin
  75026. getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  75027. end;
  75028. procedure TETH_EMAC1MCFG.setRESETMGMT; inline;
  75029. begin
  75030. pTDefRegMap(@Self)^.&set := $00008000;
  75031. end;
  75032. procedure TETH_EMAC1MCFG.clearRESETMGMT; inline;
  75033. begin
  75034. pTDefRegMap(@Self)^.clr := $00008000;
  75035. end;
  75036. procedure TETH_EMAC1MCFG.setRESETMGMT(thebits : TBits_1); inline;
  75037. begin
  75038. if thebits = 0 then
  75039. pTDefRegMap(@Self)^.clr := $00008000
  75040. else
  75041. pTDefRegMap(@Self)^.&set := $00008000;
  75042. end;
  75043. function TETH_EMAC1MCFG.getRESETMGMT : TBits_1; inline;
  75044. begin
  75045. getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  75046. end;
  75047. procedure TETH_EMAC1MCFG.setw(thebits : TBits_32); inline;
  75048. begin
  75049. pTDefRegMap(@Self)^.val := thebits;
  75050. end;
  75051. function TETH_EMAC1MCFG.getw : TBits_32; inline;
  75052. begin
  75053. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75054. end;
  75055. procedure TETH_EMACxMCFG.setSCANINC; inline;
  75056. begin
  75057. pTDefRegMap(@Self)^.&set := $00000001;
  75058. end;
  75059. procedure TETH_EMACxMCFG.clearSCANINC; inline;
  75060. begin
  75061. pTDefRegMap(@Self)^.clr := $00000001;
  75062. end;
  75063. procedure TETH_EMACxMCFG.setSCANINC(thebits : TBits_1); inline;
  75064. begin
  75065. if thebits = 0 then
  75066. pTDefRegMap(@Self)^.clr := $00000001
  75067. else
  75068. pTDefRegMap(@Self)^.&set := $00000001;
  75069. end;
  75070. function TETH_EMACxMCFG.getSCANINC : TBits_1; inline;
  75071. begin
  75072. getSCANINC := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75073. end;
  75074. procedure TETH_EMACxMCFG.setNOPRE; inline;
  75075. begin
  75076. pTDefRegMap(@Self)^.&set := $00000002;
  75077. end;
  75078. procedure TETH_EMACxMCFG.clearNOPRE; inline;
  75079. begin
  75080. pTDefRegMap(@Self)^.clr := $00000002;
  75081. end;
  75082. procedure TETH_EMACxMCFG.setNOPRE(thebits : TBits_1); inline;
  75083. begin
  75084. if thebits = 0 then
  75085. pTDefRegMap(@Self)^.clr := $00000002
  75086. else
  75087. pTDefRegMap(@Self)^.&set := $00000002;
  75088. end;
  75089. function TETH_EMACxMCFG.getNOPRE : TBits_1; inline;
  75090. begin
  75091. getNOPRE := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75092. end;
  75093. procedure TETH_EMACxMCFG.setCLKSEL(thebits : TBits_4); inline;
  75094. begin
  75095. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC3 or ( thebits shl 2 );
  75096. end;
  75097. function TETH_EMACxMCFG.getCLKSEL : TBits_4; inline;
  75098. begin
  75099. getCLKSEL := (pTDefRegMap(@Self)^.val and $0000003C) shr 2;
  75100. end;
  75101. procedure TETH_EMACxMCFG.setRESETMGMT; inline;
  75102. begin
  75103. pTDefRegMap(@Self)^.&set := $00008000;
  75104. end;
  75105. procedure TETH_EMACxMCFG.clearRESETMGMT; inline;
  75106. begin
  75107. pTDefRegMap(@Self)^.clr := $00008000;
  75108. end;
  75109. procedure TETH_EMACxMCFG.setRESETMGMT(thebits : TBits_1); inline;
  75110. begin
  75111. if thebits = 0 then
  75112. pTDefRegMap(@Self)^.clr := $00008000
  75113. else
  75114. pTDefRegMap(@Self)^.&set := $00008000;
  75115. end;
  75116. function TETH_EMACxMCFG.getRESETMGMT : TBits_1; inline;
  75117. begin
  75118. getRESETMGMT := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  75119. end;
  75120. procedure TETH_EMACxMCFG.setw(thebits : TBits_32); inline;
  75121. begin
  75122. pTDefRegMap(@Self)^.val := thebits;
  75123. end;
  75124. function TETH_EMACxMCFG.getw : TBits_32; inline;
  75125. begin
  75126. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75127. end;
  75128. procedure TETH_EMAC1MCMD.setREAD; inline;
  75129. begin
  75130. pTDefRegMap(@Self)^.&set := $00000001;
  75131. end;
  75132. procedure TETH_EMAC1MCMD.clearREAD; inline;
  75133. begin
  75134. pTDefRegMap(@Self)^.clr := $00000001;
  75135. end;
  75136. procedure TETH_EMAC1MCMD.setREAD(thebits : TBits_1); inline;
  75137. begin
  75138. if thebits = 0 then
  75139. pTDefRegMap(@Self)^.clr := $00000001
  75140. else
  75141. pTDefRegMap(@Self)^.&set := $00000001;
  75142. end;
  75143. function TETH_EMAC1MCMD.getREAD : TBits_1; inline;
  75144. begin
  75145. getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75146. end;
  75147. procedure TETH_EMAC1MCMD.setSCAN; inline;
  75148. begin
  75149. pTDefRegMap(@Self)^.&set := $00000002;
  75150. end;
  75151. procedure TETH_EMAC1MCMD.clearSCAN; inline;
  75152. begin
  75153. pTDefRegMap(@Self)^.clr := $00000002;
  75154. end;
  75155. procedure TETH_EMAC1MCMD.setSCAN(thebits : TBits_1); inline;
  75156. begin
  75157. if thebits = 0 then
  75158. pTDefRegMap(@Self)^.clr := $00000002
  75159. else
  75160. pTDefRegMap(@Self)^.&set := $00000002;
  75161. end;
  75162. function TETH_EMAC1MCMD.getSCAN : TBits_1; inline;
  75163. begin
  75164. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75165. end;
  75166. procedure TETH_EMAC1MCMD.setw(thebits : TBits_32); inline;
  75167. begin
  75168. pTDefRegMap(@Self)^.val := thebits;
  75169. end;
  75170. function TETH_EMAC1MCMD.getw : TBits_32; inline;
  75171. begin
  75172. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75173. end;
  75174. procedure TETH_EMACxMCMD.setREAD; inline;
  75175. begin
  75176. pTDefRegMap(@Self)^.&set := $00000001;
  75177. end;
  75178. procedure TETH_EMACxMCMD.clearREAD; inline;
  75179. begin
  75180. pTDefRegMap(@Self)^.clr := $00000001;
  75181. end;
  75182. procedure TETH_EMACxMCMD.setREAD(thebits : TBits_1); inline;
  75183. begin
  75184. if thebits = 0 then
  75185. pTDefRegMap(@Self)^.clr := $00000001
  75186. else
  75187. pTDefRegMap(@Self)^.&set := $00000001;
  75188. end;
  75189. function TETH_EMACxMCMD.getREAD : TBits_1; inline;
  75190. begin
  75191. getREAD := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75192. end;
  75193. procedure TETH_EMACxMCMD.setSCAN; inline;
  75194. begin
  75195. pTDefRegMap(@Self)^.&set := $00000002;
  75196. end;
  75197. procedure TETH_EMACxMCMD.clearSCAN; inline;
  75198. begin
  75199. pTDefRegMap(@Self)^.clr := $00000002;
  75200. end;
  75201. procedure TETH_EMACxMCMD.setSCAN(thebits : TBits_1); inline;
  75202. begin
  75203. if thebits = 0 then
  75204. pTDefRegMap(@Self)^.clr := $00000002
  75205. else
  75206. pTDefRegMap(@Self)^.&set := $00000002;
  75207. end;
  75208. function TETH_EMACxMCMD.getSCAN : TBits_1; inline;
  75209. begin
  75210. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75211. end;
  75212. procedure TETH_EMACxMCMD.setw(thebits : TBits_32); inline;
  75213. begin
  75214. pTDefRegMap(@Self)^.val := thebits;
  75215. end;
  75216. function TETH_EMACxMCMD.getw : TBits_32; inline;
  75217. begin
  75218. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75219. end;
  75220. procedure TETH_EMAC1MADR.setREGADDR(thebits : TBits_5); inline;
  75221. begin
  75222. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75223. end;
  75224. function TETH_EMAC1MADR.getREGADDR : TBits_5; inline;
  75225. begin
  75226. getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75227. end;
  75228. procedure TETH_EMAC1MADR.setPHYADDR(thebits : TBits_5); inline;
  75229. begin
  75230. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  75231. end;
  75232. function TETH_EMAC1MADR.getPHYADDR : TBits_5; inline;
  75233. begin
  75234. getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  75235. end;
  75236. procedure TETH_EMAC1MADR.setw(thebits : TBits_32); inline;
  75237. begin
  75238. pTDefRegMap(@Self)^.val := thebits;
  75239. end;
  75240. function TETH_EMAC1MADR.getw : TBits_32; inline;
  75241. begin
  75242. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75243. end;
  75244. procedure TETH_EMACxMADR.setREGADDR(thebits : TBits_5); inline;
  75245. begin
  75246. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75247. end;
  75248. function TETH_EMACxMADR.getREGADDR : TBits_5; inline;
  75249. begin
  75250. getREGADDR := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75251. end;
  75252. procedure TETH_EMACxMADR.setPHYADDR(thebits : TBits_5); inline;
  75253. begin
  75254. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  75255. end;
  75256. function TETH_EMACxMADR.getPHYADDR : TBits_5; inline;
  75257. begin
  75258. getPHYADDR := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  75259. end;
  75260. procedure TETH_EMACxMADR.setw(thebits : TBits_32); inline;
  75261. begin
  75262. pTDefRegMap(@Self)^.val := thebits;
  75263. end;
  75264. function TETH_EMACxMADR.getw : TBits_32; inline;
  75265. begin
  75266. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75267. end;
  75268. procedure TETH_EMAC1MWTD.setMWTD(thebits : TBits_16); inline;
  75269. begin
  75270. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  75271. end;
  75272. function TETH_EMAC1MWTD.getMWTD : TBits_16; inline;
  75273. begin
  75274. getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  75275. end;
  75276. procedure TETH_EMAC1MWTD.setw(thebits : TBits_32); inline;
  75277. begin
  75278. pTDefRegMap(@Self)^.val := thebits;
  75279. end;
  75280. function TETH_EMAC1MWTD.getw : TBits_32; inline;
  75281. begin
  75282. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75283. end;
  75284. procedure TETH_EMACxMWTD.setMWTD(thebits : TBits_16); inline;
  75285. begin
  75286. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  75287. end;
  75288. function TETH_EMACxMWTD.getMWTD : TBits_16; inline;
  75289. begin
  75290. getMWTD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  75291. end;
  75292. procedure TETH_EMACxMWTD.setw(thebits : TBits_32); inline;
  75293. begin
  75294. pTDefRegMap(@Self)^.val := thebits;
  75295. end;
  75296. function TETH_EMACxMWTD.getw : TBits_32; inline;
  75297. begin
  75298. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75299. end;
  75300. procedure TETH_EMAC1MRDD.setMRDD(thebits : TBits_16); inline;
  75301. begin
  75302. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  75303. end;
  75304. function TETH_EMAC1MRDD.getMRDD : TBits_16; inline;
  75305. begin
  75306. getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  75307. end;
  75308. procedure TETH_EMAC1MRDD.setw(thebits : TBits_32); inline;
  75309. begin
  75310. pTDefRegMap(@Self)^.val := thebits;
  75311. end;
  75312. function TETH_EMAC1MRDD.getw : TBits_32; inline;
  75313. begin
  75314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75315. end;
  75316. procedure TETH_EMACxMRDD.setMRDD(thebits : TBits_16); inline;
  75317. begin
  75318. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  75319. end;
  75320. function TETH_EMACxMRDD.getMRDD : TBits_16; inline;
  75321. begin
  75322. getMRDD := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  75323. end;
  75324. procedure TETH_EMACxMRDD.setw(thebits : TBits_32); inline;
  75325. begin
  75326. pTDefRegMap(@Self)^.val := thebits;
  75327. end;
  75328. function TETH_EMACxMRDD.getw : TBits_32; inline;
  75329. begin
  75330. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75331. end;
  75332. procedure TETH_EMAC1MIND.setMIIMBUSY; inline;
  75333. begin
  75334. pTDefRegMap(@Self)^.&set := $00000001;
  75335. end;
  75336. procedure TETH_EMAC1MIND.clearMIIMBUSY; inline;
  75337. begin
  75338. pTDefRegMap(@Self)^.clr := $00000001;
  75339. end;
  75340. procedure TETH_EMAC1MIND.setMIIMBUSY(thebits : TBits_1); inline;
  75341. begin
  75342. if thebits = 0 then
  75343. pTDefRegMap(@Self)^.clr := $00000001
  75344. else
  75345. pTDefRegMap(@Self)^.&set := $00000001;
  75346. end;
  75347. function TETH_EMAC1MIND.getMIIMBUSY : TBits_1; inline;
  75348. begin
  75349. getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75350. end;
  75351. procedure TETH_EMAC1MIND.setSCAN; inline;
  75352. begin
  75353. pTDefRegMap(@Self)^.&set := $00000002;
  75354. end;
  75355. procedure TETH_EMAC1MIND.clearSCAN; inline;
  75356. begin
  75357. pTDefRegMap(@Self)^.clr := $00000002;
  75358. end;
  75359. procedure TETH_EMAC1MIND.setSCAN(thebits : TBits_1); inline;
  75360. begin
  75361. if thebits = 0 then
  75362. pTDefRegMap(@Self)^.clr := $00000002
  75363. else
  75364. pTDefRegMap(@Self)^.&set := $00000002;
  75365. end;
  75366. function TETH_EMAC1MIND.getSCAN : TBits_1; inline;
  75367. begin
  75368. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75369. end;
  75370. procedure TETH_EMAC1MIND.setNOTVALID; inline;
  75371. begin
  75372. pTDefRegMap(@Self)^.&set := $00000004;
  75373. end;
  75374. procedure TETH_EMAC1MIND.clearNOTVALID; inline;
  75375. begin
  75376. pTDefRegMap(@Self)^.clr := $00000004;
  75377. end;
  75378. procedure TETH_EMAC1MIND.setNOTVALID(thebits : TBits_1); inline;
  75379. begin
  75380. if thebits = 0 then
  75381. pTDefRegMap(@Self)^.clr := $00000004
  75382. else
  75383. pTDefRegMap(@Self)^.&set := $00000004;
  75384. end;
  75385. function TETH_EMAC1MIND.getNOTVALID : TBits_1; inline;
  75386. begin
  75387. getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75388. end;
  75389. procedure TETH_EMAC1MIND.setLINKFAIL; inline;
  75390. begin
  75391. pTDefRegMap(@Self)^.&set := $00000008;
  75392. end;
  75393. procedure TETH_EMAC1MIND.clearLINKFAIL; inline;
  75394. begin
  75395. pTDefRegMap(@Self)^.clr := $00000008;
  75396. end;
  75397. procedure TETH_EMAC1MIND.setLINKFAIL(thebits : TBits_1); inline;
  75398. begin
  75399. if thebits = 0 then
  75400. pTDefRegMap(@Self)^.clr := $00000008
  75401. else
  75402. pTDefRegMap(@Self)^.&set := $00000008;
  75403. end;
  75404. function TETH_EMAC1MIND.getLINKFAIL : TBits_1; inline;
  75405. begin
  75406. getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75407. end;
  75408. procedure TETH_EMAC1MIND.setw(thebits : TBits_32); inline;
  75409. begin
  75410. pTDefRegMap(@Self)^.val := thebits;
  75411. end;
  75412. function TETH_EMAC1MIND.getw : TBits_32; inline;
  75413. begin
  75414. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75415. end;
  75416. procedure TETH_EMACxMIND.setMIIMBUSY; inline;
  75417. begin
  75418. pTDefRegMap(@Self)^.&set := $00000001;
  75419. end;
  75420. procedure TETH_EMACxMIND.clearMIIMBUSY; inline;
  75421. begin
  75422. pTDefRegMap(@Self)^.clr := $00000001;
  75423. end;
  75424. procedure TETH_EMACxMIND.setMIIMBUSY(thebits : TBits_1); inline;
  75425. begin
  75426. if thebits = 0 then
  75427. pTDefRegMap(@Self)^.clr := $00000001
  75428. else
  75429. pTDefRegMap(@Self)^.&set := $00000001;
  75430. end;
  75431. function TETH_EMACxMIND.getMIIMBUSY : TBits_1; inline;
  75432. begin
  75433. getMIIMBUSY := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75434. end;
  75435. procedure TETH_EMACxMIND.setSCAN; inline;
  75436. begin
  75437. pTDefRegMap(@Self)^.&set := $00000002;
  75438. end;
  75439. procedure TETH_EMACxMIND.clearSCAN; inline;
  75440. begin
  75441. pTDefRegMap(@Self)^.clr := $00000002;
  75442. end;
  75443. procedure TETH_EMACxMIND.setSCAN(thebits : TBits_1); inline;
  75444. begin
  75445. if thebits = 0 then
  75446. pTDefRegMap(@Self)^.clr := $00000002
  75447. else
  75448. pTDefRegMap(@Self)^.&set := $00000002;
  75449. end;
  75450. function TETH_EMACxMIND.getSCAN : TBits_1; inline;
  75451. begin
  75452. getSCAN := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75453. end;
  75454. procedure TETH_EMACxMIND.setNOTVALID; inline;
  75455. begin
  75456. pTDefRegMap(@Self)^.&set := $00000004;
  75457. end;
  75458. procedure TETH_EMACxMIND.clearNOTVALID; inline;
  75459. begin
  75460. pTDefRegMap(@Self)^.clr := $00000004;
  75461. end;
  75462. procedure TETH_EMACxMIND.setNOTVALID(thebits : TBits_1); inline;
  75463. begin
  75464. if thebits = 0 then
  75465. pTDefRegMap(@Self)^.clr := $00000004
  75466. else
  75467. pTDefRegMap(@Self)^.&set := $00000004;
  75468. end;
  75469. function TETH_EMACxMIND.getNOTVALID : TBits_1; inline;
  75470. begin
  75471. getNOTVALID := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75472. end;
  75473. procedure TETH_EMACxMIND.setLINKFAIL; inline;
  75474. begin
  75475. pTDefRegMap(@Self)^.&set := $00000008;
  75476. end;
  75477. procedure TETH_EMACxMIND.clearLINKFAIL; inline;
  75478. begin
  75479. pTDefRegMap(@Self)^.clr := $00000008;
  75480. end;
  75481. procedure TETH_EMACxMIND.setLINKFAIL(thebits : TBits_1); inline;
  75482. begin
  75483. if thebits = 0 then
  75484. pTDefRegMap(@Self)^.clr := $00000008
  75485. else
  75486. pTDefRegMap(@Self)^.&set := $00000008;
  75487. end;
  75488. function TETH_EMACxMIND.getLINKFAIL : TBits_1; inline;
  75489. begin
  75490. getLINKFAIL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75491. end;
  75492. procedure TETH_EMACxMIND.setw(thebits : TBits_32); inline;
  75493. begin
  75494. pTDefRegMap(@Self)^.val := thebits;
  75495. end;
  75496. function TETH_EMACxMIND.getw : TBits_32; inline;
  75497. begin
  75498. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75499. end;
  75500. procedure TETH_EMAC1SA0.setSTNADDR5(thebits : TBits_8); inline;
  75501. begin
  75502. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  75503. end;
  75504. function TETH_EMAC1SA0.getSTNADDR5 : TBits_8; inline;
  75505. begin
  75506. getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  75507. end;
  75508. procedure TETH_EMAC1SA0.setSTNADDR6(thebits : TBits_8); inline;
  75509. begin
  75510. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  75511. end;
  75512. function TETH_EMAC1SA0.getSTNADDR6 : TBits_8; inline;
  75513. begin
  75514. getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  75515. end;
  75516. procedure TETH_EMAC1SA0.setw(thebits : TBits_32); inline;
  75517. begin
  75518. pTDefRegMap(@Self)^.val := thebits;
  75519. end;
  75520. function TETH_EMAC1SA0.getw : TBits_32; inline;
  75521. begin
  75522. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75523. end;
  75524. procedure TETH_EMACxSA0.setSTNADDR5(thebits : TBits_8); inline;
  75525. begin
  75526. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  75527. end;
  75528. function TETH_EMACxSA0.getSTNADDR5 : TBits_8; inline;
  75529. begin
  75530. getSTNADDR5 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  75531. end;
  75532. procedure TETH_EMACxSA0.setSTNADDR6(thebits : TBits_8); inline;
  75533. begin
  75534. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  75535. end;
  75536. function TETH_EMACxSA0.getSTNADDR6 : TBits_8; inline;
  75537. begin
  75538. getSTNADDR6 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  75539. end;
  75540. procedure TETH_EMACxSA0.setw(thebits : TBits_32); inline;
  75541. begin
  75542. pTDefRegMap(@Self)^.val := thebits;
  75543. end;
  75544. function TETH_EMACxSA0.getw : TBits_32; inline;
  75545. begin
  75546. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75547. end;
  75548. procedure TETH_EMAC1SA1.setSTNADDR3(thebits : TBits_8); inline;
  75549. begin
  75550. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  75551. end;
  75552. function TETH_EMAC1SA1.getSTNADDR3 : TBits_8; inline;
  75553. begin
  75554. getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  75555. end;
  75556. procedure TETH_EMAC1SA1.setSTNADDR4(thebits : TBits_8); inline;
  75557. begin
  75558. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  75559. end;
  75560. function TETH_EMAC1SA1.getSTNADDR4 : TBits_8; inline;
  75561. begin
  75562. getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  75563. end;
  75564. procedure TETH_EMAC1SA1.setw(thebits : TBits_32); inline;
  75565. begin
  75566. pTDefRegMap(@Self)^.val := thebits;
  75567. end;
  75568. function TETH_EMAC1SA1.getw : TBits_32; inline;
  75569. begin
  75570. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75571. end;
  75572. procedure TETH_EMACxSA1.setSTNADDR3(thebits : TBits_8); inline;
  75573. begin
  75574. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  75575. end;
  75576. function TETH_EMACxSA1.getSTNADDR3 : TBits_8; inline;
  75577. begin
  75578. getSTNADDR3 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  75579. end;
  75580. procedure TETH_EMACxSA1.setSTNADDR4(thebits : TBits_8); inline;
  75581. begin
  75582. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  75583. end;
  75584. function TETH_EMACxSA1.getSTNADDR4 : TBits_8; inline;
  75585. begin
  75586. getSTNADDR4 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  75587. end;
  75588. procedure TETH_EMACxSA1.setw(thebits : TBits_32); inline;
  75589. begin
  75590. pTDefRegMap(@Self)^.val := thebits;
  75591. end;
  75592. function TETH_EMACxSA1.getw : TBits_32; inline;
  75593. begin
  75594. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75595. end;
  75596. procedure TETH_EMAC1SA2.setSTNADDR1(thebits : TBits_8); inline;
  75597. begin
  75598. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  75599. end;
  75600. function TETH_EMAC1SA2.getSTNADDR1 : TBits_8; inline;
  75601. begin
  75602. getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  75603. end;
  75604. procedure TETH_EMAC1SA2.setSTNADDR2(thebits : TBits_8); inline;
  75605. begin
  75606. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  75607. end;
  75608. function TETH_EMAC1SA2.getSTNADDR2 : TBits_8; inline;
  75609. begin
  75610. getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  75611. end;
  75612. procedure TETH_EMAC1SA2.setw(thebits : TBits_32); inline;
  75613. begin
  75614. pTDefRegMap(@Self)^.val := thebits;
  75615. end;
  75616. function TETH_EMAC1SA2.getw : TBits_32; inline;
  75617. begin
  75618. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75619. end;
  75620. procedure TETH_EMACxSA2.setSTNADDR1(thebits : TBits_8); inline;
  75621. begin
  75622. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  75623. end;
  75624. function TETH_EMACxSA2.getSTNADDR1 : TBits_8; inline;
  75625. begin
  75626. getSTNADDR1 := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  75627. end;
  75628. procedure TETH_EMACxSA2.setSTNADDR2(thebits : TBits_8); inline;
  75629. begin
  75630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  75631. end;
  75632. function TETH_EMACxSA2.getSTNADDR2 : TBits_8; inline;
  75633. begin
  75634. getSTNADDR2 := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  75635. end;
  75636. procedure TETH_EMACxSA2.setw(thebits : TBits_32); inline;
  75637. begin
  75638. pTDefRegMap(@Self)^.val := thebits;
  75639. end;
  75640. function TETH_EMACxSA2.getw : TBits_32; inline;
  75641. begin
  75642. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75643. end;
  75644. procedure TCAN1_C1CON.setDNCNT(thebits : TBits_5); inline;
  75645. begin
  75646. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  75647. end;
  75648. function TCAN1_C1CON.getDNCNT : TBits_5; inline;
  75649. begin
  75650. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  75651. end;
  75652. procedure TCAN1_C1CON.setCANBUSY; inline;
  75653. begin
  75654. pTDefRegMap(@Self)^.&set := $00000800;
  75655. end;
  75656. procedure TCAN1_C1CON.clearCANBUSY; inline;
  75657. begin
  75658. pTDefRegMap(@Self)^.clr := $00000800;
  75659. end;
  75660. procedure TCAN1_C1CON.setCANBUSY(thebits : TBits_1); inline;
  75661. begin
  75662. if thebits = 0 then
  75663. pTDefRegMap(@Self)^.clr := $00000800
  75664. else
  75665. pTDefRegMap(@Self)^.&set := $00000800;
  75666. end;
  75667. function TCAN1_C1CON.getCANBUSY : TBits_1; inline;
  75668. begin
  75669. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  75670. end;
  75671. procedure TCAN1_C1CON.setSIDL; inline;
  75672. begin
  75673. pTDefRegMap(@Self)^.&set := $00002000;
  75674. end;
  75675. procedure TCAN1_C1CON.clearSIDL; inline;
  75676. begin
  75677. pTDefRegMap(@Self)^.clr := $00002000;
  75678. end;
  75679. procedure TCAN1_C1CON.setSIDL(thebits : TBits_1); inline;
  75680. begin
  75681. if thebits = 0 then
  75682. pTDefRegMap(@Self)^.clr := $00002000
  75683. else
  75684. pTDefRegMap(@Self)^.&set := $00002000;
  75685. end;
  75686. function TCAN1_C1CON.getSIDL : TBits_1; inline;
  75687. begin
  75688. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  75689. end;
  75690. procedure TCAN1_C1CON.setON; inline;
  75691. begin
  75692. pTDefRegMap(@Self)^.&set := $00008000;
  75693. end;
  75694. procedure TCAN1_C1CON.clearON; inline;
  75695. begin
  75696. pTDefRegMap(@Self)^.clr := $00008000;
  75697. end;
  75698. procedure TCAN1_C1CON.setON(thebits : TBits_1); inline;
  75699. begin
  75700. if thebits = 0 then
  75701. pTDefRegMap(@Self)^.clr := $00008000
  75702. else
  75703. pTDefRegMap(@Self)^.&set := $00008000;
  75704. end;
  75705. function TCAN1_C1CON.getON : TBits_1; inline;
  75706. begin
  75707. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  75708. end;
  75709. procedure TCAN1_C1CON.setCANCAP; inline;
  75710. begin
  75711. pTDefRegMap(@Self)^.&set := $00100000;
  75712. end;
  75713. procedure TCAN1_C1CON.clearCANCAP; inline;
  75714. begin
  75715. pTDefRegMap(@Self)^.clr := $00100000;
  75716. end;
  75717. procedure TCAN1_C1CON.setCANCAP(thebits : TBits_1); inline;
  75718. begin
  75719. if thebits = 0 then
  75720. pTDefRegMap(@Self)^.clr := $00100000
  75721. else
  75722. pTDefRegMap(@Self)^.&set := $00100000;
  75723. end;
  75724. function TCAN1_C1CON.getCANCAP : TBits_1; inline;
  75725. begin
  75726. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  75727. end;
  75728. procedure TCAN1_C1CON.setOPMOD(thebits : TBits_3); inline;
  75729. begin
  75730. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  75731. end;
  75732. function TCAN1_C1CON.getOPMOD : TBits_3; inline;
  75733. begin
  75734. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  75735. end;
  75736. procedure TCAN1_C1CON.setREQOP(thebits : TBits_3); inline;
  75737. begin
  75738. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  75739. end;
  75740. function TCAN1_C1CON.getREQOP : TBits_3; inline;
  75741. begin
  75742. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  75743. end;
  75744. procedure TCAN1_C1CON.setABAT; inline;
  75745. begin
  75746. pTDefRegMap(@Self)^.&set := $08000000;
  75747. end;
  75748. procedure TCAN1_C1CON.clearABAT; inline;
  75749. begin
  75750. pTDefRegMap(@Self)^.clr := $08000000;
  75751. end;
  75752. procedure TCAN1_C1CON.setABAT(thebits : TBits_1); inline;
  75753. begin
  75754. if thebits = 0 then
  75755. pTDefRegMap(@Self)^.clr := $08000000
  75756. else
  75757. pTDefRegMap(@Self)^.&set := $08000000;
  75758. end;
  75759. function TCAN1_C1CON.getABAT : TBits_1; inline;
  75760. begin
  75761. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  75762. end;
  75763. procedure TCAN1_C1CON.setw(thebits : TBits_32); inline;
  75764. begin
  75765. pTDefRegMap(@Self)^.val := thebits;
  75766. end;
  75767. function TCAN1_C1CON.getw : TBits_32; inline;
  75768. begin
  75769. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75770. end;
  75771. procedure TCAN1_C1CFG.setBRP(thebits : TBits_6); inline;
  75772. begin
  75773. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  75774. end;
  75775. function TCAN1_C1CFG.getBRP : TBits_6; inline;
  75776. begin
  75777. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  75778. end;
  75779. procedure TCAN1_C1CFG.setSJW(thebits : TBits_2); inline;
  75780. begin
  75781. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  75782. end;
  75783. function TCAN1_C1CFG.getSJW : TBits_2; inline;
  75784. begin
  75785. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  75786. end;
  75787. procedure TCAN1_C1CFG.setPRSEG(thebits : TBits_3); inline;
  75788. begin
  75789. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  75790. end;
  75791. function TCAN1_C1CFG.getPRSEG : TBits_3; inline;
  75792. begin
  75793. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  75794. end;
  75795. procedure TCAN1_C1CFG.setSEG1PH(thebits : TBits_3); inline;
  75796. begin
  75797. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  75798. end;
  75799. function TCAN1_C1CFG.getSEG1PH : TBits_3; inline;
  75800. begin
  75801. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  75802. end;
  75803. procedure TCAN1_C1CFG.setSAM; inline;
  75804. begin
  75805. pTDefRegMap(@Self)^.&set := $00004000;
  75806. end;
  75807. procedure TCAN1_C1CFG.clearSAM; inline;
  75808. begin
  75809. pTDefRegMap(@Self)^.clr := $00004000;
  75810. end;
  75811. procedure TCAN1_C1CFG.setSAM(thebits : TBits_1); inline;
  75812. begin
  75813. if thebits = 0 then
  75814. pTDefRegMap(@Self)^.clr := $00004000
  75815. else
  75816. pTDefRegMap(@Self)^.&set := $00004000;
  75817. end;
  75818. function TCAN1_C1CFG.getSAM : TBits_1; inline;
  75819. begin
  75820. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  75821. end;
  75822. procedure TCAN1_C1CFG.setSEG2PHTS; inline;
  75823. begin
  75824. pTDefRegMap(@Self)^.&set := $00008000;
  75825. end;
  75826. procedure TCAN1_C1CFG.clearSEG2PHTS; inline;
  75827. begin
  75828. pTDefRegMap(@Self)^.clr := $00008000;
  75829. end;
  75830. procedure TCAN1_C1CFG.setSEG2PHTS(thebits : TBits_1); inline;
  75831. begin
  75832. if thebits = 0 then
  75833. pTDefRegMap(@Self)^.clr := $00008000
  75834. else
  75835. pTDefRegMap(@Self)^.&set := $00008000;
  75836. end;
  75837. function TCAN1_C1CFG.getSEG2PHTS : TBits_1; inline;
  75838. begin
  75839. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  75840. end;
  75841. procedure TCAN1_C1CFG.setSEG2PH(thebits : TBits_3); inline;
  75842. begin
  75843. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  75844. end;
  75845. function TCAN1_C1CFG.getSEG2PH : TBits_3; inline;
  75846. begin
  75847. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  75848. end;
  75849. procedure TCAN1_C1CFG.setWAKFIL; inline;
  75850. begin
  75851. pTDefRegMap(@Self)^.&set := $00400000;
  75852. end;
  75853. procedure TCAN1_C1CFG.clearWAKFIL; inline;
  75854. begin
  75855. pTDefRegMap(@Self)^.clr := $00400000;
  75856. end;
  75857. procedure TCAN1_C1CFG.setWAKFIL(thebits : TBits_1); inline;
  75858. begin
  75859. if thebits = 0 then
  75860. pTDefRegMap(@Self)^.clr := $00400000
  75861. else
  75862. pTDefRegMap(@Self)^.&set := $00400000;
  75863. end;
  75864. function TCAN1_C1CFG.getWAKFIL : TBits_1; inline;
  75865. begin
  75866. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  75867. end;
  75868. procedure TCAN1_C1CFG.setw(thebits : TBits_32); inline;
  75869. begin
  75870. pTDefRegMap(@Self)^.val := thebits;
  75871. end;
  75872. function TCAN1_C1CFG.getw : TBits_32; inline;
  75873. begin
  75874. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  75875. end;
  75876. procedure TCAN1_C1INT.setTBIF; inline;
  75877. begin
  75878. pTDefRegMap(@Self)^.&set := $00000001;
  75879. end;
  75880. procedure TCAN1_C1INT.clearTBIF; inline;
  75881. begin
  75882. pTDefRegMap(@Self)^.clr := $00000001;
  75883. end;
  75884. procedure TCAN1_C1INT.setTBIF(thebits : TBits_1); inline;
  75885. begin
  75886. if thebits = 0 then
  75887. pTDefRegMap(@Self)^.clr := $00000001
  75888. else
  75889. pTDefRegMap(@Self)^.&set := $00000001;
  75890. end;
  75891. function TCAN1_C1INT.getTBIF : TBits_1; inline;
  75892. begin
  75893. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  75894. end;
  75895. procedure TCAN1_C1INT.setRBIF; inline;
  75896. begin
  75897. pTDefRegMap(@Self)^.&set := $00000002;
  75898. end;
  75899. procedure TCAN1_C1INT.clearRBIF; inline;
  75900. begin
  75901. pTDefRegMap(@Self)^.clr := $00000002;
  75902. end;
  75903. procedure TCAN1_C1INT.setRBIF(thebits : TBits_1); inline;
  75904. begin
  75905. if thebits = 0 then
  75906. pTDefRegMap(@Self)^.clr := $00000002
  75907. else
  75908. pTDefRegMap(@Self)^.&set := $00000002;
  75909. end;
  75910. function TCAN1_C1INT.getRBIF : TBits_1; inline;
  75911. begin
  75912. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  75913. end;
  75914. procedure TCAN1_C1INT.setCTMRIF; inline;
  75915. begin
  75916. pTDefRegMap(@Self)^.&set := $00000004;
  75917. end;
  75918. procedure TCAN1_C1INT.clearCTMRIF; inline;
  75919. begin
  75920. pTDefRegMap(@Self)^.clr := $00000004;
  75921. end;
  75922. procedure TCAN1_C1INT.setCTMRIF(thebits : TBits_1); inline;
  75923. begin
  75924. if thebits = 0 then
  75925. pTDefRegMap(@Self)^.clr := $00000004
  75926. else
  75927. pTDefRegMap(@Self)^.&set := $00000004;
  75928. end;
  75929. function TCAN1_C1INT.getCTMRIF : TBits_1; inline;
  75930. begin
  75931. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  75932. end;
  75933. procedure TCAN1_C1INT.setMODIF; inline;
  75934. begin
  75935. pTDefRegMap(@Self)^.&set := $00000008;
  75936. end;
  75937. procedure TCAN1_C1INT.clearMODIF; inline;
  75938. begin
  75939. pTDefRegMap(@Self)^.clr := $00000008;
  75940. end;
  75941. procedure TCAN1_C1INT.setMODIF(thebits : TBits_1); inline;
  75942. begin
  75943. if thebits = 0 then
  75944. pTDefRegMap(@Self)^.clr := $00000008
  75945. else
  75946. pTDefRegMap(@Self)^.&set := $00000008;
  75947. end;
  75948. function TCAN1_C1INT.getMODIF : TBits_1; inline;
  75949. begin
  75950. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  75951. end;
  75952. procedure TCAN1_C1INT.setRBOVIF; inline;
  75953. begin
  75954. pTDefRegMap(@Self)^.&set := $00000800;
  75955. end;
  75956. procedure TCAN1_C1INT.clearRBOVIF; inline;
  75957. begin
  75958. pTDefRegMap(@Self)^.clr := $00000800;
  75959. end;
  75960. procedure TCAN1_C1INT.setRBOVIF(thebits : TBits_1); inline;
  75961. begin
  75962. if thebits = 0 then
  75963. pTDefRegMap(@Self)^.clr := $00000800
  75964. else
  75965. pTDefRegMap(@Self)^.&set := $00000800;
  75966. end;
  75967. function TCAN1_C1INT.getRBOVIF : TBits_1; inline;
  75968. begin
  75969. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  75970. end;
  75971. procedure TCAN1_C1INT.setSERRIF; inline;
  75972. begin
  75973. pTDefRegMap(@Self)^.&set := $00001000;
  75974. end;
  75975. procedure TCAN1_C1INT.clearSERRIF; inline;
  75976. begin
  75977. pTDefRegMap(@Self)^.clr := $00001000;
  75978. end;
  75979. procedure TCAN1_C1INT.setSERRIF(thebits : TBits_1); inline;
  75980. begin
  75981. if thebits = 0 then
  75982. pTDefRegMap(@Self)^.clr := $00001000
  75983. else
  75984. pTDefRegMap(@Self)^.&set := $00001000;
  75985. end;
  75986. function TCAN1_C1INT.getSERRIF : TBits_1; inline;
  75987. begin
  75988. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  75989. end;
  75990. procedure TCAN1_C1INT.setCERRIF; inline;
  75991. begin
  75992. pTDefRegMap(@Self)^.&set := $00002000;
  75993. end;
  75994. procedure TCAN1_C1INT.clearCERRIF; inline;
  75995. begin
  75996. pTDefRegMap(@Self)^.clr := $00002000;
  75997. end;
  75998. procedure TCAN1_C1INT.setCERRIF(thebits : TBits_1); inline;
  75999. begin
  76000. if thebits = 0 then
  76001. pTDefRegMap(@Self)^.clr := $00002000
  76002. else
  76003. pTDefRegMap(@Self)^.&set := $00002000;
  76004. end;
  76005. function TCAN1_C1INT.getCERRIF : TBits_1; inline;
  76006. begin
  76007. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76008. end;
  76009. procedure TCAN1_C1INT.setWAKIF; inline;
  76010. begin
  76011. pTDefRegMap(@Self)^.&set := $00004000;
  76012. end;
  76013. procedure TCAN1_C1INT.clearWAKIF; inline;
  76014. begin
  76015. pTDefRegMap(@Self)^.clr := $00004000;
  76016. end;
  76017. procedure TCAN1_C1INT.setWAKIF(thebits : TBits_1); inline;
  76018. begin
  76019. if thebits = 0 then
  76020. pTDefRegMap(@Self)^.clr := $00004000
  76021. else
  76022. pTDefRegMap(@Self)^.&set := $00004000;
  76023. end;
  76024. function TCAN1_C1INT.getWAKIF : TBits_1; inline;
  76025. begin
  76026. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76027. end;
  76028. procedure TCAN1_C1INT.setIVRIF; inline;
  76029. begin
  76030. pTDefRegMap(@Self)^.&set := $00008000;
  76031. end;
  76032. procedure TCAN1_C1INT.clearIVRIF; inline;
  76033. begin
  76034. pTDefRegMap(@Self)^.clr := $00008000;
  76035. end;
  76036. procedure TCAN1_C1INT.setIVRIF(thebits : TBits_1); inline;
  76037. begin
  76038. if thebits = 0 then
  76039. pTDefRegMap(@Self)^.clr := $00008000
  76040. else
  76041. pTDefRegMap(@Self)^.&set := $00008000;
  76042. end;
  76043. function TCAN1_C1INT.getIVRIF : TBits_1; inline;
  76044. begin
  76045. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76046. end;
  76047. procedure TCAN1_C1INT.setTBIE; inline;
  76048. begin
  76049. pTDefRegMap(@Self)^.&set := $00010000;
  76050. end;
  76051. procedure TCAN1_C1INT.clearTBIE; inline;
  76052. begin
  76053. pTDefRegMap(@Self)^.clr := $00010000;
  76054. end;
  76055. procedure TCAN1_C1INT.setTBIE(thebits : TBits_1); inline;
  76056. begin
  76057. if thebits = 0 then
  76058. pTDefRegMap(@Self)^.clr := $00010000
  76059. else
  76060. pTDefRegMap(@Self)^.&set := $00010000;
  76061. end;
  76062. function TCAN1_C1INT.getTBIE : TBits_1; inline;
  76063. begin
  76064. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76065. end;
  76066. procedure TCAN1_C1INT.setRBIE; inline;
  76067. begin
  76068. pTDefRegMap(@Self)^.&set := $00020000;
  76069. end;
  76070. procedure TCAN1_C1INT.clearRBIE; inline;
  76071. begin
  76072. pTDefRegMap(@Self)^.clr := $00020000;
  76073. end;
  76074. procedure TCAN1_C1INT.setRBIE(thebits : TBits_1); inline;
  76075. begin
  76076. if thebits = 0 then
  76077. pTDefRegMap(@Self)^.clr := $00020000
  76078. else
  76079. pTDefRegMap(@Self)^.&set := $00020000;
  76080. end;
  76081. function TCAN1_C1INT.getRBIE : TBits_1; inline;
  76082. begin
  76083. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76084. end;
  76085. procedure TCAN1_C1INT.setCTMRIE; inline;
  76086. begin
  76087. pTDefRegMap(@Self)^.&set := $00040000;
  76088. end;
  76089. procedure TCAN1_C1INT.clearCTMRIE; inline;
  76090. begin
  76091. pTDefRegMap(@Self)^.clr := $00040000;
  76092. end;
  76093. procedure TCAN1_C1INT.setCTMRIE(thebits : TBits_1); inline;
  76094. begin
  76095. if thebits = 0 then
  76096. pTDefRegMap(@Self)^.clr := $00040000
  76097. else
  76098. pTDefRegMap(@Self)^.&set := $00040000;
  76099. end;
  76100. function TCAN1_C1INT.getCTMRIE : TBits_1; inline;
  76101. begin
  76102. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76103. end;
  76104. procedure TCAN1_C1INT.setMODIE; inline;
  76105. begin
  76106. pTDefRegMap(@Self)^.&set := $00080000;
  76107. end;
  76108. procedure TCAN1_C1INT.clearMODIE; inline;
  76109. begin
  76110. pTDefRegMap(@Self)^.clr := $00080000;
  76111. end;
  76112. procedure TCAN1_C1INT.setMODIE(thebits : TBits_1); inline;
  76113. begin
  76114. if thebits = 0 then
  76115. pTDefRegMap(@Self)^.clr := $00080000
  76116. else
  76117. pTDefRegMap(@Self)^.&set := $00080000;
  76118. end;
  76119. function TCAN1_C1INT.getMODIE : TBits_1; inline;
  76120. begin
  76121. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76122. end;
  76123. procedure TCAN1_C1INT.setRBOVIE; inline;
  76124. begin
  76125. pTDefRegMap(@Self)^.&set := $08000000;
  76126. end;
  76127. procedure TCAN1_C1INT.clearRBOVIE; inline;
  76128. begin
  76129. pTDefRegMap(@Self)^.clr := $08000000;
  76130. end;
  76131. procedure TCAN1_C1INT.setRBOVIE(thebits : TBits_1); inline;
  76132. begin
  76133. if thebits = 0 then
  76134. pTDefRegMap(@Self)^.clr := $08000000
  76135. else
  76136. pTDefRegMap(@Self)^.&set := $08000000;
  76137. end;
  76138. function TCAN1_C1INT.getRBOVIE : TBits_1; inline;
  76139. begin
  76140. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  76141. end;
  76142. procedure TCAN1_C1INT.setSERRIE; inline;
  76143. begin
  76144. pTDefRegMap(@Self)^.&set := $10000000;
  76145. end;
  76146. procedure TCAN1_C1INT.clearSERRIE; inline;
  76147. begin
  76148. pTDefRegMap(@Self)^.clr := $10000000;
  76149. end;
  76150. procedure TCAN1_C1INT.setSERRIE(thebits : TBits_1); inline;
  76151. begin
  76152. if thebits = 0 then
  76153. pTDefRegMap(@Self)^.clr := $10000000
  76154. else
  76155. pTDefRegMap(@Self)^.&set := $10000000;
  76156. end;
  76157. function TCAN1_C1INT.getSERRIE : TBits_1; inline;
  76158. begin
  76159. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  76160. end;
  76161. procedure TCAN1_C1INT.setCERRIE; inline;
  76162. begin
  76163. pTDefRegMap(@Self)^.&set := $20000000;
  76164. end;
  76165. procedure TCAN1_C1INT.clearCERRIE; inline;
  76166. begin
  76167. pTDefRegMap(@Self)^.clr := $20000000;
  76168. end;
  76169. procedure TCAN1_C1INT.setCERRIE(thebits : TBits_1); inline;
  76170. begin
  76171. if thebits = 0 then
  76172. pTDefRegMap(@Self)^.clr := $20000000
  76173. else
  76174. pTDefRegMap(@Self)^.&set := $20000000;
  76175. end;
  76176. function TCAN1_C1INT.getCERRIE : TBits_1; inline;
  76177. begin
  76178. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  76179. end;
  76180. procedure TCAN1_C1INT.setWAKIE; inline;
  76181. begin
  76182. pTDefRegMap(@Self)^.&set := $40000000;
  76183. end;
  76184. procedure TCAN1_C1INT.clearWAKIE; inline;
  76185. begin
  76186. pTDefRegMap(@Self)^.clr := $40000000;
  76187. end;
  76188. procedure TCAN1_C1INT.setWAKIE(thebits : TBits_1); inline;
  76189. begin
  76190. if thebits = 0 then
  76191. pTDefRegMap(@Self)^.clr := $40000000
  76192. else
  76193. pTDefRegMap(@Self)^.&set := $40000000;
  76194. end;
  76195. function TCAN1_C1INT.getWAKIE : TBits_1; inline;
  76196. begin
  76197. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  76198. end;
  76199. procedure TCAN1_C1INT.setIVRIE; inline;
  76200. begin
  76201. pTDefRegMap(@Self)^.&set := $80000000;
  76202. end;
  76203. procedure TCAN1_C1INT.clearIVRIE; inline;
  76204. begin
  76205. pTDefRegMap(@Self)^.clr := $80000000;
  76206. end;
  76207. procedure TCAN1_C1INT.setIVRIE(thebits : TBits_1); inline;
  76208. begin
  76209. if thebits = 0 then
  76210. pTDefRegMap(@Self)^.clr := $80000000
  76211. else
  76212. pTDefRegMap(@Self)^.&set := $80000000;
  76213. end;
  76214. function TCAN1_C1INT.getIVRIE : TBits_1; inline;
  76215. begin
  76216. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  76217. end;
  76218. procedure TCAN1_C1INT.setw(thebits : TBits_32); inline;
  76219. begin
  76220. pTDefRegMap(@Self)^.val := thebits;
  76221. end;
  76222. function TCAN1_C1INT.getw : TBits_32; inline;
  76223. begin
  76224. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76225. end;
  76226. procedure TCAN1_C1VEC.setICODE(thebits : TBits_7); inline;
  76227. begin
  76228. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  76229. end;
  76230. function TCAN1_C1VEC.getICODE : TBits_7; inline;
  76231. begin
  76232. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  76233. end;
  76234. procedure TCAN1_C1VEC.setFILHIT(thebits : TBits_5); inline;
  76235. begin
  76236. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  76237. end;
  76238. function TCAN1_C1VEC.getFILHIT : TBits_5; inline;
  76239. begin
  76240. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  76241. end;
  76242. procedure TCAN1_C1VEC.setw(thebits : TBits_32); inline;
  76243. begin
  76244. pTDefRegMap(@Self)^.val := thebits;
  76245. end;
  76246. function TCAN1_C1VEC.getw : TBits_32; inline;
  76247. begin
  76248. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76249. end;
  76250. procedure TCAN1_C1TREC.setRERRCNT(thebits : TBits_8); inline;
  76251. begin
  76252. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  76253. end;
  76254. function TCAN1_C1TREC.getRERRCNT : TBits_8; inline;
  76255. begin
  76256. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  76257. end;
  76258. procedure TCAN1_C1TREC.setTERRCNT(thebits : TBits_8); inline;
  76259. begin
  76260. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  76261. end;
  76262. function TCAN1_C1TREC.getTERRCNT : TBits_8; inline;
  76263. begin
  76264. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  76265. end;
  76266. procedure TCAN1_C1TREC.setEWARN; inline;
  76267. begin
  76268. pTDefRegMap(@Self)^.&set := $00010000;
  76269. end;
  76270. procedure TCAN1_C1TREC.clearEWARN; inline;
  76271. begin
  76272. pTDefRegMap(@Self)^.clr := $00010000;
  76273. end;
  76274. procedure TCAN1_C1TREC.setEWARN(thebits : TBits_1); inline;
  76275. begin
  76276. if thebits = 0 then
  76277. pTDefRegMap(@Self)^.clr := $00010000
  76278. else
  76279. pTDefRegMap(@Self)^.&set := $00010000;
  76280. end;
  76281. function TCAN1_C1TREC.getEWARN : TBits_1; inline;
  76282. begin
  76283. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76284. end;
  76285. procedure TCAN1_C1TREC.setRXWARN; inline;
  76286. begin
  76287. pTDefRegMap(@Self)^.&set := $00020000;
  76288. end;
  76289. procedure TCAN1_C1TREC.clearRXWARN; inline;
  76290. begin
  76291. pTDefRegMap(@Self)^.clr := $00020000;
  76292. end;
  76293. procedure TCAN1_C1TREC.setRXWARN(thebits : TBits_1); inline;
  76294. begin
  76295. if thebits = 0 then
  76296. pTDefRegMap(@Self)^.clr := $00020000
  76297. else
  76298. pTDefRegMap(@Self)^.&set := $00020000;
  76299. end;
  76300. function TCAN1_C1TREC.getRXWARN : TBits_1; inline;
  76301. begin
  76302. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76303. end;
  76304. procedure TCAN1_C1TREC.setTXWARN; inline;
  76305. begin
  76306. pTDefRegMap(@Self)^.&set := $00040000;
  76307. end;
  76308. procedure TCAN1_C1TREC.clearTXWARN; inline;
  76309. begin
  76310. pTDefRegMap(@Self)^.clr := $00040000;
  76311. end;
  76312. procedure TCAN1_C1TREC.setTXWARN(thebits : TBits_1); inline;
  76313. begin
  76314. if thebits = 0 then
  76315. pTDefRegMap(@Self)^.clr := $00040000
  76316. else
  76317. pTDefRegMap(@Self)^.&set := $00040000;
  76318. end;
  76319. function TCAN1_C1TREC.getTXWARN : TBits_1; inline;
  76320. begin
  76321. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76322. end;
  76323. procedure TCAN1_C1TREC.setRXBP; inline;
  76324. begin
  76325. pTDefRegMap(@Self)^.&set := $00080000;
  76326. end;
  76327. procedure TCAN1_C1TREC.clearRXBP; inline;
  76328. begin
  76329. pTDefRegMap(@Self)^.clr := $00080000;
  76330. end;
  76331. procedure TCAN1_C1TREC.setRXBP(thebits : TBits_1); inline;
  76332. begin
  76333. if thebits = 0 then
  76334. pTDefRegMap(@Self)^.clr := $00080000
  76335. else
  76336. pTDefRegMap(@Self)^.&set := $00080000;
  76337. end;
  76338. function TCAN1_C1TREC.getRXBP : TBits_1; inline;
  76339. begin
  76340. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76341. end;
  76342. procedure TCAN1_C1TREC.setTXBP; inline;
  76343. begin
  76344. pTDefRegMap(@Self)^.&set := $00100000;
  76345. end;
  76346. procedure TCAN1_C1TREC.clearTXBP; inline;
  76347. begin
  76348. pTDefRegMap(@Self)^.clr := $00100000;
  76349. end;
  76350. procedure TCAN1_C1TREC.setTXBP(thebits : TBits_1); inline;
  76351. begin
  76352. if thebits = 0 then
  76353. pTDefRegMap(@Self)^.clr := $00100000
  76354. else
  76355. pTDefRegMap(@Self)^.&set := $00100000;
  76356. end;
  76357. function TCAN1_C1TREC.getTXBP : TBits_1; inline;
  76358. begin
  76359. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  76360. end;
  76361. procedure TCAN1_C1TREC.setTXBO; inline;
  76362. begin
  76363. pTDefRegMap(@Self)^.&set := $00200000;
  76364. end;
  76365. procedure TCAN1_C1TREC.clearTXBO; inline;
  76366. begin
  76367. pTDefRegMap(@Self)^.clr := $00200000;
  76368. end;
  76369. procedure TCAN1_C1TREC.setTXBO(thebits : TBits_1); inline;
  76370. begin
  76371. if thebits = 0 then
  76372. pTDefRegMap(@Self)^.clr := $00200000
  76373. else
  76374. pTDefRegMap(@Self)^.&set := $00200000;
  76375. end;
  76376. function TCAN1_C1TREC.getTXBO : TBits_1; inline;
  76377. begin
  76378. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  76379. end;
  76380. procedure TCAN1_C1TREC.setw(thebits : TBits_32); inline;
  76381. begin
  76382. pTDefRegMap(@Self)^.val := thebits;
  76383. end;
  76384. function TCAN1_C1TREC.getw : TBits_32; inline;
  76385. begin
  76386. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76387. end;
  76388. procedure TCAN1_C1FSTAT.setFIFOIP(thebits : TBits_32); inline;
  76389. begin
  76390. pTDefRegMap(@Self)^.val := thebits;
  76391. end;
  76392. function TCAN1_C1FSTAT.getFIFOIP : TBits_32; inline;
  76393. begin
  76394. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  76395. end;
  76396. procedure TCAN1_C1FSTAT.setFIFOIP0; inline;
  76397. begin
  76398. pTDefRegMap(@Self)^.&set := $00000001;
  76399. end;
  76400. procedure TCAN1_C1FSTAT.clearFIFOIP0; inline;
  76401. begin
  76402. pTDefRegMap(@Self)^.clr := $00000001;
  76403. end;
  76404. procedure TCAN1_C1FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  76405. begin
  76406. if thebits = 0 then
  76407. pTDefRegMap(@Self)^.clr := $00000001
  76408. else
  76409. pTDefRegMap(@Self)^.&set := $00000001;
  76410. end;
  76411. function TCAN1_C1FSTAT.getFIFOIP0 : TBits_1; inline;
  76412. begin
  76413. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  76414. end;
  76415. procedure TCAN1_C1FSTAT.setFIFOIP1; inline;
  76416. begin
  76417. pTDefRegMap(@Self)^.&set := $00000002;
  76418. end;
  76419. procedure TCAN1_C1FSTAT.clearFIFOIP1; inline;
  76420. begin
  76421. pTDefRegMap(@Self)^.clr := $00000002;
  76422. end;
  76423. procedure TCAN1_C1FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  76424. begin
  76425. if thebits = 0 then
  76426. pTDefRegMap(@Self)^.clr := $00000002
  76427. else
  76428. pTDefRegMap(@Self)^.&set := $00000002;
  76429. end;
  76430. function TCAN1_C1FSTAT.getFIFOIP1 : TBits_1; inline;
  76431. begin
  76432. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  76433. end;
  76434. procedure TCAN1_C1FSTAT.setFIFOIP2; inline;
  76435. begin
  76436. pTDefRegMap(@Self)^.&set := $00000004;
  76437. end;
  76438. procedure TCAN1_C1FSTAT.clearFIFOIP2; inline;
  76439. begin
  76440. pTDefRegMap(@Self)^.clr := $00000004;
  76441. end;
  76442. procedure TCAN1_C1FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  76443. begin
  76444. if thebits = 0 then
  76445. pTDefRegMap(@Self)^.clr := $00000004
  76446. else
  76447. pTDefRegMap(@Self)^.&set := $00000004;
  76448. end;
  76449. function TCAN1_C1FSTAT.getFIFOIP2 : TBits_1; inline;
  76450. begin
  76451. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  76452. end;
  76453. procedure TCAN1_C1FSTAT.setFIFOIP3; inline;
  76454. begin
  76455. pTDefRegMap(@Self)^.&set := $00000008;
  76456. end;
  76457. procedure TCAN1_C1FSTAT.clearFIFOIP3; inline;
  76458. begin
  76459. pTDefRegMap(@Self)^.clr := $00000008;
  76460. end;
  76461. procedure TCAN1_C1FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  76462. begin
  76463. if thebits = 0 then
  76464. pTDefRegMap(@Self)^.clr := $00000008
  76465. else
  76466. pTDefRegMap(@Self)^.&set := $00000008;
  76467. end;
  76468. function TCAN1_C1FSTAT.getFIFOIP3 : TBits_1; inline;
  76469. begin
  76470. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  76471. end;
  76472. procedure TCAN1_C1FSTAT.setFIFOIP4; inline;
  76473. begin
  76474. pTDefRegMap(@Self)^.&set := $00000010;
  76475. end;
  76476. procedure TCAN1_C1FSTAT.clearFIFOIP4; inline;
  76477. begin
  76478. pTDefRegMap(@Self)^.clr := $00000010;
  76479. end;
  76480. procedure TCAN1_C1FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  76481. begin
  76482. if thebits = 0 then
  76483. pTDefRegMap(@Self)^.clr := $00000010
  76484. else
  76485. pTDefRegMap(@Self)^.&set := $00000010;
  76486. end;
  76487. function TCAN1_C1FSTAT.getFIFOIP4 : TBits_1; inline;
  76488. begin
  76489. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  76490. end;
  76491. procedure TCAN1_C1FSTAT.setFIFOIP5; inline;
  76492. begin
  76493. pTDefRegMap(@Self)^.&set := $00000020;
  76494. end;
  76495. procedure TCAN1_C1FSTAT.clearFIFOIP5; inline;
  76496. begin
  76497. pTDefRegMap(@Self)^.clr := $00000020;
  76498. end;
  76499. procedure TCAN1_C1FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  76500. begin
  76501. if thebits = 0 then
  76502. pTDefRegMap(@Self)^.clr := $00000020
  76503. else
  76504. pTDefRegMap(@Self)^.&set := $00000020;
  76505. end;
  76506. function TCAN1_C1FSTAT.getFIFOIP5 : TBits_1; inline;
  76507. begin
  76508. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  76509. end;
  76510. procedure TCAN1_C1FSTAT.setFIFOIP6; inline;
  76511. begin
  76512. pTDefRegMap(@Self)^.&set := $00000040;
  76513. end;
  76514. procedure TCAN1_C1FSTAT.clearFIFOIP6; inline;
  76515. begin
  76516. pTDefRegMap(@Self)^.clr := $00000040;
  76517. end;
  76518. procedure TCAN1_C1FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  76519. begin
  76520. if thebits = 0 then
  76521. pTDefRegMap(@Self)^.clr := $00000040
  76522. else
  76523. pTDefRegMap(@Self)^.&set := $00000040;
  76524. end;
  76525. function TCAN1_C1FSTAT.getFIFOIP6 : TBits_1; inline;
  76526. begin
  76527. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  76528. end;
  76529. procedure TCAN1_C1FSTAT.setFIFOIP7; inline;
  76530. begin
  76531. pTDefRegMap(@Self)^.&set := $00000080;
  76532. end;
  76533. procedure TCAN1_C1FSTAT.clearFIFOIP7; inline;
  76534. begin
  76535. pTDefRegMap(@Self)^.clr := $00000080;
  76536. end;
  76537. procedure TCAN1_C1FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  76538. begin
  76539. if thebits = 0 then
  76540. pTDefRegMap(@Self)^.clr := $00000080
  76541. else
  76542. pTDefRegMap(@Self)^.&set := $00000080;
  76543. end;
  76544. function TCAN1_C1FSTAT.getFIFOIP7 : TBits_1; inline;
  76545. begin
  76546. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  76547. end;
  76548. procedure TCAN1_C1FSTAT.setFIFOIP8; inline;
  76549. begin
  76550. pTDefRegMap(@Self)^.&set := $00000100;
  76551. end;
  76552. procedure TCAN1_C1FSTAT.clearFIFOIP8; inline;
  76553. begin
  76554. pTDefRegMap(@Self)^.clr := $00000100;
  76555. end;
  76556. procedure TCAN1_C1FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  76557. begin
  76558. if thebits = 0 then
  76559. pTDefRegMap(@Self)^.clr := $00000100
  76560. else
  76561. pTDefRegMap(@Self)^.&set := $00000100;
  76562. end;
  76563. function TCAN1_C1FSTAT.getFIFOIP8 : TBits_1; inline;
  76564. begin
  76565. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  76566. end;
  76567. procedure TCAN1_C1FSTAT.setFIFOIP9; inline;
  76568. begin
  76569. pTDefRegMap(@Self)^.&set := $00000200;
  76570. end;
  76571. procedure TCAN1_C1FSTAT.clearFIFOIP9; inline;
  76572. begin
  76573. pTDefRegMap(@Self)^.clr := $00000200;
  76574. end;
  76575. procedure TCAN1_C1FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  76576. begin
  76577. if thebits = 0 then
  76578. pTDefRegMap(@Self)^.clr := $00000200
  76579. else
  76580. pTDefRegMap(@Self)^.&set := $00000200;
  76581. end;
  76582. function TCAN1_C1FSTAT.getFIFOIP9 : TBits_1; inline;
  76583. begin
  76584. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  76585. end;
  76586. procedure TCAN1_C1FSTAT.setFIFOIP10; inline;
  76587. begin
  76588. pTDefRegMap(@Self)^.&set := $00000400;
  76589. end;
  76590. procedure TCAN1_C1FSTAT.clearFIFOIP10; inline;
  76591. begin
  76592. pTDefRegMap(@Self)^.clr := $00000400;
  76593. end;
  76594. procedure TCAN1_C1FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  76595. begin
  76596. if thebits = 0 then
  76597. pTDefRegMap(@Self)^.clr := $00000400
  76598. else
  76599. pTDefRegMap(@Self)^.&set := $00000400;
  76600. end;
  76601. function TCAN1_C1FSTAT.getFIFOIP10 : TBits_1; inline;
  76602. begin
  76603. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  76604. end;
  76605. procedure TCAN1_C1FSTAT.setFIFOIP11; inline;
  76606. begin
  76607. pTDefRegMap(@Self)^.&set := $00000800;
  76608. end;
  76609. procedure TCAN1_C1FSTAT.clearFIFOIP11; inline;
  76610. begin
  76611. pTDefRegMap(@Self)^.clr := $00000800;
  76612. end;
  76613. procedure TCAN1_C1FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  76614. begin
  76615. if thebits = 0 then
  76616. pTDefRegMap(@Self)^.clr := $00000800
  76617. else
  76618. pTDefRegMap(@Self)^.&set := $00000800;
  76619. end;
  76620. function TCAN1_C1FSTAT.getFIFOIP11 : TBits_1; inline;
  76621. begin
  76622. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  76623. end;
  76624. procedure TCAN1_C1FSTAT.setFIFOIP12; inline;
  76625. begin
  76626. pTDefRegMap(@Self)^.&set := $00001000;
  76627. end;
  76628. procedure TCAN1_C1FSTAT.clearFIFOIP12; inline;
  76629. begin
  76630. pTDefRegMap(@Self)^.clr := $00001000;
  76631. end;
  76632. procedure TCAN1_C1FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  76633. begin
  76634. if thebits = 0 then
  76635. pTDefRegMap(@Self)^.clr := $00001000
  76636. else
  76637. pTDefRegMap(@Self)^.&set := $00001000;
  76638. end;
  76639. function TCAN1_C1FSTAT.getFIFOIP12 : TBits_1; inline;
  76640. begin
  76641. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  76642. end;
  76643. procedure TCAN1_C1FSTAT.setFIFOIP13; inline;
  76644. begin
  76645. pTDefRegMap(@Self)^.&set := $00002000;
  76646. end;
  76647. procedure TCAN1_C1FSTAT.clearFIFOIP13; inline;
  76648. begin
  76649. pTDefRegMap(@Self)^.clr := $00002000;
  76650. end;
  76651. procedure TCAN1_C1FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  76652. begin
  76653. if thebits = 0 then
  76654. pTDefRegMap(@Self)^.clr := $00002000
  76655. else
  76656. pTDefRegMap(@Self)^.&set := $00002000;
  76657. end;
  76658. function TCAN1_C1FSTAT.getFIFOIP13 : TBits_1; inline;
  76659. begin
  76660. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  76661. end;
  76662. procedure TCAN1_C1FSTAT.setFIFOIP14; inline;
  76663. begin
  76664. pTDefRegMap(@Self)^.&set := $00004000;
  76665. end;
  76666. procedure TCAN1_C1FSTAT.clearFIFOIP14; inline;
  76667. begin
  76668. pTDefRegMap(@Self)^.clr := $00004000;
  76669. end;
  76670. procedure TCAN1_C1FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  76671. begin
  76672. if thebits = 0 then
  76673. pTDefRegMap(@Self)^.clr := $00004000
  76674. else
  76675. pTDefRegMap(@Self)^.&set := $00004000;
  76676. end;
  76677. function TCAN1_C1FSTAT.getFIFOIP14 : TBits_1; inline;
  76678. begin
  76679. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  76680. end;
  76681. procedure TCAN1_C1FSTAT.setFIFOIP15; inline;
  76682. begin
  76683. pTDefRegMap(@Self)^.&set := $00008000;
  76684. end;
  76685. procedure TCAN1_C1FSTAT.clearFIFOIP15; inline;
  76686. begin
  76687. pTDefRegMap(@Self)^.clr := $00008000;
  76688. end;
  76689. procedure TCAN1_C1FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  76690. begin
  76691. if thebits = 0 then
  76692. pTDefRegMap(@Self)^.clr := $00008000
  76693. else
  76694. pTDefRegMap(@Self)^.&set := $00008000;
  76695. end;
  76696. function TCAN1_C1FSTAT.getFIFOIP15 : TBits_1; inline;
  76697. begin
  76698. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  76699. end;
  76700. procedure TCAN1_C1FSTAT.setFIFOIP16; inline;
  76701. begin
  76702. pTDefRegMap(@Self)^.&set := $00010000;
  76703. end;
  76704. procedure TCAN1_C1FSTAT.clearFIFOIP16; inline;
  76705. begin
  76706. pTDefRegMap(@Self)^.clr := $00010000;
  76707. end;
  76708. procedure TCAN1_C1FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  76709. begin
  76710. if thebits = 0 then
  76711. pTDefRegMap(@Self)^.clr := $00010000
  76712. else
  76713. pTDefRegMap(@Self)^.&set := $00010000;
  76714. end;
  76715. function TCAN1_C1FSTAT.getFIFOIP16 : TBits_1; inline;
  76716. begin
  76717. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  76718. end;
  76719. procedure TCAN1_C1FSTAT.setFIFOIP17; inline;
  76720. begin
  76721. pTDefRegMap(@Self)^.&set := $00020000;
  76722. end;
  76723. procedure TCAN1_C1FSTAT.clearFIFOIP17; inline;
  76724. begin
  76725. pTDefRegMap(@Self)^.clr := $00020000;
  76726. end;
  76727. procedure TCAN1_C1FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  76728. begin
  76729. if thebits = 0 then
  76730. pTDefRegMap(@Self)^.clr := $00020000
  76731. else
  76732. pTDefRegMap(@Self)^.&set := $00020000;
  76733. end;
  76734. function TCAN1_C1FSTAT.getFIFOIP17 : TBits_1; inline;
  76735. begin
  76736. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  76737. end;
  76738. procedure TCAN1_C1FSTAT.setFIFOIP18; inline;
  76739. begin
  76740. pTDefRegMap(@Self)^.&set := $00040000;
  76741. end;
  76742. procedure TCAN1_C1FSTAT.clearFIFOIP18; inline;
  76743. begin
  76744. pTDefRegMap(@Self)^.clr := $00040000;
  76745. end;
  76746. procedure TCAN1_C1FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  76747. begin
  76748. if thebits = 0 then
  76749. pTDefRegMap(@Self)^.clr := $00040000
  76750. else
  76751. pTDefRegMap(@Self)^.&set := $00040000;
  76752. end;
  76753. function TCAN1_C1FSTAT.getFIFOIP18 : TBits_1; inline;
  76754. begin
  76755. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  76756. end;
  76757. procedure TCAN1_C1FSTAT.setFIFOIP19; inline;
  76758. begin
  76759. pTDefRegMap(@Self)^.&set := $00080000;
  76760. end;
  76761. procedure TCAN1_C1FSTAT.clearFIFOIP19; inline;
  76762. begin
  76763. pTDefRegMap(@Self)^.clr := $00080000;
  76764. end;
  76765. procedure TCAN1_C1FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  76766. begin
  76767. if thebits = 0 then
  76768. pTDefRegMap(@Self)^.clr := $00080000
  76769. else
  76770. pTDefRegMap(@Self)^.&set := $00080000;
  76771. end;
  76772. function TCAN1_C1FSTAT.getFIFOIP19 : TBits_1; inline;
  76773. begin
  76774. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  76775. end;
  76776. procedure TCAN1_C1FSTAT.setFIFOIP20; inline;
  76777. begin
  76778. pTDefRegMap(@Self)^.&set := $00100000;
  76779. end;
  76780. procedure TCAN1_C1FSTAT.clearFIFOIP20; inline;
  76781. begin
  76782. pTDefRegMap(@Self)^.clr := $00100000;
  76783. end;
  76784. procedure TCAN1_C1FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  76785. begin
  76786. if thebits = 0 then
  76787. pTDefRegMap(@Self)^.clr := $00100000
  76788. else
  76789. pTDefRegMap(@Self)^.&set := $00100000;
  76790. end;
  76791. function TCAN1_C1FSTAT.getFIFOIP20 : TBits_1; inline;
  76792. begin
  76793. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  76794. end;
  76795. procedure TCAN1_C1FSTAT.setFIFOIP21; inline;
  76796. begin
  76797. pTDefRegMap(@Self)^.&set := $00200000;
  76798. end;
  76799. procedure TCAN1_C1FSTAT.clearFIFOIP21; inline;
  76800. begin
  76801. pTDefRegMap(@Self)^.clr := $00200000;
  76802. end;
  76803. procedure TCAN1_C1FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  76804. begin
  76805. if thebits = 0 then
  76806. pTDefRegMap(@Self)^.clr := $00200000
  76807. else
  76808. pTDefRegMap(@Self)^.&set := $00200000;
  76809. end;
  76810. function TCAN1_C1FSTAT.getFIFOIP21 : TBits_1; inline;
  76811. begin
  76812. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  76813. end;
  76814. procedure TCAN1_C1FSTAT.setFIFOIP22; inline;
  76815. begin
  76816. pTDefRegMap(@Self)^.&set := $00400000;
  76817. end;
  76818. procedure TCAN1_C1FSTAT.clearFIFOIP22; inline;
  76819. begin
  76820. pTDefRegMap(@Self)^.clr := $00400000;
  76821. end;
  76822. procedure TCAN1_C1FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  76823. begin
  76824. if thebits = 0 then
  76825. pTDefRegMap(@Self)^.clr := $00400000
  76826. else
  76827. pTDefRegMap(@Self)^.&set := $00400000;
  76828. end;
  76829. function TCAN1_C1FSTAT.getFIFOIP22 : TBits_1; inline;
  76830. begin
  76831. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  76832. end;
  76833. procedure TCAN1_C1FSTAT.setFIFOIP23; inline;
  76834. begin
  76835. pTDefRegMap(@Self)^.&set := $00800000;
  76836. end;
  76837. procedure TCAN1_C1FSTAT.clearFIFOIP23; inline;
  76838. begin
  76839. pTDefRegMap(@Self)^.clr := $00800000;
  76840. end;
  76841. procedure TCAN1_C1FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  76842. begin
  76843. if thebits = 0 then
  76844. pTDefRegMap(@Self)^.clr := $00800000
  76845. else
  76846. pTDefRegMap(@Self)^.&set := $00800000;
  76847. end;
  76848. function TCAN1_C1FSTAT.getFIFOIP23 : TBits_1; inline;
  76849. begin
  76850. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  76851. end;
  76852. procedure TCAN1_C1FSTAT.setFIFOIP24; inline;
  76853. begin
  76854. pTDefRegMap(@Self)^.&set := $01000000;
  76855. end;
  76856. procedure TCAN1_C1FSTAT.clearFIFOIP24; inline;
  76857. begin
  76858. pTDefRegMap(@Self)^.clr := $01000000;
  76859. end;
  76860. procedure TCAN1_C1FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  76861. begin
  76862. if thebits = 0 then
  76863. pTDefRegMap(@Self)^.clr := $01000000
  76864. else
  76865. pTDefRegMap(@Self)^.&set := $01000000;
  76866. end;
  76867. function TCAN1_C1FSTAT.getFIFOIP24 : TBits_1; inline;
  76868. begin
  76869. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  76870. end;
  76871. procedure TCAN1_C1FSTAT.setFIFOIP25; inline;
  76872. begin
  76873. pTDefRegMap(@Self)^.&set := $02000000;
  76874. end;
  76875. procedure TCAN1_C1FSTAT.clearFIFOIP25; inline;
  76876. begin
  76877. pTDefRegMap(@Self)^.clr := $02000000;
  76878. end;
  76879. procedure TCAN1_C1FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  76880. begin
  76881. if thebits = 0 then
  76882. pTDefRegMap(@Self)^.clr := $02000000
  76883. else
  76884. pTDefRegMap(@Self)^.&set := $02000000;
  76885. end;
  76886. function TCAN1_C1FSTAT.getFIFOIP25 : TBits_1; inline;
  76887. begin
  76888. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  76889. end;
  76890. procedure TCAN1_C1FSTAT.setFIFOIP26; inline;
  76891. begin
  76892. pTDefRegMap(@Self)^.&set := $04000000;
  76893. end;
  76894. procedure TCAN1_C1FSTAT.clearFIFOIP26; inline;
  76895. begin
  76896. pTDefRegMap(@Self)^.clr := $04000000;
  76897. end;
  76898. procedure TCAN1_C1FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  76899. begin
  76900. if thebits = 0 then
  76901. pTDefRegMap(@Self)^.clr := $04000000
  76902. else
  76903. pTDefRegMap(@Self)^.&set := $04000000;
  76904. end;
  76905. function TCAN1_C1FSTAT.getFIFOIP26 : TBits_1; inline;
  76906. begin
  76907. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  76908. end;
  76909. procedure TCAN1_C1FSTAT.setFIFOIP27; inline;
  76910. begin
  76911. pTDefRegMap(@Self)^.&set := $08000000;
  76912. end;
  76913. procedure TCAN1_C1FSTAT.clearFIFOIP27; inline;
  76914. begin
  76915. pTDefRegMap(@Self)^.clr := $08000000;
  76916. end;
  76917. procedure TCAN1_C1FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  76918. begin
  76919. if thebits = 0 then
  76920. pTDefRegMap(@Self)^.clr := $08000000
  76921. else
  76922. pTDefRegMap(@Self)^.&set := $08000000;
  76923. end;
  76924. function TCAN1_C1FSTAT.getFIFOIP27 : TBits_1; inline;
  76925. begin
  76926. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  76927. end;
  76928. procedure TCAN1_C1FSTAT.setFIFOIP28; inline;
  76929. begin
  76930. pTDefRegMap(@Self)^.&set := $10000000;
  76931. end;
  76932. procedure TCAN1_C1FSTAT.clearFIFOIP28; inline;
  76933. begin
  76934. pTDefRegMap(@Self)^.clr := $10000000;
  76935. end;
  76936. procedure TCAN1_C1FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  76937. begin
  76938. if thebits = 0 then
  76939. pTDefRegMap(@Self)^.clr := $10000000
  76940. else
  76941. pTDefRegMap(@Self)^.&set := $10000000;
  76942. end;
  76943. function TCAN1_C1FSTAT.getFIFOIP28 : TBits_1; inline;
  76944. begin
  76945. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  76946. end;
  76947. procedure TCAN1_C1FSTAT.setFIFOIP29; inline;
  76948. begin
  76949. pTDefRegMap(@Self)^.&set := $20000000;
  76950. end;
  76951. procedure TCAN1_C1FSTAT.clearFIFOIP29; inline;
  76952. begin
  76953. pTDefRegMap(@Self)^.clr := $20000000;
  76954. end;
  76955. procedure TCAN1_C1FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  76956. begin
  76957. if thebits = 0 then
  76958. pTDefRegMap(@Self)^.clr := $20000000
  76959. else
  76960. pTDefRegMap(@Self)^.&set := $20000000;
  76961. end;
  76962. function TCAN1_C1FSTAT.getFIFOIP29 : TBits_1; inline;
  76963. begin
  76964. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  76965. end;
  76966. procedure TCAN1_C1FSTAT.setFIFOIP30; inline;
  76967. begin
  76968. pTDefRegMap(@Self)^.&set := $40000000;
  76969. end;
  76970. procedure TCAN1_C1FSTAT.clearFIFOIP30; inline;
  76971. begin
  76972. pTDefRegMap(@Self)^.clr := $40000000;
  76973. end;
  76974. procedure TCAN1_C1FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  76975. begin
  76976. if thebits = 0 then
  76977. pTDefRegMap(@Self)^.clr := $40000000
  76978. else
  76979. pTDefRegMap(@Self)^.&set := $40000000;
  76980. end;
  76981. function TCAN1_C1FSTAT.getFIFOIP30 : TBits_1; inline;
  76982. begin
  76983. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  76984. end;
  76985. procedure TCAN1_C1FSTAT.setFIFOIP31; inline;
  76986. begin
  76987. pTDefRegMap(@Self)^.&set := $80000000;
  76988. end;
  76989. procedure TCAN1_C1FSTAT.clearFIFOIP31; inline;
  76990. begin
  76991. pTDefRegMap(@Self)^.clr := $80000000;
  76992. end;
  76993. procedure TCAN1_C1FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  76994. begin
  76995. if thebits = 0 then
  76996. pTDefRegMap(@Self)^.clr := $80000000
  76997. else
  76998. pTDefRegMap(@Self)^.&set := $80000000;
  76999. end;
  77000. function TCAN1_C1FSTAT.getFIFOIP31 : TBits_1; inline;
  77001. begin
  77002. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  77003. end;
  77004. procedure TCAN1_C1FSTAT.setw(thebits : TBits_32); inline;
  77005. begin
  77006. pTDefRegMap(@Self)^.val := thebits;
  77007. end;
  77008. function TCAN1_C1FSTAT.getw : TBits_32; inline;
  77009. begin
  77010. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77011. end;
  77012. procedure TCAN1_C1RXOVF.setRXOVF(thebits : TBits_32); inline;
  77013. begin
  77014. pTDefRegMap(@Self)^.val := thebits;
  77015. end;
  77016. function TCAN1_C1RXOVF.getRXOVF : TBits_32; inline;
  77017. begin
  77018. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77019. end;
  77020. procedure TCAN1_C1RXOVF.setRXOVF0; inline;
  77021. begin
  77022. pTDefRegMap(@Self)^.&set := $00000001;
  77023. end;
  77024. procedure TCAN1_C1RXOVF.clearRXOVF0; inline;
  77025. begin
  77026. pTDefRegMap(@Self)^.clr := $00000001;
  77027. end;
  77028. procedure TCAN1_C1RXOVF.setRXOVF0(thebits : TBits_1); inline;
  77029. begin
  77030. if thebits = 0 then
  77031. pTDefRegMap(@Self)^.clr := $00000001
  77032. else
  77033. pTDefRegMap(@Self)^.&set := $00000001;
  77034. end;
  77035. function TCAN1_C1RXOVF.getRXOVF0 : TBits_1; inline;
  77036. begin
  77037. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  77038. end;
  77039. procedure TCAN1_C1RXOVF.setRXOVF1; inline;
  77040. begin
  77041. pTDefRegMap(@Self)^.&set := $00000002;
  77042. end;
  77043. procedure TCAN1_C1RXOVF.clearRXOVF1; inline;
  77044. begin
  77045. pTDefRegMap(@Self)^.clr := $00000002;
  77046. end;
  77047. procedure TCAN1_C1RXOVF.setRXOVF1(thebits : TBits_1); inline;
  77048. begin
  77049. if thebits = 0 then
  77050. pTDefRegMap(@Self)^.clr := $00000002
  77051. else
  77052. pTDefRegMap(@Self)^.&set := $00000002;
  77053. end;
  77054. function TCAN1_C1RXOVF.getRXOVF1 : TBits_1; inline;
  77055. begin
  77056. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  77057. end;
  77058. procedure TCAN1_C1RXOVF.setRXOVF2; inline;
  77059. begin
  77060. pTDefRegMap(@Self)^.&set := $00000004;
  77061. end;
  77062. procedure TCAN1_C1RXOVF.clearRXOVF2; inline;
  77063. begin
  77064. pTDefRegMap(@Self)^.clr := $00000004;
  77065. end;
  77066. procedure TCAN1_C1RXOVF.setRXOVF2(thebits : TBits_1); inline;
  77067. begin
  77068. if thebits = 0 then
  77069. pTDefRegMap(@Self)^.clr := $00000004
  77070. else
  77071. pTDefRegMap(@Self)^.&set := $00000004;
  77072. end;
  77073. function TCAN1_C1RXOVF.getRXOVF2 : TBits_1; inline;
  77074. begin
  77075. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  77076. end;
  77077. procedure TCAN1_C1RXOVF.setRXOVF3; inline;
  77078. begin
  77079. pTDefRegMap(@Self)^.&set := $00000008;
  77080. end;
  77081. procedure TCAN1_C1RXOVF.clearRXOVF3; inline;
  77082. begin
  77083. pTDefRegMap(@Self)^.clr := $00000008;
  77084. end;
  77085. procedure TCAN1_C1RXOVF.setRXOVF3(thebits : TBits_1); inline;
  77086. begin
  77087. if thebits = 0 then
  77088. pTDefRegMap(@Self)^.clr := $00000008
  77089. else
  77090. pTDefRegMap(@Self)^.&set := $00000008;
  77091. end;
  77092. function TCAN1_C1RXOVF.getRXOVF3 : TBits_1; inline;
  77093. begin
  77094. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  77095. end;
  77096. procedure TCAN1_C1RXOVF.setRXOVF4; inline;
  77097. begin
  77098. pTDefRegMap(@Self)^.&set := $00000010;
  77099. end;
  77100. procedure TCAN1_C1RXOVF.clearRXOVF4; inline;
  77101. begin
  77102. pTDefRegMap(@Self)^.clr := $00000010;
  77103. end;
  77104. procedure TCAN1_C1RXOVF.setRXOVF4(thebits : TBits_1); inline;
  77105. begin
  77106. if thebits = 0 then
  77107. pTDefRegMap(@Self)^.clr := $00000010
  77108. else
  77109. pTDefRegMap(@Self)^.&set := $00000010;
  77110. end;
  77111. function TCAN1_C1RXOVF.getRXOVF4 : TBits_1; inline;
  77112. begin
  77113. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  77114. end;
  77115. procedure TCAN1_C1RXOVF.setRXOVF5; inline;
  77116. begin
  77117. pTDefRegMap(@Self)^.&set := $00000020;
  77118. end;
  77119. procedure TCAN1_C1RXOVF.clearRXOVF5; inline;
  77120. begin
  77121. pTDefRegMap(@Self)^.clr := $00000020;
  77122. end;
  77123. procedure TCAN1_C1RXOVF.setRXOVF5(thebits : TBits_1); inline;
  77124. begin
  77125. if thebits = 0 then
  77126. pTDefRegMap(@Self)^.clr := $00000020
  77127. else
  77128. pTDefRegMap(@Self)^.&set := $00000020;
  77129. end;
  77130. function TCAN1_C1RXOVF.getRXOVF5 : TBits_1; inline;
  77131. begin
  77132. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  77133. end;
  77134. procedure TCAN1_C1RXOVF.setRXOVF6; inline;
  77135. begin
  77136. pTDefRegMap(@Self)^.&set := $00000040;
  77137. end;
  77138. procedure TCAN1_C1RXOVF.clearRXOVF6; inline;
  77139. begin
  77140. pTDefRegMap(@Self)^.clr := $00000040;
  77141. end;
  77142. procedure TCAN1_C1RXOVF.setRXOVF6(thebits : TBits_1); inline;
  77143. begin
  77144. if thebits = 0 then
  77145. pTDefRegMap(@Self)^.clr := $00000040
  77146. else
  77147. pTDefRegMap(@Self)^.&set := $00000040;
  77148. end;
  77149. function TCAN1_C1RXOVF.getRXOVF6 : TBits_1; inline;
  77150. begin
  77151. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  77152. end;
  77153. procedure TCAN1_C1RXOVF.setRXOVF7; inline;
  77154. begin
  77155. pTDefRegMap(@Self)^.&set := $00000080;
  77156. end;
  77157. procedure TCAN1_C1RXOVF.clearRXOVF7; inline;
  77158. begin
  77159. pTDefRegMap(@Self)^.clr := $00000080;
  77160. end;
  77161. procedure TCAN1_C1RXOVF.setRXOVF7(thebits : TBits_1); inline;
  77162. begin
  77163. if thebits = 0 then
  77164. pTDefRegMap(@Self)^.clr := $00000080
  77165. else
  77166. pTDefRegMap(@Self)^.&set := $00000080;
  77167. end;
  77168. function TCAN1_C1RXOVF.getRXOVF7 : TBits_1; inline;
  77169. begin
  77170. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77171. end;
  77172. procedure TCAN1_C1RXOVF.setRXOVF8; inline;
  77173. begin
  77174. pTDefRegMap(@Self)^.&set := $00000100;
  77175. end;
  77176. procedure TCAN1_C1RXOVF.clearRXOVF8; inline;
  77177. begin
  77178. pTDefRegMap(@Self)^.clr := $00000100;
  77179. end;
  77180. procedure TCAN1_C1RXOVF.setRXOVF8(thebits : TBits_1); inline;
  77181. begin
  77182. if thebits = 0 then
  77183. pTDefRegMap(@Self)^.clr := $00000100
  77184. else
  77185. pTDefRegMap(@Self)^.&set := $00000100;
  77186. end;
  77187. function TCAN1_C1RXOVF.getRXOVF8 : TBits_1; inline;
  77188. begin
  77189. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  77190. end;
  77191. procedure TCAN1_C1RXOVF.setRXOVF9; inline;
  77192. begin
  77193. pTDefRegMap(@Self)^.&set := $00000200;
  77194. end;
  77195. procedure TCAN1_C1RXOVF.clearRXOVF9; inline;
  77196. begin
  77197. pTDefRegMap(@Self)^.clr := $00000200;
  77198. end;
  77199. procedure TCAN1_C1RXOVF.setRXOVF9(thebits : TBits_1); inline;
  77200. begin
  77201. if thebits = 0 then
  77202. pTDefRegMap(@Self)^.clr := $00000200
  77203. else
  77204. pTDefRegMap(@Self)^.&set := $00000200;
  77205. end;
  77206. function TCAN1_C1RXOVF.getRXOVF9 : TBits_1; inline;
  77207. begin
  77208. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  77209. end;
  77210. procedure TCAN1_C1RXOVF.setRXOVF10; inline;
  77211. begin
  77212. pTDefRegMap(@Self)^.&set := $00000400;
  77213. end;
  77214. procedure TCAN1_C1RXOVF.clearRXOVF10; inline;
  77215. begin
  77216. pTDefRegMap(@Self)^.clr := $00000400;
  77217. end;
  77218. procedure TCAN1_C1RXOVF.setRXOVF10(thebits : TBits_1); inline;
  77219. begin
  77220. if thebits = 0 then
  77221. pTDefRegMap(@Self)^.clr := $00000400
  77222. else
  77223. pTDefRegMap(@Self)^.&set := $00000400;
  77224. end;
  77225. function TCAN1_C1RXOVF.getRXOVF10 : TBits_1; inline;
  77226. begin
  77227. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  77228. end;
  77229. procedure TCAN1_C1RXOVF.setRXOVF11; inline;
  77230. begin
  77231. pTDefRegMap(@Self)^.&set := $00000800;
  77232. end;
  77233. procedure TCAN1_C1RXOVF.clearRXOVF11; inline;
  77234. begin
  77235. pTDefRegMap(@Self)^.clr := $00000800;
  77236. end;
  77237. procedure TCAN1_C1RXOVF.setRXOVF11(thebits : TBits_1); inline;
  77238. begin
  77239. if thebits = 0 then
  77240. pTDefRegMap(@Self)^.clr := $00000800
  77241. else
  77242. pTDefRegMap(@Self)^.&set := $00000800;
  77243. end;
  77244. function TCAN1_C1RXOVF.getRXOVF11 : TBits_1; inline;
  77245. begin
  77246. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  77247. end;
  77248. procedure TCAN1_C1RXOVF.setRXOVF12; inline;
  77249. begin
  77250. pTDefRegMap(@Self)^.&set := $00001000;
  77251. end;
  77252. procedure TCAN1_C1RXOVF.clearRXOVF12; inline;
  77253. begin
  77254. pTDefRegMap(@Self)^.clr := $00001000;
  77255. end;
  77256. procedure TCAN1_C1RXOVF.setRXOVF12(thebits : TBits_1); inline;
  77257. begin
  77258. if thebits = 0 then
  77259. pTDefRegMap(@Self)^.clr := $00001000
  77260. else
  77261. pTDefRegMap(@Self)^.&set := $00001000;
  77262. end;
  77263. function TCAN1_C1RXOVF.getRXOVF12 : TBits_1; inline;
  77264. begin
  77265. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  77266. end;
  77267. procedure TCAN1_C1RXOVF.setRXOVF13; inline;
  77268. begin
  77269. pTDefRegMap(@Self)^.&set := $00002000;
  77270. end;
  77271. procedure TCAN1_C1RXOVF.clearRXOVF13; inline;
  77272. begin
  77273. pTDefRegMap(@Self)^.clr := $00002000;
  77274. end;
  77275. procedure TCAN1_C1RXOVF.setRXOVF13(thebits : TBits_1); inline;
  77276. begin
  77277. if thebits = 0 then
  77278. pTDefRegMap(@Self)^.clr := $00002000
  77279. else
  77280. pTDefRegMap(@Self)^.&set := $00002000;
  77281. end;
  77282. function TCAN1_C1RXOVF.getRXOVF13 : TBits_1; inline;
  77283. begin
  77284. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  77285. end;
  77286. procedure TCAN1_C1RXOVF.setRXOVF14; inline;
  77287. begin
  77288. pTDefRegMap(@Self)^.&set := $00004000;
  77289. end;
  77290. procedure TCAN1_C1RXOVF.clearRXOVF14; inline;
  77291. begin
  77292. pTDefRegMap(@Self)^.clr := $00004000;
  77293. end;
  77294. procedure TCAN1_C1RXOVF.setRXOVF14(thebits : TBits_1); inline;
  77295. begin
  77296. if thebits = 0 then
  77297. pTDefRegMap(@Self)^.clr := $00004000
  77298. else
  77299. pTDefRegMap(@Self)^.&set := $00004000;
  77300. end;
  77301. function TCAN1_C1RXOVF.getRXOVF14 : TBits_1; inline;
  77302. begin
  77303. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  77304. end;
  77305. procedure TCAN1_C1RXOVF.setRXOVF15; inline;
  77306. begin
  77307. pTDefRegMap(@Self)^.&set := $00008000;
  77308. end;
  77309. procedure TCAN1_C1RXOVF.clearRXOVF15; inline;
  77310. begin
  77311. pTDefRegMap(@Self)^.clr := $00008000;
  77312. end;
  77313. procedure TCAN1_C1RXOVF.setRXOVF15(thebits : TBits_1); inline;
  77314. begin
  77315. if thebits = 0 then
  77316. pTDefRegMap(@Self)^.clr := $00008000
  77317. else
  77318. pTDefRegMap(@Self)^.&set := $00008000;
  77319. end;
  77320. function TCAN1_C1RXOVF.getRXOVF15 : TBits_1; inline;
  77321. begin
  77322. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  77323. end;
  77324. procedure TCAN1_C1RXOVF.setRXOVF16; inline;
  77325. begin
  77326. pTDefRegMap(@Self)^.&set := $00010000;
  77327. end;
  77328. procedure TCAN1_C1RXOVF.clearRXOVF16; inline;
  77329. begin
  77330. pTDefRegMap(@Self)^.clr := $00010000;
  77331. end;
  77332. procedure TCAN1_C1RXOVF.setRXOVF16(thebits : TBits_1); inline;
  77333. begin
  77334. if thebits = 0 then
  77335. pTDefRegMap(@Self)^.clr := $00010000
  77336. else
  77337. pTDefRegMap(@Self)^.&set := $00010000;
  77338. end;
  77339. function TCAN1_C1RXOVF.getRXOVF16 : TBits_1; inline;
  77340. begin
  77341. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  77342. end;
  77343. procedure TCAN1_C1RXOVF.setRXOVF17; inline;
  77344. begin
  77345. pTDefRegMap(@Self)^.&set := $00020000;
  77346. end;
  77347. procedure TCAN1_C1RXOVF.clearRXOVF17; inline;
  77348. begin
  77349. pTDefRegMap(@Self)^.clr := $00020000;
  77350. end;
  77351. procedure TCAN1_C1RXOVF.setRXOVF17(thebits : TBits_1); inline;
  77352. begin
  77353. if thebits = 0 then
  77354. pTDefRegMap(@Self)^.clr := $00020000
  77355. else
  77356. pTDefRegMap(@Self)^.&set := $00020000;
  77357. end;
  77358. function TCAN1_C1RXOVF.getRXOVF17 : TBits_1; inline;
  77359. begin
  77360. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  77361. end;
  77362. procedure TCAN1_C1RXOVF.setRXOVF18; inline;
  77363. begin
  77364. pTDefRegMap(@Self)^.&set := $00040000;
  77365. end;
  77366. procedure TCAN1_C1RXOVF.clearRXOVF18; inline;
  77367. begin
  77368. pTDefRegMap(@Self)^.clr := $00040000;
  77369. end;
  77370. procedure TCAN1_C1RXOVF.setRXOVF18(thebits : TBits_1); inline;
  77371. begin
  77372. if thebits = 0 then
  77373. pTDefRegMap(@Self)^.clr := $00040000
  77374. else
  77375. pTDefRegMap(@Self)^.&set := $00040000;
  77376. end;
  77377. function TCAN1_C1RXOVF.getRXOVF18 : TBits_1; inline;
  77378. begin
  77379. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  77380. end;
  77381. procedure TCAN1_C1RXOVF.setRXOVF19; inline;
  77382. begin
  77383. pTDefRegMap(@Self)^.&set := $00080000;
  77384. end;
  77385. procedure TCAN1_C1RXOVF.clearRXOVF19; inline;
  77386. begin
  77387. pTDefRegMap(@Self)^.clr := $00080000;
  77388. end;
  77389. procedure TCAN1_C1RXOVF.setRXOVF19(thebits : TBits_1); inline;
  77390. begin
  77391. if thebits = 0 then
  77392. pTDefRegMap(@Self)^.clr := $00080000
  77393. else
  77394. pTDefRegMap(@Self)^.&set := $00080000;
  77395. end;
  77396. function TCAN1_C1RXOVF.getRXOVF19 : TBits_1; inline;
  77397. begin
  77398. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77399. end;
  77400. procedure TCAN1_C1RXOVF.setRXOVF20; inline;
  77401. begin
  77402. pTDefRegMap(@Self)^.&set := $00100000;
  77403. end;
  77404. procedure TCAN1_C1RXOVF.clearRXOVF20; inline;
  77405. begin
  77406. pTDefRegMap(@Self)^.clr := $00100000;
  77407. end;
  77408. procedure TCAN1_C1RXOVF.setRXOVF20(thebits : TBits_1); inline;
  77409. begin
  77410. if thebits = 0 then
  77411. pTDefRegMap(@Self)^.clr := $00100000
  77412. else
  77413. pTDefRegMap(@Self)^.&set := $00100000;
  77414. end;
  77415. function TCAN1_C1RXOVF.getRXOVF20 : TBits_1; inline;
  77416. begin
  77417. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  77418. end;
  77419. procedure TCAN1_C1RXOVF.setRXOVF21; inline;
  77420. begin
  77421. pTDefRegMap(@Self)^.&set := $00200000;
  77422. end;
  77423. procedure TCAN1_C1RXOVF.clearRXOVF21; inline;
  77424. begin
  77425. pTDefRegMap(@Self)^.clr := $00200000;
  77426. end;
  77427. procedure TCAN1_C1RXOVF.setRXOVF21(thebits : TBits_1); inline;
  77428. begin
  77429. if thebits = 0 then
  77430. pTDefRegMap(@Self)^.clr := $00200000
  77431. else
  77432. pTDefRegMap(@Self)^.&set := $00200000;
  77433. end;
  77434. function TCAN1_C1RXOVF.getRXOVF21 : TBits_1; inline;
  77435. begin
  77436. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  77437. end;
  77438. procedure TCAN1_C1RXOVF.setRXOVF22; inline;
  77439. begin
  77440. pTDefRegMap(@Self)^.&set := $00400000;
  77441. end;
  77442. procedure TCAN1_C1RXOVF.clearRXOVF22; inline;
  77443. begin
  77444. pTDefRegMap(@Self)^.clr := $00400000;
  77445. end;
  77446. procedure TCAN1_C1RXOVF.setRXOVF22(thebits : TBits_1); inline;
  77447. begin
  77448. if thebits = 0 then
  77449. pTDefRegMap(@Self)^.clr := $00400000
  77450. else
  77451. pTDefRegMap(@Self)^.&set := $00400000;
  77452. end;
  77453. function TCAN1_C1RXOVF.getRXOVF22 : TBits_1; inline;
  77454. begin
  77455. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  77456. end;
  77457. procedure TCAN1_C1RXOVF.setRXOVF23; inline;
  77458. begin
  77459. pTDefRegMap(@Self)^.&set := $00800000;
  77460. end;
  77461. procedure TCAN1_C1RXOVF.clearRXOVF23; inline;
  77462. begin
  77463. pTDefRegMap(@Self)^.clr := $00800000;
  77464. end;
  77465. procedure TCAN1_C1RXOVF.setRXOVF23(thebits : TBits_1); inline;
  77466. begin
  77467. if thebits = 0 then
  77468. pTDefRegMap(@Self)^.clr := $00800000
  77469. else
  77470. pTDefRegMap(@Self)^.&set := $00800000;
  77471. end;
  77472. function TCAN1_C1RXOVF.getRXOVF23 : TBits_1; inline;
  77473. begin
  77474. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  77475. end;
  77476. procedure TCAN1_C1RXOVF.setRXOVF24; inline;
  77477. begin
  77478. pTDefRegMap(@Self)^.&set := $01000000;
  77479. end;
  77480. procedure TCAN1_C1RXOVF.clearRXOVF24; inline;
  77481. begin
  77482. pTDefRegMap(@Self)^.clr := $01000000;
  77483. end;
  77484. procedure TCAN1_C1RXOVF.setRXOVF24(thebits : TBits_1); inline;
  77485. begin
  77486. if thebits = 0 then
  77487. pTDefRegMap(@Self)^.clr := $01000000
  77488. else
  77489. pTDefRegMap(@Self)^.&set := $01000000;
  77490. end;
  77491. function TCAN1_C1RXOVF.getRXOVF24 : TBits_1; inline;
  77492. begin
  77493. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  77494. end;
  77495. procedure TCAN1_C1RXOVF.setRXOVF25; inline;
  77496. begin
  77497. pTDefRegMap(@Self)^.&set := $02000000;
  77498. end;
  77499. procedure TCAN1_C1RXOVF.clearRXOVF25; inline;
  77500. begin
  77501. pTDefRegMap(@Self)^.clr := $02000000;
  77502. end;
  77503. procedure TCAN1_C1RXOVF.setRXOVF25(thebits : TBits_1); inline;
  77504. begin
  77505. if thebits = 0 then
  77506. pTDefRegMap(@Self)^.clr := $02000000
  77507. else
  77508. pTDefRegMap(@Self)^.&set := $02000000;
  77509. end;
  77510. function TCAN1_C1RXOVF.getRXOVF25 : TBits_1; inline;
  77511. begin
  77512. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  77513. end;
  77514. procedure TCAN1_C1RXOVF.setRXOVF26; inline;
  77515. begin
  77516. pTDefRegMap(@Self)^.&set := $04000000;
  77517. end;
  77518. procedure TCAN1_C1RXOVF.clearRXOVF26; inline;
  77519. begin
  77520. pTDefRegMap(@Self)^.clr := $04000000;
  77521. end;
  77522. procedure TCAN1_C1RXOVF.setRXOVF26(thebits : TBits_1); inline;
  77523. begin
  77524. if thebits = 0 then
  77525. pTDefRegMap(@Self)^.clr := $04000000
  77526. else
  77527. pTDefRegMap(@Self)^.&set := $04000000;
  77528. end;
  77529. function TCAN1_C1RXOVF.getRXOVF26 : TBits_1; inline;
  77530. begin
  77531. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  77532. end;
  77533. procedure TCAN1_C1RXOVF.setRXOVF27; inline;
  77534. begin
  77535. pTDefRegMap(@Self)^.&set := $08000000;
  77536. end;
  77537. procedure TCAN1_C1RXOVF.clearRXOVF27; inline;
  77538. begin
  77539. pTDefRegMap(@Self)^.clr := $08000000;
  77540. end;
  77541. procedure TCAN1_C1RXOVF.setRXOVF27(thebits : TBits_1); inline;
  77542. begin
  77543. if thebits = 0 then
  77544. pTDefRegMap(@Self)^.clr := $08000000
  77545. else
  77546. pTDefRegMap(@Self)^.&set := $08000000;
  77547. end;
  77548. function TCAN1_C1RXOVF.getRXOVF27 : TBits_1; inline;
  77549. begin
  77550. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  77551. end;
  77552. procedure TCAN1_C1RXOVF.setRXOVF28; inline;
  77553. begin
  77554. pTDefRegMap(@Self)^.&set := $10000000;
  77555. end;
  77556. procedure TCAN1_C1RXOVF.clearRXOVF28; inline;
  77557. begin
  77558. pTDefRegMap(@Self)^.clr := $10000000;
  77559. end;
  77560. procedure TCAN1_C1RXOVF.setRXOVF28(thebits : TBits_1); inline;
  77561. begin
  77562. if thebits = 0 then
  77563. pTDefRegMap(@Self)^.clr := $10000000
  77564. else
  77565. pTDefRegMap(@Self)^.&set := $10000000;
  77566. end;
  77567. function TCAN1_C1RXOVF.getRXOVF28 : TBits_1; inline;
  77568. begin
  77569. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  77570. end;
  77571. procedure TCAN1_C1RXOVF.setRXOVF29; inline;
  77572. begin
  77573. pTDefRegMap(@Self)^.&set := $20000000;
  77574. end;
  77575. procedure TCAN1_C1RXOVF.clearRXOVF29; inline;
  77576. begin
  77577. pTDefRegMap(@Self)^.clr := $20000000;
  77578. end;
  77579. procedure TCAN1_C1RXOVF.setRXOVF29(thebits : TBits_1); inline;
  77580. begin
  77581. if thebits = 0 then
  77582. pTDefRegMap(@Self)^.clr := $20000000
  77583. else
  77584. pTDefRegMap(@Self)^.&set := $20000000;
  77585. end;
  77586. function TCAN1_C1RXOVF.getRXOVF29 : TBits_1; inline;
  77587. begin
  77588. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  77589. end;
  77590. procedure TCAN1_C1RXOVF.setRXOVF30; inline;
  77591. begin
  77592. pTDefRegMap(@Self)^.&set := $40000000;
  77593. end;
  77594. procedure TCAN1_C1RXOVF.clearRXOVF30; inline;
  77595. begin
  77596. pTDefRegMap(@Self)^.clr := $40000000;
  77597. end;
  77598. procedure TCAN1_C1RXOVF.setRXOVF30(thebits : TBits_1); inline;
  77599. begin
  77600. if thebits = 0 then
  77601. pTDefRegMap(@Self)^.clr := $40000000
  77602. else
  77603. pTDefRegMap(@Self)^.&set := $40000000;
  77604. end;
  77605. function TCAN1_C1RXOVF.getRXOVF30 : TBits_1; inline;
  77606. begin
  77607. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  77608. end;
  77609. procedure TCAN1_C1RXOVF.setRXOVF31; inline;
  77610. begin
  77611. pTDefRegMap(@Self)^.&set := $80000000;
  77612. end;
  77613. procedure TCAN1_C1RXOVF.clearRXOVF31; inline;
  77614. begin
  77615. pTDefRegMap(@Self)^.clr := $80000000;
  77616. end;
  77617. procedure TCAN1_C1RXOVF.setRXOVF31(thebits : TBits_1); inline;
  77618. begin
  77619. if thebits = 0 then
  77620. pTDefRegMap(@Self)^.clr := $80000000
  77621. else
  77622. pTDefRegMap(@Self)^.&set := $80000000;
  77623. end;
  77624. function TCAN1_C1RXOVF.getRXOVF31 : TBits_1; inline;
  77625. begin
  77626. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  77627. end;
  77628. procedure TCAN1_C1RXOVF.setw(thebits : TBits_32); inline;
  77629. begin
  77630. pTDefRegMap(@Self)^.val := thebits;
  77631. end;
  77632. function TCAN1_C1RXOVF.getw : TBits_32; inline;
  77633. begin
  77634. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77635. end;
  77636. procedure TCAN1_C1TMR.setCANTSPRE(thebits : TBits_16); inline;
  77637. begin
  77638. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  77639. end;
  77640. function TCAN1_C1TMR.getCANTSPRE : TBits_16; inline;
  77641. begin
  77642. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  77643. end;
  77644. procedure TCAN1_C1TMR.setCANTS(thebits : TBits_16); inline;
  77645. begin
  77646. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  77647. end;
  77648. function TCAN1_C1TMR.getCANTS : TBits_16; inline;
  77649. begin
  77650. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  77651. end;
  77652. procedure TCAN1_C1TMR.setw(thebits : TBits_32); inline;
  77653. begin
  77654. pTDefRegMap(@Self)^.val := thebits;
  77655. end;
  77656. function TCAN1_C1TMR.getw : TBits_32; inline;
  77657. begin
  77658. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77659. end;
  77660. procedure TCAN1_C1RXM0.setEID(thebits : TBits_18); inline;
  77661. begin
  77662. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  77663. end;
  77664. function TCAN1_C1RXM0.getEID : TBits_18; inline;
  77665. begin
  77666. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  77667. end;
  77668. procedure TCAN1_C1RXM0.setMIDE; inline;
  77669. begin
  77670. pTDefRegMap(@Self)^.&set := $00080000;
  77671. end;
  77672. procedure TCAN1_C1RXM0.clearMIDE; inline;
  77673. begin
  77674. pTDefRegMap(@Self)^.clr := $00080000;
  77675. end;
  77676. procedure TCAN1_C1RXM0.setMIDE(thebits : TBits_1); inline;
  77677. begin
  77678. if thebits = 0 then
  77679. pTDefRegMap(@Self)^.clr := $00080000
  77680. else
  77681. pTDefRegMap(@Self)^.&set := $00080000;
  77682. end;
  77683. function TCAN1_C1RXM0.getMIDE : TBits_1; inline;
  77684. begin
  77685. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77686. end;
  77687. procedure TCAN1_C1RXM0.setSID(thebits : TBits_11); inline;
  77688. begin
  77689. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  77690. end;
  77691. function TCAN1_C1RXM0.getSID : TBits_11; inline;
  77692. begin
  77693. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  77694. end;
  77695. procedure TCAN1_C1RXM0.setw(thebits : TBits_32); inline;
  77696. begin
  77697. pTDefRegMap(@Self)^.val := thebits;
  77698. end;
  77699. function TCAN1_C1RXM0.getw : TBits_32; inline;
  77700. begin
  77701. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77702. end;
  77703. procedure TCAN1_C1RXM1.setEID(thebits : TBits_18); inline;
  77704. begin
  77705. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  77706. end;
  77707. function TCAN1_C1RXM1.getEID : TBits_18; inline;
  77708. begin
  77709. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  77710. end;
  77711. procedure TCAN1_C1RXM1.setMIDE; inline;
  77712. begin
  77713. pTDefRegMap(@Self)^.&set := $00080000;
  77714. end;
  77715. procedure TCAN1_C1RXM1.clearMIDE; inline;
  77716. begin
  77717. pTDefRegMap(@Self)^.clr := $00080000;
  77718. end;
  77719. procedure TCAN1_C1RXM1.setMIDE(thebits : TBits_1); inline;
  77720. begin
  77721. if thebits = 0 then
  77722. pTDefRegMap(@Self)^.clr := $00080000
  77723. else
  77724. pTDefRegMap(@Self)^.&set := $00080000;
  77725. end;
  77726. function TCAN1_C1RXM1.getMIDE : TBits_1; inline;
  77727. begin
  77728. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77729. end;
  77730. procedure TCAN1_C1RXM1.setSID(thebits : TBits_11); inline;
  77731. begin
  77732. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  77733. end;
  77734. function TCAN1_C1RXM1.getSID : TBits_11; inline;
  77735. begin
  77736. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  77737. end;
  77738. procedure TCAN1_C1RXM1.setw(thebits : TBits_32); inline;
  77739. begin
  77740. pTDefRegMap(@Self)^.val := thebits;
  77741. end;
  77742. function TCAN1_C1RXM1.getw : TBits_32; inline;
  77743. begin
  77744. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77745. end;
  77746. procedure TCAN1_C1RXM2.setEID(thebits : TBits_18); inline;
  77747. begin
  77748. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  77749. end;
  77750. function TCAN1_C1RXM2.getEID : TBits_18; inline;
  77751. begin
  77752. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  77753. end;
  77754. procedure TCAN1_C1RXM2.setMIDE; inline;
  77755. begin
  77756. pTDefRegMap(@Self)^.&set := $00080000;
  77757. end;
  77758. procedure TCAN1_C1RXM2.clearMIDE; inline;
  77759. begin
  77760. pTDefRegMap(@Self)^.clr := $00080000;
  77761. end;
  77762. procedure TCAN1_C1RXM2.setMIDE(thebits : TBits_1); inline;
  77763. begin
  77764. if thebits = 0 then
  77765. pTDefRegMap(@Self)^.clr := $00080000
  77766. else
  77767. pTDefRegMap(@Self)^.&set := $00080000;
  77768. end;
  77769. function TCAN1_C1RXM2.getMIDE : TBits_1; inline;
  77770. begin
  77771. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77772. end;
  77773. procedure TCAN1_C1RXM2.setSID(thebits : TBits_11); inline;
  77774. begin
  77775. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  77776. end;
  77777. function TCAN1_C1RXM2.getSID : TBits_11; inline;
  77778. begin
  77779. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  77780. end;
  77781. procedure TCAN1_C1RXM2.setw(thebits : TBits_32); inline;
  77782. begin
  77783. pTDefRegMap(@Self)^.val := thebits;
  77784. end;
  77785. function TCAN1_C1RXM2.getw : TBits_32; inline;
  77786. begin
  77787. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77788. end;
  77789. procedure TCAN1_C1RXM3.setEID(thebits : TBits_18); inline;
  77790. begin
  77791. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  77792. end;
  77793. function TCAN1_C1RXM3.getEID : TBits_18; inline;
  77794. begin
  77795. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  77796. end;
  77797. procedure TCAN1_C1RXM3.setMIDE; inline;
  77798. begin
  77799. pTDefRegMap(@Self)^.&set := $00080000;
  77800. end;
  77801. procedure TCAN1_C1RXM3.clearMIDE; inline;
  77802. begin
  77803. pTDefRegMap(@Self)^.clr := $00080000;
  77804. end;
  77805. procedure TCAN1_C1RXM3.setMIDE(thebits : TBits_1); inline;
  77806. begin
  77807. if thebits = 0 then
  77808. pTDefRegMap(@Self)^.clr := $00080000
  77809. else
  77810. pTDefRegMap(@Self)^.&set := $00080000;
  77811. end;
  77812. function TCAN1_C1RXM3.getMIDE : TBits_1; inline;
  77813. begin
  77814. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  77815. end;
  77816. procedure TCAN1_C1RXM3.setSID(thebits : TBits_11); inline;
  77817. begin
  77818. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  77819. end;
  77820. function TCAN1_C1RXM3.getSID : TBits_11; inline;
  77821. begin
  77822. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  77823. end;
  77824. procedure TCAN1_C1RXM3.setw(thebits : TBits_32); inline;
  77825. begin
  77826. pTDefRegMap(@Self)^.val := thebits;
  77827. end;
  77828. function TCAN1_C1RXM3.getw : TBits_32; inline;
  77829. begin
  77830. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77831. end;
  77832. procedure TCAN1_C1FLTCON0.setFSEL0(thebits : TBits_5); inline;
  77833. begin
  77834. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77835. end;
  77836. function TCAN1_C1FLTCON0.getFSEL0 : TBits_5; inline;
  77837. begin
  77838. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77839. end;
  77840. procedure TCAN1_C1FLTCON0.setMSEL0(thebits : TBits_2); inline;
  77841. begin
  77842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  77843. end;
  77844. function TCAN1_C1FLTCON0.getMSEL0 : TBits_2; inline;
  77845. begin
  77846. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  77847. end;
  77848. procedure TCAN1_C1FLTCON0.setFLTEN0; inline;
  77849. begin
  77850. pTDefRegMap(@Self)^.&set := $00000080;
  77851. end;
  77852. procedure TCAN1_C1FLTCON0.clearFLTEN0; inline;
  77853. begin
  77854. pTDefRegMap(@Self)^.clr := $00000080;
  77855. end;
  77856. procedure TCAN1_C1FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  77857. begin
  77858. if thebits = 0 then
  77859. pTDefRegMap(@Self)^.clr := $00000080
  77860. else
  77861. pTDefRegMap(@Self)^.&set := $00000080;
  77862. end;
  77863. function TCAN1_C1FLTCON0.getFLTEN0 : TBits_1; inline;
  77864. begin
  77865. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  77866. end;
  77867. procedure TCAN1_C1FLTCON0.setFSEL1(thebits : TBits_5); inline;
  77868. begin
  77869. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  77870. end;
  77871. function TCAN1_C1FLTCON0.getFSEL1 : TBits_5; inline;
  77872. begin
  77873. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  77874. end;
  77875. procedure TCAN1_C1FLTCON0.setMSEL1(thebits : TBits_2); inline;
  77876. begin
  77877. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  77878. end;
  77879. function TCAN1_C1FLTCON0.getMSEL1 : TBits_2; inline;
  77880. begin
  77881. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  77882. end;
  77883. procedure TCAN1_C1FLTCON0.setFLTEN1; inline;
  77884. begin
  77885. pTDefRegMap(@Self)^.&set := $00008000;
  77886. end;
  77887. procedure TCAN1_C1FLTCON0.clearFLTEN1; inline;
  77888. begin
  77889. pTDefRegMap(@Self)^.clr := $00008000;
  77890. end;
  77891. procedure TCAN1_C1FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  77892. begin
  77893. if thebits = 0 then
  77894. pTDefRegMap(@Self)^.clr := $00008000
  77895. else
  77896. pTDefRegMap(@Self)^.&set := $00008000;
  77897. end;
  77898. function TCAN1_C1FLTCON0.getFLTEN1 : TBits_1; inline;
  77899. begin
  77900. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  77901. end;
  77902. procedure TCAN1_C1FLTCON0.setFSEL2(thebits : TBits_5); inline;
  77903. begin
  77904. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  77905. end;
  77906. function TCAN1_C1FLTCON0.getFSEL2 : TBits_5; inline;
  77907. begin
  77908. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  77909. end;
  77910. procedure TCAN1_C1FLTCON0.setMSEL2(thebits : TBits_2); inline;
  77911. begin
  77912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  77913. end;
  77914. function TCAN1_C1FLTCON0.getMSEL2 : TBits_2; inline;
  77915. begin
  77916. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  77917. end;
  77918. procedure TCAN1_C1FLTCON0.setFLTEN2; inline;
  77919. begin
  77920. pTDefRegMap(@Self)^.&set := $00800000;
  77921. end;
  77922. procedure TCAN1_C1FLTCON0.clearFLTEN2; inline;
  77923. begin
  77924. pTDefRegMap(@Self)^.clr := $00800000;
  77925. end;
  77926. procedure TCAN1_C1FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  77927. begin
  77928. if thebits = 0 then
  77929. pTDefRegMap(@Self)^.clr := $00800000
  77930. else
  77931. pTDefRegMap(@Self)^.&set := $00800000;
  77932. end;
  77933. function TCAN1_C1FLTCON0.getFLTEN2 : TBits_1; inline;
  77934. begin
  77935. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  77936. end;
  77937. procedure TCAN1_C1FLTCON0.setFSEL3(thebits : TBits_5); inline;
  77938. begin
  77939. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  77940. end;
  77941. function TCAN1_C1FLTCON0.getFSEL3 : TBits_5; inline;
  77942. begin
  77943. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  77944. end;
  77945. procedure TCAN1_C1FLTCON0.setMSEL3(thebits : TBits_2); inline;
  77946. begin
  77947. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  77948. end;
  77949. function TCAN1_C1FLTCON0.getMSEL3 : TBits_2; inline;
  77950. begin
  77951. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  77952. end;
  77953. procedure TCAN1_C1FLTCON0.setFLTEN3; inline;
  77954. begin
  77955. pTDefRegMap(@Self)^.&set := $80000000;
  77956. end;
  77957. procedure TCAN1_C1FLTCON0.clearFLTEN3; inline;
  77958. begin
  77959. pTDefRegMap(@Self)^.clr := $80000000;
  77960. end;
  77961. procedure TCAN1_C1FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  77962. begin
  77963. if thebits = 0 then
  77964. pTDefRegMap(@Self)^.clr := $80000000
  77965. else
  77966. pTDefRegMap(@Self)^.&set := $80000000;
  77967. end;
  77968. function TCAN1_C1FLTCON0.getFLTEN3 : TBits_1; inline;
  77969. begin
  77970. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  77971. end;
  77972. procedure TCAN1_C1FLTCON0.setw(thebits : TBits_32); inline;
  77973. begin
  77974. pTDefRegMap(@Self)^.val := thebits;
  77975. end;
  77976. function TCAN1_C1FLTCON0.getw : TBits_32; inline;
  77977. begin
  77978. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  77979. end;
  77980. procedure TCAN1_C1FLTCON1.setFSEL4(thebits : TBits_5); inline;
  77981. begin
  77982. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  77983. end;
  77984. function TCAN1_C1FLTCON1.getFSEL4 : TBits_5; inline;
  77985. begin
  77986. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  77987. end;
  77988. procedure TCAN1_C1FLTCON1.setMSEL4(thebits : TBits_2); inline;
  77989. begin
  77990. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  77991. end;
  77992. function TCAN1_C1FLTCON1.getMSEL4 : TBits_2; inline;
  77993. begin
  77994. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  77995. end;
  77996. procedure TCAN1_C1FLTCON1.setFLTEN4; inline;
  77997. begin
  77998. pTDefRegMap(@Self)^.&set := $00000080;
  77999. end;
  78000. procedure TCAN1_C1FLTCON1.clearFLTEN4; inline;
  78001. begin
  78002. pTDefRegMap(@Self)^.clr := $00000080;
  78003. end;
  78004. procedure TCAN1_C1FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  78005. begin
  78006. if thebits = 0 then
  78007. pTDefRegMap(@Self)^.clr := $00000080
  78008. else
  78009. pTDefRegMap(@Self)^.&set := $00000080;
  78010. end;
  78011. function TCAN1_C1FLTCON1.getFLTEN4 : TBits_1; inline;
  78012. begin
  78013. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78014. end;
  78015. procedure TCAN1_C1FLTCON1.setFSEL5(thebits : TBits_5); inline;
  78016. begin
  78017. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78018. end;
  78019. function TCAN1_C1FLTCON1.getFSEL5 : TBits_5; inline;
  78020. begin
  78021. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78022. end;
  78023. procedure TCAN1_C1FLTCON1.setMSEL5(thebits : TBits_2); inline;
  78024. begin
  78025. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78026. end;
  78027. function TCAN1_C1FLTCON1.getMSEL5 : TBits_2; inline;
  78028. begin
  78029. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78030. end;
  78031. procedure TCAN1_C1FLTCON1.setFLTEN5; inline;
  78032. begin
  78033. pTDefRegMap(@Self)^.&set := $00008000;
  78034. end;
  78035. procedure TCAN1_C1FLTCON1.clearFLTEN5; inline;
  78036. begin
  78037. pTDefRegMap(@Self)^.clr := $00008000;
  78038. end;
  78039. procedure TCAN1_C1FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  78040. begin
  78041. if thebits = 0 then
  78042. pTDefRegMap(@Self)^.clr := $00008000
  78043. else
  78044. pTDefRegMap(@Self)^.&set := $00008000;
  78045. end;
  78046. function TCAN1_C1FLTCON1.getFLTEN5 : TBits_1; inline;
  78047. begin
  78048. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78049. end;
  78050. procedure TCAN1_C1FLTCON1.setFSEL6(thebits : TBits_5); inline;
  78051. begin
  78052. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78053. end;
  78054. function TCAN1_C1FLTCON1.getFSEL6 : TBits_5; inline;
  78055. begin
  78056. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78057. end;
  78058. procedure TCAN1_C1FLTCON1.setMSEL6(thebits : TBits_2); inline;
  78059. begin
  78060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78061. end;
  78062. function TCAN1_C1FLTCON1.getMSEL6 : TBits_2; inline;
  78063. begin
  78064. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78065. end;
  78066. procedure TCAN1_C1FLTCON1.setFLTEN6; inline;
  78067. begin
  78068. pTDefRegMap(@Self)^.&set := $00800000;
  78069. end;
  78070. procedure TCAN1_C1FLTCON1.clearFLTEN6; inline;
  78071. begin
  78072. pTDefRegMap(@Self)^.clr := $00800000;
  78073. end;
  78074. procedure TCAN1_C1FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  78075. begin
  78076. if thebits = 0 then
  78077. pTDefRegMap(@Self)^.clr := $00800000
  78078. else
  78079. pTDefRegMap(@Self)^.&set := $00800000;
  78080. end;
  78081. function TCAN1_C1FLTCON1.getFLTEN6 : TBits_1; inline;
  78082. begin
  78083. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78084. end;
  78085. procedure TCAN1_C1FLTCON1.setFSEL7(thebits : TBits_5); inline;
  78086. begin
  78087. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78088. end;
  78089. function TCAN1_C1FLTCON1.getFSEL7 : TBits_5; inline;
  78090. begin
  78091. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78092. end;
  78093. procedure TCAN1_C1FLTCON1.setMSEL7(thebits : TBits_2); inline;
  78094. begin
  78095. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78096. end;
  78097. function TCAN1_C1FLTCON1.getMSEL7 : TBits_2; inline;
  78098. begin
  78099. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78100. end;
  78101. procedure TCAN1_C1FLTCON1.setFLTEN7; inline;
  78102. begin
  78103. pTDefRegMap(@Self)^.&set := $80000000;
  78104. end;
  78105. procedure TCAN1_C1FLTCON1.clearFLTEN7; inline;
  78106. begin
  78107. pTDefRegMap(@Self)^.clr := $80000000;
  78108. end;
  78109. procedure TCAN1_C1FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  78110. begin
  78111. if thebits = 0 then
  78112. pTDefRegMap(@Self)^.clr := $80000000
  78113. else
  78114. pTDefRegMap(@Self)^.&set := $80000000;
  78115. end;
  78116. function TCAN1_C1FLTCON1.getFLTEN7 : TBits_1; inline;
  78117. begin
  78118. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  78119. end;
  78120. procedure TCAN1_C1FLTCON1.setw(thebits : TBits_32); inline;
  78121. begin
  78122. pTDefRegMap(@Self)^.val := thebits;
  78123. end;
  78124. function TCAN1_C1FLTCON1.getw : TBits_32; inline;
  78125. begin
  78126. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78127. end;
  78128. procedure TCAN1_C1FLTCON2.setFSEL8(thebits : TBits_5); inline;
  78129. begin
  78130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78131. end;
  78132. function TCAN1_C1FLTCON2.getFSEL8 : TBits_5; inline;
  78133. begin
  78134. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78135. end;
  78136. procedure TCAN1_C1FLTCON2.setMSEL8(thebits : TBits_2); inline;
  78137. begin
  78138. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  78139. end;
  78140. function TCAN1_C1FLTCON2.getMSEL8 : TBits_2; inline;
  78141. begin
  78142. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  78143. end;
  78144. procedure TCAN1_C1FLTCON2.setFLTEN8; inline;
  78145. begin
  78146. pTDefRegMap(@Self)^.&set := $00000080;
  78147. end;
  78148. procedure TCAN1_C1FLTCON2.clearFLTEN8; inline;
  78149. begin
  78150. pTDefRegMap(@Self)^.clr := $00000080;
  78151. end;
  78152. procedure TCAN1_C1FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  78153. begin
  78154. if thebits = 0 then
  78155. pTDefRegMap(@Self)^.clr := $00000080
  78156. else
  78157. pTDefRegMap(@Self)^.&set := $00000080;
  78158. end;
  78159. function TCAN1_C1FLTCON2.getFLTEN8 : TBits_1; inline;
  78160. begin
  78161. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78162. end;
  78163. procedure TCAN1_C1FLTCON2.setFSEL9(thebits : TBits_5); inline;
  78164. begin
  78165. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78166. end;
  78167. function TCAN1_C1FLTCON2.getFSEL9 : TBits_5; inline;
  78168. begin
  78169. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78170. end;
  78171. procedure TCAN1_C1FLTCON2.setMSEL9(thebits : TBits_2); inline;
  78172. begin
  78173. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78174. end;
  78175. function TCAN1_C1FLTCON2.getMSEL9 : TBits_2; inline;
  78176. begin
  78177. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78178. end;
  78179. procedure TCAN1_C1FLTCON2.setFLTEN9; inline;
  78180. begin
  78181. pTDefRegMap(@Self)^.&set := $00008000;
  78182. end;
  78183. procedure TCAN1_C1FLTCON2.clearFLTEN9; inline;
  78184. begin
  78185. pTDefRegMap(@Self)^.clr := $00008000;
  78186. end;
  78187. procedure TCAN1_C1FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  78188. begin
  78189. if thebits = 0 then
  78190. pTDefRegMap(@Self)^.clr := $00008000
  78191. else
  78192. pTDefRegMap(@Self)^.&set := $00008000;
  78193. end;
  78194. function TCAN1_C1FLTCON2.getFLTEN9 : TBits_1; inline;
  78195. begin
  78196. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78197. end;
  78198. procedure TCAN1_C1FLTCON2.setFSEL10(thebits : TBits_5); inline;
  78199. begin
  78200. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78201. end;
  78202. function TCAN1_C1FLTCON2.getFSEL10 : TBits_5; inline;
  78203. begin
  78204. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78205. end;
  78206. procedure TCAN1_C1FLTCON2.setMSEL10(thebits : TBits_2); inline;
  78207. begin
  78208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78209. end;
  78210. function TCAN1_C1FLTCON2.getMSEL10 : TBits_2; inline;
  78211. begin
  78212. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78213. end;
  78214. procedure TCAN1_C1FLTCON2.setFLTEN10; inline;
  78215. begin
  78216. pTDefRegMap(@Self)^.&set := $00800000;
  78217. end;
  78218. procedure TCAN1_C1FLTCON2.clearFLTEN10; inline;
  78219. begin
  78220. pTDefRegMap(@Self)^.clr := $00800000;
  78221. end;
  78222. procedure TCAN1_C1FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  78223. begin
  78224. if thebits = 0 then
  78225. pTDefRegMap(@Self)^.clr := $00800000
  78226. else
  78227. pTDefRegMap(@Self)^.&set := $00800000;
  78228. end;
  78229. function TCAN1_C1FLTCON2.getFLTEN10 : TBits_1; inline;
  78230. begin
  78231. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78232. end;
  78233. procedure TCAN1_C1FLTCON2.setFSEL11(thebits : TBits_5); inline;
  78234. begin
  78235. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78236. end;
  78237. function TCAN1_C1FLTCON2.getFSEL11 : TBits_5; inline;
  78238. begin
  78239. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78240. end;
  78241. procedure TCAN1_C1FLTCON2.setMSEL11(thebits : TBits_2); inline;
  78242. begin
  78243. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78244. end;
  78245. function TCAN1_C1FLTCON2.getMSEL11 : TBits_2; inline;
  78246. begin
  78247. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78248. end;
  78249. procedure TCAN1_C1FLTCON2.setFLTEN11; inline;
  78250. begin
  78251. pTDefRegMap(@Self)^.&set := $80000000;
  78252. end;
  78253. procedure TCAN1_C1FLTCON2.clearFLTEN11; inline;
  78254. begin
  78255. pTDefRegMap(@Self)^.clr := $80000000;
  78256. end;
  78257. procedure TCAN1_C1FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  78258. begin
  78259. if thebits = 0 then
  78260. pTDefRegMap(@Self)^.clr := $80000000
  78261. else
  78262. pTDefRegMap(@Self)^.&set := $80000000;
  78263. end;
  78264. function TCAN1_C1FLTCON2.getFLTEN11 : TBits_1; inline;
  78265. begin
  78266. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  78267. end;
  78268. procedure TCAN1_C1FLTCON2.setw(thebits : TBits_32); inline;
  78269. begin
  78270. pTDefRegMap(@Self)^.val := thebits;
  78271. end;
  78272. function TCAN1_C1FLTCON2.getw : TBits_32; inline;
  78273. begin
  78274. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78275. end;
  78276. procedure TCAN1_C1FLTCON3.setFSEL12(thebits : TBits_5); inline;
  78277. begin
  78278. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78279. end;
  78280. function TCAN1_C1FLTCON3.getFSEL12 : TBits_5; inline;
  78281. begin
  78282. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78283. end;
  78284. procedure TCAN1_C1FLTCON3.setMSEL12(thebits : TBits_2); inline;
  78285. begin
  78286. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  78287. end;
  78288. function TCAN1_C1FLTCON3.getMSEL12 : TBits_2; inline;
  78289. begin
  78290. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  78291. end;
  78292. procedure TCAN1_C1FLTCON3.setFLTEN12; inline;
  78293. begin
  78294. pTDefRegMap(@Self)^.&set := $00000080;
  78295. end;
  78296. procedure TCAN1_C1FLTCON3.clearFLTEN12; inline;
  78297. begin
  78298. pTDefRegMap(@Self)^.clr := $00000080;
  78299. end;
  78300. procedure TCAN1_C1FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  78301. begin
  78302. if thebits = 0 then
  78303. pTDefRegMap(@Self)^.clr := $00000080
  78304. else
  78305. pTDefRegMap(@Self)^.&set := $00000080;
  78306. end;
  78307. function TCAN1_C1FLTCON3.getFLTEN12 : TBits_1; inline;
  78308. begin
  78309. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78310. end;
  78311. procedure TCAN1_C1FLTCON3.setFSEL13(thebits : TBits_5); inline;
  78312. begin
  78313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78314. end;
  78315. function TCAN1_C1FLTCON3.getFSEL13 : TBits_5; inline;
  78316. begin
  78317. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78318. end;
  78319. procedure TCAN1_C1FLTCON3.setMSEL13(thebits : TBits_2); inline;
  78320. begin
  78321. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78322. end;
  78323. function TCAN1_C1FLTCON3.getMSEL13 : TBits_2; inline;
  78324. begin
  78325. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78326. end;
  78327. procedure TCAN1_C1FLTCON3.setFLTEN13; inline;
  78328. begin
  78329. pTDefRegMap(@Self)^.&set := $00008000;
  78330. end;
  78331. procedure TCAN1_C1FLTCON3.clearFLTEN13; inline;
  78332. begin
  78333. pTDefRegMap(@Self)^.clr := $00008000;
  78334. end;
  78335. procedure TCAN1_C1FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  78336. begin
  78337. if thebits = 0 then
  78338. pTDefRegMap(@Self)^.clr := $00008000
  78339. else
  78340. pTDefRegMap(@Self)^.&set := $00008000;
  78341. end;
  78342. function TCAN1_C1FLTCON3.getFLTEN13 : TBits_1; inline;
  78343. begin
  78344. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78345. end;
  78346. procedure TCAN1_C1FLTCON3.setFSEL14(thebits : TBits_5); inline;
  78347. begin
  78348. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78349. end;
  78350. function TCAN1_C1FLTCON3.getFSEL14 : TBits_5; inline;
  78351. begin
  78352. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78353. end;
  78354. procedure TCAN1_C1FLTCON3.setMSEL14(thebits : TBits_2); inline;
  78355. begin
  78356. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78357. end;
  78358. function TCAN1_C1FLTCON3.getMSEL14 : TBits_2; inline;
  78359. begin
  78360. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78361. end;
  78362. procedure TCAN1_C1FLTCON3.setFLTEN14; inline;
  78363. begin
  78364. pTDefRegMap(@Self)^.&set := $00800000;
  78365. end;
  78366. procedure TCAN1_C1FLTCON3.clearFLTEN14; inline;
  78367. begin
  78368. pTDefRegMap(@Self)^.clr := $00800000;
  78369. end;
  78370. procedure TCAN1_C1FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  78371. begin
  78372. if thebits = 0 then
  78373. pTDefRegMap(@Self)^.clr := $00800000
  78374. else
  78375. pTDefRegMap(@Self)^.&set := $00800000;
  78376. end;
  78377. function TCAN1_C1FLTCON3.getFLTEN14 : TBits_1; inline;
  78378. begin
  78379. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78380. end;
  78381. procedure TCAN1_C1FLTCON3.setFSEL15(thebits : TBits_5); inline;
  78382. begin
  78383. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78384. end;
  78385. function TCAN1_C1FLTCON3.getFSEL15 : TBits_5; inline;
  78386. begin
  78387. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78388. end;
  78389. procedure TCAN1_C1FLTCON3.setMSEL15(thebits : TBits_2); inline;
  78390. begin
  78391. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78392. end;
  78393. function TCAN1_C1FLTCON3.getMSEL15 : TBits_2; inline;
  78394. begin
  78395. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78396. end;
  78397. procedure TCAN1_C1FLTCON3.setFLTEN15; inline;
  78398. begin
  78399. pTDefRegMap(@Self)^.&set := $80000000;
  78400. end;
  78401. procedure TCAN1_C1FLTCON3.clearFLTEN15; inline;
  78402. begin
  78403. pTDefRegMap(@Self)^.clr := $80000000;
  78404. end;
  78405. procedure TCAN1_C1FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  78406. begin
  78407. if thebits = 0 then
  78408. pTDefRegMap(@Self)^.clr := $80000000
  78409. else
  78410. pTDefRegMap(@Self)^.&set := $80000000;
  78411. end;
  78412. function TCAN1_C1FLTCON3.getFLTEN15 : TBits_1; inline;
  78413. begin
  78414. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  78415. end;
  78416. procedure TCAN1_C1FLTCON3.setw(thebits : TBits_32); inline;
  78417. begin
  78418. pTDefRegMap(@Self)^.val := thebits;
  78419. end;
  78420. function TCAN1_C1FLTCON3.getw : TBits_32; inline;
  78421. begin
  78422. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78423. end;
  78424. procedure TCAN1_C1FLTCON4.setFSEL16(thebits : TBits_5); inline;
  78425. begin
  78426. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78427. end;
  78428. function TCAN1_C1FLTCON4.getFSEL16 : TBits_5; inline;
  78429. begin
  78430. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78431. end;
  78432. procedure TCAN1_C1FLTCON4.setMSEL16(thebits : TBits_2); inline;
  78433. begin
  78434. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  78435. end;
  78436. function TCAN1_C1FLTCON4.getMSEL16 : TBits_2; inline;
  78437. begin
  78438. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  78439. end;
  78440. procedure TCAN1_C1FLTCON4.setFLTEN16; inline;
  78441. begin
  78442. pTDefRegMap(@Self)^.&set := $00000080;
  78443. end;
  78444. procedure TCAN1_C1FLTCON4.clearFLTEN16; inline;
  78445. begin
  78446. pTDefRegMap(@Self)^.clr := $00000080;
  78447. end;
  78448. procedure TCAN1_C1FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  78449. begin
  78450. if thebits = 0 then
  78451. pTDefRegMap(@Self)^.clr := $00000080
  78452. else
  78453. pTDefRegMap(@Self)^.&set := $00000080;
  78454. end;
  78455. function TCAN1_C1FLTCON4.getFLTEN16 : TBits_1; inline;
  78456. begin
  78457. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78458. end;
  78459. procedure TCAN1_C1FLTCON4.setFSEL17(thebits : TBits_5); inline;
  78460. begin
  78461. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78462. end;
  78463. function TCAN1_C1FLTCON4.getFSEL17 : TBits_5; inline;
  78464. begin
  78465. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78466. end;
  78467. procedure TCAN1_C1FLTCON4.setMSEL17(thebits : TBits_2); inline;
  78468. begin
  78469. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78470. end;
  78471. function TCAN1_C1FLTCON4.getMSEL17 : TBits_2; inline;
  78472. begin
  78473. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78474. end;
  78475. procedure TCAN1_C1FLTCON4.setFLTEN17; inline;
  78476. begin
  78477. pTDefRegMap(@Self)^.&set := $00008000;
  78478. end;
  78479. procedure TCAN1_C1FLTCON4.clearFLTEN17; inline;
  78480. begin
  78481. pTDefRegMap(@Self)^.clr := $00008000;
  78482. end;
  78483. procedure TCAN1_C1FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  78484. begin
  78485. if thebits = 0 then
  78486. pTDefRegMap(@Self)^.clr := $00008000
  78487. else
  78488. pTDefRegMap(@Self)^.&set := $00008000;
  78489. end;
  78490. function TCAN1_C1FLTCON4.getFLTEN17 : TBits_1; inline;
  78491. begin
  78492. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78493. end;
  78494. procedure TCAN1_C1FLTCON4.setFSEL18(thebits : TBits_5); inline;
  78495. begin
  78496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78497. end;
  78498. function TCAN1_C1FLTCON4.getFSEL18 : TBits_5; inline;
  78499. begin
  78500. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78501. end;
  78502. procedure TCAN1_C1FLTCON4.setMSEL18(thebits : TBits_2); inline;
  78503. begin
  78504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78505. end;
  78506. function TCAN1_C1FLTCON4.getMSEL18 : TBits_2; inline;
  78507. begin
  78508. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78509. end;
  78510. procedure TCAN1_C1FLTCON4.setFLTEN18; inline;
  78511. begin
  78512. pTDefRegMap(@Self)^.&set := $00800000;
  78513. end;
  78514. procedure TCAN1_C1FLTCON4.clearFLTEN18; inline;
  78515. begin
  78516. pTDefRegMap(@Self)^.clr := $00800000;
  78517. end;
  78518. procedure TCAN1_C1FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  78519. begin
  78520. if thebits = 0 then
  78521. pTDefRegMap(@Self)^.clr := $00800000
  78522. else
  78523. pTDefRegMap(@Self)^.&set := $00800000;
  78524. end;
  78525. function TCAN1_C1FLTCON4.getFLTEN18 : TBits_1; inline;
  78526. begin
  78527. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78528. end;
  78529. procedure TCAN1_C1FLTCON4.setFSEL19(thebits : TBits_5); inline;
  78530. begin
  78531. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78532. end;
  78533. function TCAN1_C1FLTCON4.getFSEL19 : TBits_5; inline;
  78534. begin
  78535. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78536. end;
  78537. procedure TCAN1_C1FLTCON4.setMSEL19(thebits : TBits_2); inline;
  78538. begin
  78539. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78540. end;
  78541. function TCAN1_C1FLTCON4.getMSEL19 : TBits_2; inline;
  78542. begin
  78543. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78544. end;
  78545. procedure TCAN1_C1FLTCON4.setFLTEN19; inline;
  78546. begin
  78547. pTDefRegMap(@Self)^.&set := $80000000;
  78548. end;
  78549. procedure TCAN1_C1FLTCON4.clearFLTEN19; inline;
  78550. begin
  78551. pTDefRegMap(@Self)^.clr := $80000000;
  78552. end;
  78553. procedure TCAN1_C1FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  78554. begin
  78555. if thebits = 0 then
  78556. pTDefRegMap(@Self)^.clr := $80000000
  78557. else
  78558. pTDefRegMap(@Self)^.&set := $80000000;
  78559. end;
  78560. function TCAN1_C1FLTCON4.getFLTEN19 : TBits_1; inline;
  78561. begin
  78562. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  78563. end;
  78564. procedure TCAN1_C1FLTCON4.setw(thebits : TBits_32); inline;
  78565. begin
  78566. pTDefRegMap(@Self)^.val := thebits;
  78567. end;
  78568. function TCAN1_C1FLTCON4.getw : TBits_32; inline;
  78569. begin
  78570. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78571. end;
  78572. procedure TCAN1_C1FLTCON5.setFSEL20(thebits : TBits_5); inline;
  78573. begin
  78574. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78575. end;
  78576. function TCAN1_C1FLTCON5.getFSEL20 : TBits_5; inline;
  78577. begin
  78578. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78579. end;
  78580. procedure TCAN1_C1FLTCON5.setMSEL20(thebits : TBits_2); inline;
  78581. begin
  78582. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  78583. end;
  78584. function TCAN1_C1FLTCON5.getMSEL20 : TBits_2; inline;
  78585. begin
  78586. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  78587. end;
  78588. procedure TCAN1_C1FLTCON5.setFLTEN20; inline;
  78589. begin
  78590. pTDefRegMap(@Self)^.&set := $00000080;
  78591. end;
  78592. procedure TCAN1_C1FLTCON5.clearFLTEN20; inline;
  78593. begin
  78594. pTDefRegMap(@Self)^.clr := $00000080;
  78595. end;
  78596. procedure TCAN1_C1FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  78597. begin
  78598. if thebits = 0 then
  78599. pTDefRegMap(@Self)^.clr := $00000080
  78600. else
  78601. pTDefRegMap(@Self)^.&set := $00000080;
  78602. end;
  78603. function TCAN1_C1FLTCON5.getFLTEN20 : TBits_1; inline;
  78604. begin
  78605. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78606. end;
  78607. procedure TCAN1_C1FLTCON5.setFSEL21(thebits : TBits_5); inline;
  78608. begin
  78609. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78610. end;
  78611. function TCAN1_C1FLTCON5.getFSEL21 : TBits_5; inline;
  78612. begin
  78613. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78614. end;
  78615. procedure TCAN1_C1FLTCON5.setMSEL21(thebits : TBits_2); inline;
  78616. begin
  78617. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78618. end;
  78619. function TCAN1_C1FLTCON5.getMSEL21 : TBits_2; inline;
  78620. begin
  78621. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78622. end;
  78623. procedure TCAN1_C1FLTCON5.setFLTEN21; inline;
  78624. begin
  78625. pTDefRegMap(@Self)^.&set := $00008000;
  78626. end;
  78627. procedure TCAN1_C1FLTCON5.clearFLTEN21; inline;
  78628. begin
  78629. pTDefRegMap(@Self)^.clr := $00008000;
  78630. end;
  78631. procedure TCAN1_C1FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  78632. begin
  78633. if thebits = 0 then
  78634. pTDefRegMap(@Self)^.clr := $00008000
  78635. else
  78636. pTDefRegMap(@Self)^.&set := $00008000;
  78637. end;
  78638. function TCAN1_C1FLTCON5.getFLTEN21 : TBits_1; inline;
  78639. begin
  78640. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78641. end;
  78642. procedure TCAN1_C1FLTCON5.setFSEL22(thebits : TBits_5); inline;
  78643. begin
  78644. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78645. end;
  78646. function TCAN1_C1FLTCON5.getFSEL22 : TBits_5; inline;
  78647. begin
  78648. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78649. end;
  78650. procedure TCAN1_C1FLTCON5.setMSEL22(thebits : TBits_2); inline;
  78651. begin
  78652. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78653. end;
  78654. function TCAN1_C1FLTCON5.getMSEL22 : TBits_2; inline;
  78655. begin
  78656. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78657. end;
  78658. procedure TCAN1_C1FLTCON5.setFLTEN22; inline;
  78659. begin
  78660. pTDefRegMap(@Self)^.&set := $00800000;
  78661. end;
  78662. procedure TCAN1_C1FLTCON5.clearFLTEN22; inline;
  78663. begin
  78664. pTDefRegMap(@Self)^.clr := $00800000;
  78665. end;
  78666. procedure TCAN1_C1FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  78667. begin
  78668. if thebits = 0 then
  78669. pTDefRegMap(@Self)^.clr := $00800000
  78670. else
  78671. pTDefRegMap(@Self)^.&set := $00800000;
  78672. end;
  78673. function TCAN1_C1FLTCON5.getFLTEN22 : TBits_1; inline;
  78674. begin
  78675. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78676. end;
  78677. procedure TCAN1_C1FLTCON5.setFSEL23(thebits : TBits_5); inline;
  78678. begin
  78679. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78680. end;
  78681. function TCAN1_C1FLTCON5.getFSEL23 : TBits_5; inline;
  78682. begin
  78683. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78684. end;
  78685. procedure TCAN1_C1FLTCON5.setMSEL23(thebits : TBits_2); inline;
  78686. begin
  78687. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78688. end;
  78689. function TCAN1_C1FLTCON5.getMSEL23 : TBits_2; inline;
  78690. begin
  78691. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78692. end;
  78693. procedure TCAN1_C1FLTCON5.setFLTEN23; inline;
  78694. begin
  78695. pTDefRegMap(@Self)^.&set := $80000000;
  78696. end;
  78697. procedure TCAN1_C1FLTCON5.clearFLTEN23; inline;
  78698. begin
  78699. pTDefRegMap(@Self)^.clr := $80000000;
  78700. end;
  78701. procedure TCAN1_C1FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  78702. begin
  78703. if thebits = 0 then
  78704. pTDefRegMap(@Self)^.clr := $80000000
  78705. else
  78706. pTDefRegMap(@Self)^.&set := $80000000;
  78707. end;
  78708. function TCAN1_C1FLTCON5.getFLTEN23 : TBits_1; inline;
  78709. begin
  78710. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  78711. end;
  78712. procedure TCAN1_C1FLTCON5.setw(thebits : TBits_32); inline;
  78713. begin
  78714. pTDefRegMap(@Self)^.val := thebits;
  78715. end;
  78716. function TCAN1_C1FLTCON5.getw : TBits_32; inline;
  78717. begin
  78718. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78719. end;
  78720. procedure TCAN1_C1FLTCON6.setFSEL24(thebits : TBits_5); inline;
  78721. begin
  78722. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78723. end;
  78724. function TCAN1_C1FLTCON6.getFSEL24 : TBits_5; inline;
  78725. begin
  78726. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78727. end;
  78728. procedure TCAN1_C1FLTCON6.setMSEL24(thebits : TBits_2); inline;
  78729. begin
  78730. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  78731. end;
  78732. function TCAN1_C1FLTCON6.getMSEL24 : TBits_2; inline;
  78733. begin
  78734. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  78735. end;
  78736. procedure TCAN1_C1FLTCON6.setFLTEN24; inline;
  78737. begin
  78738. pTDefRegMap(@Self)^.&set := $00000080;
  78739. end;
  78740. procedure TCAN1_C1FLTCON6.clearFLTEN24; inline;
  78741. begin
  78742. pTDefRegMap(@Self)^.clr := $00000080;
  78743. end;
  78744. procedure TCAN1_C1FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  78745. begin
  78746. if thebits = 0 then
  78747. pTDefRegMap(@Self)^.clr := $00000080
  78748. else
  78749. pTDefRegMap(@Self)^.&set := $00000080;
  78750. end;
  78751. function TCAN1_C1FLTCON6.getFLTEN24 : TBits_1; inline;
  78752. begin
  78753. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78754. end;
  78755. procedure TCAN1_C1FLTCON6.setFSEL25(thebits : TBits_5); inline;
  78756. begin
  78757. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78758. end;
  78759. function TCAN1_C1FLTCON6.getFSEL25 : TBits_5; inline;
  78760. begin
  78761. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78762. end;
  78763. procedure TCAN1_C1FLTCON6.setMSEL25(thebits : TBits_2); inline;
  78764. begin
  78765. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78766. end;
  78767. function TCAN1_C1FLTCON6.getMSEL25 : TBits_2; inline;
  78768. begin
  78769. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78770. end;
  78771. procedure TCAN1_C1FLTCON6.setFLTEN25; inline;
  78772. begin
  78773. pTDefRegMap(@Self)^.&set := $00008000;
  78774. end;
  78775. procedure TCAN1_C1FLTCON6.clearFLTEN25; inline;
  78776. begin
  78777. pTDefRegMap(@Self)^.clr := $00008000;
  78778. end;
  78779. procedure TCAN1_C1FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  78780. begin
  78781. if thebits = 0 then
  78782. pTDefRegMap(@Self)^.clr := $00008000
  78783. else
  78784. pTDefRegMap(@Self)^.&set := $00008000;
  78785. end;
  78786. function TCAN1_C1FLTCON6.getFLTEN25 : TBits_1; inline;
  78787. begin
  78788. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78789. end;
  78790. procedure TCAN1_C1FLTCON6.setFSEL26(thebits : TBits_5); inline;
  78791. begin
  78792. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78793. end;
  78794. function TCAN1_C1FLTCON6.getFSEL26 : TBits_5; inline;
  78795. begin
  78796. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78797. end;
  78798. procedure TCAN1_C1FLTCON6.setMSEL26(thebits : TBits_2); inline;
  78799. begin
  78800. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78801. end;
  78802. function TCAN1_C1FLTCON6.getMSEL26 : TBits_2; inline;
  78803. begin
  78804. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78805. end;
  78806. procedure TCAN1_C1FLTCON6.setFLTEN26; inline;
  78807. begin
  78808. pTDefRegMap(@Self)^.&set := $00800000;
  78809. end;
  78810. procedure TCAN1_C1FLTCON6.clearFLTEN26; inline;
  78811. begin
  78812. pTDefRegMap(@Self)^.clr := $00800000;
  78813. end;
  78814. procedure TCAN1_C1FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  78815. begin
  78816. if thebits = 0 then
  78817. pTDefRegMap(@Self)^.clr := $00800000
  78818. else
  78819. pTDefRegMap(@Self)^.&set := $00800000;
  78820. end;
  78821. function TCAN1_C1FLTCON6.getFLTEN26 : TBits_1; inline;
  78822. begin
  78823. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78824. end;
  78825. procedure TCAN1_C1FLTCON6.setFSEL27(thebits : TBits_5); inline;
  78826. begin
  78827. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78828. end;
  78829. function TCAN1_C1FLTCON6.getFSEL27 : TBits_5; inline;
  78830. begin
  78831. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78832. end;
  78833. procedure TCAN1_C1FLTCON6.setMSEL27(thebits : TBits_2); inline;
  78834. begin
  78835. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78836. end;
  78837. function TCAN1_C1FLTCON6.getMSEL27 : TBits_2; inline;
  78838. begin
  78839. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78840. end;
  78841. procedure TCAN1_C1FLTCON6.setFLTEN27; inline;
  78842. begin
  78843. pTDefRegMap(@Self)^.&set := $80000000;
  78844. end;
  78845. procedure TCAN1_C1FLTCON6.clearFLTEN27; inline;
  78846. begin
  78847. pTDefRegMap(@Self)^.clr := $80000000;
  78848. end;
  78849. procedure TCAN1_C1FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  78850. begin
  78851. if thebits = 0 then
  78852. pTDefRegMap(@Self)^.clr := $80000000
  78853. else
  78854. pTDefRegMap(@Self)^.&set := $80000000;
  78855. end;
  78856. function TCAN1_C1FLTCON6.getFLTEN27 : TBits_1; inline;
  78857. begin
  78858. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  78859. end;
  78860. procedure TCAN1_C1FLTCON6.setw(thebits : TBits_32); inline;
  78861. begin
  78862. pTDefRegMap(@Self)^.val := thebits;
  78863. end;
  78864. function TCAN1_C1FLTCON6.getw : TBits_32; inline;
  78865. begin
  78866. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  78867. end;
  78868. procedure TCAN1_C1FLTCON7.setFSEL28(thebits : TBits_5); inline;
  78869. begin
  78870. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  78871. end;
  78872. function TCAN1_C1FLTCON7.getFSEL28 : TBits_5; inline;
  78873. begin
  78874. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  78875. end;
  78876. procedure TCAN1_C1FLTCON7.setMSEL28(thebits : TBits_2); inline;
  78877. begin
  78878. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  78879. end;
  78880. function TCAN1_C1FLTCON7.getMSEL28 : TBits_2; inline;
  78881. begin
  78882. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  78883. end;
  78884. procedure TCAN1_C1FLTCON7.setFLTEN28; inline;
  78885. begin
  78886. pTDefRegMap(@Self)^.&set := $00000080;
  78887. end;
  78888. procedure TCAN1_C1FLTCON7.clearFLTEN28; inline;
  78889. begin
  78890. pTDefRegMap(@Self)^.clr := $00000080;
  78891. end;
  78892. procedure TCAN1_C1FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  78893. begin
  78894. if thebits = 0 then
  78895. pTDefRegMap(@Self)^.clr := $00000080
  78896. else
  78897. pTDefRegMap(@Self)^.&set := $00000080;
  78898. end;
  78899. function TCAN1_C1FLTCON7.getFLTEN28 : TBits_1; inline;
  78900. begin
  78901. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  78902. end;
  78903. procedure TCAN1_C1FLTCON7.setFSEL29(thebits : TBits_5); inline;
  78904. begin
  78905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  78906. end;
  78907. function TCAN1_C1FLTCON7.getFSEL29 : TBits_5; inline;
  78908. begin
  78909. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  78910. end;
  78911. procedure TCAN1_C1FLTCON7.setMSEL29(thebits : TBits_2); inline;
  78912. begin
  78913. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  78914. end;
  78915. function TCAN1_C1FLTCON7.getMSEL29 : TBits_2; inline;
  78916. begin
  78917. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  78918. end;
  78919. procedure TCAN1_C1FLTCON7.setFLTEN29; inline;
  78920. begin
  78921. pTDefRegMap(@Self)^.&set := $00008000;
  78922. end;
  78923. procedure TCAN1_C1FLTCON7.clearFLTEN29; inline;
  78924. begin
  78925. pTDefRegMap(@Self)^.clr := $00008000;
  78926. end;
  78927. procedure TCAN1_C1FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  78928. begin
  78929. if thebits = 0 then
  78930. pTDefRegMap(@Self)^.clr := $00008000
  78931. else
  78932. pTDefRegMap(@Self)^.&set := $00008000;
  78933. end;
  78934. function TCAN1_C1FLTCON7.getFLTEN29 : TBits_1; inline;
  78935. begin
  78936. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  78937. end;
  78938. procedure TCAN1_C1FLTCON7.setFSEL30(thebits : TBits_5); inline;
  78939. begin
  78940. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  78941. end;
  78942. function TCAN1_C1FLTCON7.getFSEL30 : TBits_5; inline;
  78943. begin
  78944. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  78945. end;
  78946. procedure TCAN1_C1FLTCON7.setMSEL30(thebits : TBits_2); inline;
  78947. begin
  78948. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  78949. end;
  78950. function TCAN1_C1FLTCON7.getMSEL30 : TBits_2; inline;
  78951. begin
  78952. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  78953. end;
  78954. procedure TCAN1_C1FLTCON7.setFLTEN30; inline;
  78955. begin
  78956. pTDefRegMap(@Self)^.&set := $00800000;
  78957. end;
  78958. procedure TCAN1_C1FLTCON7.clearFLTEN30; inline;
  78959. begin
  78960. pTDefRegMap(@Self)^.clr := $00800000;
  78961. end;
  78962. procedure TCAN1_C1FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  78963. begin
  78964. if thebits = 0 then
  78965. pTDefRegMap(@Self)^.clr := $00800000
  78966. else
  78967. pTDefRegMap(@Self)^.&set := $00800000;
  78968. end;
  78969. function TCAN1_C1FLTCON7.getFLTEN30 : TBits_1; inline;
  78970. begin
  78971. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  78972. end;
  78973. procedure TCAN1_C1FLTCON7.setFSEL31(thebits : TBits_5); inline;
  78974. begin
  78975. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  78976. end;
  78977. function TCAN1_C1FLTCON7.getFSEL31 : TBits_5; inline;
  78978. begin
  78979. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  78980. end;
  78981. procedure TCAN1_C1FLTCON7.setMSEL31(thebits : TBits_2); inline;
  78982. begin
  78983. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  78984. end;
  78985. function TCAN1_C1FLTCON7.getMSEL31 : TBits_2; inline;
  78986. begin
  78987. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  78988. end;
  78989. procedure TCAN1_C1FLTCON7.setFLTEN31; inline;
  78990. begin
  78991. pTDefRegMap(@Self)^.&set := $80000000;
  78992. end;
  78993. procedure TCAN1_C1FLTCON7.clearFLTEN31; inline;
  78994. begin
  78995. pTDefRegMap(@Self)^.clr := $80000000;
  78996. end;
  78997. procedure TCAN1_C1FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  78998. begin
  78999. if thebits = 0 then
  79000. pTDefRegMap(@Self)^.clr := $80000000
  79001. else
  79002. pTDefRegMap(@Self)^.&set := $80000000;
  79003. end;
  79004. function TCAN1_C1FLTCON7.getFLTEN31 : TBits_1; inline;
  79005. begin
  79006. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  79007. end;
  79008. procedure TCAN1_C1FLTCON7.setw(thebits : TBits_32); inline;
  79009. begin
  79010. pTDefRegMap(@Self)^.val := thebits;
  79011. end;
  79012. function TCAN1_C1FLTCON7.getw : TBits_32; inline;
  79013. begin
  79014. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79015. end;
  79016. procedure TCAN1_C1RXF0.setEID(thebits : TBits_18); inline;
  79017. begin
  79018. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79019. end;
  79020. function TCAN1_C1RXF0.getEID : TBits_18; inline;
  79021. begin
  79022. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79023. end;
  79024. procedure TCAN1_C1RXF0.setEXID; inline;
  79025. begin
  79026. pTDefRegMap(@Self)^.&set := $00080000;
  79027. end;
  79028. procedure TCAN1_C1RXF0.clearEXID; inline;
  79029. begin
  79030. pTDefRegMap(@Self)^.clr := $00080000;
  79031. end;
  79032. procedure TCAN1_C1RXF0.setEXID(thebits : TBits_1); inline;
  79033. begin
  79034. if thebits = 0 then
  79035. pTDefRegMap(@Self)^.clr := $00080000
  79036. else
  79037. pTDefRegMap(@Self)^.&set := $00080000;
  79038. end;
  79039. function TCAN1_C1RXF0.getEXID : TBits_1; inline;
  79040. begin
  79041. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79042. end;
  79043. procedure TCAN1_C1RXF0.setSID(thebits : TBits_11); inline;
  79044. begin
  79045. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79046. end;
  79047. function TCAN1_C1RXF0.getSID : TBits_11; inline;
  79048. begin
  79049. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79050. end;
  79051. procedure TCAN1_C1RXF0.setw(thebits : TBits_32); inline;
  79052. begin
  79053. pTDefRegMap(@Self)^.val := thebits;
  79054. end;
  79055. function TCAN1_C1RXF0.getw : TBits_32; inline;
  79056. begin
  79057. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79058. end;
  79059. procedure TCAN1_C1RXF1.setEID(thebits : TBits_18); inline;
  79060. begin
  79061. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79062. end;
  79063. function TCAN1_C1RXF1.getEID : TBits_18; inline;
  79064. begin
  79065. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79066. end;
  79067. procedure TCAN1_C1RXF1.setEXID; inline;
  79068. begin
  79069. pTDefRegMap(@Self)^.&set := $00080000;
  79070. end;
  79071. procedure TCAN1_C1RXF1.clearEXID; inline;
  79072. begin
  79073. pTDefRegMap(@Self)^.clr := $00080000;
  79074. end;
  79075. procedure TCAN1_C1RXF1.setEXID(thebits : TBits_1); inline;
  79076. begin
  79077. if thebits = 0 then
  79078. pTDefRegMap(@Self)^.clr := $00080000
  79079. else
  79080. pTDefRegMap(@Self)^.&set := $00080000;
  79081. end;
  79082. function TCAN1_C1RXF1.getEXID : TBits_1; inline;
  79083. begin
  79084. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79085. end;
  79086. procedure TCAN1_C1RXF1.setSID(thebits : TBits_11); inline;
  79087. begin
  79088. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79089. end;
  79090. function TCAN1_C1RXF1.getSID : TBits_11; inline;
  79091. begin
  79092. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79093. end;
  79094. procedure TCAN1_C1RXF1.setw(thebits : TBits_32); inline;
  79095. begin
  79096. pTDefRegMap(@Self)^.val := thebits;
  79097. end;
  79098. function TCAN1_C1RXF1.getw : TBits_32; inline;
  79099. begin
  79100. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79101. end;
  79102. procedure TCAN1_C1RXF2.setEID(thebits : TBits_18); inline;
  79103. begin
  79104. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79105. end;
  79106. function TCAN1_C1RXF2.getEID : TBits_18; inline;
  79107. begin
  79108. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79109. end;
  79110. procedure TCAN1_C1RXF2.setEXID; inline;
  79111. begin
  79112. pTDefRegMap(@Self)^.&set := $00080000;
  79113. end;
  79114. procedure TCAN1_C1RXF2.clearEXID; inline;
  79115. begin
  79116. pTDefRegMap(@Self)^.clr := $00080000;
  79117. end;
  79118. procedure TCAN1_C1RXF2.setEXID(thebits : TBits_1); inline;
  79119. begin
  79120. if thebits = 0 then
  79121. pTDefRegMap(@Self)^.clr := $00080000
  79122. else
  79123. pTDefRegMap(@Self)^.&set := $00080000;
  79124. end;
  79125. function TCAN1_C1RXF2.getEXID : TBits_1; inline;
  79126. begin
  79127. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79128. end;
  79129. procedure TCAN1_C1RXF2.setSID(thebits : TBits_11); inline;
  79130. begin
  79131. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79132. end;
  79133. function TCAN1_C1RXF2.getSID : TBits_11; inline;
  79134. begin
  79135. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79136. end;
  79137. procedure TCAN1_C1RXF2.setw(thebits : TBits_32); inline;
  79138. begin
  79139. pTDefRegMap(@Self)^.val := thebits;
  79140. end;
  79141. function TCAN1_C1RXF2.getw : TBits_32; inline;
  79142. begin
  79143. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79144. end;
  79145. procedure TCAN1_C1RXF3.setEID(thebits : TBits_18); inline;
  79146. begin
  79147. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79148. end;
  79149. function TCAN1_C1RXF3.getEID : TBits_18; inline;
  79150. begin
  79151. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79152. end;
  79153. procedure TCAN1_C1RXF3.setEXID; inline;
  79154. begin
  79155. pTDefRegMap(@Self)^.&set := $00080000;
  79156. end;
  79157. procedure TCAN1_C1RXF3.clearEXID; inline;
  79158. begin
  79159. pTDefRegMap(@Self)^.clr := $00080000;
  79160. end;
  79161. procedure TCAN1_C1RXF3.setEXID(thebits : TBits_1); inline;
  79162. begin
  79163. if thebits = 0 then
  79164. pTDefRegMap(@Self)^.clr := $00080000
  79165. else
  79166. pTDefRegMap(@Self)^.&set := $00080000;
  79167. end;
  79168. function TCAN1_C1RXF3.getEXID : TBits_1; inline;
  79169. begin
  79170. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79171. end;
  79172. procedure TCAN1_C1RXF3.setSID(thebits : TBits_11); inline;
  79173. begin
  79174. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79175. end;
  79176. function TCAN1_C1RXF3.getSID : TBits_11; inline;
  79177. begin
  79178. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79179. end;
  79180. procedure TCAN1_C1RXF3.setw(thebits : TBits_32); inline;
  79181. begin
  79182. pTDefRegMap(@Self)^.val := thebits;
  79183. end;
  79184. function TCAN1_C1RXF3.getw : TBits_32; inline;
  79185. begin
  79186. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79187. end;
  79188. procedure TCAN1_C1RXF4.setEID(thebits : TBits_18); inline;
  79189. begin
  79190. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79191. end;
  79192. function TCAN1_C1RXF4.getEID : TBits_18; inline;
  79193. begin
  79194. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79195. end;
  79196. procedure TCAN1_C1RXF4.setEXID; inline;
  79197. begin
  79198. pTDefRegMap(@Self)^.&set := $00080000;
  79199. end;
  79200. procedure TCAN1_C1RXF4.clearEXID; inline;
  79201. begin
  79202. pTDefRegMap(@Self)^.clr := $00080000;
  79203. end;
  79204. procedure TCAN1_C1RXF4.setEXID(thebits : TBits_1); inline;
  79205. begin
  79206. if thebits = 0 then
  79207. pTDefRegMap(@Self)^.clr := $00080000
  79208. else
  79209. pTDefRegMap(@Self)^.&set := $00080000;
  79210. end;
  79211. function TCAN1_C1RXF4.getEXID : TBits_1; inline;
  79212. begin
  79213. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79214. end;
  79215. procedure TCAN1_C1RXF4.setSID(thebits : TBits_11); inline;
  79216. begin
  79217. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79218. end;
  79219. function TCAN1_C1RXF4.getSID : TBits_11; inline;
  79220. begin
  79221. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79222. end;
  79223. procedure TCAN1_C1RXF4.setw(thebits : TBits_32); inline;
  79224. begin
  79225. pTDefRegMap(@Self)^.val := thebits;
  79226. end;
  79227. function TCAN1_C1RXF4.getw : TBits_32; inline;
  79228. begin
  79229. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79230. end;
  79231. procedure TCAN1_C1RXF5.setEID(thebits : TBits_18); inline;
  79232. begin
  79233. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79234. end;
  79235. function TCAN1_C1RXF5.getEID : TBits_18; inline;
  79236. begin
  79237. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79238. end;
  79239. procedure TCAN1_C1RXF5.setEXID; inline;
  79240. begin
  79241. pTDefRegMap(@Self)^.&set := $00080000;
  79242. end;
  79243. procedure TCAN1_C1RXF5.clearEXID; inline;
  79244. begin
  79245. pTDefRegMap(@Self)^.clr := $00080000;
  79246. end;
  79247. procedure TCAN1_C1RXF5.setEXID(thebits : TBits_1); inline;
  79248. begin
  79249. if thebits = 0 then
  79250. pTDefRegMap(@Self)^.clr := $00080000
  79251. else
  79252. pTDefRegMap(@Self)^.&set := $00080000;
  79253. end;
  79254. function TCAN1_C1RXF5.getEXID : TBits_1; inline;
  79255. begin
  79256. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79257. end;
  79258. procedure TCAN1_C1RXF5.setSID(thebits : TBits_11); inline;
  79259. begin
  79260. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79261. end;
  79262. function TCAN1_C1RXF5.getSID : TBits_11; inline;
  79263. begin
  79264. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79265. end;
  79266. procedure TCAN1_C1RXF5.setw(thebits : TBits_32); inline;
  79267. begin
  79268. pTDefRegMap(@Self)^.val := thebits;
  79269. end;
  79270. function TCAN1_C1RXF5.getw : TBits_32; inline;
  79271. begin
  79272. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79273. end;
  79274. procedure TCAN1_C1RXF6.setEID(thebits : TBits_18); inline;
  79275. begin
  79276. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79277. end;
  79278. function TCAN1_C1RXF6.getEID : TBits_18; inline;
  79279. begin
  79280. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79281. end;
  79282. procedure TCAN1_C1RXF6.setEXID; inline;
  79283. begin
  79284. pTDefRegMap(@Self)^.&set := $00080000;
  79285. end;
  79286. procedure TCAN1_C1RXF6.clearEXID; inline;
  79287. begin
  79288. pTDefRegMap(@Self)^.clr := $00080000;
  79289. end;
  79290. procedure TCAN1_C1RXF6.setEXID(thebits : TBits_1); inline;
  79291. begin
  79292. if thebits = 0 then
  79293. pTDefRegMap(@Self)^.clr := $00080000
  79294. else
  79295. pTDefRegMap(@Self)^.&set := $00080000;
  79296. end;
  79297. function TCAN1_C1RXF6.getEXID : TBits_1; inline;
  79298. begin
  79299. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79300. end;
  79301. procedure TCAN1_C1RXF6.setSID(thebits : TBits_11); inline;
  79302. begin
  79303. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79304. end;
  79305. function TCAN1_C1RXF6.getSID : TBits_11; inline;
  79306. begin
  79307. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79308. end;
  79309. procedure TCAN1_C1RXF6.setw(thebits : TBits_32); inline;
  79310. begin
  79311. pTDefRegMap(@Self)^.val := thebits;
  79312. end;
  79313. function TCAN1_C1RXF6.getw : TBits_32; inline;
  79314. begin
  79315. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79316. end;
  79317. procedure TCAN1_C1RXF7.setEID(thebits : TBits_18); inline;
  79318. begin
  79319. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79320. end;
  79321. function TCAN1_C1RXF7.getEID : TBits_18; inline;
  79322. begin
  79323. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79324. end;
  79325. procedure TCAN1_C1RXF7.setEXID; inline;
  79326. begin
  79327. pTDefRegMap(@Self)^.&set := $00080000;
  79328. end;
  79329. procedure TCAN1_C1RXF7.clearEXID; inline;
  79330. begin
  79331. pTDefRegMap(@Self)^.clr := $00080000;
  79332. end;
  79333. procedure TCAN1_C1RXF7.setEXID(thebits : TBits_1); inline;
  79334. begin
  79335. if thebits = 0 then
  79336. pTDefRegMap(@Self)^.clr := $00080000
  79337. else
  79338. pTDefRegMap(@Self)^.&set := $00080000;
  79339. end;
  79340. function TCAN1_C1RXF7.getEXID : TBits_1; inline;
  79341. begin
  79342. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79343. end;
  79344. procedure TCAN1_C1RXF7.setSID(thebits : TBits_11); inline;
  79345. begin
  79346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79347. end;
  79348. function TCAN1_C1RXF7.getSID : TBits_11; inline;
  79349. begin
  79350. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79351. end;
  79352. procedure TCAN1_C1RXF7.setw(thebits : TBits_32); inline;
  79353. begin
  79354. pTDefRegMap(@Self)^.val := thebits;
  79355. end;
  79356. function TCAN1_C1RXF7.getw : TBits_32; inline;
  79357. begin
  79358. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79359. end;
  79360. procedure TCAN1_C1RXF8.setEID(thebits : TBits_18); inline;
  79361. begin
  79362. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79363. end;
  79364. function TCAN1_C1RXF8.getEID : TBits_18; inline;
  79365. begin
  79366. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79367. end;
  79368. procedure TCAN1_C1RXF8.setEXID; inline;
  79369. begin
  79370. pTDefRegMap(@Self)^.&set := $00080000;
  79371. end;
  79372. procedure TCAN1_C1RXF8.clearEXID; inline;
  79373. begin
  79374. pTDefRegMap(@Self)^.clr := $00080000;
  79375. end;
  79376. procedure TCAN1_C1RXF8.setEXID(thebits : TBits_1); inline;
  79377. begin
  79378. if thebits = 0 then
  79379. pTDefRegMap(@Self)^.clr := $00080000
  79380. else
  79381. pTDefRegMap(@Self)^.&set := $00080000;
  79382. end;
  79383. function TCAN1_C1RXF8.getEXID : TBits_1; inline;
  79384. begin
  79385. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79386. end;
  79387. procedure TCAN1_C1RXF8.setSID(thebits : TBits_11); inline;
  79388. begin
  79389. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79390. end;
  79391. function TCAN1_C1RXF8.getSID : TBits_11; inline;
  79392. begin
  79393. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79394. end;
  79395. procedure TCAN1_C1RXF8.setw(thebits : TBits_32); inline;
  79396. begin
  79397. pTDefRegMap(@Self)^.val := thebits;
  79398. end;
  79399. function TCAN1_C1RXF8.getw : TBits_32; inline;
  79400. begin
  79401. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79402. end;
  79403. procedure TCAN1_C1RXF9.setEID(thebits : TBits_18); inline;
  79404. begin
  79405. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79406. end;
  79407. function TCAN1_C1RXF9.getEID : TBits_18; inline;
  79408. begin
  79409. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79410. end;
  79411. procedure TCAN1_C1RXF9.setEXID; inline;
  79412. begin
  79413. pTDefRegMap(@Self)^.&set := $00080000;
  79414. end;
  79415. procedure TCAN1_C1RXF9.clearEXID; inline;
  79416. begin
  79417. pTDefRegMap(@Self)^.clr := $00080000;
  79418. end;
  79419. procedure TCAN1_C1RXF9.setEXID(thebits : TBits_1); inline;
  79420. begin
  79421. if thebits = 0 then
  79422. pTDefRegMap(@Self)^.clr := $00080000
  79423. else
  79424. pTDefRegMap(@Self)^.&set := $00080000;
  79425. end;
  79426. function TCAN1_C1RXF9.getEXID : TBits_1; inline;
  79427. begin
  79428. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79429. end;
  79430. procedure TCAN1_C1RXF9.setSID(thebits : TBits_11); inline;
  79431. begin
  79432. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79433. end;
  79434. function TCAN1_C1RXF9.getSID : TBits_11; inline;
  79435. begin
  79436. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79437. end;
  79438. procedure TCAN1_C1RXF9.setw(thebits : TBits_32); inline;
  79439. begin
  79440. pTDefRegMap(@Self)^.val := thebits;
  79441. end;
  79442. function TCAN1_C1RXF9.getw : TBits_32; inline;
  79443. begin
  79444. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79445. end;
  79446. procedure TCAN1_C1RXF10.setEID(thebits : TBits_18); inline;
  79447. begin
  79448. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79449. end;
  79450. function TCAN1_C1RXF10.getEID : TBits_18; inline;
  79451. begin
  79452. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79453. end;
  79454. procedure TCAN1_C1RXF10.setEXID; inline;
  79455. begin
  79456. pTDefRegMap(@Self)^.&set := $00080000;
  79457. end;
  79458. procedure TCAN1_C1RXF10.clearEXID; inline;
  79459. begin
  79460. pTDefRegMap(@Self)^.clr := $00080000;
  79461. end;
  79462. procedure TCAN1_C1RXF10.setEXID(thebits : TBits_1); inline;
  79463. begin
  79464. if thebits = 0 then
  79465. pTDefRegMap(@Self)^.clr := $00080000
  79466. else
  79467. pTDefRegMap(@Self)^.&set := $00080000;
  79468. end;
  79469. function TCAN1_C1RXF10.getEXID : TBits_1; inline;
  79470. begin
  79471. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79472. end;
  79473. procedure TCAN1_C1RXF10.setSID(thebits : TBits_11); inline;
  79474. begin
  79475. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79476. end;
  79477. function TCAN1_C1RXF10.getSID : TBits_11; inline;
  79478. begin
  79479. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79480. end;
  79481. procedure TCAN1_C1RXF10.setw(thebits : TBits_32); inline;
  79482. begin
  79483. pTDefRegMap(@Self)^.val := thebits;
  79484. end;
  79485. function TCAN1_C1RXF10.getw : TBits_32; inline;
  79486. begin
  79487. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79488. end;
  79489. procedure TCAN1_C1RXF11.setEID(thebits : TBits_18); inline;
  79490. begin
  79491. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79492. end;
  79493. function TCAN1_C1RXF11.getEID : TBits_18; inline;
  79494. begin
  79495. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79496. end;
  79497. procedure TCAN1_C1RXF11.setEXID; inline;
  79498. begin
  79499. pTDefRegMap(@Self)^.&set := $00080000;
  79500. end;
  79501. procedure TCAN1_C1RXF11.clearEXID; inline;
  79502. begin
  79503. pTDefRegMap(@Self)^.clr := $00080000;
  79504. end;
  79505. procedure TCAN1_C1RXF11.setEXID(thebits : TBits_1); inline;
  79506. begin
  79507. if thebits = 0 then
  79508. pTDefRegMap(@Self)^.clr := $00080000
  79509. else
  79510. pTDefRegMap(@Self)^.&set := $00080000;
  79511. end;
  79512. function TCAN1_C1RXF11.getEXID : TBits_1; inline;
  79513. begin
  79514. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79515. end;
  79516. procedure TCAN1_C1RXF11.setSID(thebits : TBits_11); inline;
  79517. begin
  79518. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79519. end;
  79520. function TCAN1_C1RXF11.getSID : TBits_11; inline;
  79521. begin
  79522. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79523. end;
  79524. procedure TCAN1_C1RXF11.setw(thebits : TBits_32); inline;
  79525. begin
  79526. pTDefRegMap(@Self)^.val := thebits;
  79527. end;
  79528. function TCAN1_C1RXF11.getw : TBits_32; inline;
  79529. begin
  79530. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79531. end;
  79532. procedure TCAN1_C1RXF12.setEID(thebits : TBits_18); inline;
  79533. begin
  79534. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79535. end;
  79536. function TCAN1_C1RXF12.getEID : TBits_18; inline;
  79537. begin
  79538. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79539. end;
  79540. procedure TCAN1_C1RXF12.setEXID; inline;
  79541. begin
  79542. pTDefRegMap(@Self)^.&set := $00080000;
  79543. end;
  79544. procedure TCAN1_C1RXF12.clearEXID; inline;
  79545. begin
  79546. pTDefRegMap(@Self)^.clr := $00080000;
  79547. end;
  79548. procedure TCAN1_C1RXF12.setEXID(thebits : TBits_1); inline;
  79549. begin
  79550. if thebits = 0 then
  79551. pTDefRegMap(@Self)^.clr := $00080000
  79552. else
  79553. pTDefRegMap(@Self)^.&set := $00080000;
  79554. end;
  79555. function TCAN1_C1RXF12.getEXID : TBits_1; inline;
  79556. begin
  79557. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79558. end;
  79559. procedure TCAN1_C1RXF12.setSID(thebits : TBits_11); inline;
  79560. begin
  79561. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79562. end;
  79563. function TCAN1_C1RXF12.getSID : TBits_11; inline;
  79564. begin
  79565. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79566. end;
  79567. procedure TCAN1_C1RXF12.setw(thebits : TBits_32); inline;
  79568. begin
  79569. pTDefRegMap(@Self)^.val := thebits;
  79570. end;
  79571. function TCAN1_C1RXF12.getw : TBits_32; inline;
  79572. begin
  79573. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79574. end;
  79575. procedure TCAN1_C1RXF13.setEID(thebits : TBits_18); inline;
  79576. begin
  79577. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79578. end;
  79579. function TCAN1_C1RXF13.getEID : TBits_18; inline;
  79580. begin
  79581. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79582. end;
  79583. procedure TCAN1_C1RXF13.setEXID; inline;
  79584. begin
  79585. pTDefRegMap(@Self)^.&set := $00080000;
  79586. end;
  79587. procedure TCAN1_C1RXF13.clearEXID; inline;
  79588. begin
  79589. pTDefRegMap(@Self)^.clr := $00080000;
  79590. end;
  79591. procedure TCAN1_C1RXF13.setEXID(thebits : TBits_1); inline;
  79592. begin
  79593. if thebits = 0 then
  79594. pTDefRegMap(@Self)^.clr := $00080000
  79595. else
  79596. pTDefRegMap(@Self)^.&set := $00080000;
  79597. end;
  79598. function TCAN1_C1RXF13.getEXID : TBits_1; inline;
  79599. begin
  79600. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79601. end;
  79602. procedure TCAN1_C1RXF13.setSID(thebits : TBits_11); inline;
  79603. begin
  79604. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79605. end;
  79606. function TCAN1_C1RXF13.getSID : TBits_11; inline;
  79607. begin
  79608. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79609. end;
  79610. procedure TCAN1_C1RXF13.setw(thebits : TBits_32); inline;
  79611. begin
  79612. pTDefRegMap(@Self)^.val := thebits;
  79613. end;
  79614. function TCAN1_C1RXF13.getw : TBits_32; inline;
  79615. begin
  79616. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79617. end;
  79618. procedure TCAN1_C1RXF14.setEID(thebits : TBits_18); inline;
  79619. begin
  79620. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79621. end;
  79622. function TCAN1_C1RXF14.getEID : TBits_18; inline;
  79623. begin
  79624. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79625. end;
  79626. procedure TCAN1_C1RXF14.setEXID; inline;
  79627. begin
  79628. pTDefRegMap(@Self)^.&set := $00080000;
  79629. end;
  79630. procedure TCAN1_C1RXF14.clearEXID; inline;
  79631. begin
  79632. pTDefRegMap(@Self)^.clr := $00080000;
  79633. end;
  79634. procedure TCAN1_C1RXF14.setEXID(thebits : TBits_1); inline;
  79635. begin
  79636. if thebits = 0 then
  79637. pTDefRegMap(@Self)^.clr := $00080000
  79638. else
  79639. pTDefRegMap(@Self)^.&set := $00080000;
  79640. end;
  79641. function TCAN1_C1RXF14.getEXID : TBits_1; inline;
  79642. begin
  79643. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79644. end;
  79645. procedure TCAN1_C1RXF14.setSID(thebits : TBits_11); inline;
  79646. begin
  79647. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79648. end;
  79649. function TCAN1_C1RXF14.getSID : TBits_11; inline;
  79650. begin
  79651. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79652. end;
  79653. procedure TCAN1_C1RXF14.setw(thebits : TBits_32); inline;
  79654. begin
  79655. pTDefRegMap(@Self)^.val := thebits;
  79656. end;
  79657. function TCAN1_C1RXF14.getw : TBits_32; inline;
  79658. begin
  79659. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79660. end;
  79661. procedure TCAN1_C1RXF15.setEID(thebits : TBits_18); inline;
  79662. begin
  79663. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79664. end;
  79665. function TCAN1_C1RXF15.getEID : TBits_18; inline;
  79666. begin
  79667. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79668. end;
  79669. procedure TCAN1_C1RXF15.setEXID; inline;
  79670. begin
  79671. pTDefRegMap(@Self)^.&set := $00080000;
  79672. end;
  79673. procedure TCAN1_C1RXF15.clearEXID; inline;
  79674. begin
  79675. pTDefRegMap(@Self)^.clr := $00080000;
  79676. end;
  79677. procedure TCAN1_C1RXF15.setEXID(thebits : TBits_1); inline;
  79678. begin
  79679. if thebits = 0 then
  79680. pTDefRegMap(@Self)^.clr := $00080000
  79681. else
  79682. pTDefRegMap(@Self)^.&set := $00080000;
  79683. end;
  79684. function TCAN1_C1RXF15.getEXID : TBits_1; inline;
  79685. begin
  79686. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79687. end;
  79688. procedure TCAN1_C1RXF15.setSID(thebits : TBits_11); inline;
  79689. begin
  79690. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79691. end;
  79692. function TCAN1_C1RXF15.getSID : TBits_11; inline;
  79693. begin
  79694. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79695. end;
  79696. procedure TCAN1_C1RXF15.setw(thebits : TBits_32); inline;
  79697. begin
  79698. pTDefRegMap(@Self)^.val := thebits;
  79699. end;
  79700. function TCAN1_C1RXF15.getw : TBits_32; inline;
  79701. begin
  79702. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79703. end;
  79704. procedure TCAN1_C1RXF16.setEID(thebits : TBits_18); inline;
  79705. begin
  79706. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79707. end;
  79708. function TCAN1_C1RXF16.getEID : TBits_18; inline;
  79709. begin
  79710. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79711. end;
  79712. procedure TCAN1_C1RXF16.setEXID; inline;
  79713. begin
  79714. pTDefRegMap(@Self)^.&set := $00080000;
  79715. end;
  79716. procedure TCAN1_C1RXF16.clearEXID; inline;
  79717. begin
  79718. pTDefRegMap(@Self)^.clr := $00080000;
  79719. end;
  79720. procedure TCAN1_C1RXF16.setEXID(thebits : TBits_1); inline;
  79721. begin
  79722. if thebits = 0 then
  79723. pTDefRegMap(@Self)^.clr := $00080000
  79724. else
  79725. pTDefRegMap(@Self)^.&set := $00080000;
  79726. end;
  79727. function TCAN1_C1RXF16.getEXID : TBits_1; inline;
  79728. begin
  79729. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79730. end;
  79731. procedure TCAN1_C1RXF16.setSID(thebits : TBits_11); inline;
  79732. begin
  79733. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79734. end;
  79735. function TCAN1_C1RXF16.getSID : TBits_11; inline;
  79736. begin
  79737. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79738. end;
  79739. procedure TCAN1_C1RXF16.setw(thebits : TBits_32); inline;
  79740. begin
  79741. pTDefRegMap(@Self)^.val := thebits;
  79742. end;
  79743. function TCAN1_C1RXF16.getw : TBits_32; inline;
  79744. begin
  79745. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79746. end;
  79747. procedure TCAN1_C1RXF17.setEID(thebits : TBits_18); inline;
  79748. begin
  79749. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79750. end;
  79751. function TCAN1_C1RXF17.getEID : TBits_18; inline;
  79752. begin
  79753. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79754. end;
  79755. procedure TCAN1_C1RXF17.setEXID; inline;
  79756. begin
  79757. pTDefRegMap(@Self)^.&set := $00080000;
  79758. end;
  79759. procedure TCAN1_C1RXF17.clearEXID; inline;
  79760. begin
  79761. pTDefRegMap(@Self)^.clr := $00080000;
  79762. end;
  79763. procedure TCAN1_C1RXF17.setEXID(thebits : TBits_1); inline;
  79764. begin
  79765. if thebits = 0 then
  79766. pTDefRegMap(@Self)^.clr := $00080000
  79767. else
  79768. pTDefRegMap(@Self)^.&set := $00080000;
  79769. end;
  79770. function TCAN1_C1RXF17.getEXID : TBits_1; inline;
  79771. begin
  79772. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79773. end;
  79774. procedure TCAN1_C1RXF17.setSID(thebits : TBits_11); inline;
  79775. begin
  79776. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79777. end;
  79778. function TCAN1_C1RXF17.getSID : TBits_11; inline;
  79779. begin
  79780. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79781. end;
  79782. procedure TCAN1_C1RXF17.setw(thebits : TBits_32); inline;
  79783. begin
  79784. pTDefRegMap(@Self)^.val := thebits;
  79785. end;
  79786. function TCAN1_C1RXF17.getw : TBits_32; inline;
  79787. begin
  79788. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79789. end;
  79790. procedure TCAN1_C1RXF18.setEID(thebits : TBits_18); inline;
  79791. begin
  79792. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79793. end;
  79794. function TCAN1_C1RXF18.getEID : TBits_18; inline;
  79795. begin
  79796. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79797. end;
  79798. procedure TCAN1_C1RXF18.setEXID; inline;
  79799. begin
  79800. pTDefRegMap(@Self)^.&set := $00080000;
  79801. end;
  79802. procedure TCAN1_C1RXF18.clearEXID; inline;
  79803. begin
  79804. pTDefRegMap(@Self)^.clr := $00080000;
  79805. end;
  79806. procedure TCAN1_C1RXF18.setEXID(thebits : TBits_1); inline;
  79807. begin
  79808. if thebits = 0 then
  79809. pTDefRegMap(@Self)^.clr := $00080000
  79810. else
  79811. pTDefRegMap(@Self)^.&set := $00080000;
  79812. end;
  79813. function TCAN1_C1RXF18.getEXID : TBits_1; inline;
  79814. begin
  79815. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79816. end;
  79817. procedure TCAN1_C1RXF18.setSID(thebits : TBits_11); inline;
  79818. begin
  79819. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79820. end;
  79821. function TCAN1_C1RXF18.getSID : TBits_11; inline;
  79822. begin
  79823. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79824. end;
  79825. procedure TCAN1_C1RXF18.setw(thebits : TBits_32); inline;
  79826. begin
  79827. pTDefRegMap(@Self)^.val := thebits;
  79828. end;
  79829. function TCAN1_C1RXF18.getw : TBits_32; inline;
  79830. begin
  79831. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79832. end;
  79833. procedure TCAN1_C1RXF19.setEID(thebits : TBits_18); inline;
  79834. begin
  79835. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79836. end;
  79837. function TCAN1_C1RXF19.getEID : TBits_18; inline;
  79838. begin
  79839. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79840. end;
  79841. procedure TCAN1_C1RXF19.setEXID; inline;
  79842. begin
  79843. pTDefRegMap(@Self)^.&set := $00080000;
  79844. end;
  79845. procedure TCAN1_C1RXF19.clearEXID; inline;
  79846. begin
  79847. pTDefRegMap(@Self)^.clr := $00080000;
  79848. end;
  79849. procedure TCAN1_C1RXF19.setEXID(thebits : TBits_1); inline;
  79850. begin
  79851. if thebits = 0 then
  79852. pTDefRegMap(@Self)^.clr := $00080000
  79853. else
  79854. pTDefRegMap(@Self)^.&set := $00080000;
  79855. end;
  79856. function TCAN1_C1RXF19.getEXID : TBits_1; inline;
  79857. begin
  79858. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79859. end;
  79860. procedure TCAN1_C1RXF19.setSID(thebits : TBits_11); inline;
  79861. begin
  79862. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79863. end;
  79864. function TCAN1_C1RXF19.getSID : TBits_11; inline;
  79865. begin
  79866. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79867. end;
  79868. procedure TCAN1_C1RXF19.setw(thebits : TBits_32); inline;
  79869. begin
  79870. pTDefRegMap(@Self)^.val := thebits;
  79871. end;
  79872. function TCAN1_C1RXF19.getw : TBits_32; inline;
  79873. begin
  79874. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79875. end;
  79876. procedure TCAN1_C1RXF20.setEID(thebits : TBits_18); inline;
  79877. begin
  79878. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79879. end;
  79880. function TCAN1_C1RXF20.getEID : TBits_18; inline;
  79881. begin
  79882. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79883. end;
  79884. procedure TCAN1_C1RXF20.setEXID; inline;
  79885. begin
  79886. pTDefRegMap(@Self)^.&set := $00080000;
  79887. end;
  79888. procedure TCAN1_C1RXF20.clearEXID; inline;
  79889. begin
  79890. pTDefRegMap(@Self)^.clr := $00080000;
  79891. end;
  79892. procedure TCAN1_C1RXF20.setEXID(thebits : TBits_1); inline;
  79893. begin
  79894. if thebits = 0 then
  79895. pTDefRegMap(@Self)^.clr := $00080000
  79896. else
  79897. pTDefRegMap(@Self)^.&set := $00080000;
  79898. end;
  79899. function TCAN1_C1RXF20.getEXID : TBits_1; inline;
  79900. begin
  79901. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79902. end;
  79903. procedure TCAN1_C1RXF20.setSID(thebits : TBits_11); inline;
  79904. begin
  79905. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79906. end;
  79907. function TCAN1_C1RXF20.getSID : TBits_11; inline;
  79908. begin
  79909. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79910. end;
  79911. procedure TCAN1_C1RXF20.setw(thebits : TBits_32); inline;
  79912. begin
  79913. pTDefRegMap(@Self)^.val := thebits;
  79914. end;
  79915. function TCAN1_C1RXF20.getw : TBits_32; inline;
  79916. begin
  79917. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79918. end;
  79919. procedure TCAN1_C1RXF21.setEID(thebits : TBits_18); inline;
  79920. begin
  79921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79922. end;
  79923. function TCAN1_C1RXF21.getEID : TBits_18; inline;
  79924. begin
  79925. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79926. end;
  79927. procedure TCAN1_C1RXF21.setEXID; inline;
  79928. begin
  79929. pTDefRegMap(@Self)^.&set := $00080000;
  79930. end;
  79931. procedure TCAN1_C1RXF21.clearEXID; inline;
  79932. begin
  79933. pTDefRegMap(@Self)^.clr := $00080000;
  79934. end;
  79935. procedure TCAN1_C1RXF21.setEXID(thebits : TBits_1); inline;
  79936. begin
  79937. if thebits = 0 then
  79938. pTDefRegMap(@Self)^.clr := $00080000
  79939. else
  79940. pTDefRegMap(@Self)^.&set := $00080000;
  79941. end;
  79942. function TCAN1_C1RXF21.getEXID : TBits_1; inline;
  79943. begin
  79944. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79945. end;
  79946. procedure TCAN1_C1RXF21.setSID(thebits : TBits_11); inline;
  79947. begin
  79948. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79949. end;
  79950. function TCAN1_C1RXF21.getSID : TBits_11; inline;
  79951. begin
  79952. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79953. end;
  79954. procedure TCAN1_C1RXF21.setw(thebits : TBits_32); inline;
  79955. begin
  79956. pTDefRegMap(@Self)^.val := thebits;
  79957. end;
  79958. function TCAN1_C1RXF21.getw : TBits_32; inline;
  79959. begin
  79960. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  79961. end;
  79962. procedure TCAN1_C1RXF22.setEID(thebits : TBits_18); inline;
  79963. begin
  79964. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  79965. end;
  79966. function TCAN1_C1RXF22.getEID : TBits_18; inline;
  79967. begin
  79968. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  79969. end;
  79970. procedure TCAN1_C1RXF22.setEXID; inline;
  79971. begin
  79972. pTDefRegMap(@Self)^.&set := $00080000;
  79973. end;
  79974. procedure TCAN1_C1RXF22.clearEXID; inline;
  79975. begin
  79976. pTDefRegMap(@Self)^.clr := $00080000;
  79977. end;
  79978. procedure TCAN1_C1RXF22.setEXID(thebits : TBits_1); inline;
  79979. begin
  79980. if thebits = 0 then
  79981. pTDefRegMap(@Self)^.clr := $00080000
  79982. else
  79983. pTDefRegMap(@Self)^.&set := $00080000;
  79984. end;
  79985. function TCAN1_C1RXF22.getEXID : TBits_1; inline;
  79986. begin
  79987. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  79988. end;
  79989. procedure TCAN1_C1RXF22.setSID(thebits : TBits_11); inline;
  79990. begin
  79991. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  79992. end;
  79993. function TCAN1_C1RXF22.getSID : TBits_11; inline;
  79994. begin
  79995. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  79996. end;
  79997. procedure TCAN1_C1RXF22.setw(thebits : TBits_32); inline;
  79998. begin
  79999. pTDefRegMap(@Self)^.val := thebits;
  80000. end;
  80001. function TCAN1_C1RXF22.getw : TBits_32; inline;
  80002. begin
  80003. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80004. end;
  80005. procedure TCAN1_C1RXF23.setEID(thebits : TBits_18); inline;
  80006. begin
  80007. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80008. end;
  80009. function TCAN1_C1RXF23.getEID : TBits_18; inline;
  80010. begin
  80011. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80012. end;
  80013. procedure TCAN1_C1RXF23.setEXID; inline;
  80014. begin
  80015. pTDefRegMap(@Self)^.&set := $00080000;
  80016. end;
  80017. procedure TCAN1_C1RXF23.clearEXID; inline;
  80018. begin
  80019. pTDefRegMap(@Self)^.clr := $00080000;
  80020. end;
  80021. procedure TCAN1_C1RXF23.setEXID(thebits : TBits_1); inline;
  80022. begin
  80023. if thebits = 0 then
  80024. pTDefRegMap(@Self)^.clr := $00080000
  80025. else
  80026. pTDefRegMap(@Self)^.&set := $00080000;
  80027. end;
  80028. function TCAN1_C1RXF23.getEXID : TBits_1; inline;
  80029. begin
  80030. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80031. end;
  80032. procedure TCAN1_C1RXF23.setSID(thebits : TBits_11); inline;
  80033. begin
  80034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80035. end;
  80036. function TCAN1_C1RXF23.getSID : TBits_11; inline;
  80037. begin
  80038. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80039. end;
  80040. procedure TCAN1_C1RXF23.setw(thebits : TBits_32); inline;
  80041. begin
  80042. pTDefRegMap(@Self)^.val := thebits;
  80043. end;
  80044. function TCAN1_C1RXF23.getw : TBits_32; inline;
  80045. begin
  80046. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80047. end;
  80048. procedure TCAN1_C1RXF24.setEID(thebits : TBits_18); inline;
  80049. begin
  80050. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80051. end;
  80052. function TCAN1_C1RXF24.getEID : TBits_18; inline;
  80053. begin
  80054. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80055. end;
  80056. procedure TCAN1_C1RXF24.setEXID; inline;
  80057. begin
  80058. pTDefRegMap(@Self)^.&set := $00080000;
  80059. end;
  80060. procedure TCAN1_C1RXF24.clearEXID; inline;
  80061. begin
  80062. pTDefRegMap(@Self)^.clr := $00080000;
  80063. end;
  80064. procedure TCAN1_C1RXF24.setEXID(thebits : TBits_1); inline;
  80065. begin
  80066. if thebits = 0 then
  80067. pTDefRegMap(@Self)^.clr := $00080000
  80068. else
  80069. pTDefRegMap(@Self)^.&set := $00080000;
  80070. end;
  80071. function TCAN1_C1RXF24.getEXID : TBits_1; inline;
  80072. begin
  80073. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80074. end;
  80075. procedure TCAN1_C1RXF24.setSID(thebits : TBits_11); inline;
  80076. begin
  80077. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80078. end;
  80079. function TCAN1_C1RXF24.getSID : TBits_11; inline;
  80080. begin
  80081. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80082. end;
  80083. procedure TCAN1_C1RXF24.setw(thebits : TBits_32); inline;
  80084. begin
  80085. pTDefRegMap(@Self)^.val := thebits;
  80086. end;
  80087. function TCAN1_C1RXF24.getw : TBits_32; inline;
  80088. begin
  80089. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80090. end;
  80091. procedure TCAN1_C1RXF25.setEID(thebits : TBits_18); inline;
  80092. begin
  80093. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80094. end;
  80095. function TCAN1_C1RXF25.getEID : TBits_18; inline;
  80096. begin
  80097. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80098. end;
  80099. procedure TCAN1_C1RXF25.setEXID; inline;
  80100. begin
  80101. pTDefRegMap(@Self)^.&set := $00080000;
  80102. end;
  80103. procedure TCAN1_C1RXF25.clearEXID; inline;
  80104. begin
  80105. pTDefRegMap(@Self)^.clr := $00080000;
  80106. end;
  80107. procedure TCAN1_C1RXF25.setEXID(thebits : TBits_1); inline;
  80108. begin
  80109. if thebits = 0 then
  80110. pTDefRegMap(@Self)^.clr := $00080000
  80111. else
  80112. pTDefRegMap(@Self)^.&set := $00080000;
  80113. end;
  80114. function TCAN1_C1RXF25.getEXID : TBits_1; inline;
  80115. begin
  80116. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80117. end;
  80118. procedure TCAN1_C1RXF25.setSID(thebits : TBits_11); inline;
  80119. begin
  80120. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80121. end;
  80122. function TCAN1_C1RXF25.getSID : TBits_11; inline;
  80123. begin
  80124. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80125. end;
  80126. procedure TCAN1_C1RXF25.setw(thebits : TBits_32); inline;
  80127. begin
  80128. pTDefRegMap(@Self)^.val := thebits;
  80129. end;
  80130. function TCAN1_C1RXF25.getw : TBits_32; inline;
  80131. begin
  80132. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80133. end;
  80134. procedure TCAN1_C1RXF26.setEID(thebits : TBits_18); inline;
  80135. begin
  80136. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80137. end;
  80138. function TCAN1_C1RXF26.getEID : TBits_18; inline;
  80139. begin
  80140. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80141. end;
  80142. procedure TCAN1_C1RXF26.setEXID; inline;
  80143. begin
  80144. pTDefRegMap(@Self)^.&set := $00080000;
  80145. end;
  80146. procedure TCAN1_C1RXF26.clearEXID; inline;
  80147. begin
  80148. pTDefRegMap(@Self)^.clr := $00080000;
  80149. end;
  80150. procedure TCAN1_C1RXF26.setEXID(thebits : TBits_1); inline;
  80151. begin
  80152. if thebits = 0 then
  80153. pTDefRegMap(@Self)^.clr := $00080000
  80154. else
  80155. pTDefRegMap(@Self)^.&set := $00080000;
  80156. end;
  80157. function TCAN1_C1RXF26.getEXID : TBits_1; inline;
  80158. begin
  80159. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80160. end;
  80161. procedure TCAN1_C1RXF26.setSID(thebits : TBits_11); inline;
  80162. begin
  80163. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80164. end;
  80165. function TCAN1_C1RXF26.getSID : TBits_11; inline;
  80166. begin
  80167. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80168. end;
  80169. procedure TCAN1_C1RXF26.setw(thebits : TBits_32); inline;
  80170. begin
  80171. pTDefRegMap(@Self)^.val := thebits;
  80172. end;
  80173. function TCAN1_C1RXF26.getw : TBits_32; inline;
  80174. begin
  80175. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80176. end;
  80177. procedure TCAN1_C1RXF27.setEID(thebits : TBits_18); inline;
  80178. begin
  80179. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80180. end;
  80181. function TCAN1_C1RXF27.getEID : TBits_18; inline;
  80182. begin
  80183. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80184. end;
  80185. procedure TCAN1_C1RXF27.setEXID; inline;
  80186. begin
  80187. pTDefRegMap(@Self)^.&set := $00080000;
  80188. end;
  80189. procedure TCAN1_C1RXF27.clearEXID; inline;
  80190. begin
  80191. pTDefRegMap(@Self)^.clr := $00080000;
  80192. end;
  80193. procedure TCAN1_C1RXF27.setEXID(thebits : TBits_1); inline;
  80194. begin
  80195. if thebits = 0 then
  80196. pTDefRegMap(@Self)^.clr := $00080000
  80197. else
  80198. pTDefRegMap(@Self)^.&set := $00080000;
  80199. end;
  80200. function TCAN1_C1RXF27.getEXID : TBits_1; inline;
  80201. begin
  80202. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80203. end;
  80204. procedure TCAN1_C1RXF27.setSID(thebits : TBits_11); inline;
  80205. begin
  80206. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80207. end;
  80208. function TCAN1_C1RXF27.getSID : TBits_11; inline;
  80209. begin
  80210. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80211. end;
  80212. procedure TCAN1_C1RXF27.setw(thebits : TBits_32); inline;
  80213. begin
  80214. pTDefRegMap(@Self)^.val := thebits;
  80215. end;
  80216. function TCAN1_C1RXF27.getw : TBits_32; inline;
  80217. begin
  80218. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80219. end;
  80220. procedure TCAN1_C1RXF28.setEID(thebits : TBits_18); inline;
  80221. begin
  80222. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80223. end;
  80224. function TCAN1_C1RXF28.getEID : TBits_18; inline;
  80225. begin
  80226. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80227. end;
  80228. procedure TCAN1_C1RXF28.setEXID; inline;
  80229. begin
  80230. pTDefRegMap(@Self)^.&set := $00080000;
  80231. end;
  80232. procedure TCAN1_C1RXF28.clearEXID; inline;
  80233. begin
  80234. pTDefRegMap(@Self)^.clr := $00080000;
  80235. end;
  80236. procedure TCAN1_C1RXF28.setEXID(thebits : TBits_1); inline;
  80237. begin
  80238. if thebits = 0 then
  80239. pTDefRegMap(@Self)^.clr := $00080000
  80240. else
  80241. pTDefRegMap(@Self)^.&set := $00080000;
  80242. end;
  80243. function TCAN1_C1RXF28.getEXID : TBits_1; inline;
  80244. begin
  80245. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80246. end;
  80247. procedure TCAN1_C1RXF28.setSID(thebits : TBits_11); inline;
  80248. begin
  80249. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80250. end;
  80251. function TCAN1_C1RXF28.getSID : TBits_11; inline;
  80252. begin
  80253. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80254. end;
  80255. procedure TCAN1_C1RXF28.setw(thebits : TBits_32); inline;
  80256. begin
  80257. pTDefRegMap(@Self)^.val := thebits;
  80258. end;
  80259. function TCAN1_C1RXF28.getw : TBits_32; inline;
  80260. begin
  80261. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80262. end;
  80263. procedure TCAN1_C1RXF29.setEID(thebits : TBits_18); inline;
  80264. begin
  80265. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80266. end;
  80267. function TCAN1_C1RXF29.getEID : TBits_18; inline;
  80268. begin
  80269. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80270. end;
  80271. procedure TCAN1_C1RXF29.setEXID; inline;
  80272. begin
  80273. pTDefRegMap(@Self)^.&set := $00080000;
  80274. end;
  80275. procedure TCAN1_C1RXF29.clearEXID; inline;
  80276. begin
  80277. pTDefRegMap(@Self)^.clr := $00080000;
  80278. end;
  80279. procedure TCAN1_C1RXF29.setEXID(thebits : TBits_1); inline;
  80280. begin
  80281. if thebits = 0 then
  80282. pTDefRegMap(@Self)^.clr := $00080000
  80283. else
  80284. pTDefRegMap(@Self)^.&set := $00080000;
  80285. end;
  80286. function TCAN1_C1RXF29.getEXID : TBits_1; inline;
  80287. begin
  80288. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80289. end;
  80290. procedure TCAN1_C1RXF29.setSID(thebits : TBits_11); inline;
  80291. begin
  80292. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80293. end;
  80294. function TCAN1_C1RXF29.getSID : TBits_11; inline;
  80295. begin
  80296. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80297. end;
  80298. procedure TCAN1_C1RXF29.setw(thebits : TBits_32); inline;
  80299. begin
  80300. pTDefRegMap(@Self)^.val := thebits;
  80301. end;
  80302. function TCAN1_C1RXF29.getw : TBits_32; inline;
  80303. begin
  80304. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80305. end;
  80306. procedure TCAN1_C1RXF30.setEID(thebits : TBits_18); inline;
  80307. begin
  80308. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80309. end;
  80310. function TCAN1_C1RXF30.getEID : TBits_18; inline;
  80311. begin
  80312. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80313. end;
  80314. procedure TCAN1_C1RXF30.setEXID; inline;
  80315. begin
  80316. pTDefRegMap(@Self)^.&set := $00080000;
  80317. end;
  80318. procedure TCAN1_C1RXF30.clearEXID; inline;
  80319. begin
  80320. pTDefRegMap(@Self)^.clr := $00080000;
  80321. end;
  80322. procedure TCAN1_C1RXF30.setEXID(thebits : TBits_1); inline;
  80323. begin
  80324. if thebits = 0 then
  80325. pTDefRegMap(@Self)^.clr := $00080000
  80326. else
  80327. pTDefRegMap(@Self)^.&set := $00080000;
  80328. end;
  80329. function TCAN1_C1RXF30.getEXID : TBits_1; inline;
  80330. begin
  80331. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80332. end;
  80333. procedure TCAN1_C1RXF30.setSID(thebits : TBits_11); inline;
  80334. begin
  80335. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80336. end;
  80337. function TCAN1_C1RXF30.getSID : TBits_11; inline;
  80338. begin
  80339. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80340. end;
  80341. procedure TCAN1_C1RXF30.setw(thebits : TBits_32); inline;
  80342. begin
  80343. pTDefRegMap(@Self)^.val := thebits;
  80344. end;
  80345. function TCAN1_C1RXF30.getw : TBits_32; inline;
  80346. begin
  80347. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80348. end;
  80349. procedure TCAN1_C1RXF31.setEID(thebits : TBits_18); inline;
  80350. begin
  80351. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  80352. end;
  80353. function TCAN1_C1RXF31.getEID : TBits_18; inline;
  80354. begin
  80355. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  80356. end;
  80357. procedure TCAN1_C1RXF31.setEXID; inline;
  80358. begin
  80359. pTDefRegMap(@Self)^.&set := $00080000;
  80360. end;
  80361. procedure TCAN1_C1RXF31.clearEXID; inline;
  80362. begin
  80363. pTDefRegMap(@Self)^.clr := $00080000;
  80364. end;
  80365. procedure TCAN1_C1RXF31.setEXID(thebits : TBits_1); inline;
  80366. begin
  80367. if thebits = 0 then
  80368. pTDefRegMap(@Self)^.clr := $00080000
  80369. else
  80370. pTDefRegMap(@Self)^.&set := $00080000;
  80371. end;
  80372. function TCAN1_C1RXF31.getEXID : TBits_1; inline;
  80373. begin
  80374. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80375. end;
  80376. procedure TCAN1_C1RXF31.setSID(thebits : TBits_11); inline;
  80377. begin
  80378. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  80379. end;
  80380. function TCAN1_C1RXF31.getSID : TBits_11; inline;
  80381. begin
  80382. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  80383. end;
  80384. procedure TCAN1_C1RXF31.setw(thebits : TBits_32); inline;
  80385. begin
  80386. pTDefRegMap(@Self)^.val := thebits;
  80387. end;
  80388. function TCAN1_C1RXF31.getw : TBits_32; inline;
  80389. begin
  80390. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80391. end;
  80392. procedure TCAN1_C1FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  80393. begin
  80394. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80395. end;
  80396. function TCAN1_C1FIFOCON0.getTXPRI : TBits_2; inline;
  80397. begin
  80398. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80399. end;
  80400. procedure TCAN1_C1FIFOCON0.setRTREN; inline;
  80401. begin
  80402. pTDefRegMap(@Self)^.&set := $00000004;
  80403. end;
  80404. procedure TCAN1_C1FIFOCON0.clearRTREN; inline;
  80405. begin
  80406. pTDefRegMap(@Self)^.clr := $00000004;
  80407. end;
  80408. procedure TCAN1_C1FIFOCON0.setRTREN(thebits : TBits_1); inline;
  80409. begin
  80410. if thebits = 0 then
  80411. pTDefRegMap(@Self)^.clr := $00000004
  80412. else
  80413. pTDefRegMap(@Self)^.&set := $00000004;
  80414. end;
  80415. function TCAN1_C1FIFOCON0.getRTREN : TBits_1; inline;
  80416. begin
  80417. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80418. end;
  80419. procedure TCAN1_C1FIFOCON0.setTXREQ; inline;
  80420. begin
  80421. pTDefRegMap(@Self)^.&set := $00000008;
  80422. end;
  80423. procedure TCAN1_C1FIFOCON0.clearTXREQ; inline;
  80424. begin
  80425. pTDefRegMap(@Self)^.clr := $00000008;
  80426. end;
  80427. procedure TCAN1_C1FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  80428. begin
  80429. if thebits = 0 then
  80430. pTDefRegMap(@Self)^.clr := $00000008
  80431. else
  80432. pTDefRegMap(@Self)^.&set := $00000008;
  80433. end;
  80434. function TCAN1_C1FIFOCON0.getTXREQ : TBits_1; inline;
  80435. begin
  80436. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80437. end;
  80438. procedure TCAN1_C1FIFOCON0.setTXERR; inline;
  80439. begin
  80440. pTDefRegMap(@Self)^.&set := $00000010;
  80441. end;
  80442. procedure TCAN1_C1FIFOCON0.clearTXERR; inline;
  80443. begin
  80444. pTDefRegMap(@Self)^.clr := $00000010;
  80445. end;
  80446. procedure TCAN1_C1FIFOCON0.setTXERR(thebits : TBits_1); inline;
  80447. begin
  80448. if thebits = 0 then
  80449. pTDefRegMap(@Self)^.clr := $00000010
  80450. else
  80451. pTDefRegMap(@Self)^.&set := $00000010;
  80452. end;
  80453. function TCAN1_C1FIFOCON0.getTXERR : TBits_1; inline;
  80454. begin
  80455. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80456. end;
  80457. procedure TCAN1_C1FIFOCON0.setTXLARB; inline;
  80458. begin
  80459. pTDefRegMap(@Self)^.&set := $00000020;
  80460. end;
  80461. procedure TCAN1_C1FIFOCON0.clearTXLARB; inline;
  80462. begin
  80463. pTDefRegMap(@Self)^.clr := $00000020;
  80464. end;
  80465. procedure TCAN1_C1FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  80466. begin
  80467. if thebits = 0 then
  80468. pTDefRegMap(@Self)^.clr := $00000020
  80469. else
  80470. pTDefRegMap(@Self)^.&set := $00000020;
  80471. end;
  80472. function TCAN1_C1FIFOCON0.getTXLARB : TBits_1; inline;
  80473. begin
  80474. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80475. end;
  80476. procedure TCAN1_C1FIFOCON0.setTXABAT; inline;
  80477. begin
  80478. pTDefRegMap(@Self)^.&set := $00000040;
  80479. end;
  80480. procedure TCAN1_C1FIFOCON0.clearTXABAT; inline;
  80481. begin
  80482. pTDefRegMap(@Self)^.clr := $00000040;
  80483. end;
  80484. procedure TCAN1_C1FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  80485. begin
  80486. if thebits = 0 then
  80487. pTDefRegMap(@Self)^.clr := $00000040
  80488. else
  80489. pTDefRegMap(@Self)^.&set := $00000040;
  80490. end;
  80491. function TCAN1_C1FIFOCON0.getTXABAT : TBits_1; inline;
  80492. begin
  80493. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80494. end;
  80495. procedure TCAN1_C1FIFOCON0.setTXEN; inline;
  80496. begin
  80497. pTDefRegMap(@Self)^.&set := $00000080;
  80498. end;
  80499. procedure TCAN1_C1FIFOCON0.clearTXEN; inline;
  80500. begin
  80501. pTDefRegMap(@Self)^.clr := $00000080;
  80502. end;
  80503. procedure TCAN1_C1FIFOCON0.setTXEN(thebits : TBits_1); inline;
  80504. begin
  80505. if thebits = 0 then
  80506. pTDefRegMap(@Self)^.clr := $00000080
  80507. else
  80508. pTDefRegMap(@Self)^.&set := $00000080;
  80509. end;
  80510. function TCAN1_C1FIFOCON0.getTXEN : TBits_1; inline;
  80511. begin
  80512. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80513. end;
  80514. procedure TCAN1_C1FIFOCON0.setDONLY; inline;
  80515. begin
  80516. pTDefRegMap(@Self)^.&set := $00001000;
  80517. end;
  80518. procedure TCAN1_C1FIFOCON0.clearDONLY; inline;
  80519. begin
  80520. pTDefRegMap(@Self)^.clr := $00001000;
  80521. end;
  80522. procedure TCAN1_C1FIFOCON0.setDONLY(thebits : TBits_1); inline;
  80523. begin
  80524. if thebits = 0 then
  80525. pTDefRegMap(@Self)^.clr := $00001000
  80526. else
  80527. pTDefRegMap(@Self)^.&set := $00001000;
  80528. end;
  80529. function TCAN1_C1FIFOCON0.getDONLY : TBits_1; inline;
  80530. begin
  80531. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  80532. end;
  80533. procedure TCAN1_C1FIFOCON0.setUINC; inline;
  80534. begin
  80535. pTDefRegMap(@Self)^.&set := $00002000;
  80536. end;
  80537. procedure TCAN1_C1FIFOCON0.clearUINC; inline;
  80538. begin
  80539. pTDefRegMap(@Self)^.clr := $00002000;
  80540. end;
  80541. procedure TCAN1_C1FIFOCON0.setUINC(thebits : TBits_1); inline;
  80542. begin
  80543. if thebits = 0 then
  80544. pTDefRegMap(@Self)^.clr := $00002000
  80545. else
  80546. pTDefRegMap(@Self)^.&set := $00002000;
  80547. end;
  80548. function TCAN1_C1FIFOCON0.getUINC : TBits_1; inline;
  80549. begin
  80550. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  80551. end;
  80552. procedure TCAN1_C1FIFOCON0.setFRESET; inline;
  80553. begin
  80554. pTDefRegMap(@Self)^.&set := $00004000;
  80555. end;
  80556. procedure TCAN1_C1FIFOCON0.clearFRESET; inline;
  80557. begin
  80558. pTDefRegMap(@Self)^.clr := $00004000;
  80559. end;
  80560. procedure TCAN1_C1FIFOCON0.setFRESET(thebits : TBits_1); inline;
  80561. begin
  80562. if thebits = 0 then
  80563. pTDefRegMap(@Self)^.clr := $00004000
  80564. else
  80565. pTDefRegMap(@Self)^.&set := $00004000;
  80566. end;
  80567. function TCAN1_C1FIFOCON0.getFRESET : TBits_1; inline;
  80568. begin
  80569. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  80570. end;
  80571. procedure TCAN1_C1FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  80572. begin
  80573. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  80574. end;
  80575. function TCAN1_C1FIFOCON0.getFSIZE : TBits_5; inline;
  80576. begin
  80577. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  80578. end;
  80579. procedure TCAN1_C1FIFOCON0.setw(thebits : TBits_32); inline;
  80580. begin
  80581. pTDefRegMap(@Self)^.val := thebits;
  80582. end;
  80583. function TCAN1_C1FIFOCON0.getw : TBits_32; inline;
  80584. begin
  80585. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80586. end;
  80587. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF; inline;
  80588. begin
  80589. pTDefRegMap(@Self)^.&set := $00000001;
  80590. end;
  80591. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIF; inline;
  80592. begin
  80593. pTDefRegMap(@Self)^.clr := $00000001;
  80594. end;
  80595. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  80596. begin
  80597. if thebits = 0 then
  80598. pTDefRegMap(@Self)^.clr := $00000001
  80599. else
  80600. pTDefRegMap(@Self)^.&set := $00000001;
  80601. end;
  80602. function TCAN1_C1FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  80603. begin
  80604. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  80605. end;
  80606. procedure TCAN1_C1FIFOINT0.setRXHALFIF; inline;
  80607. begin
  80608. pTDefRegMap(@Self)^.&set := $00000002;
  80609. end;
  80610. procedure TCAN1_C1FIFOINT0.clearRXHALFIF; inline;
  80611. begin
  80612. pTDefRegMap(@Self)^.clr := $00000002;
  80613. end;
  80614. procedure TCAN1_C1FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  80615. begin
  80616. if thebits = 0 then
  80617. pTDefRegMap(@Self)^.clr := $00000002
  80618. else
  80619. pTDefRegMap(@Self)^.&set := $00000002;
  80620. end;
  80621. function TCAN1_C1FIFOINT0.getRXHALFIF : TBits_1; inline;
  80622. begin
  80623. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  80624. end;
  80625. procedure TCAN1_C1FIFOINT0.setRXFULLIF; inline;
  80626. begin
  80627. pTDefRegMap(@Self)^.&set := $00000004;
  80628. end;
  80629. procedure TCAN1_C1FIFOINT0.clearRXFULLIF; inline;
  80630. begin
  80631. pTDefRegMap(@Self)^.clr := $00000004;
  80632. end;
  80633. procedure TCAN1_C1FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  80634. begin
  80635. if thebits = 0 then
  80636. pTDefRegMap(@Self)^.clr := $00000004
  80637. else
  80638. pTDefRegMap(@Self)^.&set := $00000004;
  80639. end;
  80640. function TCAN1_C1FIFOINT0.getRXFULLIF : TBits_1; inline;
  80641. begin
  80642. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80643. end;
  80644. procedure TCAN1_C1FIFOINT0.setRXOVFLIF; inline;
  80645. begin
  80646. pTDefRegMap(@Self)^.&set := $00000008;
  80647. end;
  80648. procedure TCAN1_C1FIFOINT0.clearRXOVFLIF; inline;
  80649. begin
  80650. pTDefRegMap(@Self)^.clr := $00000008;
  80651. end;
  80652. procedure TCAN1_C1FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  80653. begin
  80654. if thebits = 0 then
  80655. pTDefRegMap(@Self)^.clr := $00000008
  80656. else
  80657. pTDefRegMap(@Self)^.&set := $00000008;
  80658. end;
  80659. function TCAN1_C1FIFOINT0.getRXOVFLIF : TBits_1; inline;
  80660. begin
  80661. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80662. end;
  80663. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF; inline;
  80664. begin
  80665. pTDefRegMap(@Self)^.&set := $00000100;
  80666. end;
  80667. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIF; inline;
  80668. begin
  80669. pTDefRegMap(@Self)^.clr := $00000100;
  80670. end;
  80671. procedure TCAN1_C1FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  80672. begin
  80673. if thebits = 0 then
  80674. pTDefRegMap(@Self)^.clr := $00000100
  80675. else
  80676. pTDefRegMap(@Self)^.&set := $00000100;
  80677. end;
  80678. function TCAN1_C1FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  80679. begin
  80680. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  80681. end;
  80682. procedure TCAN1_C1FIFOINT0.setTXHALFIF; inline;
  80683. begin
  80684. pTDefRegMap(@Self)^.&set := $00000200;
  80685. end;
  80686. procedure TCAN1_C1FIFOINT0.clearTXHALFIF; inline;
  80687. begin
  80688. pTDefRegMap(@Self)^.clr := $00000200;
  80689. end;
  80690. procedure TCAN1_C1FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  80691. begin
  80692. if thebits = 0 then
  80693. pTDefRegMap(@Self)^.clr := $00000200
  80694. else
  80695. pTDefRegMap(@Self)^.&set := $00000200;
  80696. end;
  80697. function TCAN1_C1FIFOINT0.getTXHALFIF : TBits_1; inline;
  80698. begin
  80699. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  80700. end;
  80701. procedure TCAN1_C1FIFOINT0.setTXNFULLIF; inline;
  80702. begin
  80703. pTDefRegMap(@Self)^.&set := $00000400;
  80704. end;
  80705. procedure TCAN1_C1FIFOINT0.clearTXNFULLIF; inline;
  80706. begin
  80707. pTDefRegMap(@Self)^.clr := $00000400;
  80708. end;
  80709. procedure TCAN1_C1FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  80710. begin
  80711. if thebits = 0 then
  80712. pTDefRegMap(@Self)^.clr := $00000400
  80713. else
  80714. pTDefRegMap(@Self)^.&set := $00000400;
  80715. end;
  80716. function TCAN1_C1FIFOINT0.getTXNFULLIF : TBits_1; inline;
  80717. begin
  80718. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  80719. end;
  80720. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE; inline;
  80721. begin
  80722. pTDefRegMap(@Self)^.&set := $00010000;
  80723. end;
  80724. procedure TCAN1_C1FIFOINT0.clearRXNEMPTYIE; inline;
  80725. begin
  80726. pTDefRegMap(@Self)^.clr := $00010000;
  80727. end;
  80728. procedure TCAN1_C1FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  80729. begin
  80730. if thebits = 0 then
  80731. pTDefRegMap(@Self)^.clr := $00010000
  80732. else
  80733. pTDefRegMap(@Self)^.&set := $00010000;
  80734. end;
  80735. function TCAN1_C1FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  80736. begin
  80737. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  80738. end;
  80739. procedure TCAN1_C1FIFOINT0.setRXHALFIE; inline;
  80740. begin
  80741. pTDefRegMap(@Self)^.&set := $00020000;
  80742. end;
  80743. procedure TCAN1_C1FIFOINT0.clearRXHALFIE; inline;
  80744. begin
  80745. pTDefRegMap(@Self)^.clr := $00020000;
  80746. end;
  80747. procedure TCAN1_C1FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  80748. begin
  80749. if thebits = 0 then
  80750. pTDefRegMap(@Self)^.clr := $00020000
  80751. else
  80752. pTDefRegMap(@Self)^.&set := $00020000;
  80753. end;
  80754. function TCAN1_C1FIFOINT0.getRXHALFIE : TBits_1; inline;
  80755. begin
  80756. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  80757. end;
  80758. procedure TCAN1_C1FIFOINT0.setRXFULLIE; inline;
  80759. begin
  80760. pTDefRegMap(@Self)^.&set := $00040000;
  80761. end;
  80762. procedure TCAN1_C1FIFOINT0.clearRXFULLIE; inline;
  80763. begin
  80764. pTDefRegMap(@Self)^.clr := $00040000;
  80765. end;
  80766. procedure TCAN1_C1FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  80767. begin
  80768. if thebits = 0 then
  80769. pTDefRegMap(@Self)^.clr := $00040000
  80770. else
  80771. pTDefRegMap(@Self)^.&set := $00040000;
  80772. end;
  80773. function TCAN1_C1FIFOINT0.getRXFULLIE : TBits_1; inline;
  80774. begin
  80775. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  80776. end;
  80777. procedure TCAN1_C1FIFOINT0.setRXOVFLIE; inline;
  80778. begin
  80779. pTDefRegMap(@Self)^.&set := $00080000;
  80780. end;
  80781. procedure TCAN1_C1FIFOINT0.clearRXOVFLIE; inline;
  80782. begin
  80783. pTDefRegMap(@Self)^.clr := $00080000;
  80784. end;
  80785. procedure TCAN1_C1FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  80786. begin
  80787. if thebits = 0 then
  80788. pTDefRegMap(@Self)^.clr := $00080000
  80789. else
  80790. pTDefRegMap(@Self)^.&set := $00080000;
  80791. end;
  80792. function TCAN1_C1FIFOINT0.getRXOVFLIE : TBits_1; inline;
  80793. begin
  80794. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  80795. end;
  80796. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE; inline;
  80797. begin
  80798. pTDefRegMap(@Self)^.&set := $01000000;
  80799. end;
  80800. procedure TCAN1_C1FIFOINT0.clearTXEMPTYIE; inline;
  80801. begin
  80802. pTDefRegMap(@Self)^.clr := $01000000;
  80803. end;
  80804. procedure TCAN1_C1FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  80805. begin
  80806. if thebits = 0 then
  80807. pTDefRegMap(@Self)^.clr := $01000000
  80808. else
  80809. pTDefRegMap(@Self)^.&set := $01000000;
  80810. end;
  80811. function TCAN1_C1FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  80812. begin
  80813. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  80814. end;
  80815. procedure TCAN1_C1FIFOINT0.setTXHALFIE; inline;
  80816. begin
  80817. pTDefRegMap(@Self)^.&set := $02000000;
  80818. end;
  80819. procedure TCAN1_C1FIFOINT0.clearTXHALFIE; inline;
  80820. begin
  80821. pTDefRegMap(@Self)^.clr := $02000000;
  80822. end;
  80823. procedure TCAN1_C1FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  80824. begin
  80825. if thebits = 0 then
  80826. pTDefRegMap(@Self)^.clr := $02000000
  80827. else
  80828. pTDefRegMap(@Self)^.&set := $02000000;
  80829. end;
  80830. function TCAN1_C1FIFOINT0.getTXHALFIE : TBits_1; inline;
  80831. begin
  80832. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  80833. end;
  80834. procedure TCAN1_C1FIFOINT0.setTXNFULLIE; inline;
  80835. begin
  80836. pTDefRegMap(@Self)^.&set := $04000000;
  80837. end;
  80838. procedure TCAN1_C1FIFOINT0.clearTXNFULLIE; inline;
  80839. begin
  80840. pTDefRegMap(@Self)^.clr := $04000000;
  80841. end;
  80842. procedure TCAN1_C1FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  80843. begin
  80844. if thebits = 0 then
  80845. pTDefRegMap(@Self)^.clr := $04000000
  80846. else
  80847. pTDefRegMap(@Self)^.&set := $04000000;
  80848. end;
  80849. function TCAN1_C1FIFOINT0.getTXNFULLIE : TBits_1; inline;
  80850. begin
  80851. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  80852. end;
  80853. procedure TCAN1_C1FIFOINT0.setw(thebits : TBits_32); inline;
  80854. begin
  80855. pTDefRegMap(@Self)^.val := thebits;
  80856. end;
  80857. function TCAN1_C1FIFOINT0.getw : TBits_32; inline;
  80858. begin
  80859. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80860. end;
  80861. procedure TCAN1_C1FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  80862. begin
  80863. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  80864. end;
  80865. function TCAN1_C1FIFOCI0.getCFIFOCI : TBits_5; inline;
  80866. begin
  80867. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  80868. end;
  80869. procedure TCAN1_C1FIFOCI0.setw(thebits : TBits_32); inline;
  80870. begin
  80871. pTDefRegMap(@Self)^.val := thebits;
  80872. end;
  80873. function TCAN1_C1FIFOCI0.getw : TBits_32; inline;
  80874. begin
  80875. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  80876. end;
  80877. procedure TCAN1_C1FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  80878. begin
  80879. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  80880. end;
  80881. function TCAN1_C1FIFOCON1.getTXPRI : TBits_2; inline;
  80882. begin
  80883. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  80884. end;
  80885. procedure TCAN1_C1FIFOCON1.setRTREN; inline;
  80886. begin
  80887. pTDefRegMap(@Self)^.&set := $00000004;
  80888. end;
  80889. procedure TCAN1_C1FIFOCON1.clearRTREN; inline;
  80890. begin
  80891. pTDefRegMap(@Self)^.clr := $00000004;
  80892. end;
  80893. procedure TCAN1_C1FIFOCON1.setRTREN(thebits : TBits_1); inline;
  80894. begin
  80895. if thebits = 0 then
  80896. pTDefRegMap(@Self)^.clr := $00000004
  80897. else
  80898. pTDefRegMap(@Self)^.&set := $00000004;
  80899. end;
  80900. function TCAN1_C1FIFOCON1.getRTREN : TBits_1; inline;
  80901. begin
  80902. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  80903. end;
  80904. procedure TCAN1_C1FIFOCON1.setTXREQ; inline;
  80905. begin
  80906. pTDefRegMap(@Self)^.&set := $00000008;
  80907. end;
  80908. procedure TCAN1_C1FIFOCON1.clearTXREQ; inline;
  80909. begin
  80910. pTDefRegMap(@Self)^.clr := $00000008;
  80911. end;
  80912. procedure TCAN1_C1FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  80913. begin
  80914. if thebits = 0 then
  80915. pTDefRegMap(@Self)^.clr := $00000008
  80916. else
  80917. pTDefRegMap(@Self)^.&set := $00000008;
  80918. end;
  80919. function TCAN1_C1FIFOCON1.getTXREQ : TBits_1; inline;
  80920. begin
  80921. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  80922. end;
  80923. procedure TCAN1_C1FIFOCON1.setTXERR; inline;
  80924. begin
  80925. pTDefRegMap(@Self)^.&set := $00000010;
  80926. end;
  80927. procedure TCAN1_C1FIFOCON1.clearTXERR; inline;
  80928. begin
  80929. pTDefRegMap(@Self)^.clr := $00000010;
  80930. end;
  80931. procedure TCAN1_C1FIFOCON1.setTXERR(thebits : TBits_1); inline;
  80932. begin
  80933. if thebits = 0 then
  80934. pTDefRegMap(@Self)^.clr := $00000010
  80935. else
  80936. pTDefRegMap(@Self)^.&set := $00000010;
  80937. end;
  80938. function TCAN1_C1FIFOCON1.getTXERR : TBits_1; inline;
  80939. begin
  80940. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  80941. end;
  80942. procedure TCAN1_C1FIFOCON1.setTXLARB; inline;
  80943. begin
  80944. pTDefRegMap(@Self)^.&set := $00000020;
  80945. end;
  80946. procedure TCAN1_C1FIFOCON1.clearTXLARB; inline;
  80947. begin
  80948. pTDefRegMap(@Self)^.clr := $00000020;
  80949. end;
  80950. procedure TCAN1_C1FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  80951. begin
  80952. if thebits = 0 then
  80953. pTDefRegMap(@Self)^.clr := $00000020
  80954. else
  80955. pTDefRegMap(@Self)^.&set := $00000020;
  80956. end;
  80957. function TCAN1_C1FIFOCON1.getTXLARB : TBits_1; inline;
  80958. begin
  80959. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  80960. end;
  80961. procedure TCAN1_C1FIFOCON1.setTXABAT; inline;
  80962. begin
  80963. pTDefRegMap(@Self)^.&set := $00000040;
  80964. end;
  80965. procedure TCAN1_C1FIFOCON1.clearTXABAT; inline;
  80966. begin
  80967. pTDefRegMap(@Self)^.clr := $00000040;
  80968. end;
  80969. procedure TCAN1_C1FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  80970. begin
  80971. if thebits = 0 then
  80972. pTDefRegMap(@Self)^.clr := $00000040
  80973. else
  80974. pTDefRegMap(@Self)^.&set := $00000040;
  80975. end;
  80976. function TCAN1_C1FIFOCON1.getTXABAT : TBits_1; inline;
  80977. begin
  80978. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  80979. end;
  80980. procedure TCAN1_C1FIFOCON1.setTXEN; inline;
  80981. begin
  80982. pTDefRegMap(@Self)^.&set := $00000080;
  80983. end;
  80984. procedure TCAN1_C1FIFOCON1.clearTXEN; inline;
  80985. begin
  80986. pTDefRegMap(@Self)^.clr := $00000080;
  80987. end;
  80988. procedure TCAN1_C1FIFOCON1.setTXEN(thebits : TBits_1); inline;
  80989. begin
  80990. if thebits = 0 then
  80991. pTDefRegMap(@Self)^.clr := $00000080
  80992. else
  80993. pTDefRegMap(@Self)^.&set := $00000080;
  80994. end;
  80995. function TCAN1_C1FIFOCON1.getTXEN : TBits_1; inline;
  80996. begin
  80997. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  80998. end;
  80999. procedure TCAN1_C1FIFOCON1.setDONLY; inline;
  81000. begin
  81001. pTDefRegMap(@Self)^.&set := $00001000;
  81002. end;
  81003. procedure TCAN1_C1FIFOCON1.clearDONLY; inline;
  81004. begin
  81005. pTDefRegMap(@Self)^.clr := $00001000;
  81006. end;
  81007. procedure TCAN1_C1FIFOCON1.setDONLY(thebits : TBits_1); inline;
  81008. begin
  81009. if thebits = 0 then
  81010. pTDefRegMap(@Self)^.clr := $00001000
  81011. else
  81012. pTDefRegMap(@Self)^.&set := $00001000;
  81013. end;
  81014. function TCAN1_C1FIFOCON1.getDONLY : TBits_1; inline;
  81015. begin
  81016. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81017. end;
  81018. procedure TCAN1_C1FIFOCON1.setUINC; inline;
  81019. begin
  81020. pTDefRegMap(@Self)^.&set := $00002000;
  81021. end;
  81022. procedure TCAN1_C1FIFOCON1.clearUINC; inline;
  81023. begin
  81024. pTDefRegMap(@Self)^.clr := $00002000;
  81025. end;
  81026. procedure TCAN1_C1FIFOCON1.setUINC(thebits : TBits_1); inline;
  81027. begin
  81028. if thebits = 0 then
  81029. pTDefRegMap(@Self)^.clr := $00002000
  81030. else
  81031. pTDefRegMap(@Self)^.&set := $00002000;
  81032. end;
  81033. function TCAN1_C1FIFOCON1.getUINC : TBits_1; inline;
  81034. begin
  81035. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81036. end;
  81037. procedure TCAN1_C1FIFOCON1.setFRESET; inline;
  81038. begin
  81039. pTDefRegMap(@Self)^.&set := $00004000;
  81040. end;
  81041. procedure TCAN1_C1FIFOCON1.clearFRESET; inline;
  81042. begin
  81043. pTDefRegMap(@Self)^.clr := $00004000;
  81044. end;
  81045. procedure TCAN1_C1FIFOCON1.setFRESET(thebits : TBits_1); inline;
  81046. begin
  81047. if thebits = 0 then
  81048. pTDefRegMap(@Self)^.clr := $00004000
  81049. else
  81050. pTDefRegMap(@Self)^.&set := $00004000;
  81051. end;
  81052. function TCAN1_C1FIFOCON1.getFRESET : TBits_1; inline;
  81053. begin
  81054. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81055. end;
  81056. procedure TCAN1_C1FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  81057. begin
  81058. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  81059. end;
  81060. function TCAN1_C1FIFOCON1.getFSIZE : TBits_5; inline;
  81061. begin
  81062. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  81063. end;
  81064. procedure TCAN1_C1FIFOCON1.setw(thebits : TBits_32); inline;
  81065. begin
  81066. pTDefRegMap(@Self)^.val := thebits;
  81067. end;
  81068. function TCAN1_C1FIFOCON1.getw : TBits_32; inline;
  81069. begin
  81070. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81071. end;
  81072. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF; inline;
  81073. begin
  81074. pTDefRegMap(@Self)^.&set := $00000001;
  81075. end;
  81076. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIF; inline;
  81077. begin
  81078. pTDefRegMap(@Self)^.clr := $00000001;
  81079. end;
  81080. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  81081. begin
  81082. if thebits = 0 then
  81083. pTDefRegMap(@Self)^.clr := $00000001
  81084. else
  81085. pTDefRegMap(@Self)^.&set := $00000001;
  81086. end;
  81087. function TCAN1_C1FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  81088. begin
  81089. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81090. end;
  81091. procedure TCAN1_C1FIFOINT1.setRXHALFIF; inline;
  81092. begin
  81093. pTDefRegMap(@Self)^.&set := $00000002;
  81094. end;
  81095. procedure TCAN1_C1FIFOINT1.clearRXHALFIF; inline;
  81096. begin
  81097. pTDefRegMap(@Self)^.clr := $00000002;
  81098. end;
  81099. procedure TCAN1_C1FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  81100. begin
  81101. if thebits = 0 then
  81102. pTDefRegMap(@Self)^.clr := $00000002
  81103. else
  81104. pTDefRegMap(@Self)^.&set := $00000002;
  81105. end;
  81106. function TCAN1_C1FIFOINT1.getRXHALFIF : TBits_1; inline;
  81107. begin
  81108. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81109. end;
  81110. procedure TCAN1_C1FIFOINT1.setRXFULLIF; inline;
  81111. begin
  81112. pTDefRegMap(@Self)^.&set := $00000004;
  81113. end;
  81114. procedure TCAN1_C1FIFOINT1.clearRXFULLIF; inline;
  81115. begin
  81116. pTDefRegMap(@Self)^.clr := $00000004;
  81117. end;
  81118. procedure TCAN1_C1FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  81119. begin
  81120. if thebits = 0 then
  81121. pTDefRegMap(@Self)^.clr := $00000004
  81122. else
  81123. pTDefRegMap(@Self)^.&set := $00000004;
  81124. end;
  81125. function TCAN1_C1FIFOINT1.getRXFULLIF : TBits_1; inline;
  81126. begin
  81127. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81128. end;
  81129. procedure TCAN1_C1FIFOINT1.setRXOVFLIF; inline;
  81130. begin
  81131. pTDefRegMap(@Self)^.&set := $00000008;
  81132. end;
  81133. procedure TCAN1_C1FIFOINT1.clearRXOVFLIF; inline;
  81134. begin
  81135. pTDefRegMap(@Self)^.clr := $00000008;
  81136. end;
  81137. procedure TCAN1_C1FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  81138. begin
  81139. if thebits = 0 then
  81140. pTDefRegMap(@Self)^.clr := $00000008
  81141. else
  81142. pTDefRegMap(@Self)^.&set := $00000008;
  81143. end;
  81144. function TCAN1_C1FIFOINT1.getRXOVFLIF : TBits_1; inline;
  81145. begin
  81146. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81147. end;
  81148. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF; inline;
  81149. begin
  81150. pTDefRegMap(@Self)^.&set := $00000100;
  81151. end;
  81152. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIF; inline;
  81153. begin
  81154. pTDefRegMap(@Self)^.clr := $00000100;
  81155. end;
  81156. procedure TCAN1_C1FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  81157. begin
  81158. if thebits = 0 then
  81159. pTDefRegMap(@Self)^.clr := $00000100
  81160. else
  81161. pTDefRegMap(@Self)^.&set := $00000100;
  81162. end;
  81163. function TCAN1_C1FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  81164. begin
  81165. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81166. end;
  81167. procedure TCAN1_C1FIFOINT1.setTXHALFIF; inline;
  81168. begin
  81169. pTDefRegMap(@Self)^.&set := $00000200;
  81170. end;
  81171. procedure TCAN1_C1FIFOINT1.clearTXHALFIF; inline;
  81172. begin
  81173. pTDefRegMap(@Self)^.clr := $00000200;
  81174. end;
  81175. procedure TCAN1_C1FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  81176. begin
  81177. if thebits = 0 then
  81178. pTDefRegMap(@Self)^.clr := $00000200
  81179. else
  81180. pTDefRegMap(@Self)^.&set := $00000200;
  81181. end;
  81182. function TCAN1_C1FIFOINT1.getTXHALFIF : TBits_1; inline;
  81183. begin
  81184. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81185. end;
  81186. procedure TCAN1_C1FIFOINT1.setTXNFULLIF; inline;
  81187. begin
  81188. pTDefRegMap(@Self)^.&set := $00000400;
  81189. end;
  81190. procedure TCAN1_C1FIFOINT1.clearTXNFULLIF; inline;
  81191. begin
  81192. pTDefRegMap(@Self)^.clr := $00000400;
  81193. end;
  81194. procedure TCAN1_C1FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  81195. begin
  81196. if thebits = 0 then
  81197. pTDefRegMap(@Self)^.clr := $00000400
  81198. else
  81199. pTDefRegMap(@Self)^.&set := $00000400;
  81200. end;
  81201. function TCAN1_C1FIFOINT1.getTXNFULLIF : TBits_1; inline;
  81202. begin
  81203. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81204. end;
  81205. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE; inline;
  81206. begin
  81207. pTDefRegMap(@Self)^.&set := $00010000;
  81208. end;
  81209. procedure TCAN1_C1FIFOINT1.clearRXNEMPTYIE; inline;
  81210. begin
  81211. pTDefRegMap(@Self)^.clr := $00010000;
  81212. end;
  81213. procedure TCAN1_C1FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  81214. begin
  81215. if thebits = 0 then
  81216. pTDefRegMap(@Self)^.clr := $00010000
  81217. else
  81218. pTDefRegMap(@Self)^.&set := $00010000;
  81219. end;
  81220. function TCAN1_C1FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  81221. begin
  81222. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81223. end;
  81224. procedure TCAN1_C1FIFOINT1.setRXHALFIE; inline;
  81225. begin
  81226. pTDefRegMap(@Self)^.&set := $00020000;
  81227. end;
  81228. procedure TCAN1_C1FIFOINT1.clearRXHALFIE; inline;
  81229. begin
  81230. pTDefRegMap(@Self)^.clr := $00020000;
  81231. end;
  81232. procedure TCAN1_C1FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  81233. begin
  81234. if thebits = 0 then
  81235. pTDefRegMap(@Self)^.clr := $00020000
  81236. else
  81237. pTDefRegMap(@Self)^.&set := $00020000;
  81238. end;
  81239. function TCAN1_C1FIFOINT1.getRXHALFIE : TBits_1; inline;
  81240. begin
  81241. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81242. end;
  81243. procedure TCAN1_C1FIFOINT1.setRXFULLIE; inline;
  81244. begin
  81245. pTDefRegMap(@Self)^.&set := $00040000;
  81246. end;
  81247. procedure TCAN1_C1FIFOINT1.clearRXFULLIE; inline;
  81248. begin
  81249. pTDefRegMap(@Self)^.clr := $00040000;
  81250. end;
  81251. procedure TCAN1_C1FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  81252. begin
  81253. if thebits = 0 then
  81254. pTDefRegMap(@Self)^.clr := $00040000
  81255. else
  81256. pTDefRegMap(@Self)^.&set := $00040000;
  81257. end;
  81258. function TCAN1_C1FIFOINT1.getRXFULLIE : TBits_1; inline;
  81259. begin
  81260. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81261. end;
  81262. procedure TCAN1_C1FIFOINT1.setRXOVFLIE; inline;
  81263. begin
  81264. pTDefRegMap(@Self)^.&set := $00080000;
  81265. end;
  81266. procedure TCAN1_C1FIFOINT1.clearRXOVFLIE; inline;
  81267. begin
  81268. pTDefRegMap(@Self)^.clr := $00080000;
  81269. end;
  81270. procedure TCAN1_C1FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  81271. begin
  81272. if thebits = 0 then
  81273. pTDefRegMap(@Self)^.clr := $00080000
  81274. else
  81275. pTDefRegMap(@Self)^.&set := $00080000;
  81276. end;
  81277. function TCAN1_C1FIFOINT1.getRXOVFLIE : TBits_1; inline;
  81278. begin
  81279. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81280. end;
  81281. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE; inline;
  81282. begin
  81283. pTDefRegMap(@Self)^.&set := $01000000;
  81284. end;
  81285. procedure TCAN1_C1FIFOINT1.clearTXEMPTYIE; inline;
  81286. begin
  81287. pTDefRegMap(@Self)^.clr := $01000000;
  81288. end;
  81289. procedure TCAN1_C1FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  81290. begin
  81291. if thebits = 0 then
  81292. pTDefRegMap(@Self)^.clr := $01000000
  81293. else
  81294. pTDefRegMap(@Self)^.&set := $01000000;
  81295. end;
  81296. function TCAN1_C1FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  81297. begin
  81298. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81299. end;
  81300. procedure TCAN1_C1FIFOINT1.setTXHALFIE; inline;
  81301. begin
  81302. pTDefRegMap(@Self)^.&set := $02000000;
  81303. end;
  81304. procedure TCAN1_C1FIFOINT1.clearTXHALFIE; inline;
  81305. begin
  81306. pTDefRegMap(@Self)^.clr := $02000000;
  81307. end;
  81308. procedure TCAN1_C1FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  81309. begin
  81310. if thebits = 0 then
  81311. pTDefRegMap(@Self)^.clr := $02000000
  81312. else
  81313. pTDefRegMap(@Self)^.&set := $02000000;
  81314. end;
  81315. function TCAN1_C1FIFOINT1.getTXHALFIE : TBits_1; inline;
  81316. begin
  81317. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81318. end;
  81319. procedure TCAN1_C1FIFOINT1.setTXNFULLIE; inline;
  81320. begin
  81321. pTDefRegMap(@Self)^.&set := $04000000;
  81322. end;
  81323. procedure TCAN1_C1FIFOINT1.clearTXNFULLIE; inline;
  81324. begin
  81325. pTDefRegMap(@Self)^.clr := $04000000;
  81326. end;
  81327. procedure TCAN1_C1FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  81328. begin
  81329. if thebits = 0 then
  81330. pTDefRegMap(@Self)^.clr := $04000000
  81331. else
  81332. pTDefRegMap(@Self)^.&set := $04000000;
  81333. end;
  81334. function TCAN1_C1FIFOINT1.getTXNFULLIE : TBits_1; inline;
  81335. begin
  81336. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  81337. end;
  81338. procedure TCAN1_C1FIFOINT1.setw(thebits : TBits_32); inline;
  81339. begin
  81340. pTDefRegMap(@Self)^.val := thebits;
  81341. end;
  81342. function TCAN1_C1FIFOINT1.getw : TBits_32; inline;
  81343. begin
  81344. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81345. end;
  81346. procedure TCAN1_C1FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  81347. begin
  81348. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  81349. end;
  81350. function TCAN1_C1FIFOCI1.getCFIFOCI : TBits_5; inline;
  81351. begin
  81352. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  81353. end;
  81354. procedure TCAN1_C1FIFOCI1.setw(thebits : TBits_32); inline;
  81355. begin
  81356. pTDefRegMap(@Self)^.val := thebits;
  81357. end;
  81358. function TCAN1_C1FIFOCI1.getw : TBits_32; inline;
  81359. begin
  81360. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81361. end;
  81362. procedure TCAN1_C1FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  81363. begin
  81364. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  81365. end;
  81366. function TCAN1_C1FIFOCON2.getTXPRI : TBits_2; inline;
  81367. begin
  81368. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  81369. end;
  81370. procedure TCAN1_C1FIFOCON2.setRTREN; inline;
  81371. begin
  81372. pTDefRegMap(@Self)^.&set := $00000004;
  81373. end;
  81374. procedure TCAN1_C1FIFOCON2.clearRTREN; inline;
  81375. begin
  81376. pTDefRegMap(@Self)^.clr := $00000004;
  81377. end;
  81378. procedure TCAN1_C1FIFOCON2.setRTREN(thebits : TBits_1); inline;
  81379. begin
  81380. if thebits = 0 then
  81381. pTDefRegMap(@Self)^.clr := $00000004
  81382. else
  81383. pTDefRegMap(@Self)^.&set := $00000004;
  81384. end;
  81385. function TCAN1_C1FIFOCON2.getRTREN : TBits_1; inline;
  81386. begin
  81387. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81388. end;
  81389. procedure TCAN1_C1FIFOCON2.setTXREQ; inline;
  81390. begin
  81391. pTDefRegMap(@Self)^.&set := $00000008;
  81392. end;
  81393. procedure TCAN1_C1FIFOCON2.clearTXREQ; inline;
  81394. begin
  81395. pTDefRegMap(@Self)^.clr := $00000008;
  81396. end;
  81397. procedure TCAN1_C1FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  81398. begin
  81399. if thebits = 0 then
  81400. pTDefRegMap(@Self)^.clr := $00000008
  81401. else
  81402. pTDefRegMap(@Self)^.&set := $00000008;
  81403. end;
  81404. function TCAN1_C1FIFOCON2.getTXREQ : TBits_1; inline;
  81405. begin
  81406. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81407. end;
  81408. procedure TCAN1_C1FIFOCON2.setTXERR; inline;
  81409. begin
  81410. pTDefRegMap(@Self)^.&set := $00000010;
  81411. end;
  81412. procedure TCAN1_C1FIFOCON2.clearTXERR; inline;
  81413. begin
  81414. pTDefRegMap(@Self)^.clr := $00000010;
  81415. end;
  81416. procedure TCAN1_C1FIFOCON2.setTXERR(thebits : TBits_1); inline;
  81417. begin
  81418. if thebits = 0 then
  81419. pTDefRegMap(@Self)^.clr := $00000010
  81420. else
  81421. pTDefRegMap(@Self)^.&set := $00000010;
  81422. end;
  81423. function TCAN1_C1FIFOCON2.getTXERR : TBits_1; inline;
  81424. begin
  81425. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81426. end;
  81427. procedure TCAN1_C1FIFOCON2.setTXLARB; inline;
  81428. begin
  81429. pTDefRegMap(@Self)^.&set := $00000020;
  81430. end;
  81431. procedure TCAN1_C1FIFOCON2.clearTXLARB; inline;
  81432. begin
  81433. pTDefRegMap(@Self)^.clr := $00000020;
  81434. end;
  81435. procedure TCAN1_C1FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  81436. begin
  81437. if thebits = 0 then
  81438. pTDefRegMap(@Self)^.clr := $00000020
  81439. else
  81440. pTDefRegMap(@Self)^.&set := $00000020;
  81441. end;
  81442. function TCAN1_C1FIFOCON2.getTXLARB : TBits_1; inline;
  81443. begin
  81444. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81445. end;
  81446. procedure TCAN1_C1FIFOCON2.setTXABAT; inline;
  81447. begin
  81448. pTDefRegMap(@Self)^.&set := $00000040;
  81449. end;
  81450. procedure TCAN1_C1FIFOCON2.clearTXABAT; inline;
  81451. begin
  81452. pTDefRegMap(@Self)^.clr := $00000040;
  81453. end;
  81454. procedure TCAN1_C1FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  81455. begin
  81456. if thebits = 0 then
  81457. pTDefRegMap(@Self)^.clr := $00000040
  81458. else
  81459. pTDefRegMap(@Self)^.&set := $00000040;
  81460. end;
  81461. function TCAN1_C1FIFOCON2.getTXABAT : TBits_1; inline;
  81462. begin
  81463. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81464. end;
  81465. procedure TCAN1_C1FIFOCON2.setTXEN; inline;
  81466. begin
  81467. pTDefRegMap(@Self)^.&set := $00000080;
  81468. end;
  81469. procedure TCAN1_C1FIFOCON2.clearTXEN; inline;
  81470. begin
  81471. pTDefRegMap(@Self)^.clr := $00000080;
  81472. end;
  81473. procedure TCAN1_C1FIFOCON2.setTXEN(thebits : TBits_1); inline;
  81474. begin
  81475. if thebits = 0 then
  81476. pTDefRegMap(@Self)^.clr := $00000080
  81477. else
  81478. pTDefRegMap(@Self)^.&set := $00000080;
  81479. end;
  81480. function TCAN1_C1FIFOCON2.getTXEN : TBits_1; inline;
  81481. begin
  81482. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81483. end;
  81484. procedure TCAN1_C1FIFOCON2.setDONLY; inline;
  81485. begin
  81486. pTDefRegMap(@Self)^.&set := $00001000;
  81487. end;
  81488. procedure TCAN1_C1FIFOCON2.clearDONLY; inline;
  81489. begin
  81490. pTDefRegMap(@Self)^.clr := $00001000;
  81491. end;
  81492. procedure TCAN1_C1FIFOCON2.setDONLY(thebits : TBits_1); inline;
  81493. begin
  81494. if thebits = 0 then
  81495. pTDefRegMap(@Self)^.clr := $00001000
  81496. else
  81497. pTDefRegMap(@Self)^.&set := $00001000;
  81498. end;
  81499. function TCAN1_C1FIFOCON2.getDONLY : TBits_1; inline;
  81500. begin
  81501. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81502. end;
  81503. procedure TCAN1_C1FIFOCON2.setUINC; inline;
  81504. begin
  81505. pTDefRegMap(@Self)^.&set := $00002000;
  81506. end;
  81507. procedure TCAN1_C1FIFOCON2.clearUINC; inline;
  81508. begin
  81509. pTDefRegMap(@Self)^.clr := $00002000;
  81510. end;
  81511. procedure TCAN1_C1FIFOCON2.setUINC(thebits : TBits_1); inline;
  81512. begin
  81513. if thebits = 0 then
  81514. pTDefRegMap(@Self)^.clr := $00002000
  81515. else
  81516. pTDefRegMap(@Self)^.&set := $00002000;
  81517. end;
  81518. function TCAN1_C1FIFOCON2.getUINC : TBits_1; inline;
  81519. begin
  81520. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  81521. end;
  81522. procedure TCAN1_C1FIFOCON2.setFRESET; inline;
  81523. begin
  81524. pTDefRegMap(@Self)^.&set := $00004000;
  81525. end;
  81526. procedure TCAN1_C1FIFOCON2.clearFRESET; inline;
  81527. begin
  81528. pTDefRegMap(@Self)^.clr := $00004000;
  81529. end;
  81530. procedure TCAN1_C1FIFOCON2.setFRESET(thebits : TBits_1); inline;
  81531. begin
  81532. if thebits = 0 then
  81533. pTDefRegMap(@Self)^.clr := $00004000
  81534. else
  81535. pTDefRegMap(@Self)^.&set := $00004000;
  81536. end;
  81537. function TCAN1_C1FIFOCON2.getFRESET : TBits_1; inline;
  81538. begin
  81539. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  81540. end;
  81541. procedure TCAN1_C1FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  81542. begin
  81543. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  81544. end;
  81545. function TCAN1_C1FIFOCON2.getFSIZE : TBits_5; inline;
  81546. begin
  81547. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  81548. end;
  81549. procedure TCAN1_C1FIFOCON2.setw(thebits : TBits_32); inline;
  81550. begin
  81551. pTDefRegMap(@Self)^.val := thebits;
  81552. end;
  81553. function TCAN1_C1FIFOCON2.getw : TBits_32; inline;
  81554. begin
  81555. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81556. end;
  81557. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF; inline;
  81558. begin
  81559. pTDefRegMap(@Self)^.&set := $00000001;
  81560. end;
  81561. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIF; inline;
  81562. begin
  81563. pTDefRegMap(@Self)^.clr := $00000001;
  81564. end;
  81565. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  81566. begin
  81567. if thebits = 0 then
  81568. pTDefRegMap(@Self)^.clr := $00000001
  81569. else
  81570. pTDefRegMap(@Self)^.&set := $00000001;
  81571. end;
  81572. function TCAN1_C1FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  81573. begin
  81574. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  81575. end;
  81576. procedure TCAN1_C1FIFOINT2.setRXHALFIF; inline;
  81577. begin
  81578. pTDefRegMap(@Self)^.&set := $00000002;
  81579. end;
  81580. procedure TCAN1_C1FIFOINT2.clearRXHALFIF; inline;
  81581. begin
  81582. pTDefRegMap(@Self)^.clr := $00000002;
  81583. end;
  81584. procedure TCAN1_C1FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  81585. begin
  81586. if thebits = 0 then
  81587. pTDefRegMap(@Self)^.clr := $00000002
  81588. else
  81589. pTDefRegMap(@Self)^.&set := $00000002;
  81590. end;
  81591. function TCAN1_C1FIFOINT2.getRXHALFIF : TBits_1; inline;
  81592. begin
  81593. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  81594. end;
  81595. procedure TCAN1_C1FIFOINT2.setRXFULLIF; inline;
  81596. begin
  81597. pTDefRegMap(@Self)^.&set := $00000004;
  81598. end;
  81599. procedure TCAN1_C1FIFOINT2.clearRXFULLIF; inline;
  81600. begin
  81601. pTDefRegMap(@Self)^.clr := $00000004;
  81602. end;
  81603. procedure TCAN1_C1FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  81604. begin
  81605. if thebits = 0 then
  81606. pTDefRegMap(@Self)^.clr := $00000004
  81607. else
  81608. pTDefRegMap(@Self)^.&set := $00000004;
  81609. end;
  81610. function TCAN1_C1FIFOINT2.getRXFULLIF : TBits_1; inline;
  81611. begin
  81612. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81613. end;
  81614. procedure TCAN1_C1FIFOINT2.setRXOVFLIF; inline;
  81615. begin
  81616. pTDefRegMap(@Self)^.&set := $00000008;
  81617. end;
  81618. procedure TCAN1_C1FIFOINT2.clearRXOVFLIF; inline;
  81619. begin
  81620. pTDefRegMap(@Self)^.clr := $00000008;
  81621. end;
  81622. procedure TCAN1_C1FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  81623. begin
  81624. if thebits = 0 then
  81625. pTDefRegMap(@Self)^.clr := $00000008
  81626. else
  81627. pTDefRegMap(@Self)^.&set := $00000008;
  81628. end;
  81629. function TCAN1_C1FIFOINT2.getRXOVFLIF : TBits_1; inline;
  81630. begin
  81631. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81632. end;
  81633. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF; inline;
  81634. begin
  81635. pTDefRegMap(@Self)^.&set := $00000100;
  81636. end;
  81637. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIF; inline;
  81638. begin
  81639. pTDefRegMap(@Self)^.clr := $00000100;
  81640. end;
  81641. procedure TCAN1_C1FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  81642. begin
  81643. if thebits = 0 then
  81644. pTDefRegMap(@Self)^.clr := $00000100
  81645. else
  81646. pTDefRegMap(@Self)^.&set := $00000100;
  81647. end;
  81648. function TCAN1_C1FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  81649. begin
  81650. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  81651. end;
  81652. procedure TCAN1_C1FIFOINT2.setTXHALFIF; inline;
  81653. begin
  81654. pTDefRegMap(@Self)^.&set := $00000200;
  81655. end;
  81656. procedure TCAN1_C1FIFOINT2.clearTXHALFIF; inline;
  81657. begin
  81658. pTDefRegMap(@Self)^.clr := $00000200;
  81659. end;
  81660. procedure TCAN1_C1FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  81661. begin
  81662. if thebits = 0 then
  81663. pTDefRegMap(@Self)^.clr := $00000200
  81664. else
  81665. pTDefRegMap(@Self)^.&set := $00000200;
  81666. end;
  81667. function TCAN1_C1FIFOINT2.getTXHALFIF : TBits_1; inline;
  81668. begin
  81669. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  81670. end;
  81671. procedure TCAN1_C1FIFOINT2.setTXNFULLIF; inline;
  81672. begin
  81673. pTDefRegMap(@Self)^.&set := $00000400;
  81674. end;
  81675. procedure TCAN1_C1FIFOINT2.clearTXNFULLIF; inline;
  81676. begin
  81677. pTDefRegMap(@Self)^.clr := $00000400;
  81678. end;
  81679. procedure TCAN1_C1FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  81680. begin
  81681. if thebits = 0 then
  81682. pTDefRegMap(@Self)^.clr := $00000400
  81683. else
  81684. pTDefRegMap(@Self)^.&set := $00000400;
  81685. end;
  81686. function TCAN1_C1FIFOINT2.getTXNFULLIF : TBits_1; inline;
  81687. begin
  81688. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  81689. end;
  81690. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE; inline;
  81691. begin
  81692. pTDefRegMap(@Self)^.&set := $00010000;
  81693. end;
  81694. procedure TCAN1_C1FIFOINT2.clearRXNEMPTYIE; inline;
  81695. begin
  81696. pTDefRegMap(@Self)^.clr := $00010000;
  81697. end;
  81698. procedure TCAN1_C1FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  81699. begin
  81700. if thebits = 0 then
  81701. pTDefRegMap(@Self)^.clr := $00010000
  81702. else
  81703. pTDefRegMap(@Self)^.&set := $00010000;
  81704. end;
  81705. function TCAN1_C1FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  81706. begin
  81707. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  81708. end;
  81709. procedure TCAN1_C1FIFOINT2.setRXHALFIE; inline;
  81710. begin
  81711. pTDefRegMap(@Self)^.&set := $00020000;
  81712. end;
  81713. procedure TCAN1_C1FIFOINT2.clearRXHALFIE; inline;
  81714. begin
  81715. pTDefRegMap(@Self)^.clr := $00020000;
  81716. end;
  81717. procedure TCAN1_C1FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  81718. begin
  81719. if thebits = 0 then
  81720. pTDefRegMap(@Self)^.clr := $00020000
  81721. else
  81722. pTDefRegMap(@Self)^.&set := $00020000;
  81723. end;
  81724. function TCAN1_C1FIFOINT2.getRXHALFIE : TBits_1; inline;
  81725. begin
  81726. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  81727. end;
  81728. procedure TCAN1_C1FIFOINT2.setRXFULLIE; inline;
  81729. begin
  81730. pTDefRegMap(@Self)^.&set := $00040000;
  81731. end;
  81732. procedure TCAN1_C1FIFOINT2.clearRXFULLIE; inline;
  81733. begin
  81734. pTDefRegMap(@Self)^.clr := $00040000;
  81735. end;
  81736. procedure TCAN1_C1FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  81737. begin
  81738. if thebits = 0 then
  81739. pTDefRegMap(@Self)^.clr := $00040000
  81740. else
  81741. pTDefRegMap(@Self)^.&set := $00040000;
  81742. end;
  81743. function TCAN1_C1FIFOINT2.getRXFULLIE : TBits_1; inline;
  81744. begin
  81745. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  81746. end;
  81747. procedure TCAN1_C1FIFOINT2.setRXOVFLIE; inline;
  81748. begin
  81749. pTDefRegMap(@Self)^.&set := $00080000;
  81750. end;
  81751. procedure TCAN1_C1FIFOINT2.clearRXOVFLIE; inline;
  81752. begin
  81753. pTDefRegMap(@Self)^.clr := $00080000;
  81754. end;
  81755. procedure TCAN1_C1FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  81756. begin
  81757. if thebits = 0 then
  81758. pTDefRegMap(@Self)^.clr := $00080000
  81759. else
  81760. pTDefRegMap(@Self)^.&set := $00080000;
  81761. end;
  81762. function TCAN1_C1FIFOINT2.getRXOVFLIE : TBits_1; inline;
  81763. begin
  81764. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  81765. end;
  81766. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE; inline;
  81767. begin
  81768. pTDefRegMap(@Self)^.&set := $01000000;
  81769. end;
  81770. procedure TCAN1_C1FIFOINT2.clearTXEMPTYIE; inline;
  81771. begin
  81772. pTDefRegMap(@Self)^.clr := $01000000;
  81773. end;
  81774. procedure TCAN1_C1FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  81775. begin
  81776. if thebits = 0 then
  81777. pTDefRegMap(@Self)^.clr := $01000000
  81778. else
  81779. pTDefRegMap(@Self)^.&set := $01000000;
  81780. end;
  81781. function TCAN1_C1FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  81782. begin
  81783. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  81784. end;
  81785. procedure TCAN1_C1FIFOINT2.setTXHALFIE; inline;
  81786. begin
  81787. pTDefRegMap(@Self)^.&set := $02000000;
  81788. end;
  81789. procedure TCAN1_C1FIFOINT2.clearTXHALFIE; inline;
  81790. begin
  81791. pTDefRegMap(@Self)^.clr := $02000000;
  81792. end;
  81793. procedure TCAN1_C1FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  81794. begin
  81795. if thebits = 0 then
  81796. pTDefRegMap(@Self)^.clr := $02000000
  81797. else
  81798. pTDefRegMap(@Self)^.&set := $02000000;
  81799. end;
  81800. function TCAN1_C1FIFOINT2.getTXHALFIE : TBits_1; inline;
  81801. begin
  81802. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  81803. end;
  81804. procedure TCAN1_C1FIFOINT2.setTXNFULLIE; inline;
  81805. begin
  81806. pTDefRegMap(@Self)^.&set := $04000000;
  81807. end;
  81808. procedure TCAN1_C1FIFOINT2.clearTXNFULLIE; inline;
  81809. begin
  81810. pTDefRegMap(@Self)^.clr := $04000000;
  81811. end;
  81812. procedure TCAN1_C1FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  81813. begin
  81814. if thebits = 0 then
  81815. pTDefRegMap(@Self)^.clr := $04000000
  81816. else
  81817. pTDefRegMap(@Self)^.&set := $04000000;
  81818. end;
  81819. function TCAN1_C1FIFOINT2.getTXNFULLIE : TBits_1; inline;
  81820. begin
  81821. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  81822. end;
  81823. procedure TCAN1_C1FIFOINT2.setw(thebits : TBits_32); inline;
  81824. begin
  81825. pTDefRegMap(@Self)^.val := thebits;
  81826. end;
  81827. function TCAN1_C1FIFOINT2.getw : TBits_32; inline;
  81828. begin
  81829. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81830. end;
  81831. procedure TCAN1_C1FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  81832. begin
  81833. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  81834. end;
  81835. function TCAN1_C1FIFOCI2.getCFIFOCI : TBits_5; inline;
  81836. begin
  81837. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  81838. end;
  81839. procedure TCAN1_C1FIFOCI2.setw(thebits : TBits_32); inline;
  81840. begin
  81841. pTDefRegMap(@Self)^.val := thebits;
  81842. end;
  81843. function TCAN1_C1FIFOCI2.getw : TBits_32; inline;
  81844. begin
  81845. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  81846. end;
  81847. procedure TCAN1_C1FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  81848. begin
  81849. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  81850. end;
  81851. function TCAN1_C1FIFOCON3.getTXPRI : TBits_2; inline;
  81852. begin
  81853. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  81854. end;
  81855. procedure TCAN1_C1FIFOCON3.setRTREN; inline;
  81856. begin
  81857. pTDefRegMap(@Self)^.&set := $00000004;
  81858. end;
  81859. procedure TCAN1_C1FIFOCON3.clearRTREN; inline;
  81860. begin
  81861. pTDefRegMap(@Self)^.clr := $00000004;
  81862. end;
  81863. procedure TCAN1_C1FIFOCON3.setRTREN(thebits : TBits_1); inline;
  81864. begin
  81865. if thebits = 0 then
  81866. pTDefRegMap(@Self)^.clr := $00000004
  81867. else
  81868. pTDefRegMap(@Self)^.&set := $00000004;
  81869. end;
  81870. function TCAN1_C1FIFOCON3.getRTREN : TBits_1; inline;
  81871. begin
  81872. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  81873. end;
  81874. procedure TCAN1_C1FIFOCON3.setTXREQ; inline;
  81875. begin
  81876. pTDefRegMap(@Self)^.&set := $00000008;
  81877. end;
  81878. procedure TCAN1_C1FIFOCON3.clearTXREQ; inline;
  81879. begin
  81880. pTDefRegMap(@Self)^.clr := $00000008;
  81881. end;
  81882. procedure TCAN1_C1FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  81883. begin
  81884. if thebits = 0 then
  81885. pTDefRegMap(@Self)^.clr := $00000008
  81886. else
  81887. pTDefRegMap(@Self)^.&set := $00000008;
  81888. end;
  81889. function TCAN1_C1FIFOCON3.getTXREQ : TBits_1; inline;
  81890. begin
  81891. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  81892. end;
  81893. procedure TCAN1_C1FIFOCON3.setTXERR; inline;
  81894. begin
  81895. pTDefRegMap(@Self)^.&set := $00000010;
  81896. end;
  81897. procedure TCAN1_C1FIFOCON3.clearTXERR; inline;
  81898. begin
  81899. pTDefRegMap(@Self)^.clr := $00000010;
  81900. end;
  81901. procedure TCAN1_C1FIFOCON3.setTXERR(thebits : TBits_1); inline;
  81902. begin
  81903. if thebits = 0 then
  81904. pTDefRegMap(@Self)^.clr := $00000010
  81905. else
  81906. pTDefRegMap(@Self)^.&set := $00000010;
  81907. end;
  81908. function TCAN1_C1FIFOCON3.getTXERR : TBits_1; inline;
  81909. begin
  81910. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  81911. end;
  81912. procedure TCAN1_C1FIFOCON3.setTXLARB; inline;
  81913. begin
  81914. pTDefRegMap(@Self)^.&set := $00000020;
  81915. end;
  81916. procedure TCAN1_C1FIFOCON3.clearTXLARB; inline;
  81917. begin
  81918. pTDefRegMap(@Self)^.clr := $00000020;
  81919. end;
  81920. procedure TCAN1_C1FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  81921. begin
  81922. if thebits = 0 then
  81923. pTDefRegMap(@Self)^.clr := $00000020
  81924. else
  81925. pTDefRegMap(@Self)^.&set := $00000020;
  81926. end;
  81927. function TCAN1_C1FIFOCON3.getTXLARB : TBits_1; inline;
  81928. begin
  81929. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  81930. end;
  81931. procedure TCAN1_C1FIFOCON3.setTXABAT; inline;
  81932. begin
  81933. pTDefRegMap(@Self)^.&set := $00000040;
  81934. end;
  81935. procedure TCAN1_C1FIFOCON3.clearTXABAT; inline;
  81936. begin
  81937. pTDefRegMap(@Self)^.clr := $00000040;
  81938. end;
  81939. procedure TCAN1_C1FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  81940. begin
  81941. if thebits = 0 then
  81942. pTDefRegMap(@Self)^.clr := $00000040
  81943. else
  81944. pTDefRegMap(@Self)^.&set := $00000040;
  81945. end;
  81946. function TCAN1_C1FIFOCON3.getTXABAT : TBits_1; inline;
  81947. begin
  81948. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  81949. end;
  81950. procedure TCAN1_C1FIFOCON3.setTXEN; inline;
  81951. begin
  81952. pTDefRegMap(@Self)^.&set := $00000080;
  81953. end;
  81954. procedure TCAN1_C1FIFOCON3.clearTXEN; inline;
  81955. begin
  81956. pTDefRegMap(@Self)^.clr := $00000080;
  81957. end;
  81958. procedure TCAN1_C1FIFOCON3.setTXEN(thebits : TBits_1); inline;
  81959. begin
  81960. if thebits = 0 then
  81961. pTDefRegMap(@Self)^.clr := $00000080
  81962. else
  81963. pTDefRegMap(@Self)^.&set := $00000080;
  81964. end;
  81965. function TCAN1_C1FIFOCON3.getTXEN : TBits_1; inline;
  81966. begin
  81967. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  81968. end;
  81969. procedure TCAN1_C1FIFOCON3.setDONLY; inline;
  81970. begin
  81971. pTDefRegMap(@Self)^.&set := $00001000;
  81972. end;
  81973. procedure TCAN1_C1FIFOCON3.clearDONLY; inline;
  81974. begin
  81975. pTDefRegMap(@Self)^.clr := $00001000;
  81976. end;
  81977. procedure TCAN1_C1FIFOCON3.setDONLY(thebits : TBits_1); inline;
  81978. begin
  81979. if thebits = 0 then
  81980. pTDefRegMap(@Self)^.clr := $00001000
  81981. else
  81982. pTDefRegMap(@Self)^.&set := $00001000;
  81983. end;
  81984. function TCAN1_C1FIFOCON3.getDONLY : TBits_1; inline;
  81985. begin
  81986. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  81987. end;
  81988. procedure TCAN1_C1FIFOCON3.setUINC; inline;
  81989. begin
  81990. pTDefRegMap(@Self)^.&set := $00002000;
  81991. end;
  81992. procedure TCAN1_C1FIFOCON3.clearUINC; inline;
  81993. begin
  81994. pTDefRegMap(@Self)^.clr := $00002000;
  81995. end;
  81996. procedure TCAN1_C1FIFOCON3.setUINC(thebits : TBits_1); inline;
  81997. begin
  81998. if thebits = 0 then
  81999. pTDefRegMap(@Self)^.clr := $00002000
  82000. else
  82001. pTDefRegMap(@Self)^.&set := $00002000;
  82002. end;
  82003. function TCAN1_C1FIFOCON3.getUINC : TBits_1; inline;
  82004. begin
  82005. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82006. end;
  82007. procedure TCAN1_C1FIFOCON3.setFRESET; inline;
  82008. begin
  82009. pTDefRegMap(@Self)^.&set := $00004000;
  82010. end;
  82011. procedure TCAN1_C1FIFOCON3.clearFRESET; inline;
  82012. begin
  82013. pTDefRegMap(@Self)^.clr := $00004000;
  82014. end;
  82015. procedure TCAN1_C1FIFOCON3.setFRESET(thebits : TBits_1); inline;
  82016. begin
  82017. if thebits = 0 then
  82018. pTDefRegMap(@Self)^.clr := $00004000
  82019. else
  82020. pTDefRegMap(@Self)^.&set := $00004000;
  82021. end;
  82022. function TCAN1_C1FIFOCON3.getFRESET : TBits_1; inline;
  82023. begin
  82024. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82025. end;
  82026. procedure TCAN1_C1FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  82027. begin
  82028. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82029. end;
  82030. function TCAN1_C1FIFOCON3.getFSIZE : TBits_5; inline;
  82031. begin
  82032. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82033. end;
  82034. procedure TCAN1_C1FIFOCON3.setw(thebits : TBits_32); inline;
  82035. begin
  82036. pTDefRegMap(@Self)^.val := thebits;
  82037. end;
  82038. function TCAN1_C1FIFOCON3.getw : TBits_32; inline;
  82039. begin
  82040. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82041. end;
  82042. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF; inline;
  82043. begin
  82044. pTDefRegMap(@Self)^.&set := $00000001;
  82045. end;
  82046. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIF; inline;
  82047. begin
  82048. pTDefRegMap(@Self)^.clr := $00000001;
  82049. end;
  82050. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  82051. begin
  82052. if thebits = 0 then
  82053. pTDefRegMap(@Self)^.clr := $00000001
  82054. else
  82055. pTDefRegMap(@Self)^.&set := $00000001;
  82056. end;
  82057. function TCAN1_C1FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  82058. begin
  82059. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82060. end;
  82061. procedure TCAN1_C1FIFOINT3.setRXHALFIF; inline;
  82062. begin
  82063. pTDefRegMap(@Self)^.&set := $00000002;
  82064. end;
  82065. procedure TCAN1_C1FIFOINT3.clearRXHALFIF; inline;
  82066. begin
  82067. pTDefRegMap(@Self)^.clr := $00000002;
  82068. end;
  82069. procedure TCAN1_C1FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  82070. begin
  82071. if thebits = 0 then
  82072. pTDefRegMap(@Self)^.clr := $00000002
  82073. else
  82074. pTDefRegMap(@Self)^.&set := $00000002;
  82075. end;
  82076. function TCAN1_C1FIFOINT3.getRXHALFIF : TBits_1; inline;
  82077. begin
  82078. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82079. end;
  82080. procedure TCAN1_C1FIFOINT3.setRXFULLIF; inline;
  82081. begin
  82082. pTDefRegMap(@Self)^.&set := $00000004;
  82083. end;
  82084. procedure TCAN1_C1FIFOINT3.clearRXFULLIF; inline;
  82085. begin
  82086. pTDefRegMap(@Self)^.clr := $00000004;
  82087. end;
  82088. procedure TCAN1_C1FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  82089. begin
  82090. if thebits = 0 then
  82091. pTDefRegMap(@Self)^.clr := $00000004
  82092. else
  82093. pTDefRegMap(@Self)^.&set := $00000004;
  82094. end;
  82095. function TCAN1_C1FIFOINT3.getRXFULLIF : TBits_1; inline;
  82096. begin
  82097. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82098. end;
  82099. procedure TCAN1_C1FIFOINT3.setRXOVFLIF; inline;
  82100. begin
  82101. pTDefRegMap(@Self)^.&set := $00000008;
  82102. end;
  82103. procedure TCAN1_C1FIFOINT3.clearRXOVFLIF; inline;
  82104. begin
  82105. pTDefRegMap(@Self)^.clr := $00000008;
  82106. end;
  82107. procedure TCAN1_C1FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  82108. begin
  82109. if thebits = 0 then
  82110. pTDefRegMap(@Self)^.clr := $00000008
  82111. else
  82112. pTDefRegMap(@Self)^.&set := $00000008;
  82113. end;
  82114. function TCAN1_C1FIFOINT3.getRXOVFLIF : TBits_1; inline;
  82115. begin
  82116. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82117. end;
  82118. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF; inline;
  82119. begin
  82120. pTDefRegMap(@Self)^.&set := $00000100;
  82121. end;
  82122. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIF; inline;
  82123. begin
  82124. pTDefRegMap(@Self)^.clr := $00000100;
  82125. end;
  82126. procedure TCAN1_C1FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  82127. begin
  82128. if thebits = 0 then
  82129. pTDefRegMap(@Self)^.clr := $00000100
  82130. else
  82131. pTDefRegMap(@Self)^.&set := $00000100;
  82132. end;
  82133. function TCAN1_C1FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  82134. begin
  82135. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82136. end;
  82137. procedure TCAN1_C1FIFOINT3.setTXHALFIF; inline;
  82138. begin
  82139. pTDefRegMap(@Self)^.&set := $00000200;
  82140. end;
  82141. procedure TCAN1_C1FIFOINT3.clearTXHALFIF; inline;
  82142. begin
  82143. pTDefRegMap(@Self)^.clr := $00000200;
  82144. end;
  82145. procedure TCAN1_C1FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  82146. begin
  82147. if thebits = 0 then
  82148. pTDefRegMap(@Self)^.clr := $00000200
  82149. else
  82150. pTDefRegMap(@Self)^.&set := $00000200;
  82151. end;
  82152. function TCAN1_C1FIFOINT3.getTXHALFIF : TBits_1; inline;
  82153. begin
  82154. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82155. end;
  82156. procedure TCAN1_C1FIFOINT3.setTXNFULLIF; inline;
  82157. begin
  82158. pTDefRegMap(@Self)^.&set := $00000400;
  82159. end;
  82160. procedure TCAN1_C1FIFOINT3.clearTXNFULLIF; inline;
  82161. begin
  82162. pTDefRegMap(@Self)^.clr := $00000400;
  82163. end;
  82164. procedure TCAN1_C1FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  82165. begin
  82166. if thebits = 0 then
  82167. pTDefRegMap(@Self)^.clr := $00000400
  82168. else
  82169. pTDefRegMap(@Self)^.&set := $00000400;
  82170. end;
  82171. function TCAN1_C1FIFOINT3.getTXNFULLIF : TBits_1; inline;
  82172. begin
  82173. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82174. end;
  82175. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE; inline;
  82176. begin
  82177. pTDefRegMap(@Self)^.&set := $00010000;
  82178. end;
  82179. procedure TCAN1_C1FIFOINT3.clearRXNEMPTYIE; inline;
  82180. begin
  82181. pTDefRegMap(@Self)^.clr := $00010000;
  82182. end;
  82183. procedure TCAN1_C1FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  82184. begin
  82185. if thebits = 0 then
  82186. pTDefRegMap(@Self)^.clr := $00010000
  82187. else
  82188. pTDefRegMap(@Self)^.&set := $00010000;
  82189. end;
  82190. function TCAN1_C1FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  82191. begin
  82192. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82193. end;
  82194. procedure TCAN1_C1FIFOINT3.setRXHALFIE; inline;
  82195. begin
  82196. pTDefRegMap(@Self)^.&set := $00020000;
  82197. end;
  82198. procedure TCAN1_C1FIFOINT3.clearRXHALFIE; inline;
  82199. begin
  82200. pTDefRegMap(@Self)^.clr := $00020000;
  82201. end;
  82202. procedure TCAN1_C1FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  82203. begin
  82204. if thebits = 0 then
  82205. pTDefRegMap(@Self)^.clr := $00020000
  82206. else
  82207. pTDefRegMap(@Self)^.&set := $00020000;
  82208. end;
  82209. function TCAN1_C1FIFOINT3.getRXHALFIE : TBits_1; inline;
  82210. begin
  82211. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82212. end;
  82213. procedure TCAN1_C1FIFOINT3.setRXFULLIE; inline;
  82214. begin
  82215. pTDefRegMap(@Self)^.&set := $00040000;
  82216. end;
  82217. procedure TCAN1_C1FIFOINT3.clearRXFULLIE; inline;
  82218. begin
  82219. pTDefRegMap(@Self)^.clr := $00040000;
  82220. end;
  82221. procedure TCAN1_C1FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  82222. begin
  82223. if thebits = 0 then
  82224. pTDefRegMap(@Self)^.clr := $00040000
  82225. else
  82226. pTDefRegMap(@Self)^.&set := $00040000;
  82227. end;
  82228. function TCAN1_C1FIFOINT3.getRXFULLIE : TBits_1; inline;
  82229. begin
  82230. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82231. end;
  82232. procedure TCAN1_C1FIFOINT3.setRXOVFLIE; inline;
  82233. begin
  82234. pTDefRegMap(@Self)^.&set := $00080000;
  82235. end;
  82236. procedure TCAN1_C1FIFOINT3.clearRXOVFLIE; inline;
  82237. begin
  82238. pTDefRegMap(@Self)^.clr := $00080000;
  82239. end;
  82240. procedure TCAN1_C1FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  82241. begin
  82242. if thebits = 0 then
  82243. pTDefRegMap(@Self)^.clr := $00080000
  82244. else
  82245. pTDefRegMap(@Self)^.&set := $00080000;
  82246. end;
  82247. function TCAN1_C1FIFOINT3.getRXOVFLIE : TBits_1; inline;
  82248. begin
  82249. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82250. end;
  82251. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE; inline;
  82252. begin
  82253. pTDefRegMap(@Self)^.&set := $01000000;
  82254. end;
  82255. procedure TCAN1_C1FIFOINT3.clearTXEMPTYIE; inline;
  82256. begin
  82257. pTDefRegMap(@Self)^.clr := $01000000;
  82258. end;
  82259. procedure TCAN1_C1FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  82260. begin
  82261. if thebits = 0 then
  82262. pTDefRegMap(@Self)^.clr := $01000000
  82263. else
  82264. pTDefRegMap(@Self)^.&set := $01000000;
  82265. end;
  82266. function TCAN1_C1FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  82267. begin
  82268. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82269. end;
  82270. procedure TCAN1_C1FIFOINT3.setTXHALFIE; inline;
  82271. begin
  82272. pTDefRegMap(@Self)^.&set := $02000000;
  82273. end;
  82274. procedure TCAN1_C1FIFOINT3.clearTXHALFIE; inline;
  82275. begin
  82276. pTDefRegMap(@Self)^.clr := $02000000;
  82277. end;
  82278. procedure TCAN1_C1FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  82279. begin
  82280. if thebits = 0 then
  82281. pTDefRegMap(@Self)^.clr := $02000000
  82282. else
  82283. pTDefRegMap(@Self)^.&set := $02000000;
  82284. end;
  82285. function TCAN1_C1FIFOINT3.getTXHALFIE : TBits_1; inline;
  82286. begin
  82287. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82288. end;
  82289. procedure TCAN1_C1FIFOINT3.setTXNFULLIE; inline;
  82290. begin
  82291. pTDefRegMap(@Self)^.&set := $04000000;
  82292. end;
  82293. procedure TCAN1_C1FIFOINT3.clearTXNFULLIE; inline;
  82294. begin
  82295. pTDefRegMap(@Self)^.clr := $04000000;
  82296. end;
  82297. procedure TCAN1_C1FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  82298. begin
  82299. if thebits = 0 then
  82300. pTDefRegMap(@Self)^.clr := $04000000
  82301. else
  82302. pTDefRegMap(@Self)^.&set := $04000000;
  82303. end;
  82304. function TCAN1_C1FIFOINT3.getTXNFULLIE : TBits_1; inline;
  82305. begin
  82306. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82307. end;
  82308. procedure TCAN1_C1FIFOINT3.setw(thebits : TBits_32); inline;
  82309. begin
  82310. pTDefRegMap(@Self)^.val := thebits;
  82311. end;
  82312. function TCAN1_C1FIFOINT3.getw : TBits_32; inline;
  82313. begin
  82314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82315. end;
  82316. procedure TCAN1_C1FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  82317. begin
  82318. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82319. end;
  82320. function TCAN1_C1FIFOCI3.getCFIFOCI : TBits_5; inline;
  82321. begin
  82322. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82323. end;
  82324. procedure TCAN1_C1FIFOCI3.setw(thebits : TBits_32); inline;
  82325. begin
  82326. pTDefRegMap(@Self)^.val := thebits;
  82327. end;
  82328. function TCAN1_C1FIFOCI3.getw : TBits_32; inline;
  82329. begin
  82330. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82331. end;
  82332. procedure TCAN1_C1FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  82333. begin
  82334. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  82335. end;
  82336. function TCAN1_C1FIFOCON4.getTXPRI : TBits_2; inline;
  82337. begin
  82338. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  82339. end;
  82340. procedure TCAN1_C1FIFOCON4.setRTREN; inline;
  82341. begin
  82342. pTDefRegMap(@Self)^.&set := $00000004;
  82343. end;
  82344. procedure TCAN1_C1FIFOCON4.clearRTREN; inline;
  82345. begin
  82346. pTDefRegMap(@Self)^.clr := $00000004;
  82347. end;
  82348. procedure TCAN1_C1FIFOCON4.setRTREN(thebits : TBits_1); inline;
  82349. begin
  82350. if thebits = 0 then
  82351. pTDefRegMap(@Self)^.clr := $00000004
  82352. else
  82353. pTDefRegMap(@Self)^.&set := $00000004;
  82354. end;
  82355. function TCAN1_C1FIFOCON4.getRTREN : TBits_1; inline;
  82356. begin
  82357. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82358. end;
  82359. procedure TCAN1_C1FIFOCON4.setTXREQ; inline;
  82360. begin
  82361. pTDefRegMap(@Self)^.&set := $00000008;
  82362. end;
  82363. procedure TCAN1_C1FIFOCON4.clearTXREQ; inline;
  82364. begin
  82365. pTDefRegMap(@Self)^.clr := $00000008;
  82366. end;
  82367. procedure TCAN1_C1FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  82368. begin
  82369. if thebits = 0 then
  82370. pTDefRegMap(@Self)^.clr := $00000008
  82371. else
  82372. pTDefRegMap(@Self)^.&set := $00000008;
  82373. end;
  82374. function TCAN1_C1FIFOCON4.getTXREQ : TBits_1; inline;
  82375. begin
  82376. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82377. end;
  82378. procedure TCAN1_C1FIFOCON4.setTXERR; inline;
  82379. begin
  82380. pTDefRegMap(@Self)^.&set := $00000010;
  82381. end;
  82382. procedure TCAN1_C1FIFOCON4.clearTXERR; inline;
  82383. begin
  82384. pTDefRegMap(@Self)^.clr := $00000010;
  82385. end;
  82386. procedure TCAN1_C1FIFOCON4.setTXERR(thebits : TBits_1); inline;
  82387. begin
  82388. if thebits = 0 then
  82389. pTDefRegMap(@Self)^.clr := $00000010
  82390. else
  82391. pTDefRegMap(@Self)^.&set := $00000010;
  82392. end;
  82393. function TCAN1_C1FIFOCON4.getTXERR : TBits_1; inline;
  82394. begin
  82395. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82396. end;
  82397. procedure TCAN1_C1FIFOCON4.setTXLARB; inline;
  82398. begin
  82399. pTDefRegMap(@Self)^.&set := $00000020;
  82400. end;
  82401. procedure TCAN1_C1FIFOCON4.clearTXLARB; inline;
  82402. begin
  82403. pTDefRegMap(@Self)^.clr := $00000020;
  82404. end;
  82405. procedure TCAN1_C1FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  82406. begin
  82407. if thebits = 0 then
  82408. pTDefRegMap(@Self)^.clr := $00000020
  82409. else
  82410. pTDefRegMap(@Self)^.&set := $00000020;
  82411. end;
  82412. function TCAN1_C1FIFOCON4.getTXLARB : TBits_1; inline;
  82413. begin
  82414. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82415. end;
  82416. procedure TCAN1_C1FIFOCON4.setTXABAT; inline;
  82417. begin
  82418. pTDefRegMap(@Self)^.&set := $00000040;
  82419. end;
  82420. procedure TCAN1_C1FIFOCON4.clearTXABAT; inline;
  82421. begin
  82422. pTDefRegMap(@Self)^.clr := $00000040;
  82423. end;
  82424. procedure TCAN1_C1FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  82425. begin
  82426. if thebits = 0 then
  82427. pTDefRegMap(@Self)^.clr := $00000040
  82428. else
  82429. pTDefRegMap(@Self)^.&set := $00000040;
  82430. end;
  82431. function TCAN1_C1FIFOCON4.getTXABAT : TBits_1; inline;
  82432. begin
  82433. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82434. end;
  82435. procedure TCAN1_C1FIFOCON4.setTXEN; inline;
  82436. begin
  82437. pTDefRegMap(@Self)^.&set := $00000080;
  82438. end;
  82439. procedure TCAN1_C1FIFOCON4.clearTXEN; inline;
  82440. begin
  82441. pTDefRegMap(@Self)^.clr := $00000080;
  82442. end;
  82443. procedure TCAN1_C1FIFOCON4.setTXEN(thebits : TBits_1); inline;
  82444. begin
  82445. if thebits = 0 then
  82446. pTDefRegMap(@Self)^.clr := $00000080
  82447. else
  82448. pTDefRegMap(@Self)^.&set := $00000080;
  82449. end;
  82450. function TCAN1_C1FIFOCON4.getTXEN : TBits_1; inline;
  82451. begin
  82452. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82453. end;
  82454. procedure TCAN1_C1FIFOCON4.setDONLY; inline;
  82455. begin
  82456. pTDefRegMap(@Self)^.&set := $00001000;
  82457. end;
  82458. procedure TCAN1_C1FIFOCON4.clearDONLY; inline;
  82459. begin
  82460. pTDefRegMap(@Self)^.clr := $00001000;
  82461. end;
  82462. procedure TCAN1_C1FIFOCON4.setDONLY(thebits : TBits_1); inline;
  82463. begin
  82464. if thebits = 0 then
  82465. pTDefRegMap(@Self)^.clr := $00001000
  82466. else
  82467. pTDefRegMap(@Self)^.&set := $00001000;
  82468. end;
  82469. function TCAN1_C1FIFOCON4.getDONLY : TBits_1; inline;
  82470. begin
  82471. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82472. end;
  82473. procedure TCAN1_C1FIFOCON4.setUINC; inline;
  82474. begin
  82475. pTDefRegMap(@Self)^.&set := $00002000;
  82476. end;
  82477. procedure TCAN1_C1FIFOCON4.clearUINC; inline;
  82478. begin
  82479. pTDefRegMap(@Self)^.clr := $00002000;
  82480. end;
  82481. procedure TCAN1_C1FIFOCON4.setUINC(thebits : TBits_1); inline;
  82482. begin
  82483. if thebits = 0 then
  82484. pTDefRegMap(@Self)^.clr := $00002000
  82485. else
  82486. pTDefRegMap(@Self)^.&set := $00002000;
  82487. end;
  82488. function TCAN1_C1FIFOCON4.getUINC : TBits_1; inline;
  82489. begin
  82490. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82491. end;
  82492. procedure TCAN1_C1FIFOCON4.setFRESET; inline;
  82493. begin
  82494. pTDefRegMap(@Self)^.&set := $00004000;
  82495. end;
  82496. procedure TCAN1_C1FIFOCON4.clearFRESET; inline;
  82497. begin
  82498. pTDefRegMap(@Self)^.clr := $00004000;
  82499. end;
  82500. procedure TCAN1_C1FIFOCON4.setFRESET(thebits : TBits_1); inline;
  82501. begin
  82502. if thebits = 0 then
  82503. pTDefRegMap(@Self)^.clr := $00004000
  82504. else
  82505. pTDefRegMap(@Self)^.&set := $00004000;
  82506. end;
  82507. function TCAN1_C1FIFOCON4.getFRESET : TBits_1; inline;
  82508. begin
  82509. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82510. end;
  82511. procedure TCAN1_C1FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  82512. begin
  82513. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82514. end;
  82515. function TCAN1_C1FIFOCON4.getFSIZE : TBits_5; inline;
  82516. begin
  82517. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  82518. end;
  82519. procedure TCAN1_C1FIFOCON4.setw(thebits : TBits_32); inline;
  82520. begin
  82521. pTDefRegMap(@Self)^.val := thebits;
  82522. end;
  82523. function TCAN1_C1FIFOCON4.getw : TBits_32; inline;
  82524. begin
  82525. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82526. end;
  82527. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF; inline;
  82528. begin
  82529. pTDefRegMap(@Self)^.&set := $00000001;
  82530. end;
  82531. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIF; inline;
  82532. begin
  82533. pTDefRegMap(@Self)^.clr := $00000001;
  82534. end;
  82535. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  82536. begin
  82537. if thebits = 0 then
  82538. pTDefRegMap(@Self)^.clr := $00000001
  82539. else
  82540. pTDefRegMap(@Self)^.&set := $00000001;
  82541. end;
  82542. function TCAN1_C1FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  82543. begin
  82544. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  82545. end;
  82546. procedure TCAN1_C1FIFOINT4.setRXHALFIF; inline;
  82547. begin
  82548. pTDefRegMap(@Self)^.&set := $00000002;
  82549. end;
  82550. procedure TCAN1_C1FIFOINT4.clearRXHALFIF; inline;
  82551. begin
  82552. pTDefRegMap(@Self)^.clr := $00000002;
  82553. end;
  82554. procedure TCAN1_C1FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  82555. begin
  82556. if thebits = 0 then
  82557. pTDefRegMap(@Self)^.clr := $00000002
  82558. else
  82559. pTDefRegMap(@Self)^.&set := $00000002;
  82560. end;
  82561. function TCAN1_C1FIFOINT4.getRXHALFIF : TBits_1; inline;
  82562. begin
  82563. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  82564. end;
  82565. procedure TCAN1_C1FIFOINT4.setRXFULLIF; inline;
  82566. begin
  82567. pTDefRegMap(@Self)^.&set := $00000004;
  82568. end;
  82569. procedure TCAN1_C1FIFOINT4.clearRXFULLIF; inline;
  82570. begin
  82571. pTDefRegMap(@Self)^.clr := $00000004;
  82572. end;
  82573. procedure TCAN1_C1FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  82574. begin
  82575. if thebits = 0 then
  82576. pTDefRegMap(@Self)^.clr := $00000004
  82577. else
  82578. pTDefRegMap(@Self)^.&set := $00000004;
  82579. end;
  82580. function TCAN1_C1FIFOINT4.getRXFULLIF : TBits_1; inline;
  82581. begin
  82582. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82583. end;
  82584. procedure TCAN1_C1FIFOINT4.setRXOVFLIF; inline;
  82585. begin
  82586. pTDefRegMap(@Self)^.&set := $00000008;
  82587. end;
  82588. procedure TCAN1_C1FIFOINT4.clearRXOVFLIF; inline;
  82589. begin
  82590. pTDefRegMap(@Self)^.clr := $00000008;
  82591. end;
  82592. procedure TCAN1_C1FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  82593. begin
  82594. if thebits = 0 then
  82595. pTDefRegMap(@Self)^.clr := $00000008
  82596. else
  82597. pTDefRegMap(@Self)^.&set := $00000008;
  82598. end;
  82599. function TCAN1_C1FIFOINT4.getRXOVFLIF : TBits_1; inline;
  82600. begin
  82601. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82602. end;
  82603. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF; inline;
  82604. begin
  82605. pTDefRegMap(@Self)^.&set := $00000100;
  82606. end;
  82607. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIF; inline;
  82608. begin
  82609. pTDefRegMap(@Self)^.clr := $00000100;
  82610. end;
  82611. procedure TCAN1_C1FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  82612. begin
  82613. if thebits = 0 then
  82614. pTDefRegMap(@Self)^.clr := $00000100
  82615. else
  82616. pTDefRegMap(@Self)^.&set := $00000100;
  82617. end;
  82618. function TCAN1_C1FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  82619. begin
  82620. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  82621. end;
  82622. procedure TCAN1_C1FIFOINT4.setTXHALFIF; inline;
  82623. begin
  82624. pTDefRegMap(@Self)^.&set := $00000200;
  82625. end;
  82626. procedure TCAN1_C1FIFOINT4.clearTXHALFIF; inline;
  82627. begin
  82628. pTDefRegMap(@Self)^.clr := $00000200;
  82629. end;
  82630. procedure TCAN1_C1FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  82631. begin
  82632. if thebits = 0 then
  82633. pTDefRegMap(@Self)^.clr := $00000200
  82634. else
  82635. pTDefRegMap(@Self)^.&set := $00000200;
  82636. end;
  82637. function TCAN1_C1FIFOINT4.getTXHALFIF : TBits_1; inline;
  82638. begin
  82639. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  82640. end;
  82641. procedure TCAN1_C1FIFOINT4.setTXNFULLIF; inline;
  82642. begin
  82643. pTDefRegMap(@Self)^.&set := $00000400;
  82644. end;
  82645. procedure TCAN1_C1FIFOINT4.clearTXNFULLIF; inline;
  82646. begin
  82647. pTDefRegMap(@Self)^.clr := $00000400;
  82648. end;
  82649. procedure TCAN1_C1FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  82650. begin
  82651. if thebits = 0 then
  82652. pTDefRegMap(@Self)^.clr := $00000400
  82653. else
  82654. pTDefRegMap(@Self)^.&set := $00000400;
  82655. end;
  82656. function TCAN1_C1FIFOINT4.getTXNFULLIF : TBits_1; inline;
  82657. begin
  82658. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  82659. end;
  82660. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE; inline;
  82661. begin
  82662. pTDefRegMap(@Self)^.&set := $00010000;
  82663. end;
  82664. procedure TCAN1_C1FIFOINT4.clearRXNEMPTYIE; inline;
  82665. begin
  82666. pTDefRegMap(@Self)^.clr := $00010000;
  82667. end;
  82668. procedure TCAN1_C1FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  82669. begin
  82670. if thebits = 0 then
  82671. pTDefRegMap(@Self)^.clr := $00010000
  82672. else
  82673. pTDefRegMap(@Self)^.&set := $00010000;
  82674. end;
  82675. function TCAN1_C1FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  82676. begin
  82677. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  82678. end;
  82679. procedure TCAN1_C1FIFOINT4.setRXHALFIE; inline;
  82680. begin
  82681. pTDefRegMap(@Self)^.&set := $00020000;
  82682. end;
  82683. procedure TCAN1_C1FIFOINT4.clearRXHALFIE; inline;
  82684. begin
  82685. pTDefRegMap(@Self)^.clr := $00020000;
  82686. end;
  82687. procedure TCAN1_C1FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  82688. begin
  82689. if thebits = 0 then
  82690. pTDefRegMap(@Self)^.clr := $00020000
  82691. else
  82692. pTDefRegMap(@Self)^.&set := $00020000;
  82693. end;
  82694. function TCAN1_C1FIFOINT4.getRXHALFIE : TBits_1; inline;
  82695. begin
  82696. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  82697. end;
  82698. procedure TCAN1_C1FIFOINT4.setRXFULLIE; inline;
  82699. begin
  82700. pTDefRegMap(@Self)^.&set := $00040000;
  82701. end;
  82702. procedure TCAN1_C1FIFOINT4.clearRXFULLIE; inline;
  82703. begin
  82704. pTDefRegMap(@Self)^.clr := $00040000;
  82705. end;
  82706. procedure TCAN1_C1FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  82707. begin
  82708. if thebits = 0 then
  82709. pTDefRegMap(@Self)^.clr := $00040000
  82710. else
  82711. pTDefRegMap(@Self)^.&set := $00040000;
  82712. end;
  82713. function TCAN1_C1FIFOINT4.getRXFULLIE : TBits_1; inline;
  82714. begin
  82715. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  82716. end;
  82717. procedure TCAN1_C1FIFOINT4.setRXOVFLIE; inline;
  82718. begin
  82719. pTDefRegMap(@Self)^.&set := $00080000;
  82720. end;
  82721. procedure TCAN1_C1FIFOINT4.clearRXOVFLIE; inline;
  82722. begin
  82723. pTDefRegMap(@Self)^.clr := $00080000;
  82724. end;
  82725. procedure TCAN1_C1FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  82726. begin
  82727. if thebits = 0 then
  82728. pTDefRegMap(@Self)^.clr := $00080000
  82729. else
  82730. pTDefRegMap(@Self)^.&set := $00080000;
  82731. end;
  82732. function TCAN1_C1FIFOINT4.getRXOVFLIE : TBits_1; inline;
  82733. begin
  82734. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  82735. end;
  82736. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE; inline;
  82737. begin
  82738. pTDefRegMap(@Self)^.&set := $01000000;
  82739. end;
  82740. procedure TCAN1_C1FIFOINT4.clearTXEMPTYIE; inline;
  82741. begin
  82742. pTDefRegMap(@Self)^.clr := $01000000;
  82743. end;
  82744. procedure TCAN1_C1FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  82745. begin
  82746. if thebits = 0 then
  82747. pTDefRegMap(@Self)^.clr := $01000000
  82748. else
  82749. pTDefRegMap(@Self)^.&set := $01000000;
  82750. end;
  82751. function TCAN1_C1FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  82752. begin
  82753. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  82754. end;
  82755. procedure TCAN1_C1FIFOINT4.setTXHALFIE; inline;
  82756. begin
  82757. pTDefRegMap(@Self)^.&set := $02000000;
  82758. end;
  82759. procedure TCAN1_C1FIFOINT4.clearTXHALFIE; inline;
  82760. begin
  82761. pTDefRegMap(@Self)^.clr := $02000000;
  82762. end;
  82763. procedure TCAN1_C1FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  82764. begin
  82765. if thebits = 0 then
  82766. pTDefRegMap(@Self)^.clr := $02000000
  82767. else
  82768. pTDefRegMap(@Self)^.&set := $02000000;
  82769. end;
  82770. function TCAN1_C1FIFOINT4.getTXHALFIE : TBits_1; inline;
  82771. begin
  82772. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  82773. end;
  82774. procedure TCAN1_C1FIFOINT4.setTXNFULLIE; inline;
  82775. begin
  82776. pTDefRegMap(@Self)^.&set := $04000000;
  82777. end;
  82778. procedure TCAN1_C1FIFOINT4.clearTXNFULLIE; inline;
  82779. begin
  82780. pTDefRegMap(@Self)^.clr := $04000000;
  82781. end;
  82782. procedure TCAN1_C1FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  82783. begin
  82784. if thebits = 0 then
  82785. pTDefRegMap(@Self)^.clr := $04000000
  82786. else
  82787. pTDefRegMap(@Self)^.&set := $04000000;
  82788. end;
  82789. function TCAN1_C1FIFOINT4.getTXNFULLIE : TBits_1; inline;
  82790. begin
  82791. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  82792. end;
  82793. procedure TCAN1_C1FIFOINT4.setw(thebits : TBits_32); inline;
  82794. begin
  82795. pTDefRegMap(@Self)^.val := thebits;
  82796. end;
  82797. function TCAN1_C1FIFOINT4.getw : TBits_32; inline;
  82798. begin
  82799. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82800. end;
  82801. procedure TCAN1_C1FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  82802. begin
  82803. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  82804. end;
  82805. function TCAN1_C1FIFOCI4.getCFIFOCI : TBits_5; inline;
  82806. begin
  82807. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  82808. end;
  82809. procedure TCAN1_C1FIFOCI4.setw(thebits : TBits_32); inline;
  82810. begin
  82811. pTDefRegMap(@Self)^.val := thebits;
  82812. end;
  82813. function TCAN1_C1FIFOCI4.getw : TBits_32; inline;
  82814. begin
  82815. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  82816. end;
  82817. procedure TCAN1_C1FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  82818. begin
  82819. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  82820. end;
  82821. function TCAN1_C1FIFOCON5.getTXPRI : TBits_2; inline;
  82822. begin
  82823. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  82824. end;
  82825. procedure TCAN1_C1FIFOCON5.setRTREN; inline;
  82826. begin
  82827. pTDefRegMap(@Self)^.&set := $00000004;
  82828. end;
  82829. procedure TCAN1_C1FIFOCON5.clearRTREN; inline;
  82830. begin
  82831. pTDefRegMap(@Self)^.clr := $00000004;
  82832. end;
  82833. procedure TCAN1_C1FIFOCON5.setRTREN(thebits : TBits_1); inline;
  82834. begin
  82835. if thebits = 0 then
  82836. pTDefRegMap(@Self)^.clr := $00000004
  82837. else
  82838. pTDefRegMap(@Self)^.&set := $00000004;
  82839. end;
  82840. function TCAN1_C1FIFOCON5.getRTREN : TBits_1; inline;
  82841. begin
  82842. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  82843. end;
  82844. procedure TCAN1_C1FIFOCON5.setTXREQ; inline;
  82845. begin
  82846. pTDefRegMap(@Self)^.&set := $00000008;
  82847. end;
  82848. procedure TCAN1_C1FIFOCON5.clearTXREQ; inline;
  82849. begin
  82850. pTDefRegMap(@Self)^.clr := $00000008;
  82851. end;
  82852. procedure TCAN1_C1FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  82853. begin
  82854. if thebits = 0 then
  82855. pTDefRegMap(@Self)^.clr := $00000008
  82856. else
  82857. pTDefRegMap(@Self)^.&set := $00000008;
  82858. end;
  82859. function TCAN1_C1FIFOCON5.getTXREQ : TBits_1; inline;
  82860. begin
  82861. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  82862. end;
  82863. procedure TCAN1_C1FIFOCON5.setTXERR; inline;
  82864. begin
  82865. pTDefRegMap(@Self)^.&set := $00000010;
  82866. end;
  82867. procedure TCAN1_C1FIFOCON5.clearTXERR; inline;
  82868. begin
  82869. pTDefRegMap(@Self)^.clr := $00000010;
  82870. end;
  82871. procedure TCAN1_C1FIFOCON5.setTXERR(thebits : TBits_1); inline;
  82872. begin
  82873. if thebits = 0 then
  82874. pTDefRegMap(@Self)^.clr := $00000010
  82875. else
  82876. pTDefRegMap(@Self)^.&set := $00000010;
  82877. end;
  82878. function TCAN1_C1FIFOCON5.getTXERR : TBits_1; inline;
  82879. begin
  82880. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  82881. end;
  82882. procedure TCAN1_C1FIFOCON5.setTXLARB; inline;
  82883. begin
  82884. pTDefRegMap(@Self)^.&set := $00000020;
  82885. end;
  82886. procedure TCAN1_C1FIFOCON5.clearTXLARB; inline;
  82887. begin
  82888. pTDefRegMap(@Self)^.clr := $00000020;
  82889. end;
  82890. procedure TCAN1_C1FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  82891. begin
  82892. if thebits = 0 then
  82893. pTDefRegMap(@Self)^.clr := $00000020
  82894. else
  82895. pTDefRegMap(@Self)^.&set := $00000020;
  82896. end;
  82897. function TCAN1_C1FIFOCON5.getTXLARB : TBits_1; inline;
  82898. begin
  82899. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  82900. end;
  82901. procedure TCAN1_C1FIFOCON5.setTXABAT; inline;
  82902. begin
  82903. pTDefRegMap(@Self)^.&set := $00000040;
  82904. end;
  82905. procedure TCAN1_C1FIFOCON5.clearTXABAT; inline;
  82906. begin
  82907. pTDefRegMap(@Self)^.clr := $00000040;
  82908. end;
  82909. procedure TCAN1_C1FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  82910. begin
  82911. if thebits = 0 then
  82912. pTDefRegMap(@Self)^.clr := $00000040
  82913. else
  82914. pTDefRegMap(@Self)^.&set := $00000040;
  82915. end;
  82916. function TCAN1_C1FIFOCON5.getTXABAT : TBits_1; inline;
  82917. begin
  82918. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  82919. end;
  82920. procedure TCAN1_C1FIFOCON5.setTXEN; inline;
  82921. begin
  82922. pTDefRegMap(@Self)^.&set := $00000080;
  82923. end;
  82924. procedure TCAN1_C1FIFOCON5.clearTXEN; inline;
  82925. begin
  82926. pTDefRegMap(@Self)^.clr := $00000080;
  82927. end;
  82928. procedure TCAN1_C1FIFOCON5.setTXEN(thebits : TBits_1); inline;
  82929. begin
  82930. if thebits = 0 then
  82931. pTDefRegMap(@Self)^.clr := $00000080
  82932. else
  82933. pTDefRegMap(@Self)^.&set := $00000080;
  82934. end;
  82935. function TCAN1_C1FIFOCON5.getTXEN : TBits_1; inline;
  82936. begin
  82937. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  82938. end;
  82939. procedure TCAN1_C1FIFOCON5.setDONLY; inline;
  82940. begin
  82941. pTDefRegMap(@Self)^.&set := $00001000;
  82942. end;
  82943. procedure TCAN1_C1FIFOCON5.clearDONLY; inline;
  82944. begin
  82945. pTDefRegMap(@Self)^.clr := $00001000;
  82946. end;
  82947. procedure TCAN1_C1FIFOCON5.setDONLY(thebits : TBits_1); inline;
  82948. begin
  82949. if thebits = 0 then
  82950. pTDefRegMap(@Self)^.clr := $00001000
  82951. else
  82952. pTDefRegMap(@Self)^.&set := $00001000;
  82953. end;
  82954. function TCAN1_C1FIFOCON5.getDONLY : TBits_1; inline;
  82955. begin
  82956. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  82957. end;
  82958. procedure TCAN1_C1FIFOCON5.setUINC; inline;
  82959. begin
  82960. pTDefRegMap(@Self)^.&set := $00002000;
  82961. end;
  82962. procedure TCAN1_C1FIFOCON5.clearUINC; inline;
  82963. begin
  82964. pTDefRegMap(@Self)^.clr := $00002000;
  82965. end;
  82966. procedure TCAN1_C1FIFOCON5.setUINC(thebits : TBits_1); inline;
  82967. begin
  82968. if thebits = 0 then
  82969. pTDefRegMap(@Self)^.clr := $00002000
  82970. else
  82971. pTDefRegMap(@Self)^.&set := $00002000;
  82972. end;
  82973. function TCAN1_C1FIFOCON5.getUINC : TBits_1; inline;
  82974. begin
  82975. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  82976. end;
  82977. procedure TCAN1_C1FIFOCON5.setFRESET; inline;
  82978. begin
  82979. pTDefRegMap(@Self)^.&set := $00004000;
  82980. end;
  82981. procedure TCAN1_C1FIFOCON5.clearFRESET; inline;
  82982. begin
  82983. pTDefRegMap(@Self)^.clr := $00004000;
  82984. end;
  82985. procedure TCAN1_C1FIFOCON5.setFRESET(thebits : TBits_1); inline;
  82986. begin
  82987. if thebits = 0 then
  82988. pTDefRegMap(@Self)^.clr := $00004000
  82989. else
  82990. pTDefRegMap(@Self)^.&set := $00004000;
  82991. end;
  82992. function TCAN1_C1FIFOCON5.getFRESET : TBits_1; inline;
  82993. begin
  82994. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  82995. end;
  82996. procedure TCAN1_C1FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  82997. begin
  82998. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  82999. end;
  83000. function TCAN1_C1FIFOCON5.getFSIZE : TBits_5; inline;
  83001. begin
  83002. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83003. end;
  83004. procedure TCAN1_C1FIFOCON5.setw(thebits : TBits_32); inline;
  83005. begin
  83006. pTDefRegMap(@Self)^.val := thebits;
  83007. end;
  83008. function TCAN1_C1FIFOCON5.getw : TBits_32; inline;
  83009. begin
  83010. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83011. end;
  83012. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF; inline;
  83013. begin
  83014. pTDefRegMap(@Self)^.&set := $00000001;
  83015. end;
  83016. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIF; inline;
  83017. begin
  83018. pTDefRegMap(@Self)^.clr := $00000001;
  83019. end;
  83020. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  83021. begin
  83022. if thebits = 0 then
  83023. pTDefRegMap(@Self)^.clr := $00000001
  83024. else
  83025. pTDefRegMap(@Self)^.&set := $00000001;
  83026. end;
  83027. function TCAN1_C1FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  83028. begin
  83029. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83030. end;
  83031. procedure TCAN1_C1FIFOINT5.setRXHALFIF; inline;
  83032. begin
  83033. pTDefRegMap(@Self)^.&set := $00000002;
  83034. end;
  83035. procedure TCAN1_C1FIFOINT5.clearRXHALFIF; inline;
  83036. begin
  83037. pTDefRegMap(@Self)^.clr := $00000002;
  83038. end;
  83039. procedure TCAN1_C1FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  83040. begin
  83041. if thebits = 0 then
  83042. pTDefRegMap(@Self)^.clr := $00000002
  83043. else
  83044. pTDefRegMap(@Self)^.&set := $00000002;
  83045. end;
  83046. function TCAN1_C1FIFOINT5.getRXHALFIF : TBits_1; inline;
  83047. begin
  83048. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  83049. end;
  83050. procedure TCAN1_C1FIFOINT5.setRXFULLIF; inline;
  83051. begin
  83052. pTDefRegMap(@Self)^.&set := $00000004;
  83053. end;
  83054. procedure TCAN1_C1FIFOINT5.clearRXFULLIF; inline;
  83055. begin
  83056. pTDefRegMap(@Self)^.clr := $00000004;
  83057. end;
  83058. procedure TCAN1_C1FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  83059. begin
  83060. if thebits = 0 then
  83061. pTDefRegMap(@Self)^.clr := $00000004
  83062. else
  83063. pTDefRegMap(@Self)^.&set := $00000004;
  83064. end;
  83065. function TCAN1_C1FIFOINT5.getRXFULLIF : TBits_1; inline;
  83066. begin
  83067. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83068. end;
  83069. procedure TCAN1_C1FIFOINT5.setRXOVFLIF; inline;
  83070. begin
  83071. pTDefRegMap(@Self)^.&set := $00000008;
  83072. end;
  83073. procedure TCAN1_C1FIFOINT5.clearRXOVFLIF; inline;
  83074. begin
  83075. pTDefRegMap(@Self)^.clr := $00000008;
  83076. end;
  83077. procedure TCAN1_C1FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  83078. begin
  83079. if thebits = 0 then
  83080. pTDefRegMap(@Self)^.clr := $00000008
  83081. else
  83082. pTDefRegMap(@Self)^.&set := $00000008;
  83083. end;
  83084. function TCAN1_C1FIFOINT5.getRXOVFLIF : TBits_1; inline;
  83085. begin
  83086. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83087. end;
  83088. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF; inline;
  83089. begin
  83090. pTDefRegMap(@Self)^.&set := $00000100;
  83091. end;
  83092. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIF; inline;
  83093. begin
  83094. pTDefRegMap(@Self)^.clr := $00000100;
  83095. end;
  83096. procedure TCAN1_C1FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  83097. begin
  83098. if thebits = 0 then
  83099. pTDefRegMap(@Self)^.clr := $00000100
  83100. else
  83101. pTDefRegMap(@Self)^.&set := $00000100;
  83102. end;
  83103. function TCAN1_C1FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  83104. begin
  83105. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  83106. end;
  83107. procedure TCAN1_C1FIFOINT5.setTXHALFIF; inline;
  83108. begin
  83109. pTDefRegMap(@Self)^.&set := $00000200;
  83110. end;
  83111. procedure TCAN1_C1FIFOINT5.clearTXHALFIF; inline;
  83112. begin
  83113. pTDefRegMap(@Self)^.clr := $00000200;
  83114. end;
  83115. procedure TCAN1_C1FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  83116. begin
  83117. if thebits = 0 then
  83118. pTDefRegMap(@Self)^.clr := $00000200
  83119. else
  83120. pTDefRegMap(@Self)^.&set := $00000200;
  83121. end;
  83122. function TCAN1_C1FIFOINT5.getTXHALFIF : TBits_1; inline;
  83123. begin
  83124. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  83125. end;
  83126. procedure TCAN1_C1FIFOINT5.setTXNFULLIF; inline;
  83127. begin
  83128. pTDefRegMap(@Self)^.&set := $00000400;
  83129. end;
  83130. procedure TCAN1_C1FIFOINT5.clearTXNFULLIF; inline;
  83131. begin
  83132. pTDefRegMap(@Self)^.clr := $00000400;
  83133. end;
  83134. procedure TCAN1_C1FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  83135. begin
  83136. if thebits = 0 then
  83137. pTDefRegMap(@Self)^.clr := $00000400
  83138. else
  83139. pTDefRegMap(@Self)^.&set := $00000400;
  83140. end;
  83141. function TCAN1_C1FIFOINT5.getTXNFULLIF : TBits_1; inline;
  83142. begin
  83143. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  83144. end;
  83145. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE; inline;
  83146. begin
  83147. pTDefRegMap(@Self)^.&set := $00010000;
  83148. end;
  83149. procedure TCAN1_C1FIFOINT5.clearRXNEMPTYIE; inline;
  83150. begin
  83151. pTDefRegMap(@Self)^.clr := $00010000;
  83152. end;
  83153. procedure TCAN1_C1FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  83154. begin
  83155. if thebits = 0 then
  83156. pTDefRegMap(@Self)^.clr := $00010000
  83157. else
  83158. pTDefRegMap(@Self)^.&set := $00010000;
  83159. end;
  83160. function TCAN1_C1FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  83161. begin
  83162. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  83163. end;
  83164. procedure TCAN1_C1FIFOINT5.setRXHALFIE; inline;
  83165. begin
  83166. pTDefRegMap(@Self)^.&set := $00020000;
  83167. end;
  83168. procedure TCAN1_C1FIFOINT5.clearRXHALFIE; inline;
  83169. begin
  83170. pTDefRegMap(@Self)^.clr := $00020000;
  83171. end;
  83172. procedure TCAN1_C1FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  83173. begin
  83174. if thebits = 0 then
  83175. pTDefRegMap(@Self)^.clr := $00020000
  83176. else
  83177. pTDefRegMap(@Self)^.&set := $00020000;
  83178. end;
  83179. function TCAN1_C1FIFOINT5.getRXHALFIE : TBits_1; inline;
  83180. begin
  83181. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  83182. end;
  83183. procedure TCAN1_C1FIFOINT5.setRXFULLIE; inline;
  83184. begin
  83185. pTDefRegMap(@Self)^.&set := $00040000;
  83186. end;
  83187. procedure TCAN1_C1FIFOINT5.clearRXFULLIE; inline;
  83188. begin
  83189. pTDefRegMap(@Self)^.clr := $00040000;
  83190. end;
  83191. procedure TCAN1_C1FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  83192. begin
  83193. if thebits = 0 then
  83194. pTDefRegMap(@Self)^.clr := $00040000
  83195. else
  83196. pTDefRegMap(@Self)^.&set := $00040000;
  83197. end;
  83198. function TCAN1_C1FIFOINT5.getRXFULLIE : TBits_1; inline;
  83199. begin
  83200. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  83201. end;
  83202. procedure TCAN1_C1FIFOINT5.setRXOVFLIE; inline;
  83203. begin
  83204. pTDefRegMap(@Self)^.&set := $00080000;
  83205. end;
  83206. procedure TCAN1_C1FIFOINT5.clearRXOVFLIE; inline;
  83207. begin
  83208. pTDefRegMap(@Self)^.clr := $00080000;
  83209. end;
  83210. procedure TCAN1_C1FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  83211. begin
  83212. if thebits = 0 then
  83213. pTDefRegMap(@Self)^.clr := $00080000
  83214. else
  83215. pTDefRegMap(@Self)^.&set := $00080000;
  83216. end;
  83217. function TCAN1_C1FIFOINT5.getRXOVFLIE : TBits_1; inline;
  83218. begin
  83219. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  83220. end;
  83221. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE; inline;
  83222. begin
  83223. pTDefRegMap(@Self)^.&set := $01000000;
  83224. end;
  83225. procedure TCAN1_C1FIFOINT5.clearTXEMPTYIE; inline;
  83226. begin
  83227. pTDefRegMap(@Self)^.clr := $01000000;
  83228. end;
  83229. procedure TCAN1_C1FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  83230. begin
  83231. if thebits = 0 then
  83232. pTDefRegMap(@Self)^.clr := $01000000
  83233. else
  83234. pTDefRegMap(@Self)^.&set := $01000000;
  83235. end;
  83236. function TCAN1_C1FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  83237. begin
  83238. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  83239. end;
  83240. procedure TCAN1_C1FIFOINT5.setTXHALFIE; inline;
  83241. begin
  83242. pTDefRegMap(@Self)^.&set := $02000000;
  83243. end;
  83244. procedure TCAN1_C1FIFOINT5.clearTXHALFIE; inline;
  83245. begin
  83246. pTDefRegMap(@Self)^.clr := $02000000;
  83247. end;
  83248. procedure TCAN1_C1FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  83249. begin
  83250. if thebits = 0 then
  83251. pTDefRegMap(@Self)^.clr := $02000000
  83252. else
  83253. pTDefRegMap(@Self)^.&set := $02000000;
  83254. end;
  83255. function TCAN1_C1FIFOINT5.getTXHALFIE : TBits_1; inline;
  83256. begin
  83257. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  83258. end;
  83259. procedure TCAN1_C1FIFOINT5.setTXNFULLIE; inline;
  83260. begin
  83261. pTDefRegMap(@Self)^.&set := $04000000;
  83262. end;
  83263. procedure TCAN1_C1FIFOINT5.clearTXNFULLIE; inline;
  83264. begin
  83265. pTDefRegMap(@Self)^.clr := $04000000;
  83266. end;
  83267. procedure TCAN1_C1FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  83268. begin
  83269. if thebits = 0 then
  83270. pTDefRegMap(@Self)^.clr := $04000000
  83271. else
  83272. pTDefRegMap(@Self)^.&set := $04000000;
  83273. end;
  83274. function TCAN1_C1FIFOINT5.getTXNFULLIE : TBits_1; inline;
  83275. begin
  83276. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  83277. end;
  83278. procedure TCAN1_C1FIFOINT5.setw(thebits : TBits_32); inline;
  83279. begin
  83280. pTDefRegMap(@Self)^.val := thebits;
  83281. end;
  83282. function TCAN1_C1FIFOINT5.getw : TBits_32; inline;
  83283. begin
  83284. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83285. end;
  83286. procedure TCAN1_C1FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  83287. begin
  83288. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83289. end;
  83290. function TCAN1_C1FIFOCI5.getCFIFOCI : TBits_5; inline;
  83291. begin
  83292. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83293. end;
  83294. procedure TCAN1_C1FIFOCI5.setw(thebits : TBits_32); inline;
  83295. begin
  83296. pTDefRegMap(@Self)^.val := thebits;
  83297. end;
  83298. function TCAN1_C1FIFOCI5.getw : TBits_32; inline;
  83299. begin
  83300. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83301. end;
  83302. procedure TCAN1_C1FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  83303. begin
  83304. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  83305. end;
  83306. function TCAN1_C1FIFOCON6.getTXPRI : TBits_2; inline;
  83307. begin
  83308. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  83309. end;
  83310. procedure TCAN1_C1FIFOCON6.setRTREN; inline;
  83311. begin
  83312. pTDefRegMap(@Self)^.&set := $00000004;
  83313. end;
  83314. procedure TCAN1_C1FIFOCON6.clearRTREN; inline;
  83315. begin
  83316. pTDefRegMap(@Self)^.clr := $00000004;
  83317. end;
  83318. procedure TCAN1_C1FIFOCON6.setRTREN(thebits : TBits_1); inline;
  83319. begin
  83320. if thebits = 0 then
  83321. pTDefRegMap(@Self)^.clr := $00000004
  83322. else
  83323. pTDefRegMap(@Self)^.&set := $00000004;
  83324. end;
  83325. function TCAN1_C1FIFOCON6.getRTREN : TBits_1; inline;
  83326. begin
  83327. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83328. end;
  83329. procedure TCAN1_C1FIFOCON6.setTXREQ; inline;
  83330. begin
  83331. pTDefRegMap(@Self)^.&set := $00000008;
  83332. end;
  83333. procedure TCAN1_C1FIFOCON6.clearTXREQ; inline;
  83334. begin
  83335. pTDefRegMap(@Self)^.clr := $00000008;
  83336. end;
  83337. procedure TCAN1_C1FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  83338. begin
  83339. if thebits = 0 then
  83340. pTDefRegMap(@Self)^.clr := $00000008
  83341. else
  83342. pTDefRegMap(@Self)^.&set := $00000008;
  83343. end;
  83344. function TCAN1_C1FIFOCON6.getTXREQ : TBits_1; inline;
  83345. begin
  83346. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83347. end;
  83348. procedure TCAN1_C1FIFOCON6.setTXERR; inline;
  83349. begin
  83350. pTDefRegMap(@Self)^.&set := $00000010;
  83351. end;
  83352. procedure TCAN1_C1FIFOCON6.clearTXERR; inline;
  83353. begin
  83354. pTDefRegMap(@Self)^.clr := $00000010;
  83355. end;
  83356. procedure TCAN1_C1FIFOCON6.setTXERR(thebits : TBits_1); inline;
  83357. begin
  83358. if thebits = 0 then
  83359. pTDefRegMap(@Self)^.clr := $00000010
  83360. else
  83361. pTDefRegMap(@Self)^.&set := $00000010;
  83362. end;
  83363. function TCAN1_C1FIFOCON6.getTXERR : TBits_1; inline;
  83364. begin
  83365. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  83366. end;
  83367. procedure TCAN1_C1FIFOCON6.setTXLARB; inline;
  83368. begin
  83369. pTDefRegMap(@Self)^.&set := $00000020;
  83370. end;
  83371. procedure TCAN1_C1FIFOCON6.clearTXLARB; inline;
  83372. begin
  83373. pTDefRegMap(@Self)^.clr := $00000020;
  83374. end;
  83375. procedure TCAN1_C1FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  83376. begin
  83377. if thebits = 0 then
  83378. pTDefRegMap(@Self)^.clr := $00000020
  83379. else
  83380. pTDefRegMap(@Self)^.&set := $00000020;
  83381. end;
  83382. function TCAN1_C1FIFOCON6.getTXLARB : TBits_1; inline;
  83383. begin
  83384. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  83385. end;
  83386. procedure TCAN1_C1FIFOCON6.setTXABAT; inline;
  83387. begin
  83388. pTDefRegMap(@Self)^.&set := $00000040;
  83389. end;
  83390. procedure TCAN1_C1FIFOCON6.clearTXABAT; inline;
  83391. begin
  83392. pTDefRegMap(@Self)^.clr := $00000040;
  83393. end;
  83394. procedure TCAN1_C1FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  83395. begin
  83396. if thebits = 0 then
  83397. pTDefRegMap(@Self)^.clr := $00000040
  83398. else
  83399. pTDefRegMap(@Self)^.&set := $00000040;
  83400. end;
  83401. function TCAN1_C1FIFOCON6.getTXABAT : TBits_1; inline;
  83402. begin
  83403. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  83404. end;
  83405. procedure TCAN1_C1FIFOCON6.setTXEN; inline;
  83406. begin
  83407. pTDefRegMap(@Self)^.&set := $00000080;
  83408. end;
  83409. procedure TCAN1_C1FIFOCON6.clearTXEN; inline;
  83410. begin
  83411. pTDefRegMap(@Self)^.clr := $00000080;
  83412. end;
  83413. procedure TCAN1_C1FIFOCON6.setTXEN(thebits : TBits_1); inline;
  83414. begin
  83415. if thebits = 0 then
  83416. pTDefRegMap(@Self)^.clr := $00000080
  83417. else
  83418. pTDefRegMap(@Self)^.&set := $00000080;
  83419. end;
  83420. function TCAN1_C1FIFOCON6.getTXEN : TBits_1; inline;
  83421. begin
  83422. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83423. end;
  83424. procedure TCAN1_C1FIFOCON6.setDONLY; inline;
  83425. begin
  83426. pTDefRegMap(@Self)^.&set := $00001000;
  83427. end;
  83428. procedure TCAN1_C1FIFOCON6.clearDONLY; inline;
  83429. begin
  83430. pTDefRegMap(@Self)^.clr := $00001000;
  83431. end;
  83432. procedure TCAN1_C1FIFOCON6.setDONLY(thebits : TBits_1); inline;
  83433. begin
  83434. if thebits = 0 then
  83435. pTDefRegMap(@Self)^.clr := $00001000
  83436. else
  83437. pTDefRegMap(@Self)^.&set := $00001000;
  83438. end;
  83439. function TCAN1_C1FIFOCON6.getDONLY : TBits_1; inline;
  83440. begin
  83441. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  83442. end;
  83443. procedure TCAN1_C1FIFOCON6.setUINC; inline;
  83444. begin
  83445. pTDefRegMap(@Self)^.&set := $00002000;
  83446. end;
  83447. procedure TCAN1_C1FIFOCON6.clearUINC; inline;
  83448. begin
  83449. pTDefRegMap(@Self)^.clr := $00002000;
  83450. end;
  83451. procedure TCAN1_C1FIFOCON6.setUINC(thebits : TBits_1); inline;
  83452. begin
  83453. if thebits = 0 then
  83454. pTDefRegMap(@Self)^.clr := $00002000
  83455. else
  83456. pTDefRegMap(@Self)^.&set := $00002000;
  83457. end;
  83458. function TCAN1_C1FIFOCON6.getUINC : TBits_1; inline;
  83459. begin
  83460. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  83461. end;
  83462. procedure TCAN1_C1FIFOCON6.setFRESET; inline;
  83463. begin
  83464. pTDefRegMap(@Self)^.&set := $00004000;
  83465. end;
  83466. procedure TCAN1_C1FIFOCON6.clearFRESET; inline;
  83467. begin
  83468. pTDefRegMap(@Self)^.clr := $00004000;
  83469. end;
  83470. procedure TCAN1_C1FIFOCON6.setFRESET(thebits : TBits_1); inline;
  83471. begin
  83472. if thebits = 0 then
  83473. pTDefRegMap(@Self)^.clr := $00004000
  83474. else
  83475. pTDefRegMap(@Self)^.&set := $00004000;
  83476. end;
  83477. function TCAN1_C1FIFOCON6.getFRESET : TBits_1; inline;
  83478. begin
  83479. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  83480. end;
  83481. procedure TCAN1_C1FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  83482. begin
  83483. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83484. end;
  83485. function TCAN1_C1FIFOCON6.getFSIZE : TBits_5; inline;
  83486. begin
  83487. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83488. end;
  83489. procedure TCAN1_C1FIFOCON6.setw(thebits : TBits_32); inline;
  83490. begin
  83491. pTDefRegMap(@Self)^.val := thebits;
  83492. end;
  83493. function TCAN1_C1FIFOCON6.getw : TBits_32; inline;
  83494. begin
  83495. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83496. end;
  83497. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF; inline;
  83498. begin
  83499. pTDefRegMap(@Self)^.&set := $00000001;
  83500. end;
  83501. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIF; inline;
  83502. begin
  83503. pTDefRegMap(@Self)^.clr := $00000001;
  83504. end;
  83505. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  83506. begin
  83507. if thebits = 0 then
  83508. pTDefRegMap(@Self)^.clr := $00000001
  83509. else
  83510. pTDefRegMap(@Self)^.&set := $00000001;
  83511. end;
  83512. function TCAN1_C1FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  83513. begin
  83514. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  83515. end;
  83516. procedure TCAN1_C1FIFOINT6.setRXHALFIF; inline;
  83517. begin
  83518. pTDefRegMap(@Self)^.&set := $00000002;
  83519. end;
  83520. procedure TCAN1_C1FIFOINT6.clearRXHALFIF; inline;
  83521. begin
  83522. pTDefRegMap(@Self)^.clr := $00000002;
  83523. end;
  83524. procedure TCAN1_C1FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  83525. begin
  83526. if thebits = 0 then
  83527. pTDefRegMap(@Self)^.clr := $00000002
  83528. else
  83529. pTDefRegMap(@Self)^.&set := $00000002;
  83530. end;
  83531. function TCAN1_C1FIFOINT6.getRXHALFIF : TBits_1; inline;
  83532. begin
  83533. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  83534. end;
  83535. procedure TCAN1_C1FIFOINT6.setRXFULLIF; inline;
  83536. begin
  83537. pTDefRegMap(@Self)^.&set := $00000004;
  83538. end;
  83539. procedure TCAN1_C1FIFOINT6.clearRXFULLIF; inline;
  83540. begin
  83541. pTDefRegMap(@Self)^.clr := $00000004;
  83542. end;
  83543. procedure TCAN1_C1FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  83544. begin
  83545. if thebits = 0 then
  83546. pTDefRegMap(@Self)^.clr := $00000004
  83547. else
  83548. pTDefRegMap(@Self)^.&set := $00000004;
  83549. end;
  83550. function TCAN1_C1FIFOINT6.getRXFULLIF : TBits_1; inline;
  83551. begin
  83552. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83553. end;
  83554. procedure TCAN1_C1FIFOINT6.setRXOVFLIF; inline;
  83555. begin
  83556. pTDefRegMap(@Self)^.&set := $00000008;
  83557. end;
  83558. procedure TCAN1_C1FIFOINT6.clearRXOVFLIF; inline;
  83559. begin
  83560. pTDefRegMap(@Self)^.clr := $00000008;
  83561. end;
  83562. procedure TCAN1_C1FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  83563. begin
  83564. if thebits = 0 then
  83565. pTDefRegMap(@Self)^.clr := $00000008
  83566. else
  83567. pTDefRegMap(@Self)^.&set := $00000008;
  83568. end;
  83569. function TCAN1_C1FIFOINT6.getRXOVFLIF : TBits_1; inline;
  83570. begin
  83571. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83572. end;
  83573. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF; inline;
  83574. begin
  83575. pTDefRegMap(@Self)^.&set := $00000100;
  83576. end;
  83577. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIF; inline;
  83578. begin
  83579. pTDefRegMap(@Self)^.clr := $00000100;
  83580. end;
  83581. procedure TCAN1_C1FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  83582. begin
  83583. if thebits = 0 then
  83584. pTDefRegMap(@Self)^.clr := $00000100
  83585. else
  83586. pTDefRegMap(@Self)^.&set := $00000100;
  83587. end;
  83588. function TCAN1_C1FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  83589. begin
  83590. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  83591. end;
  83592. procedure TCAN1_C1FIFOINT6.setTXHALFIF; inline;
  83593. begin
  83594. pTDefRegMap(@Self)^.&set := $00000200;
  83595. end;
  83596. procedure TCAN1_C1FIFOINT6.clearTXHALFIF; inline;
  83597. begin
  83598. pTDefRegMap(@Self)^.clr := $00000200;
  83599. end;
  83600. procedure TCAN1_C1FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  83601. begin
  83602. if thebits = 0 then
  83603. pTDefRegMap(@Self)^.clr := $00000200
  83604. else
  83605. pTDefRegMap(@Self)^.&set := $00000200;
  83606. end;
  83607. function TCAN1_C1FIFOINT6.getTXHALFIF : TBits_1; inline;
  83608. begin
  83609. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  83610. end;
  83611. procedure TCAN1_C1FIFOINT6.setTXNFULLIF; inline;
  83612. begin
  83613. pTDefRegMap(@Self)^.&set := $00000400;
  83614. end;
  83615. procedure TCAN1_C1FIFOINT6.clearTXNFULLIF; inline;
  83616. begin
  83617. pTDefRegMap(@Self)^.clr := $00000400;
  83618. end;
  83619. procedure TCAN1_C1FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  83620. begin
  83621. if thebits = 0 then
  83622. pTDefRegMap(@Self)^.clr := $00000400
  83623. else
  83624. pTDefRegMap(@Self)^.&set := $00000400;
  83625. end;
  83626. function TCAN1_C1FIFOINT6.getTXNFULLIF : TBits_1; inline;
  83627. begin
  83628. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  83629. end;
  83630. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE; inline;
  83631. begin
  83632. pTDefRegMap(@Self)^.&set := $00010000;
  83633. end;
  83634. procedure TCAN1_C1FIFOINT6.clearRXNEMPTYIE; inline;
  83635. begin
  83636. pTDefRegMap(@Self)^.clr := $00010000;
  83637. end;
  83638. procedure TCAN1_C1FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  83639. begin
  83640. if thebits = 0 then
  83641. pTDefRegMap(@Self)^.clr := $00010000
  83642. else
  83643. pTDefRegMap(@Self)^.&set := $00010000;
  83644. end;
  83645. function TCAN1_C1FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  83646. begin
  83647. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  83648. end;
  83649. procedure TCAN1_C1FIFOINT6.setRXHALFIE; inline;
  83650. begin
  83651. pTDefRegMap(@Self)^.&set := $00020000;
  83652. end;
  83653. procedure TCAN1_C1FIFOINT6.clearRXHALFIE; inline;
  83654. begin
  83655. pTDefRegMap(@Self)^.clr := $00020000;
  83656. end;
  83657. procedure TCAN1_C1FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  83658. begin
  83659. if thebits = 0 then
  83660. pTDefRegMap(@Self)^.clr := $00020000
  83661. else
  83662. pTDefRegMap(@Self)^.&set := $00020000;
  83663. end;
  83664. function TCAN1_C1FIFOINT6.getRXHALFIE : TBits_1; inline;
  83665. begin
  83666. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  83667. end;
  83668. procedure TCAN1_C1FIFOINT6.setRXFULLIE; inline;
  83669. begin
  83670. pTDefRegMap(@Self)^.&set := $00040000;
  83671. end;
  83672. procedure TCAN1_C1FIFOINT6.clearRXFULLIE; inline;
  83673. begin
  83674. pTDefRegMap(@Self)^.clr := $00040000;
  83675. end;
  83676. procedure TCAN1_C1FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  83677. begin
  83678. if thebits = 0 then
  83679. pTDefRegMap(@Self)^.clr := $00040000
  83680. else
  83681. pTDefRegMap(@Self)^.&set := $00040000;
  83682. end;
  83683. function TCAN1_C1FIFOINT6.getRXFULLIE : TBits_1; inline;
  83684. begin
  83685. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  83686. end;
  83687. procedure TCAN1_C1FIFOINT6.setRXOVFLIE; inline;
  83688. begin
  83689. pTDefRegMap(@Self)^.&set := $00080000;
  83690. end;
  83691. procedure TCAN1_C1FIFOINT6.clearRXOVFLIE; inline;
  83692. begin
  83693. pTDefRegMap(@Self)^.clr := $00080000;
  83694. end;
  83695. procedure TCAN1_C1FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  83696. begin
  83697. if thebits = 0 then
  83698. pTDefRegMap(@Self)^.clr := $00080000
  83699. else
  83700. pTDefRegMap(@Self)^.&set := $00080000;
  83701. end;
  83702. function TCAN1_C1FIFOINT6.getRXOVFLIE : TBits_1; inline;
  83703. begin
  83704. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  83705. end;
  83706. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE; inline;
  83707. begin
  83708. pTDefRegMap(@Self)^.&set := $01000000;
  83709. end;
  83710. procedure TCAN1_C1FIFOINT6.clearTXEMPTYIE; inline;
  83711. begin
  83712. pTDefRegMap(@Self)^.clr := $01000000;
  83713. end;
  83714. procedure TCAN1_C1FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  83715. begin
  83716. if thebits = 0 then
  83717. pTDefRegMap(@Self)^.clr := $01000000
  83718. else
  83719. pTDefRegMap(@Self)^.&set := $01000000;
  83720. end;
  83721. function TCAN1_C1FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  83722. begin
  83723. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  83724. end;
  83725. procedure TCAN1_C1FIFOINT6.setTXHALFIE; inline;
  83726. begin
  83727. pTDefRegMap(@Self)^.&set := $02000000;
  83728. end;
  83729. procedure TCAN1_C1FIFOINT6.clearTXHALFIE; inline;
  83730. begin
  83731. pTDefRegMap(@Self)^.clr := $02000000;
  83732. end;
  83733. procedure TCAN1_C1FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  83734. begin
  83735. if thebits = 0 then
  83736. pTDefRegMap(@Self)^.clr := $02000000
  83737. else
  83738. pTDefRegMap(@Self)^.&set := $02000000;
  83739. end;
  83740. function TCAN1_C1FIFOINT6.getTXHALFIE : TBits_1; inline;
  83741. begin
  83742. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  83743. end;
  83744. procedure TCAN1_C1FIFOINT6.setTXNFULLIE; inline;
  83745. begin
  83746. pTDefRegMap(@Self)^.&set := $04000000;
  83747. end;
  83748. procedure TCAN1_C1FIFOINT6.clearTXNFULLIE; inline;
  83749. begin
  83750. pTDefRegMap(@Self)^.clr := $04000000;
  83751. end;
  83752. procedure TCAN1_C1FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  83753. begin
  83754. if thebits = 0 then
  83755. pTDefRegMap(@Self)^.clr := $04000000
  83756. else
  83757. pTDefRegMap(@Self)^.&set := $04000000;
  83758. end;
  83759. function TCAN1_C1FIFOINT6.getTXNFULLIE : TBits_1; inline;
  83760. begin
  83761. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  83762. end;
  83763. procedure TCAN1_C1FIFOINT6.setw(thebits : TBits_32); inline;
  83764. begin
  83765. pTDefRegMap(@Self)^.val := thebits;
  83766. end;
  83767. function TCAN1_C1FIFOINT6.getw : TBits_32; inline;
  83768. begin
  83769. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83770. end;
  83771. procedure TCAN1_C1FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  83772. begin
  83773. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  83774. end;
  83775. function TCAN1_C1FIFOCI6.getCFIFOCI : TBits_5; inline;
  83776. begin
  83777. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  83778. end;
  83779. procedure TCAN1_C1FIFOCI6.setw(thebits : TBits_32); inline;
  83780. begin
  83781. pTDefRegMap(@Self)^.val := thebits;
  83782. end;
  83783. function TCAN1_C1FIFOCI6.getw : TBits_32; inline;
  83784. begin
  83785. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83786. end;
  83787. procedure TCAN1_C1FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  83788. begin
  83789. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  83790. end;
  83791. function TCAN1_C1FIFOCON7.getTXPRI : TBits_2; inline;
  83792. begin
  83793. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  83794. end;
  83795. procedure TCAN1_C1FIFOCON7.setRTREN; inline;
  83796. begin
  83797. pTDefRegMap(@Self)^.&set := $00000004;
  83798. end;
  83799. procedure TCAN1_C1FIFOCON7.clearRTREN; inline;
  83800. begin
  83801. pTDefRegMap(@Self)^.clr := $00000004;
  83802. end;
  83803. procedure TCAN1_C1FIFOCON7.setRTREN(thebits : TBits_1); inline;
  83804. begin
  83805. if thebits = 0 then
  83806. pTDefRegMap(@Self)^.clr := $00000004
  83807. else
  83808. pTDefRegMap(@Self)^.&set := $00000004;
  83809. end;
  83810. function TCAN1_C1FIFOCON7.getRTREN : TBits_1; inline;
  83811. begin
  83812. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  83813. end;
  83814. procedure TCAN1_C1FIFOCON7.setTXREQ; inline;
  83815. begin
  83816. pTDefRegMap(@Self)^.&set := $00000008;
  83817. end;
  83818. procedure TCAN1_C1FIFOCON7.clearTXREQ; inline;
  83819. begin
  83820. pTDefRegMap(@Self)^.clr := $00000008;
  83821. end;
  83822. procedure TCAN1_C1FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  83823. begin
  83824. if thebits = 0 then
  83825. pTDefRegMap(@Self)^.clr := $00000008
  83826. else
  83827. pTDefRegMap(@Self)^.&set := $00000008;
  83828. end;
  83829. function TCAN1_C1FIFOCON7.getTXREQ : TBits_1; inline;
  83830. begin
  83831. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  83832. end;
  83833. procedure TCAN1_C1FIFOCON7.setTXERR; inline;
  83834. begin
  83835. pTDefRegMap(@Self)^.&set := $00000010;
  83836. end;
  83837. procedure TCAN1_C1FIFOCON7.clearTXERR; inline;
  83838. begin
  83839. pTDefRegMap(@Self)^.clr := $00000010;
  83840. end;
  83841. procedure TCAN1_C1FIFOCON7.setTXERR(thebits : TBits_1); inline;
  83842. begin
  83843. if thebits = 0 then
  83844. pTDefRegMap(@Self)^.clr := $00000010
  83845. else
  83846. pTDefRegMap(@Self)^.&set := $00000010;
  83847. end;
  83848. function TCAN1_C1FIFOCON7.getTXERR : TBits_1; inline;
  83849. begin
  83850. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  83851. end;
  83852. procedure TCAN1_C1FIFOCON7.setTXLARB; inline;
  83853. begin
  83854. pTDefRegMap(@Self)^.&set := $00000020;
  83855. end;
  83856. procedure TCAN1_C1FIFOCON7.clearTXLARB; inline;
  83857. begin
  83858. pTDefRegMap(@Self)^.clr := $00000020;
  83859. end;
  83860. procedure TCAN1_C1FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  83861. begin
  83862. if thebits = 0 then
  83863. pTDefRegMap(@Self)^.clr := $00000020
  83864. else
  83865. pTDefRegMap(@Self)^.&set := $00000020;
  83866. end;
  83867. function TCAN1_C1FIFOCON7.getTXLARB : TBits_1; inline;
  83868. begin
  83869. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  83870. end;
  83871. procedure TCAN1_C1FIFOCON7.setTXABAT; inline;
  83872. begin
  83873. pTDefRegMap(@Self)^.&set := $00000040;
  83874. end;
  83875. procedure TCAN1_C1FIFOCON7.clearTXABAT; inline;
  83876. begin
  83877. pTDefRegMap(@Self)^.clr := $00000040;
  83878. end;
  83879. procedure TCAN1_C1FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  83880. begin
  83881. if thebits = 0 then
  83882. pTDefRegMap(@Self)^.clr := $00000040
  83883. else
  83884. pTDefRegMap(@Self)^.&set := $00000040;
  83885. end;
  83886. function TCAN1_C1FIFOCON7.getTXABAT : TBits_1; inline;
  83887. begin
  83888. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  83889. end;
  83890. procedure TCAN1_C1FIFOCON7.setTXEN; inline;
  83891. begin
  83892. pTDefRegMap(@Self)^.&set := $00000080;
  83893. end;
  83894. procedure TCAN1_C1FIFOCON7.clearTXEN; inline;
  83895. begin
  83896. pTDefRegMap(@Self)^.clr := $00000080;
  83897. end;
  83898. procedure TCAN1_C1FIFOCON7.setTXEN(thebits : TBits_1); inline;
  83899. begin
  83900. if thebits = 0 then
  83901. pTDefRegMap(@Self)^.clr := $00000080
  83902. else
  83903. pTDefRegMap(@Self)^.&set := $00000080;
  83904. end;
  83905. function TCAN1_C1FIFOCON7.getTXEN : TBits_1; inline;
  83906. begin
  83907. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  83908. end;
  83909. procedure TCAN1_C1FIFOCON7.setDONLY; inline;
  83910. begin
  83911. pTDefRegMap(@Self)^.&set := $00001000;
  83912. end;
  83913. procedure TCAN1_C1FIFOCON7.clearDONLY; inline;
  83914. begin
  83915. pTDefRegMap(@Self)^.clr := $00001000;
  83916. end;
  83917. procedure TCAN1_C1FIFOCON7.setDONLY(thebits : TBits_1); inline;
  83918. begin
  83919. if thebits = 0 then
  83920. pTDefRegMap(@Self)^.clr := $00001000
  83921. else
  83922. pTDefRegMap(@Self)^.&set := $00001000;
  83923. end;
  83924. function TCAN1_C1FIFOCON7.getDONLY : TBits_1; inline;
  83925. begin
  83926. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  83927. end;
  83928. procedure TCAN1_C1FIFOCON7.setUINC; inline;
  83929. begin
  83930. pTDefRegMap(@Self)^.&set := $00002000;
  83931. end;
  83932. procedure TCAN1_C1FIFOCON7.clearUINC; inline;
  83933. begin
  83934. pTDefRegMap(@Self)^.clr := $00002000;
  83935. end;
  83936. procedure TCAN1_C1FIFOCON7.setUINC(thebits : TBits_1); inline;
  83937. begin
  83938. if thebits = 0 then
  83939. pTDefRegMap(@Self)^.clr := $00002000
  83940. else
  83941. pTDefRegMap(@Self)^.&set := $00002000;
  83942. end;
  83943. function TCAN1_C1FIFOCON7.getUINC : TBits_1; inline;
  83944. begin
  83945. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  83946. end;
  83947. procedure TCAN1_C1FIFOCON7.setFRESET; inline;
  83948. begin
  83949. pTDefRegMap(@Self)^.&set := $00004000;
  83950. end;
  83951. procedure TCAN1_C1FIFOCON7.clearFRESET; inline;
  83952. begin
  83953. pTDefRegMap(@Self)^.clr := $00004000;
  83954. end;
  83955. procedure TCAN1_C1FIFOCON7.setFRESET(thebits : TBits_1); inline;
  83956. begin
  83957. if thebits = 0 then
  83958. pTDefRegMap(@Self)^.clr := $00004000
  83959. else
  83960. pTDefRegMap(@Self)^.&set := $00004000;
  83961. end;
  83962. function TCAN1_C1FIFOCON7.getFRESET : TBits_1; inline;
  83963. begin
  83964. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  83965. end;
  83966. procedure TCAN1_C1FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  83967. begin
  83968. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  83969. end;
  83970. function TCAN1_C1FIFOCON7.getFSIZE : TBits_5; inline;
  83971. begin
  83972. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  83973. end;
  83974. procedure TCAN1_C1FIFOCON7.setw(thebits : TBits_32); inline;
  83975. begin
  83976. pTDefRegMap(@Self)^.val := thebits;
  83977. end;
  83978. function TCAN1_C1FIFOCON7.getw : TBits_32; inline;
  83979. begin
  83980. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  83981. end;
  83982. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF; inline;
  83983. begin
  83984. pTDefRegMap(@Self)^.&set := $00000001;
  83985. end;
  83986. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIF; inline;
  83987. begin
  83988. pTDefRegMap(@Self)^.clr := $00000001;
  83989. end;
  83990. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  83991. begin
  83992. if thebits = 0 then
  83993. pTDefRegMap(@Self)^.clr := $00000001
  83994. else
  83995. pTDefRegMap(@Self)^.&set := $00000001;
  83996. end;
  83997. function TCAN1_C1FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  83998. begin
  83999. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  84000. end;
  84001. procedure TCAN1_C1FIFOINT7.setRXHALFIF; inline;
  84002. begin
  84003. pTDefRegMap(@Self)^.&set := $00000002;
  84004. end;
  84005. procedure TCAN1_C1FIFOINT7.clearRXHALFIF; inline;
  84006. begin
  84007. pTDefRegMap(@Self)^.clr := $00000002;
  84008. end;
  84009. procedure TCAN1_C1FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  84010. begin
  84011. if thebits = 0 then
  84012. pTDefRegMap(@Self)^.clr := $00000002
  84013. else
  84014. pTDefRegMap(@Self)^.&set := $00000002;
  84015. end;
  84016. function TCAN1_C1FIFOINT7.getRXHALFIF : TBits_1; inline;
  84017. begin
  84018. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  84019. end;
  84020. procedure TCAN1_C1FIFOINT7.setRXFULLIF; inline;
  84021. begin
  84022. pTDefRegMap(@Self)^.&set := $00000004;
  84023. end;
  84024. procedure TCAN1_C1FIFOINT7.clearRXFULLIF; inline;
  84025. begin
  84026. pTDefRegMap(@Self)^.clr := $00000004;
  84027. end;
  84028. procedure TCAN1_C1FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  84029. begin
  84030. if thebits = 0 then
  84031. pTDefRegMap(@Self)^.clr := $00000004
  84032. else
  84033. pTDefRegMap(@Self)^.&set := $00000004;
  84034. end;
  84035. function TCAN1_C1FIFOINT7.getRXFULLIF : TBits_1; inline;
  84036. begin
  84037. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84038. end;
  84039. procedure TCAN1_C1FIFOINT7.setRXOVFLIF; inline;
  84040. begin
  84041. pTDefRegMap(@Self)^.&set := $00000008;
  84042. end;
  84043. procedure TCAN1_C1FIFOINT7.clearRXOVFLIF; inline;
  84044. begin
  84045. pTDefRegMap(@Self)^.clr := $00000008;
  84046. end;
  84047. procedure TCAN1_C1FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  84048. begin
  84049. if thebits = 0 then
  84050. pTDefRegMap(@Self)^.clr := $00000008
  84051. else
  84052. pTDefRegMap(@Self)^.&set := $00000008;
  84053. end;
  84054. function TCAN1_C1FIFOINT7.getRXOVFLIF : TBits_1; inline;
  84055. begin
  84056. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84057. end;
  84058. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF; inline;
  84059. begin
  84060. pTDefRegMap(@Self)^.&set := $00000100;
  84061. end;
  84062. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIF; inline;
  84063. begin
  84064. pTDefRegMap(@Self)^.clr := $00000100;
  84065. end;
  84066. procedure TCAN1_C1FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  84067. begin
  84068. if thebits = 0 then
  84069. pTDefRegMap(@Self)^.clr := $00000100
  84070. else
  84071. pTDefRegMap(@Self)^.&set := $00000100;
  84072. end;
  84073. function TCAN1_C1FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  84074. begin
  84075. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  84076. end;
  84077. procedure TCAN1_C1FIFOINT7.setTXHALFIF; inline;
  84078. begin
  84079. pTDefRegMap(@Self)^.&set := $00000200;
  84080. end;
  84081. procedure TCAN1_C1FIFOINT7.clearTXHALFIF; inline;
  84082. begin
  84083. pTDefRegMap(@Self)^.clr := $00000200;
  84084. end;
  84085. procedure TCAN1_C1FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  84086. begin
  84087. if thebits = 0 then
  84088. pTDefRegMap(@Self)^.clr := $00000200
  84089. else
  84090. pTDefRegMap(@Self)^.&set := $00000200;
  84091. end;
  84092. function TCAN1_C1FIFOINT7.getTXHALFIF : TBits_1; inline;
  84093. begin
  84094. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  84095. end;
  84096. procedure TCAN1_C1FIFOINT7.setTXNFULLIF; inline;
  84097. begin
  84098. pTDefRegMap(@Self)^.&set := $00000400;
  84099. end;
  84100. procedure TCAN1_C1FIFOINT7.clearTXNFULLIF; inline;
  84101. begin
  84102. pTDefRegMap(@Self)^.clr := $00000400;
  84103. end;
  84104. procedure TCAN1_C1FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  84105. begin
  84106. if thebits = 0 then
  84107. pTDefRegMap(@Self)^.clr := $00000400
  84108. else
  84109. pTDefRegMap(@Self)^.&set := $00000400;
  84110. end;
  84111. function TCAN1_C1FIFOINT7.getTXNFULLIF : TBits_1; inline;
  84112. begin
  84113. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  84114. end;
  84115. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE; inline;
  84116. begin
  84117. pTDefRegMap(@Self)^.&set := $00010000;
  84118. end;
  84119. procedure TCAN1_C1FIFOINT7.clearRXNEMPTYIE; inline;
  84120. begin
  84121. pTDefRegMap(@Self)^.clr := $00010000;
  84122. end;
  84123. procedure TCAN1_C1FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  84124. begin
  84125. if thebits = 0 then
  84126. pTDefRegMap(@Self)^.clr := $00010000
  84127. else
  84128. pTDefRegMap(@Self)^.&set := $00010000;
  84129. end;
  84130. function TCAN1_C1FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  84131. begin
  84132. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  84133. end;
  84134. procedure TCAN1_C1FIFOINT7.setRXHALFIE; inline;
  84135. begin
  84136. pTDefRegMap(@Self)^.&set := $00020000;
  84137. end;
  84138. procedure TCAN1_C1FIFOINT7.clearRXHALFIE; inline;
  84139. begin
  84140. pTDefRegMap(@Self)^.clr := $00020000;
  84141. end;
  84142. procedure TCAN1_C1FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  84143. begin
  84144. if thebits = 0 then
  84145. pTDefRegMap(@Self)^.clr := $00020000
  84146. else
  84147. pTDefRegMap(@Self)^.&set := $00020000;
  84148. end;
  84149. function TCAN1_C1FIFOINT7.getRXHALFIE : TBits_1; inline;
  84150. begin
  84151. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  84152. end;
  84153. procedure TCAN1_C1FIFOINT7.setRXFULLIE; inline;
  84154. begin
  84155. pTDefRegMap(@Self)^.&set := $00040000;
  84156. end;
  84157. procedure TCAN1_C1FIFOINT7.clearRXFULLIE; inline;
  84158. begin
  84159. pTDefRegMap(@Self)^.clr := $00040000;
  84160. end;
  84161. procedure TCAN1_C1FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  84162. begin
  84163. if thebits = 0 then
  84164. pTDefRegMap(@Self)^.clr := $00040000
  84165. else
  84166. pTDefRegMap(@Self)^.&set := $00040000;
  84167. end;
  84168. function TCAN1_C1FIFOINT7.getRXFULLIE : TBits_1; inline;
  84169. begin
  84170. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  84171. end;
  84172. procedure TCAN1_C1FIFOINT7.setRXOVFLIE; inline;
  84173. begin
  84174. pTDefRegMap(@Self)^.&set := $00080000;
  84175. end;
  84176. procedure TCAN1_C1FIFOINT7.clearRXOVFLIE; inline;
  84177. begin
  84178. pTDefRegMap(@Self)^.clr := $00080000;
  84179. end;
  84180. procedure TCAN1_C1FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  84181. begin
  84182. if thebits = 0 then
  84183. pTDefRegMap(@Self)^.clr := $00080000
  84184. else
  84185. pTDefRegMap(@Self)^.&set := $00080000;
  84186. end;
  84187. function TCAN1_C1FIFOINT7.getRXOVFLIE : TBits_1; inline;
  84188. begin
  84189. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84190. end;
  84191. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE; inline;
  84192. begin
  84193. pTDefRegMap(@Self)^.&set := $01000000;
  84194. end;
  84195. procedure TCAN1_C1FIFOINT7.clearTXEMPTYIE; inline;
  84196. begin
  84197. pTDefRegMap(@Self)^.clr := $01000000;
  84198. end;
  84199. procedure TCAN1_C1FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  84200. begin
  84201. if thebits = 0 then
  84202. pTDefRegMap(@Self)^.clr := $01000000
  84203. else
  84204. pTDefRegMap(@Self)^.&set := $01000000;
  84205. end;
  84206. function TCAN1_C1FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  84207. begin
  84208. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  84209. end;
  84210. procedure TCAN1_C1FIFOINT7.setTXHALFIE; inline;
  84211. begin
  84212. pTDefRegMap(@Self)^.&set := $02000000;
  84213. end;
  84214. procedure TCAN1_C1FIFOINT7.clearTXHALFIE; inline;
  84215. begin
  84216. pTDefRegMap(@Self)^.clr := $02000000;
  84217. end;
  84218. procedure TCAN1_C1FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  84219. begin
  84220. if thebits = 0 then
  84221. pTDefRegMap(@Self)^.clr := $02000000
  84222. else
  84223. pTDefRegMap(@Self)^.&set := $02000000;
  84224. end;
  84225. function TCAN1_C1FIFOINT7.getTXHALFIE : TBits_1; inline;
  84226. begin
  84227. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  84228. end;
  84229. procedure TCAN1_C1FIFOINT7.setTXNFULLIE; inline;
  84230. begin
  84231. pTDefRegMap(@Self)^.&set := $04000000;
  84232. end;
  84233. procedure TCAN1_C1FIFOINT7.clearTXNFULLIE; inline;
  84234. begin
  84235. pTDefRegMap(@Self)^.clr := $04000000;
  84236. end;
  84237. procedure TCAN1_C1FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  84238. begin
  84239. if thebits = 0 then
  84240. pTDefRegMap(@Self)^.clr := $04000000
  84241. else
  84242. pTDefRegMap(@Self)^.&set := $04000000;
  84243. end;
  84244. function TCAN1_C1FIFOINT7.getTXNFULLIE : TBits_1; inline;
  84245. begin
  84246. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  84247. end;
  84248. procedure TCAN1_C1FIFOINT7.setw(thebits : TBits_32); inline;
  84249. begin
  84250. pTDefRegMap(@Self)^.val := thebits;
  84251. end;
  84252. function TCAN1_C1FIFOINT7.getw : TBits_32; inline;
  84253. begin
  84254. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84255. end;
  84256. procedure TCAN1_C1FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  84257. begin
  84258. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  84259. end;
  84260. function TCAN1_C1FIFOCI7.getCFIFOCI : TBits_5; inline;
  84261. begin
  84262. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  84263. end;
  84264. procedure TCAN1_C1FIFOCI7.setw(thebits : TBits_32); inline;
  84265. begin
  84266. pTDefRegMap(@Self)^.val := thebits;
  84267. end;
  84268. function TCAN1_C1FIFOCI7.getw : TBits_32; inline;
  84269. begin
  84270. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84271. end;
  84272. procedure TCAN1_C1FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  84273. begin
  84274. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  84275. end;
  84276. function TCAN1_C1FIFOCON8.getTXPRI : TBits_2; inline;
  84277. begin
  84278. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  84279. end;
  84280. procedure TCAN1_C1FIFOCON8.setRTREN; inline;
  84281. begin
  84282. pTDefRegMap(@Self)^.&set := $00000004;
  84283. end;
  84284. procedure TCAN1_C1FIFOCON8.clearRTREN; inline;
  84285. begin
  84286. pTDefRegMap(@Self)^.clr := $00000004;
  84287. end;
  84288. procedure TCAN1_C1FIFOCON8.setRTREN(thebits : TBits_1); inline;
  84289. begin
  84290. if thebits = 0 then
  84291. pTDefRegMap(@Self)^.clr := $00000004
  84292. else
  84293. pTDefRegMap(@Self)^.&set := $00000004;
  84294. end;
  84295. function TCAN1_C1FIFOCON8.getRTREN : TBits_1; inline;
  84296. begin
  84297. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84298. end;
  84299. procedure TCAN1_C1FIFOCON8.setTXREQ; inline;
  84300. begin
  84301. pTDefRegMap(@Self)^.&set := $00000008;
  84302. end;
  84303. procedure TCAN1_C1FIFOCON8.clearTXREQ; inline;
  84304. begin
  84305. pTDefRegMap(@Self)^.clr := $00000008;
  84306. end;
  84307. procedure TCAN1_C1FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  84308. begin
  84309. if thebits = 0 then
  84310. pTDefRegMap(@Self)^.clr := $00000008
  84311. else
  84312. pTDefRegMap(@Self)^.&set := $00000008;
  84313. end;
  84314. function TCAN1_C1FIFOCON8.getTXREQ : TBits_1; inline;
  84315. begin
  84316. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84317. end;
  84318. procedure TCAN1_C1FIFOCON8.setTXERR; inline;
  84319. begin
  84320. pTDefRegMap(@Self)^.&set := $00000010;
  84321. end;
  84322. procedure TCAN1_C1FIFOCON8.clearTXERR; inline;
  84323. begin
  84324. pTDefRegMap(@Self)^.clr := $00000010;
  84325. end;
  84326. procedure TCAN1_C1FIFOCON8.setTXERR(thebits : TBits_1); inline;
  84327. begin
  84328. if thebits = 0 then
  84329. pTDefRegMap(@Self)^.clr := $00000010
  84330. else
  84331. pTDefRegMap(@Self)^.&set := $00000010;
  84332. end;
  84333. function TCAN1_C1FIFOCON8.getTXERR : TBits_1; inline;
  84334. begin
  84335. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  84336. end;
  84337. procedure TCAN1_C1FIFOCON8.setTXLARB; inline;
  84338. begin
  84339. pTDefRegMap(@Self)^.&set := $00000020;
  84340. end;
  84341. procedure TCAN1_C1FIFOCON8.clearTXLARB; inline;
  84342. begin
  84343. pTDefRegMap(@Self)^.clr := $00000020;
  84344. end;
  84345. procedure TCAN1_C1FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  84346. begin
  84347. if thebits = 0 then
  84348. pTDefRegMap(@Self)^.clr := $00000020
  84349. else
  84350. pTDefRegMap(@Self)^.&set := $00000020;
  84351. end;
  84352. function TCAN1_C1FIFOCON8.getTXLARB : TBits_1; inline;
  84353. begin
  84354. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  84355. end;
  84356. procedure TCAN1_C1FIFOCON8.setTXABAT; inline;
  84357. begin
  84358. pTDefRegMap(@Self)^.&set := $00000040;
  84359. end;
  84360. procedure TCAN1_C1FIFOCON8.clearTXABAT; inline;
  84361. begin
  84362. pTDefRegMap(@Self)^.clr := $00000040;
  84363. end;
  84364. procedure TCAN1_C1FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  84365. begin
  84366. if thebits = 0 then
  84367. pTDefRegMap(@Self)^.clr := $00000040
  84368. else
  84369. pTDefRegMap(@Self)^.&set := $00000040;
  84370. end;
  84371. function TCAN1_C1FIFOCON8.getTXABAT : TBits_1; inline;
  84372. begin
  84373. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  84374. end;
  84375. procedure TCAN1_C1FIFOCON8.setTXEN; inline;
  84376. begin
  84377. pTDefRegMap(@Self)^.&set := $00000080;
  84378. end;
  84379. procedure TCAN1_C1FIFOCON8.clearTXEN; inline;
  84380. begin
  84381. pTDefRegMap(@Self)^.clr := $00000080;
  84382. end;
  84383. procedure TCAN1_C1FIFOCON8.setTXEN(thebits : TBits_1); inline;
  84384. begin
  84385. if thebits = 0 then
  84386. pTDefRegMap(@Self)^.clr := $00000080
  84387. else
  84388. pTDefRegMap(@Self)^.&set := $00000080;
  84389. end;
  84390. function TCAN1_C1FIFOCON8.getTXEN : TBits_1; inline;
  84391. begin
  84392. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  84393. end;
  84394. procedure TCAN1_C1FIFOCON8.setDONLY; inline;
  84395. begin
  84396. pTDefRegMap(@Self)^.&set := $00001000;
  84397. end;
  84398. procedure TCAN1_C1FIFOCON8.clearDONLY; inline;
  84399. begin
  84400. pTDefRegMap(@Self)^.clr := $00001000;
  84401. end;
  84402. procedure TCAN1_C1FIFOCON8.setDONLY(thebits : TBits_1); inline;
  84403. begin
  84404. if thebits = 0 then
  84405. pTDefRegMap(@Self)^.clr := $00001000
  84406. else
  84407. pTDefRegMap(@Self)^.&set := $00001000;
  84408. end;
  84409. function TCAN1_C1FIFOCON8.getDONLY : TBits_1; inline;
  84410. begin
  84411. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  84412. end;
  84413. procedure TCAN1_C1FIFOCON8.setUINC; inline;
  84414. begin
  84415. pTDefRegMap(@Self)^.&set := $00002000;
  84416. end;
  84417. procedure TCAN1_C1FIFOCON8.clearUINC; inline;
  84418. begin
  84419. pTDefRegMap(@Self)^.clr := $00002000;
  84420. end;
  84421. procedure TCAN1_C1FIFOCON8.setUINC(thebits : TBits_1); inline;
  84422. begin
  84423. if thebits = 0 then
  84424. pTDefRegMap(@Self)^.clr := $00002000
  84425. else
  84426. pTDefRegMap(@Self)^.&set := $00002000;
  84427. end;
  84428. function TCAN1_C1FIFOCON8.getUINC : TBits_1; inline;
  84429. begin
  84430. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  84431. end;
  84432. procedure TCAN1_C1FIFOCON8.setFRESET; inline;
  84433. begin
  84434. pTDefRegMap(@Self)^.&set := $00004000;
  84435. end;
  84436. procedure TCAN1_C1FIFOCON8.clearFRESET; inline;
  84437. begin
  84438. pTDefRegMap(@Self)^.clr := $00004000;
  84439. end;
  84440. procedure TCAN1_C1FIFOCON8.setFRESET(thebits : TBits_1); inline;
  84441. begin
  84442. if thebits = 0 then
  84443. pTDefRegMap(@Self)^.clr := $00004000
  84444. else
  84445. pTDefRegMap(@Self)^.&set := $00004000;
  84446. end;
  84447. function TCAN1_C1FIFOCON8.getFRESET : TBits_1; inline;
  84448. begin
  84449. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  84450. end;
  84451. procedure TCAN1_C1FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  84452. begin
  84453. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  84454. end;
  84455. function TCAN1_C1FIFOCON8.getFSIZE : TBits_5; inline;
  84456. begin
  84457. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  84458. end;
  84459. procedure TCAN1_C1FIFOCON8.setw(thebits : TBits_32); inline;
  84460. begin
  84461. pTDefRegMap(@Self)^.val := thebits;
  84462. end;
  84463. function TCAN1_C1FIFOCON8.getw : TBits_32; inline;
  84464. begin
  84465. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84466. end;
  84467. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF; inline;
  84468. begin
  84469. pTDefRegMap(@Self)^.&set := $00000001;
  84470. end;
  84471. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIF; inline;
  84472. begin
  84473. pTDefRegMap(@Self)^.clr := $00000001;
  84474. end;
  84475. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  84476. begin
  84477. if thebits = 0 then
  84478. pTDefRegMap(@Self)^.clr := $00000001
  84479. else
  84480. pTDefRegMap(@Self)^.&set := $00000001;
  84481. end;
  84482. function TCAN1_C1FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  84483. begin
  84484. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  84485. end;
  84486. procedure TCAN1_C1FIFOINT8.setRXHALFIF; inline;
  84487. begin
  84488. pTDefRegMap(@Self)^.&set := $00000002;
  84489. end;
  84490. procedure TCAN1_C1FIFOINT8.clearRXHALFIF; inline;
  84491. begin
  84492. pTDefRegMap(@Self)^.clr := $00000002;
  84493. end;
  84494. procedure TCAN1_C1FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  84495. begin
  84496. if thebits = 0 then
  84497. pTDefRegMap(@Self)^.clr := $00000002
  84498. else
  84499. pTDefRegMap(@Self)^.&set := $00000002;
  84500. end;
  84501. function TCAN1_C1FIFOINT8.getRXHALFIF : TBits_1; inline;
  84502. begin
  84503. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  84504. end;
  84505. procedure TCAN1_C1FIFOINT8.setRXFULLIF; inline;
  84506. begin
  84507. pTDefRegMap(@Self)^.&set := $00000004;
  84508. end;
  84509. procedure TCAN1_C1FIFOINT8.clearRXFULLIF; inline;
  84510. begin
  84511. pTDefRegMap(@Self)^.clr := $00000004;
  84512. end;
  84513. procedure TCAN1_C1FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  84514. begin
  84515. if thebits = 0 then
  84516. pTDefRegMap(@Self)^.clr := $00000004
  84517. else
  84518. pTDefRegMap(@Self)^.&set := $00000004;
  84519. end;
  84520. function TCAN1_C1FIFOINT8.getRXFULLIF : TBits_1; inline;
  84521. begin
  84522. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84523. end;
  84524. procedure TCAN1_C1FIFOINT8.setRXOVFLIF; inline;
  84525. begin
  84526. pTDefRegMap(@Self)^.&set := $00000008;
  84527. end;
  84528. procedure TCAN1_C1FIFOINT8.clearRXOVFLIF; inline;
  84529. begin
  84530. pTDefRegMap(@Self)^.clr := $00000008;
  84531. end;
  84532. procedure TCAN1_C1FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  84533. begin
  84534. if thebits = 0 then
  84535. pTDefRegMap(@Self)^.clr := $00000008
  84536. else
  84537. pTDefRegMap(@Self)^.&set := $00000008;
  84538. end;
  84539. function TCAN1_C1FIFOINT8.getRXOVFLIF : TBits_1; inline;
  84540. begin
  84541. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84542. end;
  84543. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF; inline;
  84544. begin
  84545. pTDefRegMap(@Self)^.&set := $00000100;
  84546. end;
  84547. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIF; inline;
  84548. begin
  84549. pTDefRegMap(@Self)^.clr := $00000100;
  84550. end;
  84551. procedure TCAN1_C1FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  84552. begin
  84553. if thebits = 0 then
  84554. pTDefRegMap(@Self)^.clr := $00000100
  84555. else
  84556. pTDefRegMap(@Self)^.&set := $00000100;
  84557. end;
  84558. function TCAN1_C1FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  84559. begin
  84560. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  84561. end;
  84562. procedure TCAN1_C1FIFOINT8.setTXHALFIF; inline;
  84563. begin
  84564. pTDefRegMap(@Self)^.&set := $00000200;
  84565. end;
  84566. procedure TCAN1_C1FIFOINT8.clearTXHALFIF; inline;
  84567. begin
  84568. pTDefRegMap(@Self)^.clr := $00000200;
  84569. end;
  84570. procedure TCAN1_C1FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  84571. begin
  84572. if thebits = 0 then
  84573. pTDefRegMap(@Self)^.clr := $00000200
  84574. else
  84575. pTDefRegMap(@Self)^.&set := $00000200;
  84576. end;
  84577. function TCAN1_C1FIFOINT8.getTXHALFIF : TBits_1; inline;
  84578. begin
  84579. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  84580. end;
  84581. procedure TCAN1_C1FIFOINT8.setTXNFULLIF; inline;
  84582. begin
  84583. pTDefRegMap(@Self)^.&set := $00000400;
  84584. end;
  84585. procedure TCAN1_C1FIFOINT8.clearTXNFULLIF; inline;
  84586. begin
  84587. pTDefRegMap(@Self)^.clr := $00000400;
  84588. end;
  84589. procedure TCAN1_C1FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  84590. begin
  84591. if thebits = 0 then
  84592. pTDefRegMap(@Self)^.clr := $00000400
  84593. else
  84594. pTDefRegMap(@Self)^.&set := $00000400;
  84595. end;
  84596. function TCAN1_C1FIFOINT8.getTXNFULLIF : TBits_1; inline;
  84597. begin
  84598. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  84599. end;
  84600. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE; inline;
  84601. begin
  84602. pTDefRegMap(@Self)^.&set := $00010000;
  84603. end;
  84604. procedure TCAN1_C1FIFOINT8.clearRXNEMPTYIE; inline;
  84605. begin
  84606. pTDefRegMap(@Self)^.clr := $00010000;
  84607. end;
  84608. procedure TCAN1_C1FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  84609. begin
  84610. if thebits = 0 then
  84611. pTDefRegMap(@Self)^.clr := $00010000
  84612. else
  84613. pTDefRegMap(@Self)^.&set := $00010000;
  84614. end;
  84615. function TCAN1_C1FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  84616. begin
  84617. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  84618. end;
  84619. procedure TCAN1_C1FIFOINT8.setRXHALFIE; inline;
  84620. begin
  84621. pTDefRegMap(@Self)^.&set := $00020000;
  84622. end;
  84623. procedure TCAN1_C1FIFOINT8.clearRXHALFIE; inline;
  84624. begin
  84625. pTDefRegMap(@Self)^.clr := $00020000;
  84626. end;
  84627. procedure TCAN1_C1FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  84628. begin
  84629. if thebits = 0 then
  84630. pTDefRegMap(@Self)^.clr := $00020000
  84631. else
  84632. pTDefRegMap(@Self)^.&set := $00020000;
  84633. end;
  84634. function TCAN1_C1FIFOINT8.getRXHALFIE : TBits_1; inline;
  84635. begin
  84636. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  84637. end;
  84638. procedure TCAN1_C1FIFOINT8.setRXFULLIE; inline;
  84639. begin
  84640. pTDefRegMap(@Self)^.&set := $00040000;
  84641. end;
  84642. procedure TCAN1_C1FIFOINT8.clearRXFULLIE; inline;
  84643. begin
  84644. pTDefRegMap(@Self)^.clr := $00040000;
  84645. end;
  84646. procedure TCAN1_C1FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  84647. begin
  84648. if thebits = 0 then
  84649. pTDefRegMap(@Self)^.clr := $00040000
  84650. else
  84651. pTDefRegMap(@Self)^.&set := $00040000;
  84652. end;
  84653. function TCAN1_C1FIFOINT8.getRXFULLIE : TBits_1; inline;
  84654. begin
  84655. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  84656. end;
  84657. procedure TCAN1_C1FIFOINT8.setRXOVFLIE; inline;
  84658. begin
  84659. pTDefRegMap(@Self)^.&set := $00080000;
  84660. end;
  84661. procedure TCAN1_C1FIFOINT8.clearRXOVFLIE; inline;
  84662. begin
  84663. pTDefRegMap(@Self)^.clr := $00080000;
  84664. end;
  84665. procedure TCAN1_C1FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  84666. begin
  84667. if thebits = 0 then
  84668. pTDefRegMap(@Self)^.clr := $00080000
  84669. else
  84670. pTDefRegMap(@Self)^.&set := $00080000;
  84671. end;
  84672. function TCAN1_C1FIFOINT8.getRXOVFLIE : TBits_1; inline;
  84673. begin
  84674. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  84675. end;
  84676. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE; inline;
  84677. begin
  84678. pTDefRegMap(@Self)^.&set := $01000000;
  84679. end;
  84680. procedure TCAN1_C1FIFOINT8.clearTXEMPTYIE; inline;
  84681. begin
  84682. pTDefRegMap(@Self)^.clr := $01000000;
  84683. end;
  84684. procedure TCAN1_C1FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  84685. begin
  84686. if thebits = 0 then
  84687. pTDefRegMap(@Self)^.clr := $01000000
  84688. else
  84689. pTDefRegMap(@Self)^.&set := $01000000;
  84690. end;
  84691. function TCAN1_C1FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  84692. begin
  84693. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  84694. end;
  84695. procedure TCAN1_C1FIFOINT8.setTXHALFIE; inline;
  84696. begin
  84697. pTDefRegMap(@Self)^.&set := $02000000;
  84698. end;
  84699. procedure TCAN1_C1FIFOINT8.clearTXHALFIE; inline;
  84700. begin
  84701. pTDefRegMap(@Self)^.clr := $02000000;
  84702. end;
  84703. procedure TCAN1_C1FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  84704. begin
  84705. if thebits = 0 then
  84706. pTDefRegMap(@Self)^.clr := $02000000
  84707. else
  84708. pTDefRegMap(@Self)^.&set := $02000000;
  84709. end;
  84710. function TCAN1_C1FIFOINT8.getTXHALFIE : TBits_1; inline;
  84711. begin
  84712. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  84713. end;
  84714. procedure TCAN1_C1FIFOINT8.setTXNFULLIE; inline;
  84715. begin
  84716. pTDefRegMap(@Self)^.&set := $04000000;
  84717. end;
  84718. procedure TCAN1_C1FIFOINT8.clearTXNFULLIE; inline;
  84719. begin
  84720. pTDefRegMap(@Self)^.clr := $04000000;
  84721. end;
  84722. procedure TCAN1_C1FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  84723. begin
  84724. if thebits = 0 then
  84725. pTDefRegMap(@Self)^.clr := $04000000
  84726. else
  84727. pTDefRegMap(@Self)^.&set := $04000000;
  84728. end;
  84729. function TCAN1_C1FIFOINT8.getTXNFULLIE : TBits_1; inline;
  84730. begin
  84731. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  84732. end;
  84733. procedure TCAN1_C1FIFOINT8.setw(thebits : TBits_32); inline;
  84734. begin
  84735. pTDefRegMap(@Self)^.val := thebits;
  84736. end;
  84737. function TCAN1_C1FIFOINT8.getw : TBits_32; inline;
  84738. begin
  84739. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84740. end;
  84741. procedure TCAN1_C1FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  84742. begin
  84743. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  84744. end;
  84745. function TCAN1_C1FIFOCI8.getCFIFOCI : TBits_5; inline;
  84746. begin
  84747. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  84748. end;
  84749. procedure TCAN1_C1FIFOCI8.setw(thebits : TBits_32); inline;
  84750. begin
  84751. pTDefRegMap(@Self)^.val := thebits;
  84752. end;
  84753. function TCAN1_C1FIFOCI8.getw : TBits_32; inline;
  84754. begin
  84755. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84756. end;
  84757. procedure TCAN1_C1FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  84758. begin
  84759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  84760. end;
  84761. function TCAN1_C1FIFOCON9.getTXPRI : TBits_2; inline;
  84762. begin
  84763. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  84764. end;
  84765. procedure TCAN1_C1FIFOCON9.setRTREN; inline;
  84766. begin
  84767. pTDefRegMap(@Self)^.&set := $00000004;
  84768. end;
  84769. procedure TCAN1_C1FIFOCON9.clearRTREN; inline;
  84770. begin
  84771. pTDefRegMap(@Self)^.clr := $00000004;
  84772. end;
  84773. procedure TCAN1_C1FIFOCON9.setRTREN(thebits : TBits_1); inline;
  84774. begin
  84775. if thebits = 0 then
  84776. pTDefRegMap(@Self)^.clr := $00000004
  84777. else
  84778. pTDefRegMap(@Self)^.&set := $00000004;
  84779. end;
  84780. function TCAN1_C1FIFOCON9.getRTREN : TBits_1; inline;
  84781. begin
  84782. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  84783. end;
  84784. procedure TCAN1_C1FIFOCON9.setTXREQ; inline;
  84785. begin
  84786. pTDefRegMap(@Self)^.&set := $00000008;
  84787. end;
  84788. procedure TCAN1_C1FIFOCON9.clearTXREQ; inline;
  84789. begin
  84790. pTDefRegMap(@Self)^.clr := $00000008;
  84791. end;
  84792. procedure TCAN1_C1FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  84793. begin
  84794. if thebits = 0 then
  84795. pTDefRegMap(@Self)^.clr := $00000008
  84796. else
  84797. pTDefRegMap(@Self)^.&set := $00000008;
  84798. end;
  84799. function TCAN1_C1FIFOCON9.getTXREQ : TBits_1; inline;
  84800. begin
  84801. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  84802. end;
  84803. procedure TCAN1_C1FIFOCON9.setTXERR; inline;
  84804. begin
  84805. pTDefRegMap(@Self)^.&set := $00000010;
  84806. end;
  84807. procedure TCAN1_C1FIFOCON9.clearTXERR; inline;
  84808. begin
  84809. pTDefRegMap(@Self)^.clr := $00000010;
  84810. end;
  84811. procedure TCAN1_C1FIFOCON9.setTXERR(thebits : TBits_1); inline;
  84812. begin
  84813. if thebits = 0 then
  84814. pTDefRegMap(@Self)^.clr := $00000010
  84815. else
  84816. pTDefRegMap(@Self)^.&set := $00000010;
  84817. end;
  84818. function TCAN1_C1FIFOCON9.getTXERR : TBits_1; inline;
  84819. begin
  84820. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  84821. end;
  84822. procedure TCAN1_C1FIFOCON9.setTXLARB; inline;
  84823. begin
  84824. pTDefRegMap(@Self)^.&set := $00000020;
  84825. end;
  84826. procedure TCAN1_C1FIFOCON9.clearTXLARB; inline;
  84827. begin
  84828. pTDefRegMap(@Self)^.clr := $00000020;
  84829. end;
  84830. procedure TCAN1_C1FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  84831. begin
  84832. if thebits = 0 then
  84833. pTDefRegMap(@Self)^.clr := $00000020
  84834. else
  84835. pTDefRegMap(@Self)^.&set := $00000020;
  84836. end;
  84837. function TCAN1_C1FIFOCON9.getTXLARB : TBits_1; inline;
  84838. begin
  84839. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  84840. end;
  84841. procedure TCAN1_C1FIFOCON9.setTXABAT; inline;
  84842. begin
  84843. pTDefRegMap(@Self)^.&set := $00000040;
  84844. end;
  84845. procedure TCAN1_C1FIFOCON9.clearTXABAT; inline;
  84846. begin
  84847. pTDefRegMap(@Self)^.clr := $00000040;
  84848. end;
  84849. procedure TCAN1_C1FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  84850. begin
  84851. if thebits = 0 then
  84852. pTDefRegMap(@Self)^.clr := $00000040
  84853. else
  84854. pTDefRegMap(@Self)^.&set := $00000040;
  84855. end;
  84856. function TCAN1_C1FIFOCON9.getTXABAT : TBits_1; inline;
  84857. begin
  84858. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  84859. end;
  84860. procedure TCAN1_C1FIFOCON9.setTXEN; inline;
  84861. begin
  84862. pTDefRegMap(@Self)^.&set := $00000080;
  84863. end;
  84864. procedure TCAN1_C1FIFOCON9.clearTXEN; inline;
  84865. begin
  84866. pTDefRegMap(@Self)^.clr := $00000080;
  84867. end;
  84868. procedure TCAN1_C1FIFOCON9.setTXEN(thebits : TBits_1); inline;
  84869. begin
  84870. if thebits = 0 then
  84871. pTDefRegMap(@Self)^.clr := $00000080
  84872. else
  84873. pTDefRegMap(@Self)^.&set := $00000080;
  84874. end;
  84875. function TCAN1_C1FIFOCON9.getTXEN : TBits_1; inline;
  84876. begin
  84877. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  84878. end;
  84879. procedure TCAN1_C1FIFOCON9.setDONLY; inline;
  84880. begin
  84881. pTDefRegMap(@Self)^.&set := $00001000;
  84882. end;
  84883. procedure TCAN1_C1FIFOCON9.clearDONLY; inline;
  84884. begin
  84885. pTDefRegMap(@Self)^.clr := $00001000;
  84886. end;
  84887. procedure TCAN1_C1FIFOCON9.setDONLY(thebits : TBits_1); inline;
  84888. begin
  84889. if thebits = 0 then
  84890. pTDefRegMap(@Self)^.clr := $00001000
  84891. else
  84892. pTDefRegMap(@Self)^.&set := $00001000;
  84893. end;
  84894. function TCAN1_C1FIFOCON9.getDONLY : TBits_1; inline;
  84895. begin
  84896. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  84897. end;
  84898. procedure TCAN1_C1FIFOCON9.setUINC; inline;
  84899. begin
  84900. pTDefRegMap(@Self)^.&set := $00002000;
  84901. end;
  84902. procedure TCAN1_C1FIFOCON9.clearUINC; inline;
  84903. begin
  84904. pTDefRegMap(@Self)^.clr := $00002000;
  84905. end;
  84906. procedure TCAN1_C1FIFOCON9.setUINC(thebits : TBits_1); inline;
  84907. begin
  84908. if thebits = 0 then
  84909. pTDefRegMap(@Self)^.clr := $00002000
  84910. else
  84911. pTDefRegMap(@Self)^.&set := $00002000;
  84912. end;
  84913. function TCAN1_C1FIFOCON9.getUINC : TBits_1; inline;
  84914. begin
  84915. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  84916. end;
  84917. procedure TCAN1_C1FIFOCON9.setFRESET; inline;
  84918. begin
  84919. pTDefRegMap(@Self)^.&set := $00004000;
  84920. end;
  84921. procedure TCAN1_C1FIFOCON9.clearFRESET; inline;
  84922. begin
  84923. pTDefRegMap(@Self)^.clr := $00004000;
  84924. end;
  84925. procedure TCAN1_C1FIFOCON9.setFRESET(thebits : TBits_1); inline;
  84926. begin
  84927. if thebits = 0 then
  84928. pTDefRegMap(@Self)^.clr := $00004000
  84929. else
  84930. pTDefRegMap(@Self)^.&set := $00004000;
  84931. end;
  84932. function TCAN1_C1FIFOCON9.getFRESET : TBits_1; inline;
  84933. begin
  84934. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  84935. end;
  84936. procedure TCAN1_C1FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  84937. begin
  84938. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  84939. end;
  84940. function TCAN1_C1FIFOCON9.getFSIZE : TBits_5; inline;
  84941. begin
  84942. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  84943. end;
  84944. procedure TCAN1_C1FIFOCON9.setw(thebits : TBits_32); inline;
  84945. begin
  84946. pTDefRegMap(@Self)^.val := thebits;
  84947. end;
  84948. function TCAN1_C1FIFOCON9.getw : TBits_32; inline;
  84949. begin
  84950. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  84951. end;
  84952. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF; inline;
  84953. begin
  84954. pTDefRegMap(@Self)^.&set := $00000001;
  84955. end;
  84956. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIF; inline;
  84957. begin
  84958. pTDefRegMap(@Self)^.clr := $00000001;
  84959. end;
  84960. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  84961. begin
  84962. if thebits = 0 then
  84963. pTDefRegMap(@Self)^.clr := $00000001
  84964. else
  84965. pTDefRegMap(@Self)^.&set := $00000001;
  84966. end;
  84967. function TCAN1_C1FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  84968. begin
  84969. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  84970. end;
  84971. procedure TCAN1_C1FIFOINT9.setRXHALFIF; inline;
  84972. begin
  84973. pTDefRegMap(@Self)^.&set := $00000002;
  84974. end;
  84975. procedure TCAN1_C1FIFOINT9.clearRXHALFIF; inline;
  84976. begin
  84977. pTDefRegMap(@Self)^.clr := $00000002;
  84978. end;
  84979. procedure TCAN1_C1FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  84980. begin
  84981. if thebits = 0 then
  84982. pTDefRegMap(@Self)^.clr := $00000002
  84983. else
  84984. pTDefRegMap(@Self)^.&set := $00000002;
  84985. end;
  84986. function TCAN1_C1FIFOINT9.getRXHALFIF : TBits_1; inline;
  84987. begin
  84988. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  84989. end;
  84990. procedure TCAN1_C1FIFOINT9.setRXFULLIF; inline;
  84991. begin
  84992. pTDefRegMap(@Self)^.&set := $00000004;
  84993. end;
  84994. procedure TCAN1_C1FIFOINT9.clearRXFULLIF; inline;
  84995. begin
  84996. pTDefRegMap(@Self)^.clr := $00000004;
  84997. end;
  84998. procedure TCAN1_C1FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  84999. begin
  85000. if thebits = 0 then
  85001. pTDefRegMap(@Self)^.clr := $00000004
  85002. else
  85003. pTDefRegMap(@Self)^.&set := $00000004;
  85004. end;
  85005. function TCAN1_C1FIFOINT9.getRXFULLIF : TBits_1; inline;
  85006. begin
  85007. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85008. end;
  85009. procedure TCAN1_C1FIFOINT9.setRXOVFLIF; inline;
  85010. begin
  85011. pTDefRegMap(@Self)^.&set := $00000008;
  85012. end;
  85013. procedure TCAN1_C1FIFOINT9.clearRXOVFLIF; inline;
  85014. begin
  85015. pTDefRegMap(@Self)^.clr := $00000008;
  85016. end;
  85017. procedure TCAN1_C1FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  85018. begin
  85019. if thebits = 0 then
  85020. pTDefRegMap(@Self)^.clr := $00000008
  85021. else
  85022. pTDefRegMap(@Self)^.&set := $00000008;
  85023. end;
  85024. function TCAN1_C1FIFOINT9.getRXOVFLIF : TBits_1; inline;
  85025. begin
  85026. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85027. end;
  85028. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF; inline;
  85029. begin
  85030. pTDefRegMap(@Self)^.&set := $00000100;
  85031. end;
  85032. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIF; inline;
  85033. begin
  85034. pTDefRegMap(@Self)^.clr := $00000100;
  85035. end;
  85036. procedure TCAN1_C1FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  85037. begin
  85038. if thebits = 0 then
  85039. pTDefRegMap(@Self)^.clr := $00000100
  85040. else
  85041. pTDefRegMap(@Self)^.&set := $00000100;
  85042. end;
  85043. function TCAN1_C1FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  85044. begin
  85045. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  85046. end;
  85047. procedure TCAN1_C1FIFOINT9.setTXHALFIF; inline;
  85048. begin
  85049. pTDefRegMap(@Self)^.&set := $00000200;
  85050. end;
  85051. procedure TCAN1_C1FIFOINT9.clearTXHALFIF; inline;
  85052. begin
  85053. pTDefRegMap(@Self)^.clr := $00000200;
  85054. end;
  85055. procedure TCAN1_C1FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  85056. begin
  85057. if thebits = 0 then
  85058. pTDefRegMap(@Self)^.clr := $00000200
  85059. else
  85060. pTDefRegMap(@Self)^.&set := $00000200;
  85061. end;
  85062. function TCAN1_C1FIFOINT9.getTXHALFIF : TBits_1; inline;
  85063. begin
  85064. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  85065. end;
  85066. procedure TCAN1_C1FIFOINT9.setTXNFULLIF; inline;
  85067. begin
  85068. pTDefRegMap(@Self)^.&set := $00000400;
  85069. end;
  85070. procedure TCAN1_C1FIFOINT9.clearTXNFULLIF; inline;
  85071. begin
  85072. pTDefRegMap(@Self)^.clr := $00000400;
  85073. end;
  85074. procedure TCAN1_C1FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  85075. begin
  85076. if thebits = 0 then
  85077. pTDefRegMap(@Self)^.clr := $00000400
  85078. else
  85079. pTDefRegMap(@Self)^.&set := $00000400;
  85080. end;
  85081. function TCAN1_C1FIFOINT9.getTXNFULLIF : TBits_1; inline;
  85082. begin
  85083. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  85084. end;
  85085. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE; inline;
  85086. begin
  85087. pTDefRegMap(@Self)^.&set := $00010000;
  85088. end;
  85089. procedure TCAN1_C1FIFOINT9.clearRXNEMPTYIE; inline;
  85090. begin
  85091. pTDefRegMap(@Self)^.clr := $00010000;
  85092. end;
  85093. procedure TCAN1_C1FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  85094. begin
  85095. if thebits = 0 then
  85096. pTDefRegMap(@Self)^.clr := $00010000
  85097. else
  85098. pTDefRegMap(@Self)^.&set := $00010000;
  85099. end;
  85100. function TCAN1_C1FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  85101. begin
  85102. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  85103. end;
  85104. procedure TCAN1_C1FIFOINT9.setRXHALFIE; inline;
  85105. begin
  85106. pTDefRegMap(@Self)^.&set := $00020000;
  85107. end;
  85108. procedure TCAN1_C1FIFOINT9.clearRXHALFIE; inline;
  85109. begin
  85110. pTDefRegMap(@Self)^.clr := $00020000;
  85111. end;
  85112. procedure TCAN1_C1FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  85113. begin
  85114. if thebits = 0 then
  85115. pTDefRegMap(@Self)^.clr := $00020000
  85116. else
  85117. pTDefRegMap(@Self)^.&set := $00020000;
  85118. end;
  85119. function TCAN1_C1FIFOINT9.getRXHALFIE : TBits_1; inline;
  85120. begin
  85121. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  85122. end;
  85123. procedure TCAN1_C1FIFOINT9.setRXFULLIE; inline;
  85124. begin
  85125. pTDefRegMap(@Self)^.&set := $00040000;
  85126. end;
  85127. procedure TCAN1_C1FIFOINT9.clearRXFULLIE; inline;
  85128. begin
  85129. pTDefRegMap(@Self)^.clr := $00040000;
  85130. end;
  85131. procedure TCAN1_C1FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  85132. begin
  85133. if thebits = 0 then
  85134. pTDefRegMap(@Self)^.clr := $00040000
  85135. else
  85136. pTDefRegMap(@Self)^.&set := $00040000;
  85137. end;
  85138. function TCAN1_C1FIFOINT9.getRXFULLIE : TBits_1; inline;
  85139. begin
  85140. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  85141. end;
  85142. procedure TCAN1_C1FIFOINT9.setRXOVFLIE; inline;
  85143. begin
  85144. pTDefRegMap(@Self)^.&set := $00080000;
  85145. end;
  85146. procedure TCAN1_C1FIFOINT9.clearRXOVFLIE; inline;
  85147. begin
  85148. pTDefRegMap(@Self)^.clr := $00080000;
  85149. end;
  85150. procedure TCAN1_C1FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  85151. begin
  85152. if thebits = 0 then
  85153. pTDefRegMap(@Self)^.clr := $00080000
  85154. else
  85155. pTDefRegMap(@Self)^.&set := $00080000;
  85156. end;
  85157. function TCAN1_C1FIFOINT9.getRXOVFLIE : TBits_1; inline;
  85158. begin
  85159. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85160. end;
  85161. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE; inline;
  85162. begin
  85163. pTDefRegMap(@Self)^.&set := $01000000;
  85164. end;
  85165. procedure TCAN1_C1FIFOINT9.clearTXEMPTYIE; inline;
  85166. begin
  85167. pTDefRegMap(@Self)^.clr := $01000000;
  85168. end;
  85169. procedure TCAN1_C1FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  85170. begin
  85171. if thebits = 0 then
  85172. pTDefRegMap(@Self)^.clr := $01000000
  85173. else
  85174. pTDefRegMap(@Self)^.&set := $01000000;
  85175. end;
  85176. function TCAN1_C1FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  85177. begin
  85178. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  85179. end;
  85180. procedure TCAN1_C1FIFOINT9.setTXHALFIE; inline;
  85181. begin
  85182. pTDefRegMap(@Self)^.&set := $02000000;
  85183. end;
  85184. procedure TCAN1_C1FIFOINT9.clearTXHALFIE; inline;
  85185. begin
  85186. pTDefRegMap(@Self)^.clr := $02000000;
  85187. end;
  85188. procedure TCAN1_C1FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  85189. begin
  85190. if thebits = 0 then
  85191. pTDefRegMap(@Self)^.clr := $02000000
  85192. else
  85193. pTDefRegMap(@Self)^.&set := $02000000;
  85194. end;
  85195. function TCAN1_C1FIFOINT9.getTXHALFIE : TBits_1; inline;
  85196. begin
  85197. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  85198. end;
  85199. procedure TCAN1_C1FIFOINT9.setTXNFULLIE; inline;
  85200. begin
  85201. pTDefRegMap(@Self)^.&set := $04000000;
  85202. end;
  85203. procedure TCAN1_C1FIFOINT9.clearTXNFULLIE; inline;
  85204. begin
  85205. pTDefRegMap(@Self)^.clr := $04000000;
  85206. end;
  85207. procedure TCAN1_C1FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  85208. begin
  85209. if thebits = 0 then
  85210. pTDefRegMap(@Self)^.clr := $04000000
  85211. else
  85212. pTDefRegMap(@Self)^.&set := $04000000;
  85213. end;
  85214. function TCAN1_C1FIFOINT9.getTXNFULLIE : TBits_1; inline;
  85215. begin
  85216. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  85217. end;
  85218. procedure TCAN1_C1FIFOINT9.setw(thebits : TBits_32); inline;
  85219. begin
  85220. pTDefRegMap(@Self)^.val := thebits;
  85221. end;
  85222. function TCAN1_C1FIFOINT9.getw : TBits_32; inline;
  85223. begin
  85224. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85225. end;
  85226. procedure TCAN1_C1FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  85227. begin
  85228. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  85229. end;
  85230. function TCAN1_C1FIFOCI9.getCFIFOCI : TBits_5; inline;
  85231. begin
  85232. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  85233. end;
  85234. procedure TCAN1_C1FIFOCI9.setw(thebits : TBits_32); inline;
  85235. begin
  85236. pTDefRegMap(@Self)^.val := thebits;
  85237. end;
  85238. function TCAN1_C1FIFOCI9.getw : TBits_32; inline;
  85239. begin
  85240. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85241. end;
  85242. procedure TCAN1_C1FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  85243. begin
  85244. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  85245. end;
  85246. function TCAN1_C1FIFOCON10.getTXPRI : TBits_2; inline;
  85247. begin
  85248. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  85249. end;
  85250. procedure TCAN1_C1FIFOCON10.setRTREN; inline;
  85251. begin
  85252. pTDefRegMap(@Self)^.&set := $00000004;
  85253. end;
  85254. procedure TCAN1_C1FIFOCON10.clearRTREN; inline;
  85255. begin
  85256. pTDefRegMap(@Self)^.clr := $00000004;
  85257. end;
  85258. procedure TCAN1_C1FIFOCON10.setRTREN(thebits : TBits_1); inline;
  85259. begin
  85260. if thebits = 0 then
  85261. pTDefRegMap(@Self)^.clr := $00000004
  85262. else
  85263. pTDefRegMap(@Self)^.&set := $00000004;
  85264. end;
  85265. function TCAN1_C1FIFOCON10.getRTREN : TBits_1; inline;
  85266. begin
  85267. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85268. end;
  85269. procedure TCAN1_C1FIFOCON10.setTXREQ; inline;
  85270. begin
  85271. pTDefRegMap(@Self)^.&set := $00000008;
  85272. end;
  85273. procedure TCAN1_C1FIFOCON10.clearTXREQ; inline;
  85274. begin
  85275. pTDefRegMap(@Self)^.clr := $00000008;
  85276. end;
  85277. procedure TCAN1_C1FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  85278. begin
  85279. if thebits = 0 then
  85280. pTDefRegMap(@Self)^.clr := $00000008
  85281. else
  85282. pTDefRegMap(@Self)^.&set := $00000008;
  85283. end;
  85284. function TCAN1_C1FIFOCON10.getTXREQ : TBits_1; inline;
  85285. begin
  85286. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85287. end;
  85288. procedure TCAN1_C1FIFOCON10.setTXERR; inline;
  85289. begin
  85290. pTDefRegMap(@Self)^.&set := $00000010;
  85291. end;
  85292. procedure TCAN1_C1FIFOCON10.clearTXERR; inline;
  85293. begin
  85294. pTDefRegMap(@Self)^.clr := $00000010;
  85295. end;
  85296. procedure TCAN1_C1FIFOCON10.setTXERR(thebits : TBits_1); inline;
  85297. begin
  85298. if thebits = 0 then
  85299. pTDefRegMap(@Self)^.clr := $00000010
  85300. else
  85301. pTDefRegMap(@Self)^.&set := $00000010;
  85302. end;
  85303. function TCAN1_C1FIFOCON10.getTXERR : TBits_1; inline;
  85304. begin
  85305. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  85306. end;
  85307. procedure TCAN1_C1FIFOCON10.setTXLARB; inline;
  85308. begin
  85309. pTDefRegMap(@Self)^.&set := $00000020;
  85310. end;
  85311. procedure TCAN1_C1FIFOCON10.clearTXLARB; inline;
  85312. begin
  85313. pTDefRegMap(@Self)^.clr := $00000020;
  85314. end;
  85315. procedure TCAN1_C1FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  85316. begin
  85317. if thebits = 0 then
  85318. pTDefRegMap(@Self)^.clr := $00000020
  85319. else
  85320. pTDefRegMap(@Self)^.&set := $00000020;
  85321. end;
  85322. function TCAN1_C1FIFOCON10.getTXLARB : TBits_1; inline;
  85323. begin
  85324. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  85325. end;
  85326. procedure TCAN1_C1FIFOCON10.setTXABAT; inline;
  85327. begin
  85328. pTDefRegMap(@Self)^.&set := $00000040;
  85329. end;
  85330. procedure TCAN1_C1FIFOCON10.clearTXABAT; inline;
  85331. begin
  85332. pTDefRegMap(@Self)^.clr := $00000040;
  85333. end;
  85334. procedure TCAN1_C1FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  85335. begin
  85336. if thebits = 0 then
  85337. pTDefRegMap(@Self)^.clr := $00000040
  85338. else
  85339. pTDefRegMap(@Self)^.&set := $00000040;
  85340. end;
  85341. function TCAN1_C1FIFOCON10.getTXABAT : TBits_1; inline;
  85342. begin
  85343. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  85344. end;
  85345. procedure TCAN1_C1FIFOCON10.setTXEN; inline;
  85346. begin
  85347. pTDefRegMap(@Self)^.&set := $00000080;
  85348. end;
  85349. procedure TCAN1_C1FIFOCON10.clearTXEN; inline;
  85350. begin
  85351. pTDefRegMap(@Self)^.clr := $00000080;
  85352. end;
  85353. procedure TCAN1_C1FIFOCON10.setTXEN(thebits : TBits_1); inline;
  85354. begin
  85355. if thebits = 0 then
  85356. pTDefRegMap(@Self)^.clr := $00000080
  85357. else
  85358. pTDefRegMap(@Self)^.&set := $00000080;
  85359. end;
  85360. function TCAN1_C1FIFOCON10.getTXEN : TBits_1; inline;
  85361. begin
  85362. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  85363. end;
  85364. procedure TCAN1_C1FIFOCON10.setDONLY; inline;
  85365. begin
  85366. pTDefRegMap(@Self)^.&set := $00001000;
  85367. end;
  85368. procedure TCAN1_C1FIFOCON10.clearDONLY; inline;
  85369. begin
  85370. pTDefRegMap(@Self)^.clr := $00001000;
  85371. end;
  85372. procedure TCAN1_C1FIFOCON10.setDONLY(thebits : TBits_1); inline;
  85373. begin
  85374. if thebits = 0 then
  85375. pTDefRegMap(@Self)^.clr := $00001000
  85376. else
  85377. pTDefRegMap(@Self)^.&set := $00001000;
  85378. end;
  85379. function TCAN1_C1FIFOCON10.getDONLY : TBits_1; inline;
  85380. begin
  85381. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  85382. end;
  85383. procedure TCAN1_C1FIFOCON10.setUINC; inline;
  85384. begin
  85385. pTDefRegMap(@Self)^.&set := $00002000;
  85386. end;
  85387. procedure TCAN1_C1FIFOCON10.clearUINC; inline;
  85388. begin
  85389. pTDefRegMap(@Self)^.clr := $00002000;
  85390. end;
  85391. procedure TCAN1_C1FIFOCON10.setUINC(thebits : TBits_1); inline;
  85392. begin
  85393. if thebits = 0 then
  85394. pTDefRegMap(@Self)^.clr := $00002000
  85395. else
  85396. pTDefRegMap(@Self)^.&set := $00002000;
  85397. end;
  85398. function TCAN1_C1FIFOCON10.getUINC : TBits_1; inline;
  85399. begin
  85400. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  85401. end;
  85402. procedure TCAN1_C1FIFOCON10.setFRESET; inline;
  85403. begin
  85404. pTDefRegMap(@Self)^.&set := $00004000;
  85405. end;
  85406. procedure TCAN1_C1FIFOCON10.clearFRESET; inline;
  85407. begin
  85408. pTDefRegMap(@Self)^.clr := $00004000;
  85409. end;
  85410. procedure TCAN1_C1FIFOCON10.setFRESET(thebits : TBits_1); inline;
  85411. begin
  85412. if thebits = 0 then
  85413. pTDefRegMap(@Self)^.clr := $00004000
  85414. else
  85415. pTDefRegMap(@Self)^.&set := $00004000;
  85416. end;
  85417. function TCAN1_C1FIFOCON10.getFRESET : TBits_1; inline;
  85418. begin
  85419. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  85420. end;
  85421. procedure TCAN1_C1FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  85422. begin
  85423. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  85424. end;
  85425. function TCAN1_C1FIFOCON10.getFSIZE : TBits_5; inline;
  85426. begin
  85427. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  85428. end;
  85429. procedure TCAN1_C1FIFOCON10.setw(thebits : TBits_32); inline;
  85430. begin
  85431. pTDefRegMap(@Self)^.val := thebits;
  85432. end;
  85433. function TCAN1_C1FIFOCON10.getw : TBits_32; inline;
  85434. begin
  85435. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85436. end;
  85437. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF; inline;
  85438. begin
  85439. pTDefRegMap(@Self)^.&set := $00000001;
  85440. end;
  85441. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIF; inline;
  85442. begin
  85443. pTDefRegMap(@Self)^.clr := $00000001;
  85444. end;
  85445. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  85446. begin
  85447. if thebits = 0 then
  85448. pTDefRegMap(@Self)^.clr := $00000001
  85449. else
  85450. pTDefRegMap(@Self)^.&set := $00000001;
  85451. end;
  85452. function TCAN1_C1FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  85453. begin
  85454. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  85455. end;
  85456. procedure TCAN1_C1FIFOINT10.setRXHALFIF; inline;
  85457. begin
  85458. pTDefRegMap(@Self)^.&set := $00000002;
  85459. end;
  85460. procedure TCAN1_C1FIFOINT10.clearRXHALFIF; inline;
  85461. begin
  85462. pTDefRegMap(@Self)^.clr := $00000002;
  85463. end;
  85464. procedure TCAN1_C1FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  85465. begin
  85466. if thebits = 0 then
  85467. pTDefRegMap(@Self)^.clr := $00000002
  85468. else
  85469. pTDefRegMap(@Self)^.&set := $00000002;
  85470. end;
  85471. function TCAN1_C1FIFOINT10.getRXHALFIF : TBits_1; inline;
  85472. begin
  85473. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  85474. end;
  85475. procedure TCAN1_C1FIFOINT10.setRXFULLIF; inline;
  85476. begin
  85477. pTDefRegMap(@Self)^.&set := $00000004;
  85478. end;
  85479. procedure TCAN1_C1FIFOINT10.clearRXFULLIF; inline;
  85480. begin
  85481. pTDefRegMap(@Self)^.clr := $00000004;
  85482. end;
  85483. procedure TCAN1_C1FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  85484. begin
  85485. if thebits = 0 then
  85486. pTDefRegMap(@Self)^.clr := $00000004
  85487. else
  85488. pTDefRegMap(@Self)^.&set := $00000004;
  85489. end;
  85490. function TCAN1_C1FIFOINT10.getRXFULLIF : TBits_1; inline;
  85491. begin
  85492. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85493. end;
  85494. procedure TCAN1_C1FIFOINT10.setRXOVFLIF; inline;
  85495. begin
  85496. pTDefRegMap(@Self)^.&set := $00000008;
  85497. end;
  85498. procedure TCAN1_C1FIFOINT10.clearRXOVFLIF; inline;
  85499. begin
  85500. pTDefRegMap(@Self)^.clr := $00000008;
  85501. end;
  85502. procedure TCAN1_C1FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  85503. begin
  85504. if thebits = 0 then
  85505. pTDefRegMap(@Self)^.clr := $00000008
  85506. else
  85507. pTDefRegMap(@Self)^.&set := $00000008;
  85508. end;
  85509. function TCAN1_C1FIFOINT10.getRXOVFLIF : TBits_1; inline;
  85510. begin
  85511. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85512. end;
  85513. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF; inline;
  85514. begin
  85515. pTDefRegMap(@Self)^.&set := $00000100;
  85516. end;
  85517. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIF; inline;
  85518. begin
  85519. pTDefRegMap(@Self)^.clr := $00000100;
  85520. end;
  85521. procedure TCAN1_C1FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  85522. begin
  85523. if thebits = 0 then
  85524. pTDefRegMap(@Self)^.clr := $00000100
  85525. else
  85526. pTDefRegMap(@Self)^.&set := $00000100;
  85527. end;
  85528. function TCAN1_C1FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  85529. begin
  85530. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  85531. end;
  85532. procedure TCAN1_C1FIFOINT10.setTXHALFIF; inline;
  85533. begin
  85534. pTDefRegMap(@Self)^.&set := $00000200;
  85535. end;
  85536. procedure TCAN1_C1FIFOINT10.clearTXHALFIF; inline;
  85537. begin
  85538. pTDefRegMap(@Self)^.clr := $00000200;
  85539. end;
  85540. procedure TCAN1_C1FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  85541. begin
  85542. if thebits = 0 then
  85543. pTDefRegMap(@Self)^.clr := $00000200
  85544. else
  85545. pTDefRegMap(@Self)^.&set := $00000200;
  85546. end;
  85547. function TCAN1_C1FIFOINT10.getTXHALFIF : TBits_1; inline;
  85548. begin
  85549. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  85550. end;
  85551. procedure TCAN1_C1FIFOINT10.setTXNFULLIF; inline;
  85552. begin
  85553. pTDefRegMap(@Self)^.&set := $00000400;
  85554. end;
  85555. procedure TCAN1_C1FIFOINT10.clearTXNFULLIF; inline;
  85556. begin
  85557. pTDefRegMap(@Self)^.clr := $00000400;
  85558. end;
  85559. procedure TCAN1_C1FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  85560. begin
  85561. if thebits = 0 then
  85562. pTDefRegMap(@Self)^.clr := $00000400
  85563. else
  85564. pTDefRegMap(@Self)^.&set := $00000400;
  85565. end;
  85566. function TCAN1_C1FIFOINT10.getTXNFULLIF : TBits_1; inline;
  85567. begin
  85568. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  85569. end;
  85570. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE; inline;
  85571. begin
  85572. pTDefRegMap(@Self)^.&set := $00010000;
  85573. end;
  85574. procedure TCAN1_C1FIFOINT10.clearRXNEMPTYIE; inline;
  85575. begin
  85576. pTDefRegMap(@Self)^.clr := $00010000;
  85577. end;
  85578. procedure TCAN1_C1FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  85579. begin
  85580. if thebits = 0 then
  85581. pTDefRegMap(@Self)^.clr := $00010000
  85582. else
  85583. pTDefRegMap(@Self)^.&set := $00010000;
  85584. end;
  85585. function TCAN1_C1FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  85586. begin
  85587. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  85588. end;
  85589. procedure TCAN1_C1FIFOINT10.setRXHALFIE; inline;
  85590. begin
  85591. pTDefRegMap(@Self)^.&set := $00020000;
  85592. end;
  85593. procedure TCAN1_C1FIFOINT10.clearRXHALFIE; inline;
  85594. begin
  85595. pTDefRegMap(@Self)^.clr := $00020000;
  85596. end;
  85597. procedure TCAN1_C1FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  85598. begin
  85599. if thebits = 0 then
  85600. pTDefRegMap(@Self)^.clr := $00020000
  85601. else
  85602. pTDefRegMap(@Self)^.&set := $00020000;
  85603. end;
  85604. function TCAN1_C1FIFOINT10.getRXHALFIE : TBits_1; inline;
  85605. begin
  85606. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  85607. end;
  85608. procedure TCAN1_C1FIFOINT10.setRXFULLIE; inline;
  85609. begin
  85610. pTDefRegMap(@Self)^.&set := $00040000;
  85611. end;
  85612. procedure TCAN1_C1FIFOINT10.clearRXFULLIE; inline;
  85613. begin
  85614. pTDefRegMap(@Self)^.clr := $00040000;
  85615. end;
  85616. procedure TCAN1_C1FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  85617. begin
  85618. if thebits = 0 then
  85619. pTDefRegMap(@Self)^.clr := $00040000
  85620. else
  85621. pTDefRegMap(@Self)^.&set := $00040000;
  85622. end;
  85623. function TCAN1_C1FIFOINT10.getRXFULLIE : TBits_1; inline;
  85624. begin
  85625. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  85626. end;
  85627. procedure TCAN1_C1FIFOINT10.setRXOVFLIE; inline;
  85628. begin
  85629. pTDefRegMap(@Self)^.&set := $00080000;
  85630. end;
  85631. procedure TCAN1_C1FIFOINT10.clearRXOVFLIE; inline;
  85632. begin
  85633. pTDefRegMap(@Self)^.clr := $00080000;
  85634. end;
  85635. procedure TCAN1_C1FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  85636. begin
  85637. if thebits = 0 then
  85638. pTDefRegMap(@Self)^.clr := $00080000
  85639. else
  85640. pTDefRegMap(@Self)^.&set := $00080000;
  85641. end;
  85642. function TCAN1_C1FIFOINT10.getRXOVFLIE : TBits_1; inline;
  85643. begin
  85644. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  85645. end;
  85646. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE; inline;
  85647. begin
  85648. pTDefRegMap(@Self)^.&set := $01000000;
  85649. end;
  85650. procedure TCAN1_C1FIFOINT10.clearTXEMPTYIE; inline;
  85651. begin
  85652. pTDefRegMap(@Self)^.clr := $01000000;
  85653. end;
  85654. procedure TCAN1_C1FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  85655. begin
  85656. if thebits = 0 then
  85657. pTDefRegMap(@Self)^.clr := $01000000
  85658. else
  85659. pTDefRegMap(@Self)^.&set := $01000000;
  85660. end;
  85661. function TCAN1_C1FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  85662. begin
  85663. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  85664. end;
  85665. procedure TCAN1_C1FIFOINT10.setTXHALFIE; inline;
  85666. begin
  85667. pTDefRegMap(@Self)^.&set := $02000000;
  85668. end;
  85669. procedure TCAN1_C1FIFOINT10.clearTXHALFIE; inline;
  85670. begin
  85671. pTDefRegMap(@Self)^.clr := $02000000;
  85672. end;
  85673. procedure TCAN1_C1FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  85674. begin
  85675. if thebits = 0 then
  85676. pTDefRegMap(@Self)^.clr := $02000000
  85677. else
  85678. pTDefRegMap(@Self)^.&set := $02000000;
  85679. end;
  85680. function TCAN1_C1FIFOINT10.getTXHALFIE : TBits_1; inline;
  85681. begin
  85682. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  85683. end;
  85684. procedure TCAN1_C1FIFOINT10.setTXNFULLIE; inline;
  85685. begin
  85686. pTDefRegMap(@Self)^.&set := $04000000;
  85687. end;
  85688. procedure TCAN1_C1FIFOINT10.clearTXNFULLIE; inline;
  85689. begin
  85690. pTDefRegMap(@Self)^.clr := $04000000;
  85691. end;
  85692. procedure TCAN1_C1FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  85693. begin
  85694. if thebits = 0 then
  85695. pTDefRegMap(@Self)^.clr := $04000000
  85696. else
  85697. pTDefRegMap(@Self)^.&set := $04000000;
  85698. end;
  85699. function TCAN1_C1FIFOINT10.getTXNFULLIE : TBits_1; inline;
  85700. begin
  85701. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  85702. end;
  85703. procedure TCAN1_C1FIFOINT10.setw(thebits : TBits_32); inline;
  85704. begin
  85705. pTDefRegMap(@Self)^.val := thebits;
  85706. end;
  85707. function TCAN1_C1FIFOINT10.getw : TBits_32; inline;
  85708. begin
  85709. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85710. end;
  85711. procedure TCAN1_C1FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  85712. begin
  85713. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  85714. end;
  85715. function TCAN1_C1FIFOCI10.getCFIFOCI : TBits_5; inline;
  85716. begin
  85717. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  85718. end;
  85719. procedure TCAN1_C1FIFOCI10.setw(thebits : TBits_32); inline;
  85720. begin
  85721. pTDefRegMap(@Self)^.val := thebits;
  85722. end;
  85723. function TCAN1_C1FIFOCI10.getw : TBits_32; inline;
  85724. begin
  85725. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85726. end;
  85727. procedure TCAN1_C1FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  85728. begin
  85729. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  85730. end;
  85731. function TCAN1_C1FIFOCON11.getTXPRI : TBits_2; inline;
  85732. begin
  85733. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  85734. end;
  85735. procedure TCAN1_C1FIFOCON11.setRTREN; inline;
  85736. begin
  85737. pTDefRegMap(@Self)^.&set := $00000004;
  85738. end;
  85739. procedure TCAN1_C1FIFOCON11.clearRTREN; inline;
  85740. begin
  85741. pTDefRegMap(@Self)^.clr := $00000004;
  85742. end;
  85743. procedure TCAN1_C1FIFOCON11.setRTREN(thebits : TBits_1); inline;
  85744. begin
  85745. if thebits = 0 then
  85746. pTDefRegMap(@Self)^.clr := $00000004
  85747. else
  85748. pTDefRegMap(@Self)^.&set := $00000004;
  85749. end;
  85750. function TCAN1_C1FIFOCON11.getRTREN : TBits_1; inline;
  85751. begin
  85752. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85753. end;
  85754. procedure TCAN1_C1FIFOCON11.setTXREQ; inline;
  85755. begin
  85756. pTDefRegMap(@Self)^.&set := $00000008;
  85757. end;
  85758. procedure TCAN1_C1FIFOCON11.clearTXREQ; inline;
  85759. begin
  85760. pTDefRegMap(@Self)^.clr := $00000008;
  85761. end;
  85762. procedure TCAN1_C1FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  85763. begin
  85764. if thebits = 0 then
  85765. pTDefRegMap(@Self)^.clr := $00000008
  85766. else
  85767. pTDefRegMap(@Self)^.&set := $00000008;
  85768. end;
  85769. function TCAN1_C1FIFOCON11.getTXREQ : TBits_1; inline;
  85770. begin
  85771. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85772. end;
  85773. procedure TCAN1_C1FIFOCON11.setTXERR; inline;
  85774. begin
  85775. pTDefRegMap(@Self)^.&set := $00000010;
  85776. end;
  85777. procedure TCAN1_C1FIFOCON11.clearTXERR; inline;
  85778. begin
  85779. pTDefRegMap(@Self)^.clr := $00000010;
  85780. end;
  85781. procedure TCAN1_C1FIFOCON11.setTXERR(thebits : TBits_1); inline;
  85782. begin
  85783. if thebits = 0 then
  85784. pTDefRegMap(@Self)^.clr := $00000010
  85785. else
  85786. pTDefRegMap(@Self)^.&set := $00000010;
  85787. end;
  85788. function TCAN1_C1FIFOCON11.getTXERR : TBits_1; inline;
  85789. begin
  85790. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  85791. end;
  85792. procedure TCAN1_C1FIFOCON11.setTXLARB; inline;
  85793. begin
  85794. pTDefRegMap(@Self)^.&set := $00000020;
  85795. end;
  85796. procedure TCAN1_C1FIFOCON11.clearTXLARB; inline;
  85797. begin
  85798. pTDefRegMap(@Self)^.clr := $00000020;
  85799. end;
  85800. procedure TCAN1_C1FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  85801. begin
  85802. if thebits = 0 then
  85803. pTDefRegMap(@Self)^.clr := $00000020
  85804. else
  85805. pTDefRegMap(@Self)^.&set := $00000020;
  85806. end;
  85807. function TCAN1_C1FIFOCON11.getTXLARB : TBits_1; inline;
  85808. begin
  85809. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  85810. end;
  85811. procedure TCAN1_C1FIFOCON11.setTXABAT; inline;
  85812. begin
  85813. pTDefRegMap(@Self)^.&set := $00000040;
  85814. end;
  85815. procedure TCAN1_C1FIFOCON11.clearTXABAT; inline;
  85816. begin
  85817. pTDefRegMap(@Self)^.clr := $00000040;
  85818. end;
  85819. procedure TCAN1_C1FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  85820. begin
  85821. if thebits = 0 then
  85822. pTDefRegMap(@Self)^.clr := $00000040
  85823. else
  85824. pTDefRegMap(@Self)^.&set := $00000040;
  85825. end;
  85826. function TCAN1_C1FIFOCON11.getTXABAT : TBits_1; inline;
  85827. begin
  85828. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  85829. end;
  85830. procedure TCAN1_C1FIFOCON11.setTXEN; inline;
  85831. begin
  85832. pTDefRegMap(@Self)^.&set := $00000080;
  85833. end;
  85834. procedure TCAN1_C1FIFOCON11.clearTXEN; inline;
  85835. begin
  85836. pTDefRegMap(@Self)^.clr := $00000080;
  85837. end;
  85838. procedure TCAN1_C1FIFOCON11.setTXEN(thebits : TBits_1); inline;
  85839. begin
  85840. if thebits = 0 then
  85841. pTDefRegMap(@Self)^.clr := $00000080
  85842. else
  85843. pTDefRegMap(@Self)^.&set := $00000080;
  85844. end;
  85845. function TCAN1_C1FIFOCON11.getTXEN : TBits_1; inline;
  85846. begin
  85847. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  85848. end;
  85849. procedure TCAN1_C1FIFOCON11.setDONLY; inline;
  85850. begin
  85851. pTDefRegMap(@Self)^.&set := $00001000;
  85852. end;
  85853. procedure TCAN1_C1FIFOCON11.clearDONLY; inline;
  85854. begin
  85855. pTDefRegMap(@Self)^.clr := $00001000;
  85856. end;
  85857. procedure TCAN1_C1FIFOCON11.setDONLY(thebits : TBits_1); inline;
  85858. begin
  85859. if thebits = 0 then
  85860. pTDefRegMap(@Self)^.clr := $00001000
  85861. else
  85862. pTDefRegMap(@Self)^.&set := $00001000;
  85863. end;
  85864. function TCAN1_C1FIFOCON11.getDONLY : TBits_1; inline;
  85865. begin
  85866. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  85867. end;
  85868. procedure TCAN1_C1FIFOCON11.setUINC; inline;
  85869. begin
  85870. pTDefRegMap(@Self)^.&set := $00002000;
  85871. end;
  85872. procedure TCAN1_C1FIFOCON11.clearUINC; inline;
  85873. begin
  85874. pTDefRegMap(@Self)^.clr := $00002000;
  85875. end;
  85876. procedure TCAN1_C1FIFOCON11.setUINC(thebits : TBits_1); inline;
  85877. begin
  85878. if thebits = 0 then
  85879. pTDefRegMap(@Self)^.clr := $00002000
  85880. else
  85881. pTDefRegMap(@Self)^.&set := $00002000;
  85882. end;
  85883. function TCAN1_C1FIFOCON11.getUINC : TBits_1; inline;
  85884. begin
  85885. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  85886. end;
  85887. procedure TCAN1_C1FIFOCON11.setFRESET; inline;
  85888. begin
  85889. pTDefRegMap(@Self)^.&set := $00004000;
  85890. end;
  85891. procedure TCAN1_C1FIFOCON11.clearFRESET; inline;
  85892. begin
  85893. pTDefRegMap(@Self)^.clr := $00004000;
  85894. end;
  85895. procedure TCAN1_C1FIFOCON11.setFRESET(thebits : TBits_1); inline;
  85896. begin
  85897. if thebits = 0 then
  85898. pTDefRegMap(@Self)^.clr := $00004000
  85899. else
  85900. pTDefRegMap(@Self)^.&set := $00004000;
  85901. end;
  85902. function TCAN1_C1FIFOCON11.getFRESET : TBits_1; inline;
  85903. begin
  85904. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  85905. end;
  85906. procedure TCAN1_C1FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  85907. begin
  85908. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  85909. end;
  85910. function TCAN1_C1FIFOCON11.getFSIZE : TBits_5; inline;
  85911. begin
  85912. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  85913. end;
  85914. procedure TCAN1_C1FIFOCON11.setw(thebits : TBits_32); inline;
  85915. begin
  85916. pTDefRegMap(@Self)^.val := thebits;
  85917. end;
  85918. function TCAN1_C1FIFOCON11.getw : TBits_32; inline;
  85919. begin
  85920. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  85921. end;
  85922. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF; inline;
  85923. begin
  85924. pTDefRegMap(@Self)^.&set := $00000001;
  85925. end;
  85926. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIF; inline;
  85927. begin
  85928. pTDefRegMap(@Self)^.clr := $00000001;
  85929. end;
  85930. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  85931. begin
  85932. if thebits = 0 then
  85933. pTDefRegMap(@Self)^.clr := $00000001
  85934. else
  85935. pTDefRegMap(@Self)^.&set := $00000001;
  85936. end;
  85937. function TCAN1_C1FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  85938. begin
  85939. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  85940. end;
  85941. procedure TCAN1_C1FIFOINT11.setRXHALFIF; inline;
  85942. begin
  85943. pTDefRegMap(@Self)^.&set := $00000002;
  85944. end;
  85945. procedure TCAN1_C1FIFOINT11.clearRXHALFIF; inline;
  85946. begin
  85947. pTDefRegMap(@Self)^.clr := $00000002;
  85948. end;
  85949. procedure TCAN1_C1FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  85950. begin
  85951. if thebits = 0 then
  85952. pTDefRegMap(@Self)^.clr := $00000002
  85953. else
  85954. pTDefRegMap(@Self)^.&set := $00000002;
  85955. end;
  85956. function TCAN1_C1FIFOINT11.getRXHALFIF : TBits_1; inline;
  85957. begin
  85958. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  85959. end;
  85960. procedure TCAN1_C1FIFOINT11.setRXFULLIF; inline;
  85961. begin
  85962. pTDefRegMap(@Self)^.&set := $00000004;
  85963. end;
  85964. procedure TCAN1_C1FIFOINT11.clearRXFULLIF; inline;
  85965. begin
  85966. pTDefRegMap(@Self)^.clr := $00000004;
  85967. end;
  85968. procedure TCAN1_C1FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  85969. begin
  85970. if thebits = 0 then
  85971. pTDefRegMap(@Self)^.clr := $00000004
  85972. else
  85973. pTDefRegMap(@Self)^.&set := $00000004;
  85974. end;
  85975. function TCAN1_C1FIFOINT11.getRXFULLIF : TBits_1; inline;
  85976. begin
  85977. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  85978. end;
  85979. procedure TCAN1_C1FIFOINT11.setRXOVFLIF; inline;
  85980. begin
  85981. pTDefRegMap(@Self)^.&set := $00000008;
  85982. end;
  85983. procedure TCAN1_C1FIFOINT11.clearRXOVFLIF; inline;
  85984. begin
  85985. pTDefRegMap(@Self)^.clr := $00000008;
  85986. end;
  85987. procedure TCAN1_C1FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  85988. begin
  85989. if thebits = 0 then
  85990. pTDefRegMap(@Self)^.clr := $00000008
  85991. else
  85992. pTDefRegMap(@Self)^.&set := $00000008;
  85993. end;
  85994. function TCAN1_C1FIFOINT11.getRXOVFLIF : TBits_1; inline;
  85995. begin
  85996. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  85997. end;
  85998. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF; inline;
  85999. begin
  86000. pTDefRegMap(@Self)^.&set := $00000100;
  86001. end;
  86002. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIF; inline;
  86003. begin
  86004. pTDefRegMap(@Self)^.clr := $00000100;
  86005. end;
  86006. procedure TCAN1_C1FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  86007. begin
  86008. if thebits = 0 then
  86009. pTDefRegMap(@Self)^.clr := $00000100
  86010. else
  86011. pTDefRegMap(@Self)^.&set := $00000100;
  86012. end;
  86013. function TCAN1_C1FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  86014. begin
  86015. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  86016. end;
  86017. procedure TCAN1_C1FIFOINT11.setTXHALFIF; inline;
  86018. begin
  86019. pTDefRegMap(@Self)^.&set := $00000200;
  86020. end;
  86021. procedure TCAN1_C1FIFOINT11.clearTXHALFIF; inline;
  86022. begin
  86023. pTDefRegMap(@Self)^.clr := $00000200;
  86024. end;
  86025. procedure TCAN1_C1FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  86026. begin
  86027. if thebits = 0 then
  86028. pTDefRegMap(@Self)^.clr := $00000200
  86029. else
  86030. pTDefRegMap(@Self)^.&set := $00000200;
  86031. end;
  86032. function TCAN1_C1FIFOINT11.getTXHALFIF : TBits_1; inline;
  86033. begin
  86034. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  86035. end;
  86036. procedure TCAN1_C1FIFOINT11.setTXNFULLIF; inline;
  86037. begin
  86038. pTDefRegMap(@Self)^.&set := $00000400;
  86039. end;
  86040. procedure TCAN1_C1FIFOINT11.clearTXNFULLIF; inline;
  86041. begin
  86042. pTDefRegMap(@Self)^.clr := $00000400;
  86043. end;
  86044. procedure TCAN1_C1FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  86045. begin
  86046. if thebits = 0 then
  86047. pTDefRegMap(@Self)^.clr := $00000400
  86048. else
  86049. pTDefRegMap(@Self)^.&set := $00000400;
  86050. end;
  86051. function TCAN1_C1FIFOINT11.getTXNFULLIF : TBits_1; inline;
  86052. begin
  86053. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  86054. end;
  86055. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE; inline;
  86056. begin
  86057. pTDefRegMap(@Self)^.&set := $00010000;
  86058. end;
  86059. procedure TCAN1_C1FIFOINT11.clearRXNEMPTYIE; inline;
  86060. begin
  86061. pTDefRegMap(@Self)^.clr := $00010000;
  86062. end;
  86063. procedure TCAN1_C1FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  86064. begin
  86065. if thebits = 0 then
  86066. pTDefRegMap(@Self)^.clr := $00010000
  86067. else
  86068. pTDefRegMap(@Self)^.&set := $00010000;
  86069. end;
  86070. function TCAN1_C1FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  86071. begin
  86072. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  86073. end;
  86074. procedure TCAN1_C1FIFOINT11.setRXHALFIE; inline;
  86075. begin
  86076. pTDefRegMap(@Self)^.&set := $00020000;
  86077. end;
  86078. procedure TCAN1_C1FIFOINT11.clearRXHALFIE; inline;
  86079. begin
  86080. pTDefRegMap(@Self)^.clr := $00020000;
  86081. end;
  86082. procedure TCAN1_C1FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  86083. begin
  86084. if thebits = 0 then
  86085. pTDefRegMap(@Self)^.clr := $00020000
  86086. else
  86087. pTDefRegMap(@Self)^.&set := $00020000;
  86088. end;
  86089. function TCAN1_C1FIFOINT11.getRXHALFIE : TBits_1; inline;
  86090. begin
  86091. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  86092. end;
  86093. procedure TCAN1_C1FIFOINT11.setRXFULLIE; inline;
  86094. begin
  86095. pTDefRegMap(@Self)^.&set := $00040000;
  86096. end;
  86097. procedure TCAN1_C1FIFOINT11.clearRXFULLIE; inline;
  86098. begin
  86099. pTDefRegMap(@Self)^.clr := $00040000;
  86100. end;
  86101. procedure TCAN1_C1FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  86102. begin
  86103. if thebits = 0 then
  86104. pTDefRegMap(@Self)^.clr := $00040000
  86105. else
  86106. pTDefRegMap(@Self)^.&set := $00040000;
  86107. end;
  86108. function TCAN1_C1FIFOINT11.getRXFULLIE : TBits_1; inline;
  86109. begin
  86110. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  86111. end;
  86112. procedure TCAN1_C1FIFOINT11.setRXOVFLIE; inline;
  86113. begin
  86114. pTDefRegMap(@Self)^.&set := $00080000;
  86115. end;
  86116. procedure TCAN1_C1FIFOINT11.clearRXOVFLIE; inline;
  86117. begin
  86118. pTDefRegMap(@Self)^.clr := $00080000;
  86119. end;
  86120. procedure TCAN1_C1FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  86121. begin
  86122. if thebits = 0 then
  86123. pTDefRegMap(@Self)^.clr := $00080000
  86124. else
  86125. pTDefRegMap(@Self)^.&set := $00080000;
  86126. end;
  86127. function TCAN1_C1FIFOINT11.getRXOVFLIE : TBits_1; inline;
  86128. begin
  86129. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  86130. end;
  86131. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE; inline;
  86132. begin
  86133. pTDefRegMap(@Self)^.&set := $01000000;
  86134. end;
  86135. procedure TCAN1_C1FIFOINT11.clearTXEMPTYIE; inline;
  86136. begin
  86137. pTDefRegMap(@Self)^.clr := $01000000;
  86138. end;
  86139. procedure TCAN1_C1FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  86140. begin
  86141. if thebits = 0 then
  86142. pTDefRegMap(@Self)^.clr := $01000000
  86143. else
  86144. pTDefRegMap(@Self)^.&set := $01000000;
  86145. end;
  86146. function TCAN1_C1FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  86147. begin
  86148. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  86149. end;
  86150. procedure TCAN1_C1FIFOINT11.setTXHALFIE; inline;
  86151. begin
  86152. pTDefRegMap(@Self)^.&set := $02000000;
  86153. end;
  86154. procedure TCAN1_C1FIFOINT11.clearTXHALFIE; inline;
  86155. begin
  86156. pTDefRegMap(@Self)^.clr := $02000000;
  86157. end;
  86158. procedure TCAN1_C1FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  86159. begin
  86160. if thebits = 0 then
  86161. pTDefRegMap(@Self)^.clr := $02000000
  86162. else
  86163. pTDefRegMap(@Self)^.&set := $02000000;
  86164. end;
  86165. function TCAN1_C1FIFOINT11.getTXHALFIE : TBits_1; inline;
  86166. begin
  86167. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  86168. end;
  86169. procedure TCAN1_C1FIFOINT11.setTXNFULLIE; inline;
  86170. begin
  86171. pTDefRegMap(@Self)^.&set := $04000000;
  86172. end;
  86173. procedure TCAN1_C1FIFOINT11.clearTXNFULLIE; inline;
  86174. begin
  86175. pTDefRegMap(@Self)^.clr := $04000000;
  86176. end;
  86177. procedure TCAN1_C1FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  86178. begin
  86179. if thebits = 0 then
  86180. pTDefRegMap(@Self)^.clr := $04000000
  86181. else
  86182. pTDefRegMap(@Self)^.&set := $04000000;
  86183. end;
  86184. function TCAN1_C1FIFOINT11.getTXNFULLIE : TBits_1; inline;
  86185. begin
  86186. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  86187. end;
  86188. procedure TCAN1_C1FIFOINT11.setw(thebits : TBits_32); inline;
  86189. begin
  86190. pTDefRegMap(@Self)^.val := thebits;
  86191. end;
  86192. function TCAN1_C1FIFOINT11.getw : TBits_32; inline;
  86193. begin
  86194. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86195. end;
  86196. procedure TCAN1_C1FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  86197. begin
  86198. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  86199. end;
  86200. function TCAN1_C1FIFOCI11.getCFIFOCI : TBits_5; inline;
  86201. begin
  86202. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  86203. end;
  86204. procedure TCAN1_C1FIFOCI11.setw(thebits : TBits_32); inline;
  86205. begin
  86206. pTDefRegMap(@Self)^.val := thebits;
  86207. end;
  86208. function TCAN1_C1FIFOCI11.getw : TBits_32; inline;
  86209. begin
  86210. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86211. end;
  86212. procedure TCAN1_C1FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  86213. begin
  86214. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  86215. end;
  86216. function TCAN1_C1FIFOCON12.getTXPRI : TBits_2; inline;
  86217. begin
  86218. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  86219. end;
  86220. procedure TCAN1_C1FIFOCON12.setRTREN; inline;
  86221. begin
  86222. pTDefRegMap(@Self)^.&set := $00000004;
  86223. end;
  86224. procedure TCAN1_C1FIFOCON12.clearRTREN; inline;
  86225. begin
  86226. pTDefRegMap(@Self)^.clr := $00000004;
  86227. end;
  86228. procedure TCAN1_C1FIFOCON12.setRTREN(thebits : TBits_1); inline;
  86229. begin
  86230. if thebits = 0 then
  86231. pTDefRegMap(@Self)^.clr := $00000004
  86232. else
  86233. pTDefRegMap(@Self)^.&set := $00000004;
  86234. end;
  86235. function TCAN1_C1FIFOCON12.getRTREN : TBits_1; inline;
  86236. begin
  86237. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86238. end;
  86239. procedure TCAN1_C1FIFOCON12.setTXREQ; inline;
  86240. begin
  86241. pTDefRegMap(@Self)^.&set := $00000008;
  86242. end;
  86243. procedure TCAN1_C1FIFOCON12.clearTXREQ; inline;
  86244. begin
  86245. pTDefRegMap(@Self)^.clr := $00000008;
  86246. end;
  86247. procedure TCAN1_C1FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  86248. begin
  86249. if thebits = 0 then
  86250. pTDefRegMap(@Self)^.clr := $00000008
  86251. else
  86252. pTDefRegMap(@Self)^.&set := $00000008;
  86253. end;
  86254. function TCAN1_C1FIFOCON12.getTXREQ : TBits_1; inline;
  86255. begin
  86256. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86257. end;
  86258. procedure TCAN1_C1FIFOCON12.setTXERR; inline;
  86259. begin
  86260. pTDefRegMap(@Self)^.&set := $00000010;
  86261. end;
  86262. procedure TCAN1_C1FIFOCON12.clearTXERR; inline;
  86263. begin
  86264. pTDefRegMap(@Self)^.clr := $00000010;
  86265. end;
  86266. procedure TCAN1_C1FIFOCON12.setTXERR(thebits : TBits_1); inline;
  86267. begin
  86268. if thebits = 0 then
  86269. pTDefRegMap(@Self)^.clr := $00000010
  86270. else
  86271. pTDefRegMap(@Self)^.&set := $00000010;
  86272. end;
  86273. function TCAN1_C1FIFOCON12.getTXERR : TBits_1; inline;
  86274. begin
  86275. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  86276. end;
  86277. procedure TCAN1_C1FIFOCON12.setTXLARB; inline;
  86278. begin
  86279. pTDefRegMap(@Self)^.&set := $00000020;
  86280. end;
  86281. procedure TCAN1_C1FIFOCON12.clearTXLARB; inline;
  86282. begin
  86283. pTDefRegMap(@Self)^.clr := $00000020;
  86284. end;
  86285. procedure TCAN1_C1FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  86286. begin
  86287. if thebits = 0 then
  86288. pTDefRegMap(@Self)^.clr := $00000020
  86289. else
  86290. pTDefRegMap(@Self)^.&set := $00000020;
  86291. end;
  86292. function TCAN1_C1FIFOCON12.getTXLARB : TBits_1; inline;
  86293. begin
  86294. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  86295. end;
  86296. procedure TCAN1_C1FIFOCON12.setTXABAT; inline;
  86297. begin
  86298. pTDefRegMap(@Self)^.&set := $00000040;
  86299. end;
  86300. procedure TCAN1_C1FIFOCON12.clearTXABAT; inline;
  86301. begin
  86302. pTDefRegMap(@Self)^.clr := $00000040;
  86303. end;
  86304. procedure TCAN1_C1FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  86305. begin
  86306. if thebits = 0 then
  86307. pTDefRegMap(@Self)^.clr := $00000040
  86308. else
  86309. pTDefRegMap(@Self)^.&set := $00000040;
  86310. end;
  86311. function TCAN1_C1FIFOCON12.getTXABAT : TBits_1; inline;
  86312. begin
  86313. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  86314. end;
  86315. procedure TCAN1_C1FIFOCON12.setTXEN; inline;
  86316. begin
  86317. pTDefRegMap(@Self)^.&set := $00000080;
  86318. end;
  86319. procedure TCAN1_C1FIFOCON12.clearTXEN; inline;
  86320. begin
  86321. pTDefRegMap(@Self)^.clr := $00000080;
  86322. end;
  86323. procedure TCAN1_C1FIFOCON12.setTXEN(thebits : TBits_1); inline;
  86324. begin
  86325. if thebits = 0 then
  86326. pTDefRegMap(@Self)^.clr := $00000080
  86327. else
  86328. pTDefRegMap(@Self)^.&set := $00000080;
  86329. end;
  86330. function TCAN1_C1FIFOCON12.getTXEN : TBits_1; inline;
  86331. begin
  86332. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  86333. end;
  86334. procedure TCAN1_C1FIFOCON12.setDONLY; inline;
  86335. begin
  86336. pTDefRegMap(@Self)^.&set := $00001000;
  86337. end;
  86338. procedure TCAN1_C1FIFOCON12.clearDONLY; inline;
  86339. begin
  86340. pTDefRegMap(@Self)^.clr := $00001000;
  86341. end;
  86342. procedure TCAN1_C1FIFOCON12.setDONLY(thebits : TBits_1); inline;
  86343. begin
  86344. if thebits = 0 then
  86345. pTDefRegMap(@Self)^.clr := $00001000
  86346. else
  86347. pTDefRegMap(@Self)^.&set := $00001000;
  86348. end;
  86349. function TCAN1_C1FIFOCON12.getDONLY : TBits_1; inline;
  86350. begin
  86351. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  86352. end;
  86353. procedure TCAN1_C1FIFOCON12.setUINC; inline;
  86354. begin
  86355. pTDefRegMap(@Self)^.&set := $00002000;
  86356. end;
  86357. procedure TCAN1_C1FIFOCON12.clearUINC; inline;
  86358. begin
  86359. pTDefRegMap(@Self)^.clr := $00002000;
  86360. end;
  86361. procedure TCAN1_C1FIFOCON12.setUINC(thebits : TBits_1); inline;
  86362. begin
  86363. if thebits = 0 then
  86364. pTDefRegMap(@Self)^.clr := $00002000
  86365. else
  86366. pTDefRegMap(@Self)^.&set := $00002000;
  86367. end;
  86368. function TCAN1_C1FIFOCON12.getUINC : TBits_1; inline;
  86369. begin
  86370. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  86371. end;
  86372. procedure TCAN1_C1FIFOCON12.setFRESET; inline;
  86373. begin
  86374. pTDefRegMap(@Self)^.&set := $00004000;
  86375. end;
  86376. procedure TCAN1_C1FIFOCON12.clearFRESET; inline;
  86377. begin
  86378. pTDefRegMap(@Self)^.clr := $00004000;
  86379. end;
  86380. procedure TCAN1_C1FIFOCON12.setFRESET(thebits : TBits_1); inline;
  86381. begin
  86382. if thebits = 0 then
  86383. pTDefRegMap(@Self)^.clr := $00004000
  86384. else
  86385. pTDefRegMap(@Self)^.&set := $00004000;
  86386. end;
  86387. function TCAN1_C1FIFOCON12.getFRESET : TBits_1; inline;
  86388. begin
  86389. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  86390. end;
  86391. procedure TCAN1_C1FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  86392. begin
  86393. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  86394. end;
  86395. function TCAN1_C1FIFOCON12.getFSIZE : TBits_5; inline;
  86396. begin
  86397. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  86398. end;
  86399. procedure TCAN1_C1FIFOCON12.setw(thebits : TBits_32); inline;
  86400. begin
  86401. pTDefRegMap(@Self)^.val := thebits;
  86402. end;
  86403. function TCAN1_C1FIFOCON12.getw : TBits_32; inline;
  86404. begin
  86405. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86406. end;
  86407. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF; inline;
  86408. begin
  86409. pTDefRegMap(@Self)^.&set := $00000001;
  86410. end;
  86411. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIF; inline;
  86412. begin
  86413. pTDefRegMap(@Self)^.clr := $00000001;
  86414. end;
  86415. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  86416. begin
  86417. if thebits = 0 then
  86418. pTDefRegMap(@Self)^.clr := $00000001
  86419. else
  86420. pTDefRegMap(@Self)^.&set := $00000001;
  86421. end;
  86422. function TCAN1_C1FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  86423. begin
  86424. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  86425. end;
  86426. procedure TCAN1_C1FIFOINT12.setRXHALFIF; inline;
  86427. begin
  86428. pTDefRegMap(@Self)^.&set := $00000002;
  86429. end;
  86430. procedure TCAN1_C1FIFOINT12.clearRXHALFIF; inline;
  86431. begin
  86432. pTDefRegMap(@Self)^.clr := $00000002;
  86433. end;
  86434. procedure TCAN1_C1FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  86435. begin
  86436. if thebits = 0 then
  86437. pTDefRegMap(@Self)^.clr := $00000002
  86438. else
  86439. pTDefRegMap(@Self)^.&set := $00000002;
  86440. end;
  86441. function TCAN1_C1FIFOINT12.getRXHALFIF : TBits_1; inline;
  86442. begin
  86443. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  86444. end;
  86445. procedure TCAN1_C1FIFOINT12.setRXFULLIF; inline;
  86446. begin
  86447. pTDefRegMap(@Self)^.&set := $00000004;
  86448. end;
  86449. procedure TCAN1_C1FIFOINT12.clearRXFULLIF; inline;
  86450. begin
  86451. pTDefRegMap(@Self)^.clr := $00000004;
  86452. end;
  86453. procedure TCAN1_C1FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  86454. begin
  86455. if thebits = 0 then
  86456. pTDefRegMap(@Self)^.clr := $00000004
  86457. else
  86458. pTDefRegMap(@Self)^.&set := $00000004;
  86459. end;
  86460. function TCAN1_C1FIFOINT12.getRXFULLIF : TBits_1; inline;
  86461. begin
  86462. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86463. end;
  86464. procedure TCAN1_C1FIFOINT12.setRXOVFLIF; inline;
  86465. begin
  86466. pTDefRegMap(@Self)^.&set := $00000008;
  86467. end;
  86468. procedure TCAN1_C1FIFOINT12.clearRXOVFLIF; inline;
  86469. begin
  86470. pTDefRegMap(@Self)^.clr := $00000008;
  86471. end;
  86472. procedure TCAN1_C1FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  86473. begin
  86474. if thebits = 0 then
  86475. pTDefRegMap(@Self)^.clr := $00000008
  86476. else
  86477. pTDefRegMap(@Self)^.&set := $00000008;
  86478. end;
  86479. function TCAN1_C1FIFOINT12.getRXOVFLIF : TBits_1; inline;
  86480. begin
  86481. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86482. end;
  86483. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF; inline;
  86484. begin
  86485. pTDefRegMap(@Self)^.&set := $00000100;
  86486. end;
  86487. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIF; inline;
  86488. begin
  86489. pTDefRegMap(@Self)^.clr := $00000100;
  86490. end;
  86491. procedure TCAN1_C1FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  86492. begin
  86493. if thebits = 0 then
  86494. pTDefRegMap(@Self)^.clr := $00000100
  86495. else
  86496. pTDefRegMap(@Self)^.&set := $00000100;
  86497. end;
  86498. function TCAN1_C1FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  86499. begin
  86500. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  86501. end;
  86502. procedure TCAN1_C1FIFOINT12.setTXHALFIF; inline;
  86503. begin
  86504. pTDefRegMap(@Self)^.&set := $00000200;
  86505. end;
  86506. procedure TCAN1_C1FIFOINT12.clearTXHALFIF; inline;
  86507. begin
  86508. pTDefRegMap(@Self)^.clr := $00000200;
  86509. end;
  86510. procedure TCAN1_C1FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  86511. begin
  86512. if thebits = 0 then
  86513. pTDefRegMap(@Self)^.clr := $00000200
  86514. else
  86515. pTDefRegMap(@Self)^.&set := $00000200;
  86516. end;
  86517. function TCAN1_C1FIFOINT12.getTXHALFIF : TBits_1; inline;
  86518. begin
  86519. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  86520. end;
  86521. procedure TCAN1_C1FIFOINT12.setTXNFULLIF; inline;
  86522. begin
  86523. pTDefRegMap(@Self)^.&set := $00000400;
  86524. end;
  86525. procedure TCAN1_C1FIFOINT12.clearTXNFULLIF; inline;
  86526. begin
  86527. pTDefRegMap(@Self)^.clr := $00000400;
  86528. end;
  86529. procedure TCAN1_C1FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  86530. begin
  86531. if thebits = 0 then
  86532. pTDefRegMap(@Self)^.clr := $00000400
  86533. else
  86534. pTDefRegMap(@Self)^.&set := $00000400;
  86535. end;
  86536. function TCAN1_C1FIFOINT12.getTXNFULLIF : TBits_1; inline;
  86537. begin
  86538. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  86539. end;
  86540. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE; inline;
  86541. begin
  86542. pTDefRegMap(@Self)^.&set := $00010000;
  86543. end;
  86544. procedure TCAN1_C1FIFOINT12.clearRXNEMPTYIE; inline;
  86545. begin
  86546. pTDefRegMap(@Self)^.clr := $00010000;
  86547. end;
  86548. procedure TCAN1_C1FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  86549. begin
  86550. if thebits = 0 then
  86551. pTDefRegMap(@Self)^.clr := $00010000
  86552. else
  86553. pTDefRegMap(@Self)^.&set := $00010000;
  86554. end;
  86555. function TCAN1_C1FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  86556. begin
  86557. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  86558. end;
  86559. procedure TCAN1_C1FIFOINT12.setRXHALFIE; inline;
  86560. begin
  86561. pTDefRegMap(@Self)^.&set := $00020000;
  86562. end;
  86563. procedure TCAN1_C1FIFOINT12.clearRXHALFIE; inline;
  86564. begin
  86565. pTDefRegMap(@Self)^.clr := $00020000;
  86566. end;
  86567. procedure TCAN1_C1FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  86568. begin
  86569. if thebits = 0 then
  86570. pTDefRegMap(@Self)^.clr := $00020000
  86571. else
  86572. pTDefRegMap(@Self)^.&set := $00020000;
  86573. end;
  86574. function TCAN1_C1FIFOINT12.getRXHALFIE : TBits_1; inline;
  86575. begin
  86576. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  86577. end;
  86578. procedure TCAN1_C1FIFOINT12.setRXFULLIE; inline;
  86579. begin
  86580. pTDefRegMap(@Self)^.&set := $00040000;
  86581. end;
  86582. procedure TCAN1_C1FIFOINT12.clearRXFULLIE; inline;
  86583. begin
  86584. pTDefRegMap(@Self)^.clr := $00040000;
  86585. end;
  86586. procedure TCAN1_C1FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  86587. begin
  86588. if thebits = 0 then
  86589. pTDefRegMap(@Self)^.clr := $00040000
  86590. else
  86591. pTDefRegMap(@Self)^.&set := $00040000;
  86592. end;
  86593. function TCAN1_C1FIFOINT12.getRXFULLIE : TBits_1; inline;
  86594. begin
  86595. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  86596. end;
  86597. procedure TCAN1_C1FIFOINT12.setRXOVFLIE; inline;
  86598. begin
  86599. pTDefRegMap(@Self)^.&set := $00080000;
  86600. end;
  86601. procedure TCAN1_C1FIFOINT12.clearRXOVFLIE; inline;
  86602. begin
  86603. pTDefRegMap(@Self)^.clr := $00080000;
  86604. end;
  86605. procedure TCAN1_C1FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  86606. begin
  86607. if thebits = 0 then
  86608. pTDefRegMap(@Self)^.clr := $00080000
  86609. else
  86610. pTDefRegMap(@Self)^.&set := $00080000;
  86611. end;
  86612. function TCAN1_C1FIFOINT12.getRXOVFLIE : TBits_1; inline;
  86613. begin
  86614. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  86615. end;
  86616. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE; inline;
  86617. begin
  86618. pTDefRegMap(@Self)^.&set := $01000000;
  86619. end;
  86620. procedure TCAN1_C1FIFOINT12.clearTXEMPTYIE; inline;
  86621. begin
  86622. pTDefRegMap(@Self)^.clr := $01000000;
  86623. end;
  86624. procedure TCAN1_C1FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  86625. begin
  86626. if thebits = 0 then
  86627. pTDefRegMap(@Self)^.clr := $01000000
  86628. else
  86629. pTDefRegMap(@Self)^.&set := $01000000;
  86630. end;
  86631. function TCAN1_C1FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  86632. begin
  86633. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  86634. end;
  86635. procedure TCAN1_C1FIFOINT12.setTXHALFIE; inline;
  86636. begin
  86637. pTDefRegMap(@Self)^.&set := $02000000;
  86638. end;
  86639. procedure TCAN1_C1FIFOINT12.clearTXHALFIE; inline;
  86640. begin
  86641. pTDefRegMap(@Self)^.clr := $02000000;
  86642. end;
  86643. procedure TCAN1_C1FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  86644. begin
  86645. if thebits = 0 then
  86646. pTDefRegMap(@Self)^.clr := $02000000
  86647. else
  86648. pTDefRegMap(@Self)^.&set := $02000000;
  86649. end;
  86650. function TCAN1_C1FIFOINT12.getTXHALFIE : TBits_1; inline;
  86651. begin
  86652. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  86653. end;
  86654. procedure TCAN1_C1FIFOINT12.setTXNFULLIE; inline;
  86655. begin
  86656. pTDefRegMap(@Self)^.&set := $04000000;
  86657. end;
  86658. procedure TCAN1_C1FIFOINT12.clearTXNFULLIE; inline;
  86659. begin
  86660. pTDefRegMap(@Self)^.clr := $04000000;
  86661. end;
  86662. procedure TCAN1_C1FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  86663. begin
  86664. if thebits = 0 then
  86665. pTDefRegMap(@Self)^.clr := $04000000
  86666. else
  86667. pTDefRegMap(@Self)^.&set := $04000000;
  86668. end;
  86669. function TCAN1_C1FIFOINT12.getTXNFULLIE : TBits_1; inline;
  86670. begin
  86671. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  86672. end;
  86673. procedure TCAN1_C1FIFOINT12.setw(thebits : TBits_32); inline;
  86674. begin
  86675. pTDefRegMap(@Self)^.val := thebits;
  86676. end;
  86677. function TCAN1_C1FIFOINT12.getw : TBits_32; inline;
  86678. begin
  86679. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86680. end;
  86681. procedure TCAN1_C1FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  86682. begin
  86683. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  86684. end;
  86685. function TCAN1_C1FIFOCI12.getCFIFOCI : TBits_5; inline;
  86686. begin
  86687. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  86688. end;
  86689. procedure TCAN1_C1FIFOCI12.setw(thebits : TBits_32); inline;
  86690. begin
  86691. pTDefRegMap(@Self)^.val := thebits;
  86692. end;
  86693. function TCAN1_C1FIFOCI12.getw : TBits_32; inline;
  86694. begin
  86695. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86696. end;
  86697. procedure TCAN1_C1FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  86698. begin
  86699. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  86700. end;
  86701. function TCAN1_C1FIFOCON13.getTXPRI : TBits_2; inline;
  86702. begin
  86703. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  86704. end;
  86705. procedure TCAN1_C1FIFOCON13.setRTREN; inline;
  86706. begin
  86707. pTDefRegMap(@Self)^.&set := $00000004;
  86708. end;
  86709. procedure TCAN1_C1FIFOCON13.clearRTREN; inline;
  86710. begin
  86711. pTDefRegMap(@Self)^.clr := $00000004;
  86712. end;
  86713. procedure TCAN1_C1FIFOCON13.setRTREN(thebits : TBits_1); inline;
  86714. begin
  86715. if thebits = 0 then
  86716. pTDefRegMap(@Self)^.clr := $00000004
  86717. else
  86718. pTDefRegMap(@Self)^.&set := $00000004;
  86719. end;
  86720. function TCAN1_C1FIFOCON13.getRTREN : TBits_1; inline;
  86721. begin
  86722. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86723. end;
  86724. procedure TCAN1_C1FIFOCON13.setTXREQ; inline;
  86725. begin
  86726. pTDefRegMap(@Self)^.&set := $00000008;
  86727. end;
  86728. procedure TCAN1_C1FIFOCON13.clearTXREQ; inline;
  86729. begin
  86730. pTDefRegMap(@Self)^.clr := $00000008;
  86731. end;
  86732. procedure TCAN1_C1FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  86733. begin
  86734. if thebits = 0 then
  86735. pTDefRegMap(@Self)^.clr := $00000008
  86736. else
  86737. pTDefRegMap(@Self)^.&set := $00000008;
  86738. end;
  86739. function TCAN1_C1FIFOCON13.getTXREQ : TBits_1; inline;
  86740. begin
  86741. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86742. end;
  86743. procedure TCAN1_C1FIFOCON13.setTXERR; inline;
  86744. begin
  86745. pTDefRegMap(@Self)^.&set := $00000010;
  86746. end;
  86747. procedure TCAN1_C1FIFOCON13.clearTXERR; inline;
  86748. begin
  86749. pTDefRegMap(@Self)^.clr := $00000010;
  86750. end;
  86751. procedure TCAN1_C1FIFOCON13.setTXERR(thebits : TBits_1); inline;
  86752. begin
  86753. if thebits = 0 then
  86754. pTDefRegMap(@Self)^.clr := $00000010
  86755. else
  86756. pTDefRegMap(@Self)^.&set := $00000010;
  86757. end;
  86758. function TCAN1_C1FIFOCON13.getTXERR : TBits_1; inline;
  86759. begin
  86760. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  86761. end;
  86762. procedure TCAN1_C1FIFOCON13.setTXLARB; inline;
  86763. begin
  86764. pTDefRegMap(@Self)^.&set := $00000020;
  86765. end;
  86766. procedure TCAN1_C1FIFOCON13.clearTXLARB; inline;
  86767. begin
  86768. pTDefRegMap(@Self)^.clr := $00000020;
  86769. end;
  86770. procedure TCAN1_C1FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  86771. begin
  86772. if thebits = 0 then
  86773. pTDefRegMap(@Self)^.clr := $00000020
  86774. else
  86775. pTDefRegMap(@Self)^.&set := $00000020;
  86776. end;
  86777. function TCAN1_C1FIFOCON13.getTXLARB : TBits_1; inline;
  86778. begin
  86779. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  86780. end;
  86781. procedure TCAN1_C1FIFOCON13.setTXABAT; inline;
  86782. begin
  86783. pTDefRegMap(@Self)^.&set := $00000040;
  86784. end;
  86785. procedure TCAN1_C1FIFOCON13.clearTXABAT; inline;
  86786. begin
  86787. pTDefRegMap(@Self)^.clr := $00000040;
  86788. end;
  86789. procedure TCAN1_C1FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  86790. begin
  86791. if thebits = 0 then
  86792. pTDefRegMap(@Self)^.clr := $00000040
  86793. else
  86794. pTDefRegMap(@Self)^.&set := $00000040;
  86795. end;
  86796. function TCAN1_C1FIFOCON13.getTXABAT : TBits_1; inline;
  86797. begin
  86798. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  86799. end;
  86800. procedure TCAN1_C1FIFOCON13.setTXEN; inline;
  86801. begin
  86802. pTDefRegMap(@Self)^.&set := $00000080;
  86803. end;
  86804. procedure TCAN1_C1FIFOCON13.clearTXEN; inline;
  86805. begin
  86806. pTDefRegMap(@Self)^.clr := $00000080;
  86807. end;
  86808. procedure TCAN1_C1FIFOCON13.setTXEN(thebits : TBits_1); inline;
  86809. begin
  86810. if thebits = 0 then
  86811. pTDefRegMap(@Self)^.clr := $00000080
  86812. else
  86813. pTDefRegMap(@Self)^.&set := $00000080;
  86814. end;
  86815. function TCAN1_C1FIFOCON13.getTXEN : TBits_1; inline;
  86816. begin
  86817. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  86818. end;
  86819. procedure TCAN1_C1FIFOCON13.setDONLY; inline;
  86820. begin
  86821. pTDefRegMap(@Self)^.&set := $00001000;
  86822. end;
  86823. procedure TCAN1_C1FIFOCON13.clearDONLY; inline;
  86824. begin
  86825. pTDefRegMap(@Self)^.clr := $00001000;
  86826. end;
  86827. procedure TCAN1_C1FIFOCON13.setDONLY(thebits : TBits_1); inline;
  86828. begin
  86829. if thebits = 0 then
  86830. pTDefRegMap(@Self)^.clr := $00001000
  86831. else
  86832. pTDefRegMap(@Self)^.&set := $00001000;
  86833. end;
  86834. function TCAN1_C1FIFOCON13.getDONLY : TBits_1; inline;
  86835. begin
  86836. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  86837. end;
  86838. procedure TCAN1_C1FIFOCON13.setUINC; inline;
  86839. begin
  86840. pTDefRegMap(@Self)^.&set := $00002000;
  86841. end;
  86842. procedure TCAN1_C1FIFOCON13.clearUINC; inline;
  86843. begin
  86844. pTDefRegMap(@Self)^.clr := $00002000;
  86845. end;
  86846. procedure TCAN1_C1FIFOCON13.setUINC(thebits : TBits_1); inline;
  86847. begin
  86848. if thebits = 0 then
  86849. pTDefRegMap(@Self)^.clr := $00002000
  86850. else
  86851. pTDefRegMap(@Self)^.&set := $00002000;
  86852. end;
  86853. function TCAN1_C1FIFOCON13.getUINC : TBits_1; inline;
  86854. begin
  86855. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  86856. end;
  86857. procedure TCAN1_C1FIFOCON13.setFRESET; inline;
  86858. begin
  86859. pTDefRegMap(@Self)^.&set := $00004000;
  86860. end;
  86861. procedure TCAN1_C1FIFOCON13.clearFRESET; inline;
  86862. begin
  86863. pTDefRegMap(@Self)^.clr := $00004000;
  86864. end;
  86865. procedure TCAN1_C1FIFOCON13.setFRESET(thebits : TBits_1); inline;
  86866. begin
  86867. if thebits = 0 then
  86868. pTDefRegMap(@Self)^.clr := $00004000
  86869. else
  86870. pTDefRegMap(@Self)^.&set := $00004000;
  86871. end;
  86872. function TCAN1_C1FIFOCON13.getFRESET : TBits_1; inline;
  86873. begin
  86874. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  86875. end;
  86876. procedure TCAN1_C1FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  86877. begin
  86878. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  86879. end;
  86880. function TCAN1_C1FIFOCON13.getFSIZE : TBits_5; inline;
  86881. begin
  86882. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  86883. end;
  86884. procedure TCAN1_C1FIFOCON13.setw(thebits : TBits_32); inline;
  86885. begin
  86886. pTDefRegMap(@Self)^.val := thebits;
  86887. end;
  86888. function TCAN1_C1FIFOCON13.getw : TBits_32; inline;
  86889. begin
  86890. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  86891. end;
  86892. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF; inline;
  86893. begin
  86894. pTDefRegMap(@Self)^.&set := $00000001;
  86895. end;
  86896. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIF; inline;
  86897. begin
  86898. pTDefRegMap(@Self)^.clr := $00000001;
  86899. end;
  86900. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  86901. begin
  86902. if thebits = 0 then
  86903. pTDefRegMap(@Self)^.clr := $00000001
  86904. else
  86905. pTDefRegMap(@Self)^.&set := $00000001;
  86906. end;
  86907. function TCAN1_C1FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  86908. begin
  86909. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  86910. end;
  86911. procedure TCAN1_C1FIFOINT13.setRXHALFIF; inline;
  86912. begin
  86913. pTDefRegMap(@Self)^.&set := $00000002;
  86914. end;
  86915. procedure TCAN1_C1FIFOINT13.clearRXHALFIF; inline;
  86916. begin
  86917. pTDefRegMap(@Self)^.clr := $00000002;
  86918. end;
  86919. procedure TCAN1_C1FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  86920. begin
  86921. if thebits = 0 then
  86922. pTDefRegMap(@Self)^.clr := $00000002
  86923. else
  86924. pTDefRegMap(@Self)^.&set := $00000002;
  86925. end;
  86926. function TCAN1_C1FIFOINT13.getRXHALFIF : TBits_1; inline;
  86927. begin
  86928. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  86929. end;
  86930. procedure TCAN1_C1FIFOINT13.setRXFULLIF; inline;
  86931. begin
  86932. pTDefRegMap(@Self)^.&set := $00000004;
  86933. end;
  86934. procedure TCAN1_C1FIFOINT13.clearRXFULLIF; inline;
  86935. begin
  86936. pTDefRegMap(@Self)^.clr := $00000004;
  86937. end;
  86938. procedure TCAN1_C1FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  86939. begin
  86940. if thebits = 0 then
  86941. pTDefRegMap(@Self)^.clr := $00000004
  86942. else
  86943. pTDefRegMap(@Self)^.&set := $00000004;
  86944. end;
  86945. function TCAN1_C1FIFOINT13.getRXFULLIF : TBits_1; inline;
  86946. begin
  86947. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  86948. end;
  86949. procedure TCAN1_C1FIFOINT13.setRXOVFLIF; inline;
  86950. begin
  86951. pTDefRegMap(@Self)^.&set := $00000008;
  86952. end;
  86953. procedure TCAN1_C1FIFOINT13.clearRXOVFLIF; inline;
  86954. begin
  86955. pTDefRegMap(@Self)^.clr := $00000008;
  86956. end;
  86957. procedure TCAN1_C1FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  86958. begin
  86959. if thebits = 0 then
  86960. pTDefRegMap(@Self)^.clr := $00000008
  86961. else
  86962. pTDefRegMap(@Self)^.&set := $00000008;
  86963. end;
  86964. function TCAN1_C1FIFOINT13.getRXOVFLIF : TBits_1; inline;
  86965. begin
  86966. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  86967. end;
  86968. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF; inline;
  86969. begin
  86970. pTDefRegMap(@Self)^.&set := $00000100;
  86971. end;
  86972. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIF; inline;
  86973. begin
  86974. pTDefRegMap(@Self)^.clr := $00000100;
  86975. end;
  86976. procedure TCAN1_C1FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  86977. begin
  86978. if thebits = 0 then
  86979. pTDefRegMap(@Self)^.clr := $00000100
  86980. else
  86981. pTDefRegMap(@Self)^.&set := $00000100;
  86982. end;
  86983. function TCAN1_C1FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  86984. begin
  86985. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  86986. end;
  86987. procedure TCAN1_C1FIFOINT13.setTXHALFIF; inline;
  86988. begin
  86989. pTDefRegMap(@Self)^.&set := $00000200;
  86990. end;
  86991. procedure TCAN1_C1FIFOINT13.clearTXHALFIF; inline;
  86992. begin
  86993. pTDefRegMap(@Self)^.clr := $00000200;
  86994. end;
  86995. procedure TCAN1_C1FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  86996. begin
  86997. if thebits = 0 then
  86998. pTDefRegMap(@Self)^.clr := $00000200
  86999. else
  87000. pTDefRegMap(@Self)^.&set := $00000200;
  87001. end;
  87002. function TCAN1_C1FIFOINT13.getTXHALFIF : TBits_1; inline;
  87003. begin
  87004. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  87005. end;
  87006. procedure TCAN1_C1FIFOINT13.setTXNFULLIF; inline;
  87007. begin
  87008. pTDefRegMap(@Self)^.&set := $00000400;
  87009. end;
  87010. procedure TCAN1_C1FIFOINT13.clearTXNFULLIF; inline;
  87011. begin
  87012. pTDefRegMap(@Self)^.clr := $00000400;
  87013. end;
  87014. procedure TCAN1_C1FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  87015. begin
  87016. if thebits = 0 then
  87017. pTDefRegMap(@Self)^.clr := $00000400
  87018. else
  87019. pTDefRegMap(@Self)^.&set := $00000400;
  87020. end;
  87021. function TCAN1_C1FIFOINT13.getTXNFULLIF : TBits_1; inline;
  87022. begin
  87023. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  87024. end;
  87025. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE; inline;
  87026. begin
  87027. pTDefRegMap(@Self)^.&set := $00010000;
  87028. end;
  87029. procedure TCAN1_C1FIFOINT13.clearRXNEMPTYIE; inline;
  87030. begin
  87031. pTDefRegMap(@Self)^.clr := $00010000;
  87032. end;
  87033. procedure TCAN1_C1FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  87034. begin
  87035. if thebits = 0 then
  87036. pTDefRegMap(@Self)^.clr := $00010000
  87037. else
  87038. pTDefRegMap(@Self)^.&set := $00010000;
  87039. end;
  87040. function TCAN1_C1FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  87041. begin
  87042. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  87043. end;
  87044. procedure TCAN1_C1FIFOINT13.setRXHALFIE; inline;
  87045. begin
  87046. pTDefRegMap(@Self)^.&set := $00020000;
  87047. end;
  87048. procedure TCAN1_C1FIFOINT13.clearRXHALFIE; inline;
  87049. begin
  87050. pTDefRegMap(@Self)^.clr := $00020000;
  87051. end;
  87052. procedure TCAN1_C1FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  87053. begin
  87054. if thebits = 0 then
  87055. pTDefRegMap(@Self)^.clr := $00020000
  87056. else
  87057. pTDefRegMap(@Self)^.&set := $00020000;
  87058. end;
  87059. function TCAN1_C1FIFOINT13.getRXHALFIE : TBits_1; inline;
  87060. begin
  87061. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  87062. end;
  87063. procedure TCAN1_C1FIFOINT13.setRXFULLIE; inline;
  87064. begin
  87065. pTDefRegMap(@Self)^.&set := $00040000;
  87066. end;
  87067. procedure TCAN1_C1FIFOINT13.clearRXFULLIE; inline;
  87068. begin
  87069. pTDefRegMap(@Self)^.clr := $00040000;
  87070. end;
  87071. procedure TCAN1_C1FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  87072. begin
  87073. if thebits = 0 then
  87074. pTDefRegMap(@Self)^.clr := $00040000
  87075. else
  87076. pTDefRegMap(@Self)^.&set := $00040000;
  87077. end;
  87078. function TCAN1_C1FIFOINT13.getRXFULLIE : TBits_1; inline;
  87079. begin
  87080. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  87081. end;
  87082. procedure TCAN1_C1FIFOINT13.setRXOVFLIE; inline;
  87083. begin
  87084. pTDefRegMap(@Self)^.&set := $00080000;
  87085. end;
  87086. procedure TCAN1_C1FIFOINT13.clearRXOVFLIE; inline;
  87087. begin
  87088. pTDefRegMap(@Self)^.clr := $00080000;
  87089. end;
  87090. procedure TCAN1_C1FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  87091. begin
  87092. if thebits = 0 then
  87093. pTDefRegMap(@Self)^.clr := $00080000
  87094. else
  87095. pTDefRegMap(@Self)^.&set := $00080000;
  87096. end;
  87097. function TCAN1_C1FIFOINT13.getRXOVFLIE : TBits_1; inline;
  87098. begin
  87099. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  87100. end;
  87101. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE; inline;
  87102. begin
  87103. pTDefRegMap(@Self)^.&set := $01000000;
  87104. end;
  87105. procedure TCAN1_C1FIFOINT13.clearTXEMPTYIE; inline;
  87106. begin
  87107. pTDefRegMap(@Self)^.clr := $01000000;
  87108. end;
  87109. procedure TCAN1_C1FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  87110. begin
  87111. if thebits = 0 then
  87112. pTDefRegMap(@Self)^.clr := $01000000
  87113. else
  87114. pTDefRegMap(@Self)^.&set := $01000000;
  87115. end;
  87116. function TCAN1_C1FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  87117. begin
  87118. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  87119. end;
  87120. procedure TCAN1_C1FIFOINT13.setTXHALFIE; inline;
  87121. begin
  87122. pTDefRegMap(@Self)^.&set := $02000000;
  87123. end;
  87124. procedure TCAN1_C1FIFOINT13.clearTXHALFIE; inline;
  87125. begin
  87126. pTDefRegMap(@Self)^.clr := $02000000;
  87127. end;
  87128. procedure TCAN1_C1FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  87129. begin
  87130. if thebits = 0 then
  87131. pTDefRegMap(@Self)^.clr := $02000000
  87132. else
  87133. pTDefRegMap(@Self)^.&set := $02000000;
  87134. end;
  87135. function TCAN1_C1FIFOINT13.getTXHALFIE : TBits_1; inline;
  87136. begin
  87137. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  87138. end;
  87139. procedure TCAN1_C1FIFOINT13.setTXNFULLIE; inline;
  87140. begin
  87141. pTDefRegMap(@Self)^.&set := $04000000;
  87142. end;
  87143. procedure TCAN1_C1FIFOINT13.clearTXNFULLIE; inline;
  87144. begin
  87145. pTDefRegMap(@Self)^.clr := $04000000;
  87146. end;
  87147. procedure TCAN1_C1FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  87148. begin
  87149. if thebits = 0 then
  87150. pTDefRegMap(@Self)^.clr := $04000000
  87151. else
  87152. pTDefRegMap(@Self)^.&set := $04000000;
  87153. end;
  87154. function TCAN1_C1FIFOINT13.getTXNFULLIE : TBits_1; inline;
  87155. begin
  87156. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  87157. end;
  87158. procedure TCAN1_C1FIFOINT13.setw(thebits : TBits_32); inline;
  87159. begin
  87160. pTDefRegMap(@Self)^.val := thebits;
  87161. end;
  87162. function TCAN1_C1FIFOINT13.getw : TBits_32; inline;
  87163. begin
  87164. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87165. end;
  87166. procedure TCAN1_C1FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  87167. begin
  87168. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  87169. end;
  87170. function TCAN1_C1FIFOCI13.getCFIFOCI : TBits_5; inline;
  87171. begin
  87172. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  87173. end;
  87174. procedure TCAN1_C1FIFOCI13.setw(thebits : TBits_32); inline;
  87175. begin
  87176. pTDefRegMap(@Self)^.val := thebits;
  87177. end;
  87178. function TCAN1_C1FIFOCI13.getw : TBits_32; inline;
  87179. begin
  87180. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87181. end;
  87182. procedure TCAN1_C1FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  87183. begin
  87184. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  87185. end;
  87186. function TCAN1_C1FIFOCON14.getTXPRI : TBits_2; inline;
  87187. begin
  87188. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  87189. end;
  87190. procedure TCAN1_C1FIFOCON14.setRTREN; inline;
  87191. begin
  87192. pTDefRegMap(@Self)^.&set := $00000004;
  87193. end;
  87194. procedure TCAN1_C1FIFOCON14.clearRTREN; inline;
  87195. begin
  87196. pTDefRegMap(@Self)^.clr := $00000004;
  87197. end;
  87198. procedure TCAN1_C1FIFOCON14.setRTREN(thebits : TBits_1); inline;
  87199. begin
  87200. if thebits = 0 then
  87201. pTDefRegMap(@Self)^.clr := $00000004
  87202. else
  87203. pTDefRegMap(@Self)^.&set := $00000004;
  87204. end;
  87205. function TCAN1_C1FIFOCON14.getRTREN : TBits_1; inline;
  87206. begin
  87207. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87208. end;
  87209. procedure TCAN1_C1FIFOCON14.setTXREQ; inline;
  87210. begin
  87211. pTDefRegMap(@Self)^.&set := $00000008;
  87212. end;
  87213. procedure TCAN1_C1FIFOCON14.clearTXREQ; inline;
  87214. begin
  87215. pTDefRegMap(@Self)^.clr := $00000008;
  87216. end;
  87217. procedure TCAN1_C1FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  87218. begin
  87219. if thebits = 0 then
  87220. pTDefRegMap(@Self)^.clr := $00000008
  87221. else
  87222. pTDefRegMap(@Self)^.&set := $00000008;
  87223. end;
  87224. function TCAN1_C1FIFOCON14.getTXREQ : TBits_1; inline;
  87225. begin
  87226. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87227. end;
  87228. procedure TCAN1_C1FIFOCON14.setTXERR; inline;
  87229. begin
  87230. pTDefRegMap(@Self)^.&set := $00000010;
  87231. end;
  87232. procedure TCAN1_C1FIFOCON14.clearTXERR; inline;
  87233. begin
  87234. pTDefRegMap(@Self)^.clr := $00000010;
  87235. end;
  87236. procedure TCAN1_C1FIFOCON14.setTXERR(thebits : TBits_1); inline;
  87237. begin
  87238. if thebits = 0 then
  87239. pTDefRegMap(@Self)^.clr := $00000010
  87240. else
  87241. pTDefRegMap(@Self)^.&set := $00000010;
  87242. end;
  87243. function TCAN1_C1FIFOCON14.getTXERR : TBits_1; inline;
  87244. begin
  87245. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  87246. end;
  87247. procedure TCAN1_C1FIFOCON14.setTXLARB; inline;
  87248. begin
  87249. pTDefRegMap(@Self)^.&set := $00000020;
  87250. end;
  87251. procedure TCAN1_C1FIFOCON14.clearTXLARB; inline;
  87252. begin
  87253. pTDefRegMap(@Self)^.clr := $00000020;
  87254. end;
  87255. procedure TCAN1_C1FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  87256. begin
  87257. if thebits = 0 then
  87258. pTDefRegMap(@Self)^.clr := $00000020
  87259. else
  87260. pTDefRegMap(@Self)^.&set := $00000020;
  87261. end;
  87262. function TCAN1_C1FIFOCON14.getTXLARB : TBits_1; inline;
  87263. begin
  87264. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  87265. end;
  87266. procedure TCAN1_C1FIFOCON14.setTXABAT; inline;
  87267. begin
  87268. pTDefRegMap(@Self)^.&set := $00000040;
  87269. end;
  87270. procedure TCAN1_C1FIFOCON14.clearTXABAT; inline;
  87271. begin
  87272. pTDefRegMap(@Self)^.clr := $00000040;
  87273. end;
  87274. procedure TCAN1_C1FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  87275. begin
  87276. if thebits = 0 then
  87277. pTDefRegMap(@Self)^.clr := $00000040
  87278. else
  87279. pTDefRegMap(@Self)^.&set := $00000040;
  87280. end;
  87281. function TCAN1_C1FIFOCON14.getTXABAT : TBits_1; inline;
  87282. begin
  87283. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  87284. end;
  87285. procedure TCAN1_C1FIFOCON14.setTXEN; inline;
  87286. begin
  87287. pTDefRegMap(@Self)^.&set := $00000080;
  87288. end;
  87289. procedure TCAN1_C1FIFOCON14.clearTXEN; inline;
  87290. begin
  87291. pTDefRegMap(@Self)^.clr := $00000080;
  87292. end;
  87293. procedure TCAN1_C1FIFOCON14.setTXEN(thebits : TBits_1); inline;
  87294. begin
  87295. if thebits = 0 then
  87296. pTDefRegMap(@Self)^.clr := $00000080
  87297. else
  87298. pTDefRegMap(@Self)^.&set := $00000080;
  87299. end;
  87300. function TCAN1_C1FIFOCON14.getTXEN : TBits_1; inline;
  87301. begin
  87302. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  87303. end;
  87304. procedure TCAN1_C1FIFOCON14.setDONLY; inline;
  87305. begin
  87306. pTDefRegMap(@Self)^.&set := $00001000;
  87307. end;
  87308. procedure TCAN1_C1FIFOCON14.clearDONLY; inline;
  87309. begin
  87310. pTDefRegMap(@Self)^.clr := $00001000;
  87311. end;
  87312. procedure TCAN1_C1FIFOCON14.setDONLY(thebits : TBits_1); inline;
  87313. begin
  87314. if thebits = 0 then
  87315. pTDefRegMap(@Self)^.clr := $00001000
  87316. else
  87317. pTDefRegMap(@Self)^.&set := $00001000;
  87318. end;
  87319. function TCAN1_C1FIFOCON14.getDONLY : TBits_1; inline;
  87320. begin
  87321. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  87322. end;
  87323. procedure TCAN1_C1FIFOCON14.setUINC; inline;
  87324. begin
  87325. pTDefRegMap(@Self)^.&set := $00002000;
  87326. end;
  87327. procedure TCAN1_C1FIFOCON14.clearUINC; inline;
  87328. begin
  87329. pTDefRegMap(@Self)^.clr := $00002000;
  87330. end;
  87331. procedure TCAN1_C1FIFOCON14.setUINC(thebits : TBits_1); inline;
  87332. begin
  87333. if thebits = 0 then
  87334. pTDefRegMap(@Self)^.clr := $00002000
  87335. else
  87336. pTDefRegMap(@Self)^.&set := $00002000;
  87337. end;
  87338. function TCAN1_C1FIFOCON14.getUINC : TBits_1; inline;
  87339. begin
  87340. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  87341. end;
  87342. procedure TCAN1_C1FIFOCON14.setFRESET; inline;
  87343. begin
  87344. pTDefRegMap(@Self)^.&set := $00004000;
  87345. end;
  87346. procedure TCAN1_C1FIFOCON14.clearFRESET; inline;
  87347. begin
  87348. pTDefRegMap(@Self)^.clr := $00004000;
  87349. end;
  87350. procedure TCAN1_C1FIFOCON14.setFRESET(thebits : TBits_1); inline;
  87351. begin
  87352. if thebits = 0 then
  87353. pTDefRegMap(@Self)^.clr := $00004000
  87354. else
  87355. pTDefRegMap(@Self)^.&set := $00004000;
  87356. end;
  87357. function TCAN1_C1FIFOCON14.getFRESET : TBits_1; inline;
  87358. begin
  87359. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  87360. end;
  87361. procedure TCAN1_C1FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  87362. begin
  87363. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  87364. end;
  87365. function TCAN1_C1FIFOCON14.getFSIZE : TBits_5; inline;
  87366. begin
  87367. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  87368. end;
  87369. procedure TCAN1_C1FIFOCON14.setw(thebits : TBits_32); inline;
  87370. begin
  87371. pTDefRegMap(@Self)^.val := thebits;
  87372. end;
  87373. function TCAN1_C1FIFOCON14.getw : TBits_32; inline;
  87374. begin
  87375. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87376. end;
  87377. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF; inline;
  87378. begin
  87379. pTDefRegMap(@Self)^.&set := $00000001;
  87380. end;
  87381. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIF; inline;
  87382. begin
  87383. pTDefRegMap(@Self)^.clr := $00000001;
  87384. end;
  87385. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  87386. begin
  87387. if thebits = 0 then
  87388. pTDefRegMap(@Self)^.clr := $00000001
  87389. else
  87390. pTDefRegMap(@Self)^.&set := $00000001;
  87391. end;
  87392. function TCAN1_C1FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  87393. begin
  87394. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  87395. end;
  87396. procedure TCAN1_C1FIFOINT14.setRXHALFIF; inline;
  87397. begin
  87398. pTDefRegMap(@Self)^.&set := $00000002;
  87399. end;
  87400. procedure TCAN1_C1FIFOINT14.clearRXHALFIF; inline;
  87401. begin
  87402. pTDefRegMap(@Self)^.clr := $00000002;
  87403. end;
  87404. procedure TCAN1_C1FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  87405. begin
  87406. if thebits = 0 then
  87407. pTDefRegMap(@Self)^.clr := $00000002
  87408. else
  87409. pTDefRegMap(@Self)^.&set := $00000002;
  87410. end;
  87411. function TCAN1_C1FIFOINT14.getRXHALFIF : TBits_1; inline;
  87412. begin
  87413. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  87414. end;
  87415. procedure TCAN1_C1FIFOINT14.setRXFULLIF; inline;
  87416. begin
  87417. pTDefRegMap(@Self)^.&set := $00000004;
  87418. end;
  87419. procedure TCAN1_C1FIFOINT14.clearRXFULLIF; inline;
  87420. begin
  87421. pTDefRegMap(@Self)^.clr := $00000004;
  87422. end;
  87423. procedure TCAN1_C1FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  87424. begin
  87425. if thebits = 0 then
  87426. pTDefRegMap(@Self)^.clr := $00000004
  87427. else
  87428. pTDefRegMap(@Self)^.&set := $00000004;
  87429. end;
  87430. function TCAN1_C1FIFOINT14.getRXFULLIF : TBits_1; inline;
  87431. begin
  87432. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87433. end;
  87434. procedure TCAN1_C1FIFOINT14.setRXOVFLIF; inline;
  87435. begin
  87436. pTDefRegMap(@Self)^.&set := $00000008;
  87437. end;
  87438. procedure TCAN1_C1FIFOINT14.clearRXOVFLIF; inline;
  87439. begin
  87440. pTDefRegMap(@Self)^.clr := $00000008;
  87441. end;
  87442. procedure TCAN1_C1FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  87443. begin
  87444. if thebits = 0 then
  87445. pTDefRegMap(@Self)^.clr := $00000008
  87446. else
  87447. pTDefRegMap(@Self)^.&set := $00000008;
  87448. end;
  87449. function TCAN1_C1FIFOINT14.getRXOVFLIF : TBits_1; inline;
  87450. begin
  87451. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87452. end;
  87453. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF; inline;
  87454. begin
  87455. pTDefRegMap(@Self)^.&set := $00000100;
  87456. end;
  87457. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIF; inline;
  87458. begin
  87459. pTDefRegMap(@Self)^.clr := $00000100;
  87460. end;
  87461. procedure TCAN1_C1FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  87462. begin
  87463. if thebits = 0 then
  87464. pTDefRegMap(@Self)^.clr := $00000100
  87465. else
  87466. pTDefRegMap(@Self)^.&set := $00000100;
  87467. end;
  87468. function TCAN1_C1FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  87469. begin
  87470. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  87471. end;
  87472. procedure TCAN1_C1FIFOINT14.setTXHALFIF; inline;
  87473. begin
  87474. pTDefRegMap(@Self)^.&set := $00000200;
  87475. end;
  87476. procedure TCAN1_C1FIFOINT14.clearTXHALFIF; inline;
  87477. begin
  87478. pTDefRegMap(@Self)^.clr := $00000200;
  87479. end;
  87480. procedure TCAN1_C1FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  87481. begin
  87482. if thebits = 0 then
  87483. pTDefRegMap(@Self)^.clr := $00000200
  87484. else
  87485. pTDefRegMap(@Self)^.&set := $00000200;
  87486. end;
  87487. function TCAN1_C1FIFOINT14.getTXHALFIF : TBits_1; inline;
  87488. begin
  87489. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  87490. end;
  87491. procedure TCAN1_C1FIFOINT14.setTXNFULLIF; inline;
  87492. begin
  87493. pTDefRegMap(@Self)^.&set := $00000400;
  87494. end;
  87495. procedure TCAN1_C1FIFOINT14.clearTXNFULLIF; inline;
  87496. begin
  87497. pTDefRegMap(@Self)^.clr := $00000400;
  87498. end;
  87499. procedure TCAN1_C1FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  87500. begin
  87501. if thebits = 0 then
  87502. pTDefRegMap(@Self)^.clr := $00000400
  87503. else
  87504. pTDefRegMap(@Self)^.&set := $00000400;
  87505. end;
  87506. function TCAN1_C1FIFOINT14.getTXNFULLIF : TBits_1; inline;
  87507. begin
  87508. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  87509. end;
  87510. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE; inline;
  87511. begin
  87512. pTDefRegMap(@Self)^.&set := $00010000;
  87513. end;
  87514. procedure TCAN1_C1FIFOINT14.clearRXNEMPTYIE; inline;
  87515. begin
  87516. pTDefRegMap(@Self)^.clr := $00010000;
  87517. end;
  87518. procedure TCAN1_C1FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  87519. begin
  87520. if thebits = 0 then
  87521. pTDefRegMap(@Self)^.clr := $00010000
  87522. else
  87523. pTDefRegMap(@Self)^.&set := $00010000;
  87524. end;
  87525. function TCAN1_C1FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  87526. begin
  87527. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  87528. end;
  87529. procedure TCAN1_C1FIFOINT14.setRXHALFIE; inline;
  87530. begin
  87531. pTDefRegMap(@Self)^.&set := $00020000;
  87532. end;
  87533. procedure TCAN1_C1FIFOINT14.clearRXHALFIE; inline;
  87534. begin
  87535. pTDefRegMap(@Self)^.clr := $00020000;
  87536. end;
  87537. procedure TCAN1_C1FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  87538. begin
  87539. if thebits = 0 then
  87540. pTDefRegMap(@Self)^.clr := $00020000
  87541. else
  87542. pTDefRegMap(@Self)^.&set := $00020000;
  87543. end;
  87544. function TCAN1_C1FIFOINT14.getRXHALFIE : TBits_1; inline;
  87545. begin
  87546. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  87547. end;
  87548. procedure TCAN1_C1FIFOINT14.setRXFULLIE; inline;
  87549. begin
  87550. pTDefRegMap(@Self)^.&set := $00040000;
  87551. end;
  87552. procedure TCAN1_C1FIFOINT14.clearRXFULLIE; inline;
  87553. begin
  87554. pTDefRegMap(@Self)^.clr := $00040000;
  87555. end;
  87556. procedure TCAN1_C1FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  87557. begin
  87558. if thebits = 0 then
  87559. pTDefRegMap(@Self)^.clr := $00040000
  87560. else
  87561. pTDefRegMap(@Self)^.&set := $00040000;
  87562. end;
  87563. function TCAN1_C1FIFOINT14.getRXFULLIE : TBits_1; inline;
  87564. begin
  87565. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  87566. end;
  87567. procedure TCAN1_C1FIFOINT14.setRXOVFLIE; inline;
  87568. begin
  87569. pTDefRegMap(@Self)^.&set := $00080000;
  87570. end;
  87571. procedure TCAN1_C1FIFOINT14.clearRXOVFLIE; inline;
  87572. begin
  87573. pTDefRegMap(@Self)^.clr := $00080000;
  87574. end;
  87575. procedure TCAN1_C1FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  87576. begin
  87577. if thebits = 0 then
  87578. pTDefRegMap(@Self)^.clr := $00080000
  87579. else
  87580. pTDefRegMap(@Self)^.&set := $00080000;
  87581. end;
  87582. function TCAN1_C1FIFOINT14.getRXOVFLIE : TBits_1; inline;
  87583. begin
  87584. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  87585. end;
  87586. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE; inline;
  87587. begin
  87588. pTDefRegMap(@Self)^.&set := $01000000;
  87589. end;
  87590. procedure TCAN1_C1FIFOINT14.clearTXEMPTYIE; inline;
  87591. begin
  87592. pTDefRegMap(@Self)^.clr := $01000000;
  87593. end;
  87594. procedure TCAN1_C1FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  87595. begin
  87596. if thebits = 0 then
  87597. pTDefRegMap(@Self)^.clr := $01000000
  87598. else
  87599. pTDefRegMap(@Self)^.&set := $01000000;
  87600. end;
  87601. function TCAN1_C1FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  87602. begin
  87603. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  87604. end;
  87605. procedure TCAN1_C1FIFOINT14.setTXHALFIE; inline;
  87606. begin
  87607. pTDefRegMap(@Self)^.&set := $02000000;
  87608. end;
  87609. procedure TCAN1_C1FIFOINT14.clearTXHALFIE; inline;
  87610. begin
  87611. pTDefRegMap(@Self)^.clr := $02000000;
  87612. end;
  87613. procedure TCAN1_C1FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  87614. begin
  87615. if thebits = 0 then
  87616. pTDefRegMap(@Self)^.clr := $02000000
  87617. else
  87618. pTDefRegMap(@Self)^.&set := $02000000;
  87619. end;
  87620. function TCAN1_C1FIFOINT14.getTXHALFIE : TBits_1; inline;
  87621. begin
  87622. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  87623. end;
  87624. procedure TCAN1_C1FIFOINT14.setTXNFULLIE; inline;
  87625. begin
  87626. pTDefRegMap(@Self)^.&set := $04000000;
  87627. end;
  87628. procedure TCAN1_C1FIFOINT14.clearTXNFULLIE; inline;
  87629. begin
  87630. pTDefRegMap(@Self)^.clr := $04000000;
  87631. end;
  87632. procedure TCAN1_C1FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  87633. begin
  87634. if thebits = 0 then
  87635. pTDefRegMap(@Self)^.clr := $04000000
  87636. else
  87637. pTDefRegMap(@Self)^.&set := $04000000;
  87638. end;
  87639. function TCAN1_C1FIFOINT14.getTXNFULLIE : TBits_1; inline;
  87640. begin
  87641. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  87642. end;
  87643. procedure TCAN1_C1FIFOINT14.setw(thebits : TBits_32); inline;
  87644. begin
  87645. pTDefRegMap(@Self)^.val := thebits;
  87646. end;
  87647. function TCAN1_C1FIFOINT14.getw : TBits_32; inline;
  87648. begin
  87649. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87650. end;
  87651. procedure TCAN1_C1FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  87652. begin
  87653. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  87654. end;
  87655. function TCAN1_C1FIFOCI14.getCFIFOCI : TBits_5; inline;
  87656. begin
  87657. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  87658. end;
  87659. procedure TCAN1_C1FIFOCI14.setw(thebits : TBits_32); inline;
  87660. begin
  87661. pTDefRegMap(@Self)^.val := thebits;
  87662. end;
  87663. function TCAN1_C1FIFOCI14.getw : TBits_32; inline;
  87664. begin
  87665. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87666. end;
  87667. procedure TCAN1_C1FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  87668. begin
  87669. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  87670. end;
  87671. function TCAN1_C1FIFOCON15.getTXPRI : TBits_2; inline;
  87672. begin
  87673. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  87674. end;
  87675. procedure TCAN1_C1FIFOCON15.setRTREN; inline;
  87676. begin
  87677. pTDefRegMap(@Self)^.&set := $00000004;
  87678. end;
  87679. procedure TCAN1_C1FIFOCON15.clearRTREN; inline;
  87680. begin
  87681. pTDefRegMap(@Self)^.clr := $00000004;
  87682. end;
  87683. procedure TCAN1_C1FIFOCON15.setRTREN(thebits : TBits_1); inline;
  87684. begin
  87685. if thebits = 0 then
  87686. pTDefRegMap(@Self)^.clr := $00000004
  87687. else
  87688. pTDefRegMap(@Self)^.&set := $00000004;
  87689. end;
  87690. function TCAN1_C1FIFOCON15.getRTREN : TBits_1; inline;
  87691. begin
  87692. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87693. end;
  87694. procedure TCAN1_C1FIFOCON15.setTXREQ; inline;
  87695. begin
  87696. pTDefRegMap(@Self)^.&set := $00000008;
  87697. end;
  87698. procedure TCAN1_C1FIFOCON15.clearTXREQ; inline;
  87699. begin
  87700. pTDefRegMap(@Self)^.clr := $00000008;
  87701. end;
  87702. procedure TCAN1_C1FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  87703. begin
  87704. if thebits = 0 then
  87705. pTDefRegMap(@Self)^.clr := $00000008
  87706. else
  87707. pTDefRegMap(@Self)^.&set := $00000008;
  87708. end;
  87709. function TCAN1_C1FIFOCON15.getTXREQ : TBits_1; inline;
  87710. begin
  87711. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87712. end;
  87713. procedure TCAN1_C1FIFOCON15.setTXERR; inline;
  87714. begin
  87715. pTDefRegMap(@Self)^.&set := $00000010;
  87716. end;
  87717. procedure TCAN1_C1FIFOCON15.clearTXERR; inline;
  87718. begin
  87719. pTDefRegMap(@Self)^.clr := $00000010;
  87720. end;
  87721. procedure TCAN1_C1FIFOCON15.setTXERR(thebits : TBits_1); inline;
  87722. begin
  87723. if thebits = 0 then
  87724. pTDefRegMap(@Self)^.clr := $00000010
  87725. else
  87726. pTDefRegMap(@Self)^.&set := $00000010;
  87727. end;
  87728. function TCAN1_C1FIFOCON15.getTXERR : TBits_1; inline;
  87729. begin
  87730. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  87731. end;
  87732. procedure TCAN1_C1FIFOCON15.setTXLARB; inline;
  87733. begin
  87734. pTDefRegMap(@Self)^.&set := $00000020;
  87735. end;
  87736. procedure TCAN1_C1FIFOCON15.clearTXLARB; inline;
  87737. begin
  87738. pTDefRegMap(@Self)^.clr := $00000020;
  87739. end;
  87740. procedure TCAN1_C1FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  87741. begin
  87742. if thebits = 0 then
  87743. pTDefRegMap(@Self)^.clr := $00000020
  87744. else
  87745. pTDefRegMap(@Self)^.&set := $00000020;
  87746. end;
  87747. function TCAN1_C1FIFOCON15.getTXLARB : TBits_1; inline;
  87748. begin
  87749. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  87750. end;
  87751. procedure TCAN1_C1FIFOCON15.setTXABAT; inline;
  87752. begin
  87753. pTDefRegMap(@Self)^.&set := $00000040;
  87754. end;
  87755. procedure TCAN1_C1FIFOCON15.clearTXABAT; inline;
  87756. begin
  87757. pTDefRegMap(@Self)^.clr := $00000040;
  87758. end;
  87759. procedure TCAN1_C1FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  87760. begin
  87761. if thebits = 0 then
  87762. pTDefRegMap(@Self)^.clr := $00000040
  87763. else
  87764. pTDefRegMap(@Self)^.&set := $00000040;
  87765. end;
  87766. function TCAN1_C1FIFOCON15.getTXABAT : TBits_1; inline;
  87767. begin
  87768. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  87769. end;
  87770. procedure TCAN1_C1FIFOCON15.setTXEN; inline;
  87771. begin
  87772. pTDefRegMap(@Self)^.&set := $00000080;
  87773. end;
  87774. procedure TCAN1_C1FIFOCON15.clearTXEN; inline;
  87775. begin
  87776. pTDefRegMap(@Self)^.clr := $00000080;
  87777. end;
  87778. procedure TCAN1_C1FIFOCON15.setTXEN(thebits : TBits_1); inline;
  87779. begin
  87780. if thebits = 0 then
  87781. pTDefRegMap(@Self)^.clr := $00000080
  87782. else
  87783. pTDefRegMap(@Self)^.&set := $00000080;
  87784. end;
  87785. function TCAN1_C1FIFOCON15.getTXEN : TBits_1; inline;
  87786. begin
  87787. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  87788. end;
  87789. procedure TCAN1_C1FIFOCON15.setDONLY; inline;
  87790. begin
  87791. pTDefRegMap(@Self)^.&set := $00001000;
  87792. end;
  87793. procedure TCAN1_C1FIFOCON15.clearDONLY; inline;
  87794. begin
  87795. pTDefRegMap(@Self)^.clr := $00001000;
  87796. end;
  87797. procedure TCAN1_C1FIFOCON15.setDONLY(thebits : TBits_1); inline;
  87798. begin
  87799. if thebits = 0 then
  87800. pTDefRegMap(@Self)^.clr := $00001000
  87801. else
  87802. pTDefRegMap(@Self)^.&set := $00001000;
  87803. end;
  87804. function TCAN1_C1FIFOCON15.getDONLY : TBits_1; inline;
  87805. begin
  87806. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  87807. end;
  87808. procedure TCAN1_C1FIFOCON15.setUINC; inline;
  87809. begin
  87810. pTDefRegMap(@Self)^.&set := $00002000;
  87811. end;
  87812. procedure TCAN1_C1FIFOCON15.clearUINC; inline;
  87813. begin
  87814. pTDefRegMap(@Self)^.clr := $00002000;
  87815. end;
  87816. procedure TCAN1_C1FIFOCON15.setUINC(thebits : TBits_1); inline;
  87817. begin
  87818. if thebits = 0 then
  87819. pTDefRegMap(@Self)^.clr := $00002000
  87820. else
  87821. pTDefRegMap(@Self)^.&set := $00002000;
  87822. end;
  87823. function TCAN1_C1FIFOCON15.getUINC : TBits_1; inline;
  87824. begin
  87825. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  87826. end;
  87827. procedure TCAN1_C1FIFOCON15.setFRESET; inline;
  87828. begin
  87829. pTDefRegMap(@Self)^.&set := $00004000;
  87830. end;
  87831. procedure TCAN1_C1FIFOCON15.clearFRESET; inline;
  87832. begin
  87833. pTDefRegMap(@Self)^.clr := $00004000;
  87834. end;
  87835. procedure TCAN1_C1FIFOCON15.setFRESET(thebits : TBits_1); inline;
  87836. begin
  87837. if thebits = 0 then
  87838. pTDefRegMap(@Self)^.clr := $00004000
  87839. else
  87840. pTDefRegMap(@Self)^.&set := $00004000;
  87841. end;
  87842. function TCAN1_C1FIFOCON15.getFRESET : TBits_1; inline;
  87843. begin
  87844. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  87845. end;
  87846. procedure TCAN1_C1FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  87847. begin
  87848. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  87849. end;
  87850. function TCAN1_C1FIFOCON15.getFSIZE : TBits_5; inline;
  87851. begin
  87852. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  87853. end;
  87854. procedure TCAN1_C1FIFOCON15.setw(thebits : TBits_32); inline;
  87855. begin
  87856. pTDefRegMap(@Self)^.val := thebits;
  87857. end;
  87858. function TCAN1_C1FIFOCON15.getw : TBits_32; inline;
  87859. begin
  87860. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  87861. end;
  87862. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF; inline;
  87863. begin
  87864. pTDefRegMap(@Self)^.&set := $00000001;
  87865. end;
  87866. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIF; inline;
  87867. begin
  87868. pTDefRegMap(@Self)^.clr := $00000001;
  87869. end;
  87870. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  87871. begin
  87872. if thebits = 0 then
  87873. pTDefRegMap(@Self)^.clr := $00000001
  87874. else
  87875. pTDefRegMap(@Self)^.&set := $00000001;
  87876. end;
  87877. function TCAN1_C1FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  87878. begin
  87879. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  87880. end;
  87881. procedure TCAN1_C1FIFOINT15.setRXHALFIF; inline;
  87882. begin
  87883. pTDefRegMap(@Self)^.&set := $00000002;
  87884. end;
  87885. procedure TCAN1_C1FIFOINT15.clearRXHALFIF; inline;
  87886. begin
  87887. pTDefRegMap(@Self)^.clr := $00000002;
  87888. end;
  87889. procedure TCAN1_C1FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  87890. begin
  87891. if thebits = 0 then
  87892. pTDefRegMap(@Self)^.clr := $00000002
  87893. else
  87894. pTDefRegMap(@Self)^.&set := $00000002;
  87895. end;
  87896. function TCAN1_C1FIFOINT15.getRXHALFIF : TBits_1; inline;
  87897. begin
  87898. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  87899. end;
  87900. procedure TCAN1_C1FIFOINT15.setRXFULLIF; inline;
  87901. begin
  87902. pTDefRegMap(@Self)^.&set := $00000004;
  87903. end;
  87904. procedure TCAN1_C1FIFOINT15.clearRXFULLIF; inline;
  87905. begin
  87906. pTDefRegMap(@Self)^.clr := $00000004;
  87907. end;
  87908. procedure TCAN1_C1FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  87909. begin
  87910. if thebits = 0 then
  87911. pTDefRegMap(@Self)^.clr := $00000004
  87912. else
  87913. pTDefRegMap(@Self)^.&set := $00000004;
  87914. end;
  87915. function TCAN1_C1FIFOINT15.getRXFULLIF : TBits_1; inline;
  87916. begin
  87917. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  87918. end;
  87919. procedure TCAN1_C1FIFOINT15.setRXOVFLIF; inline;
  87920. begin
  87921. pTDefRegMap(@Self)^.&set := $00000008;
  87922. end;
  87923. procedure TCAN1_C1FIFOINT15.clearRXOVFLIF; inline;
  87924. begin
  87925. pTDefRegMap(@Self)^.clr := $00000008;
  87926. end;
  87927. procedure TCAN1_C1FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  87928. begin
  87929. if thebits = 0 then
  87930. pTDefRegMap(@Self)^.clr := $00000008
  87931. else
  87932. pTDefRegMap(@Self)^.&set := $00000008;
  87933. end;
  87934. function TCAN1_C1FIFOINT15.getRXOVFLIF : TBits_1; inline;
  87935. begin
  87936. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  87937. end;
  87938. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF; inline;
  87939. begin
  87940. pTDefRegMap(@Self)^.&set := $00000100;
  87941. end;
  87942. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIF; inline;
  87943. begin
  87944. pTDefRegMap(@Self)^.clr := $00000100;
  87945. end;
  87946. procedure TCAN1_C1FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  87947. begin
  87948. if thebits = 0 then
  87949. pTDefRegMap(@Self)^.clr := $00000100
  87950. else
  87951. pTDefRegMap(@Self)^.&set := $00000100;
  87952. end;
  87953. function TCAN1_C1FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  87954. begin
  87955. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  87956. end;
  87957. procedure TCAN1_C1FIFOINT15.setTXHALFIF; inline;
  87958. begin
  87959. pTDefRegMap(@Self)^.&set := $00000200;
  87960. end;
  87961. procedure TCAN1_C1FIFOINT15.clearTXHALFIF; inline;
  87962. begin
  87963. pTDefRegMap(@Self)^.clr := $00000200;
  87964. end;
  87965. procedure TCAN1_C1FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  87966. begin
  87967. if thebits = 0 then
  87968. pTDefRegMap(@Self)^.clr := $00000200
  87969. else
  87970. pTDefRegMap(@Self)^.&set := $00000200;
  87971. end;
  87972. function TCAN1_C1FIFOINT15.getTXHALFIF : TBits_1; inline;
  87973. begin
  87974. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  87975. end;
  87976. procedure TCAN1_C1FIFOINT15.setTXNFULLIF; inline;
  87977. begin
  87978. pTDefRegMap(@Self)^.&set := $00000400;
  87979. end;
  87980. procedure TCAN1_C1FIFOINT15.clearTXNFULLIF; inline;
  87981. begin
  87982. pTDefRegMap(@Self)^.clr := $00000400;
  87983. end;
  87984. procedure TCAN1_C1FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  87985. begin
  87986. if thebits = 0 then
  87987. pTDefRegMap(@Self)^.clr := $00000400
  87988. else
  87989. pTDefRegMap(@Self)^.&set := $00000400;
  87990. end;
  87991. function TCAN1_C1FIFOINT15.getTXNFULLIF : TBits_1; inline;
  87992. begin
  87993. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  87994. end;
  87995. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE; inline;
  87996. begin
  87997. pTDefRegMap(@Self)^.&set := $00010000;
  87998. end;
  87999. procedure TCAN1_C1FIFOINT15.clearRXNEMPTYIE; inline;
  88000. begin
  88001. pTDefRegMap(@Self)^.clr := $00010000;
  88002. end;
  88003. procedure TCAN1_C1FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  88004. begin
  88005. if thebits = 0 then
  88006. pTDefRegMap(@Self)^.clr := $00010000
  88007. else
  88008. pTDefRegMap(@Self)^.&set := $00010000;
  88009. end;
  88010. function TCAN1_C1FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  88011. begin
  88012. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  88013. end;
  88014. procedure TCAN1_C1FIFOINT15.setRXHALFIE; inline;
  88015. begin
  88016. pTDefRegMap(@Self)^.&set := $00020000;
  88017. end;
  88018. procedure TCAN1_C1FIFOINT15.clearRXHALFIE; inline;
  88019. begin
  88020. pTDefRegMap(@Self)^.clr := $00020000;
  88021. end;
  88022. procedure TCAN1_C1FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  88023. begin
  88024. if thebits = 0 then
  88025. pTDefRegMap(@Self)^.clr := $00020000
  88026. else
  88027. pTDefRegMap(@Self)^.&set := $00020000;
  88028. end;
  88029. function TCAN1_C1FIFOINT15.getRXHALFIE : TBits_1; inline;
  88030. begin
  88031. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  88032. end;
  88033. procedure TCAN1_C1FIFOINT15.setRXFULLIE; inline;
  88034. begin
  88035. pTDefRegMap(@Self)^.&set := $00040000;
  88036. end;
  88037. procedure TCAN1_C1FIFOINT15.clearRXFULLIE; inline;
  88038. begin
  88039. pTDefRegMap(@Self)^.clr := $00040000;
  88040. end;
  88041. procedure TCAN1_C1FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  88042. begin
  88043. if thebits = 0 then
  88044. pTDefRegMap(@Self)^.clr := $00040000
  88045. else
  88046. pTDefRegMap(@Self)^.&set := $00040000;
  88047. end;
  88048. function TCAN1_C1FIFOINT15.getRXFULLIE : TBits_1; inline;
  88049. begin
  88050. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  88051. end;
  88052. procedure TCAN1_C1FIFOINT15.setRXOVFLIE; inline;
  88053. begin
  88054. pTDefRegMap(@Self)^.&set := $00080000;
  88055. end;
  88056. procedure TCAN1_C1FIFOINT15.clearRXOVFLIE; inline;
  88057. begin
  88058. pTDefRegMap(@Self)^.clr := $00080000;
  88059. end;
  88060. procedure TCAN1_C1FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  88061. begin
  88062. if thebits = 0 then
  88063. pTDefRegMap(@Self)^.clr := $00080000
  88064. else
  88065. pTDefRegMap(@Self)^.&set := $00080000;
  88066. end;
  88067. function TCAN1_C1FIFOINT15.getRXOVFLIE : TBits_1; inline;
  88068. begin
  88069. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  88070. end;
  88071. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE; inline;
  88072. begin
  88073. pTDefRegMap(@Self)^.&set := $01000000;
  88074. end;
  88075. procedure TCAN1_C1FIFOINT15.clearTXEMPTYIE; inline;
  88076. begin
  88077. pTDefRegMap(@Self)^.clr := $01000000;
  88078. end;
  88079. procedure TCAN1_C1FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  88080. begin
  88081. if thebits = 0 then
  88082. pTDefRegMap(@Self)^.clr := $01000000
  88083. else
  88084. pTDefRegMap(@Self)^.&set := $01000000;
  88085. end;
  88086. function TCAN1_C1FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  88087. begin
  88088. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  88089. end;
  88090. procedure TCAN1_C1FIFOINT15.setTXHALFIE; inline;
  88091. begin
  88092. pTDefRegMap(@Self)^.&set := $02000000;
  88093. end;
  88094. procedure TCAN1_C1FIFOINT15.clearTXHALFIE; inline;
  88095. begin
  88096. pTDefRegMap(@Self)^.clr := $02000000;
  88097. end;
  88098. procedure TCAN1_C1FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  88099. begin
  88100. if thebits = 0 then
  88101. pTDefRegMap(@Self)^.clr := $02000000
  88102. else
  88103. pTDefRegMap(@Self)^.&set := $02000000;
  88104. end;
  88105. function TCAN1_C1FIFOINT15.getTXHALFIE : TBits_1; inline;
  88106. begin
  88107. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  88108. end;
  88109. procedure TCAN1_C1FIFOINT15.setTXNFULLIE; inline;
  88110. begin
  88111. pTDefRegMap(@Self)^.&set := $04000000;
  88112. end;
  88113. procedure TCAN1_C1FIFOINT15.clearTXNFULLIE; inline;
  88114. begin
  88115. pTDefRegMap(@Self)^.clr := $04000000;
  88116. end;
  88117. procedure TCAN1_C1FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  88118. begin
  88119. if thebits = 0 then
  88120. pTDefRegMap(@Self)^.clr := $04000000
  88121. else
  88122. pTDefRegMap(@Self)^.&set := $04000000;
  88123. end;
  88124. function TCAN1_C1FIFOINT15.getTXNFULLIE : TBits_1; inline;
  88125. begin
  88126. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  88127. end;
  88128. procedure TCAN1_C1FIFOINT15.setw(thebits : TBits_32); inline;
  88129. begin
  88130. pTDefRegMap(@Self)^.val := thebits;
  88131. end;
  88132. function TCAN1_C1FIFOINT15.getw : TBits_32; inline;
  88133. begin
  88134. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88135. end;
  88136. procedure TCAN1_C1FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  88137. begin
  88138. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  88139. end;
  88140. function TCAN1_C1FIFOCI15.getCFIFOCI : TBits_5; inline;
  88141. begin
  88142. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  88143. end;
  88144. procedure TCAN1_C1FIFOCI15.setw(thebits : TBits_32); inline;
  88145. begin
  88146. pTDefRegMap(@Self)^.val := thebits;
  88147. end;
  88148. function TCAN1_C1FIFOCI15.getw : TBits_32; inline;
  88149. begin
  88150. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88151. end;
  88152. procedure TCAN1_C1FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  88153. begin
  88154. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  88155. end;
  88156. function TCAN1_C1FIFOCON16.getTXPRI : TBits_2; inline;
  88157. begin
  88158. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  88159. end;
  88160. procedure TCAN1_C1FIFOCON16.setRTREN; inline;
  88161. begin
  88162. pTDefRegMap(@Self)^.&set := $00000004;
  88163. end;
  88164. procedure TCAN1_C1FIFOCON16.clearRTREN; inline;
  88165. begin
  88166. pTDefRegMap(@Self)^.clr := $00000004;
  88167. end;
  88168. procedure TCAN1_C1FIFOCON16.setRTREN(thebits : TBits_1); inline;
  88169. begin
  88170. if thebits = 0 then
  88171. pTDefRegMap(@Self)^.clr := $00000004
  88172. else
  88173. pTDefRegMap(@Self)^.&set := $00000004;
  88174. end;
  88175. function TCAN1_C1FIFOCON16.getRTREN : TBits_1; inline;
  88176. begin
  88177. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88178. end;
  88179. procedure TCAN1_C1FIFOCON16.setTXREQ; inline;
  88180. begin
  88181. pTDefRegMap(@Self)^.&set := $00000008;
  88182. end;
  88183. procedure TCAN1_C1FIFOCON16.clearTXREQ; inline;
  88184. begin
  88185. pTDefRegMap(@Self)^.clr := $00000008;
  88186. end;
  88187. procedure TCAN1_C1FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  88188. begin
  88189. if thebits = 0 then
  88190. pTDefRegMap(@Self)^.clr := $00000008
  88191. else
  88192. pTDefRegMap(@Self)^.&set := $00000008;
  88193. end;
  88194. function TCAN1_C1FIFOCON16.getTXREQ : TBits_1; inline;
  88195. begin
  88196. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88197. end;
  88198. procedure TCAN1_C1FIFOCON16.setTXERR; inline;
  88199. begin
  88200. pTDefRegMap(@Self)^.&set := $00000010;
  88201. end;
  88202. procedure TCAN1_C1FIFOCON16.clearTXERR; inline;
  88203. begin
  88204. pTDefRegMap(@Self)^.clr := $00000010;
  88205. end;
  88206. procedure TCAN1_C1FIFOCON16.setTXERR(thebits : TBits_1); inline;
  88207. begin
  88208. if thebits = 0 then
  88209. pTDefRegMap(@Self)^.clr := $00000010
  88210. else
  88211. pTDefRegMap(@Self)^.&set := $00000010;
  88212. end;
  88213. function TCAN1_C1FIFOCON16.getTXERR : TBits_1; inline;
  88214. begin
  88215. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  88216. end;
  88217. procedure TCAN1_C1FIFOCON16.setTXLARB; inline;
  88218. begin
  88219. pTDefRegMap(@Self)^.&set := $00000020;
  88220. end;
  88221. procedure TCAN1_C1FIFOCON16.clearTXLARB; inline;
  88222. begin
  88223. pTDefRegMap(@Self)^.clr := $00000020;
  88224. end;
  88225. procedure TCAN1_C1FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  88226. begin
  88227. if thebits = 0 then
  88228. pTDefRegMap(@Self)^.clr := $00000020
  88229. else
  88230. pTDefRegMap(@Self)^.&set := $00000020;
  88231. end;
  88232. function TCAN1_C1FIFOCON16.getTXLARB : TBits_1; inline;
  88233. begin
  88234. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  88235. end;
  88236. procedure TCAN1_C1FIFOCON16.setTXABAT; inline;
  88237. begin
  88238. pTDefRegMap(@Self)^.&set := $00000040;
  88239. end;
  88240. procedure TCAN1_C1FIFOCON16.clearTXABAT; inline;
  88241. begin
  88242. pTDefRegMap(@Self)^.clr := $00000040;
  88243. end;
  88244. procedure TCAN1_C1FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  88245. begin
  88246. if thebits = 0 then
  88247. pTDefRegMap(@Self)^.clr := $00000040
  88248. else
  88249. pTDefRegMap(@Self)^.&set := $00000040;
  88250. end;
  88251. function TCAN1_C1FIFOCON16.getTXABAT : TBits_1; inline;
  88252. begin
  88253. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  88254. end;
  88255. procedure TCAN1_C1FIFOCON16.setTXEN; inline;
  88256. begin
  88257. pTDefRegMap(@Self)^.&set := $00000080;
  88258. end;
  88259. procedure TCAN1_C1FIFOCON16.clearTXEN; inline;
  88260. begin
  88261. pTDefRegMap(@Self)^.clr := $00000080;
  88262. end;
  88263. procedure TCAN1_C1FIFOCON16.setTXEN(thebits : TBits_1); inline;
  88264. begin
  88265. if thebits = 0 then
  88266. pTDefRegMap(@Self)^.clr := $00000080
  88267. else
  88268. pTDefRegMap(@Self)^.&set := $00000080;
  88269. end;
  88270. function TCAN1_C1FIFOCON16.getTXEN : TBits_1; inline;
  88271. begin
  88272. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  88273. end;
  88274. procedure TCAN1_C1FIFOCON16.setDONLY; inline;
  88275. begin
  88276. pTDefRegMap(@Self)^.&set := $00001000;
  88277. end;
  88278. procedure TCAN1_C1FIFOCON16.clearDONLY; inline;
  88279. begin
  88280. pTDefRegMap(@Self)^.clr := $00001000;
  88281. end;
  88282. procedure TCAN1_C1FIFOCON16.setDONLY(thebits : TBits_1); inline;
  88283. begin
  88284. if thebits = 0 then
  88285. pTDefRegMap(@Self)^.clr := $00001000
  88286. else
  88287. pTDefRegMap(@Self)^.&set := $00001000;
  88288. end;
  88289. function TCAN1_C1FIFOCON16.getDONLY : TBits_1; inline;
  88290. begin
  88291. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  88292. end;
  88293. procedure TCAN1_C1FIFOCON16.setUINC; inline;
  88294. begin
  88295. pTDefRegMap(@Self)^.&set := $00002000;
  88296. end;
  88297. procedure TCAN1_C1FIFOCON16.clearUINC; inline;
  88298. begin
  88299. pTDefRegMap(@Self)^.clr := $00002000;
  88300. end;
  88301. procedure TCAN1_C1FIFOCON16.setUINC(thebits : TBits_1); inline;
  88302. begin
  88303. if thebits = 0 then
  88304. pTDefRegMap(@Self)^.clr := $00002000
  88305. else
  88306. pTDefRegMap(@Self)^.&set := $00002000;
  88307. end;
  88308. function TCAN1_C1FIFOCON16.getUINC : TBits_1; inline;
  88309. begin
  88310. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  88311. end;
  88312. procedure TCAN1_C1FIFOCON16.setFRESET; inline;
  88313. begin
  88314. pTDefRegMap(@Self)^.&set := $00004000;
  88315. end;
  88316. procedure TCAN1_C1FIFOCON16.clearFRESET; inline;
  88317. begin
  88318. pTDefRegMap(@Self)^.clr := $00004000;
  88319. end;
  88320. procedure TCAN1_C1FIFOCON16.setFRESET(thebits : TBits_1); inline;
  88321. begin
  88322. if thebits = 0 then
  88323. pTDefRegMap(@Self)^.clr := $00004000
  88324. else
  88325. pTDefRegMap(@Self)^.&set := $00004000;
  88326. end;
  88327. function TCAN1_C1FIFOCON16.getFRESET : TBits_1; inline;
  88328. begin
  88329. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  88330. end;
  88331. procedure TCAN1_C1FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  88332. begin
  88333. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  88334. end;
  88335. function TCAN1_C1FIFOCON16.getFSIZE : TBits_5; inline;
  88336. begin
  88337. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  88338. end;
  88339. procedure TCAN1_C1FIFOCON16.setw(thebits : TBits_32); inline;
  88340. begin
  88341. pTDefRegMap(@Self)^.val := thebits;
  88342. end;
  88343. function TCAN1_C1FIFOCON16.getw : TBits_32; inline;
  88344. begin
  88345. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88346. end;
  88347. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF; inline;
  88348. begin
  88349. pTDefRegMap(@Self)^.&set := $00000001;
  88350. end;
  88351. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIF; inline;
  88352. begin
  88353. pTDefRegMap(@Self)^.clr := $00000001;
  88354. end;
  88355. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  88356. begin
  88357. if thebits = 0 then
  88358. pTDefRegMap(@Self)^.clr := $00000001
  88359. else
  88360. pTDefRegMap(@Self)^.&set := $00000001;
  88361. end;
  88362. function TCAN1_C1FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  88363. begin
  88364. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  88365. end;
  88366. procedure TCAN1_C1FIFOINT16.setRXHALFIF; inline;
  88367. begin
  88368. pTDefRegMap(@Self)^.&set := $00000002;
  88369. end;
  88370. procedure TCAN1_C1FIFOINT16.clearRXHALFIF; inline;
  88371. begin
  88372. pTDefRegMap(@Self)^.clr := $00000002;
  88373. end;
  88374. procedure TCAN1_C1FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  88375. begin
  88376. if thebits = 0 then
  88377. pTDefRegMap(@Self)^.clr := $00000002
  88378. else
  88379. pTDefRegMap(@Self)^.&set := $00000002;
  88380. end;
  88381. function TCAN1_C1FIFOINT16.getRXHALFIF : TBits_1; inline;
  88382. begin
  88383. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  88384. end;
  88385. procedure TCAN1_C1FIFOINT16.setRXFULLIF; inline;
  88386. begin
  88387. pTDefRegMap(@Self)^.&set := $00000004;
  88388. end;
  88389. procedure TCAN1_C1FIFOINT16.clearRXFULLIF; inline;
  88390. begin
  88391. pTDefRegMap(@Self)^.clr := $00000004;
  88392. end;
  88393. procedure TCAN1_C1FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  88394. begin
  88395. if thebits = 0 then
  88396. pTDefRegMap(@Self)^.clr := $00000004
  88397. else
  88398. pTDefRegMap(@Self)^.&set := $00000004;
  88399. end;
  88400. function TCAN1_C1FIFOINT16.getRXFULLIF : TBits_1; inline;
  88401. begin
  88402. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88403. end;
  88404. procedure TCAN1_C1FIFOINT16.setRXOVFLIF; inline;
  88405. begin
  88406. pTDefRegMap(@Self)^.&set := $00000008;
  88407. end;
  88408. procedure TCAN1_C1FIFOINT16.clearRXOVFLIF; inline;
  88409. begin
  88410. pTDefRegMap(@Self)^.clr := $00000008;
  88411. end;
  88412. procedure TCAN1_C1FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  88413. begin
  88414. if thebits = 0 then
  88415. pTDefRegMap(@Self)^.clr := $00000008
  88416. else
  88417. pTDefRegMap(@Self)^.&set := $00000008;
  88418. end;
  88419. function TCAN1_C1FIFOINT16.getRXOVFLIF : TBits_1; inline;
  88420. begin
  88421. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88422. end;
  88423. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF; inline;
  88424. begin
  88425. pTDefRegMap(@Self)^.&set := $00000100;
  88426. end;
  88427. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIF; inline;
  88428. begin
  88429. pTDefRegMap(@Self)^.clr := $00000100;
  88430. end;
  88431. procedure TCAN1_C1FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  88432. begin
  88433. if thebits = 0 then
  88434. pTDefRegMap(@Self)^.clr := $00000100
  88435. else
  88436. pTDefRegMap(@Self)^.&set := $00000100;
  88437. end;
  88438. function TCAN1_C1FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  88439. begin
  88440. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  88441. end;
  88442. procedure TCAN1_C1FIFOINT16.setTXHALFIF; inline;
  88443. begin
  88444. pTDefRegMap(@Self)^.&set := $00000200;
  88445. end;
  88446. procedure TCAN1_C1FIFOINT16.clearTXHALFIF; inline;
  88447. begin
  88448. pTDefRegMap(@Self)^.clr := $00000200;
  88449. end;
  88450. procedure TCAN1_C1FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  88451. begin
  88452. if thebits = 0 then
  88453. pTDefRegMap(@Self)^.clr := $00000200
  88454. else
  88455. pTDefRegMap(@Self)^.&set := $00000200;
  88456. end;
  88457. function TCAN1_C1FIFOINT16.getTXHALFIF : TBits_1; inline;
  88458. begin
  88459. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  88460. end;
  88461. procedure TCAN1_C1FIFOINT16.setTXNFULLIF; inline;
  88462. begin
  88463. pTDefRegMap(@Self)^.&set := $00000400;
  88464. end;
  88465. procedure TCAN1_C1FIFOINT16.clearTXNFULLIF; inline;
  88466. begin
  88467. pTDefRegMap(@Self)^.clr := $00000400;
  88468. end;
  88469. procedure TCAN1_C1FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  88470. begin
  88471. if thebits = 0 then
  88472. pTDefRegMap(@Self)^.clr := $00000400
  88473. else
  88474. pTDefRegMap(@Self)^.&set := $00000400;
  88475. end;
  88476. function TCAN1_C1FIFOINT16.getTXNFULLIF : TBits_1; inline;
  88477. begin
  88478. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  88479. end;
  88480. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE; inline;
  88481. begin
  88482. pTDefRegMap(@Self)^.&set := $00010000;
  88483. end;
  88484. procedure TCAN1_C1FIFOINT16.clearRXNEMPTYIE; inline;
  88485. begin
  88486. pTDefRegMap(@Self)^.clr := $00010000;
  88487. end;
  88488. procedure TCAN1_C1FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  88489. begin
  88490. if thebits = 0 then
  88491. pTDefRegMap(@Self)^.clr := $00010000
  88492. else
  88493. pTDefRegMap(@Self)^.&set := $00010000;
  88494. end;
  88495. function TCAN1_C1FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  88496. begin
  88497. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  88498. end;
  88499. procedure TCAN1_C1FIFOINT16.setRXHALFIE; inline;
  88500. begin
  88501. pTDefRegMap(@Self)^.&set := $00020000;
  88502. end;
  88503. procedure TCAN1_C1FIFOINT16.clearRXHALFIE; inline;
  88504. begin
  88505. pTDefRegMap(@Self)^.clr := $00020000;
  88506. end;
  88507. procedure TCAN1_C1FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  88508. begin
  88509. if thebits = 0 then
  88510. pTDefRegMap(@Self)^.clr := $00020000
  88511. else
  88512. pTDefRegMap(@Self)^.&set := $00020000;
  88513. end;
  88514. function TCAN1_C1FIFOINT16.getRXHALFIE : TBits_1; inline;
  88515. begin
  88516. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  88517. end;
  88518. procedure TCAN1_C1FIFOINT16.setRXFULLIE; inline;
  88519. begin
  88520. pTDefRegMap(@Self)^.&set := $00040000;
  88521. end;
  88522. procedure TCAN1_C1FIFOINT16.clearRXFULLIE; inline;
  88523. begin
  88524. pTDefRegMap(@Self)^.clr := $00040000;
  88525. end;
  88526. procedure TCAN1_C1FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  88527. begin
  88528. if thebits = 0 then
  88529. pTDefRegMap(@Self)^.clr := $00040000
  88530. else
  88531. pTDefRegMap(@Self)^.&set := $00040000;
  88532. end;
  88533. function TCAN1_C1FIFOINT16.getRXFULLIE : TBits_1; inline;
  88534. begin
  88535. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  88536. end;
  88537. procedure TCAN1_C1FIFOINT16.setRXOVFLIE; inline;
  88538. begin
  88539. pTDefRegMap(@Self)^.&set := $00080000;
  88540. end;
  88541. procedure TCAN1_C1FIFOINT16.clearRXOVFLIE; inline;
  88542. begin
  88543. pTDefRegMap(@Self)^.clr := $00080000;
  88544. end;
  88545. procedure TCAN1_C1FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  88546. begin
  88547. if thebits = 0 then
  88548. pTDefRegMap(@Self)^.clr := $00080000
  88549. else
  88550. pTDefRegMap(@Self)^.&set := $00080000;
  88551. end;
  88552. function TCAN1_C1FIFOINT16.getRXOVFLIE : TBits_1; inline;
  88553. begin
  88554. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  88555. end;
  88556. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE; inline;
  88557. begin
  88558. pTDefRegMap(@Self)^.&set := $01000000;
  88559. end;
  88560. procedure TCAN1_C1FIFOINT16.clearTXEMPTYIE; inline;
  88561. begin
  88562. pTDefRegMap(@Self)^.clr := $01000000;
  88563. end;
  88564. procedure TCAN1_C1FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  88565. begin
  88566. if thebits = 0 then
  88567. pTDefRegMap(@Self)^.clr := $01000000
  88568. else
  88569. pTDefRegMap(@Self)^.&set := $01000000;
  88570. end;
  88571. function TCAN1_C1FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  88572. begin
  88573. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  88574. end;
  88575. procedure TCAN1_C1FIFOINT16.setTXHALFIE; inline;
  88576. begin
  88577. pTDefRegMap(@Self)^.&set := $02000000;
  88578. end;
  88579. procedure TCAN1_C1FIFOINT16.clearTXHALFIE; inline;
  88580. begin
  88581. pTDefRegMap(@Self)^.clr := $02000000;
  88582. end;
  88583. procedure TCAN1_C1FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  88584. begin
  88585. if thebits = 0 then
  88586. pTDefRegMap(@Self)^.clr := $02000000
  88587. else
  88588. pTDefRegMap(@Self)^.&set := $02000000;
  88589. end;
  88590. function TCAN1_C1FIFOINT16.getTXHALFIE : TBits_1; inline;
  88591. begin
  88592. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  88593. end;
  88594. procedure TCAN1_C1FIFOINT16.setTXNFULLIE; inline;
  88595. begin
  88596. pTDefRegMap(@Self)^.&set := $04000000;
  88597. end;
  88598. procedure TCAN1_C1FIFOINT16.clearTXNFULLIE; inline;
  88599. begin
  88600. pTDefRegMap(@Self)^.clr := $04000000;
  88601. end;
  88602. procedure TCAN1_C1FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  88603. begin
  88604. if thebits = 0 then
  88605. pTDefRegMap(@Self)^.clr := $04000000
  88606. else
  88607. pTDefRegMap(@Self)^.&set := $04000000;
  88608. end;
  88609. function TCAN1_C1FIFOINT16.getTXNFULLIE : TBits_1; inline;
  88610. begin
  88611. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  88612. end;
  88613. procedure TCAN1_C1FIFOINT16.setw(thebits : TBits_32); inline;
  88614. begin
  88615. pTDefRegMap(@Self)^.val := thebits;
  88616. end;
  88617. function TCAN1_C1FIFOINT16.getw : TBits_32; inline;
  88618. begin
  88619. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88620. end;
  88621. procedure TCAN1_C1FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  88622. begin
  88623. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  88624. end;
  88625. function TCAN1_C1FIFOCI16.getCFIFOCI : TBits_5; inline;
  88626. begin
  88627. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  88628. end;
  88629. procedure TCAN1_C1FIFOCI16.setw(thebits : TBits_32); inline;
  88630. begin
  88631. pTDefRegMap(@Self)^.val := thebits;
  88632. end;
  88633. function TCAN1_C1FIFOCI16.getw : TBits_32; inline;
  88634. begin
  88635. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88636. end;
  88637. procedure TCAN1_C1FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  88638. begin
  88639. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  88640. end;
  88641. function TCAN1_C1FIFOCON17.getTXPRI : TBits_2; inline;
  88642. begin
  88643. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  88644. end;
  88645. procedure TCAN1_C1FIFOCON17.setRTREN; inline;
  88646. begin
  88647. pTDefRegMap(@Self)^.&set := $00000004;
  88648. end;
  88649. procedure TCAN1_C1FIFOCON17.clearRTREN; inline;
  88650. begin
  88651. pTDefRegMap(@Self)^.clr := $00000004;
  88652. end;
  88653. procedure TCAN1_C1FIFOCON17.setRTREN(thebits : TBits_1); inline;
  88654. begin
  88655. if thebits = 0 then
  88656. pTDefRegMap(@Self)^.clr := $00000004
  88657. else
  88658. pTDefRegMap(@Self)^.&set := $00000004;
  88659. end;
  88660. function TCAN1_C1FIFOCON17.getRTREN : TBits_1; inline;
  88661. begin
  88662. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88663. end;
  88664. procedure TCAN1_C1FIFOCON17.setTXREQ; inline;
  88665. begin
  88666. pTDefRegMap(@Self)^.&set := $00000008;
  88667. end;
  88668. procedure TCAN1_C1FIFOCON17.clearTXREQ; inline;
  88669. begin
  88670. pTDefRegMap(@Self)^.clr := $00000008;
  88671. end;
  88672. procedure TCAN1_C1FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  88673. begin
  88674. if thebits = 0 then
  88675. pTDefRegMap(@Self)^.clr := $00000008
  88676. else
  88677. pTDefRegMap(@Self)^.&set := $00000008;
  88678. end;
  88679. function TCAN1_C1FIFOCON17.getTXREQ : TBits_1; inline;
  88680. begin
  88681. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88682. end;
  88683. procedure TCAN1_C1FIFOCON17.setTXERR; inline;
  88684. begin
  88685. pTDefRegMap(@Self)^.&set := $00000010;
  88686. end;
  88687. procedure TCAN1_C1FIFOCON17.clearTXERR; inline;
  88688. begin
  88689. pTDefRegMap(@Self)^.clr := $00000010;
  88690. end;
  88691. procedure TCAN1_C1FIFOCON17.setTXERR(thebits : TBits_1); inline;
  88692. begin
  88693. if thebits = 0 then
  88694. pTDefRegMap(@Self)^.clr := $00000010
  88695. else
  88696. pTDefRegMap(@Self)^.&set := $00000010;
  88697. end;
  88698. function TCAN1_C1FIFOCON17.getTXERR : TBits_1; inline;
  88699. begin
  88700. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  88701. end;
  88702. procedure TCAN1_C1FIFOCON17.setTXLARB; inline;
  88703. begin
  88704. pTDefRegMap(@Self)^.&set := $00000020;
  88705. end;
  88706. procedure TCAN1_C1FIFOCON17.clearTXLARB; inline;
  88707. begin
  88708. pTDefRegMap(@Self)^.clr := $00000020;
  88709. end;
  88710. procedure TCAN1_C1FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  88711. begin
  88712. if thebits = 0 then
  88713. pTDefRegMap(@Self)^.clr := $00000020
  88714. else
  88715. pTDefRegMap(@Self)^.&set := $00000020;
  88716. end;
  88717. function TCAN1_C1FIFOCON17.getTXLARB : TBits_1; inline;
  88718. begin
  88719. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  88720. end;
  88721. procedure TCAN1_C1FIFOCON17.setTXABAT; inline;
  88722. begin
  88723. pTDefRegMap(@Self)^.&set := $00000040;
  88724. end;
  88725. procedure TCAN1_C1FIFOCON17.clearTXABAT; inline;
  88726. begin
  88727. pTDefRegMap(@Self)^.clr := $00000040;
  88728. end;
  88729. procedure TCAN1_C1FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  88730. begin
  88731. if thebits = 0 then
  88732. pTDefRegMap(@Self)^.clr := $00000040
  88733. else
  88734. pTDefRegMap(@Self)^.&set := $00000040;
  88735. end;
  88736. function TCAN1_C1FIFOCON17.getTXABAT : TBits_1; inline;
  88737. begin
  88738. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  88739. end;
  88740. procedure TCAN1_C1FIFOCON17.setTXEN; inline;
  88741. begin
  88742. pTDefRegMap(@Self)^.&set := $00000080;
  88743. end;
  88744. procedure TCAN1_C1FIFOCON17.clearTXEN; inline;
  88745. begin
  88746. pTDefRegMap(@Self)^.clr := $00000080;
  88747. end;
  88748. procedure TCAN1_C1FIFOCON17.setTXEN(thebits : TBits_1); inline;
  88749. begin
  88750. if thebits = 0 then
  88751. pTDefRegMap(@Self)^.clr := $00000080
  88752. else
  88753. pTDefRegMap(@Self)^.&set := $00000080;
  88754. end;
  88755. function TCAN1_C1FIFOCON17.getTXEN : TBits_1; inline;
  88756. begin
  88757. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  88758. end;
  88759. procedure TCAN1_C1FIFOCON17.setDONLY; inline;
  88760. begin
  88761. pTDefRegMap(@Self)^.&set := $00001000;
  88762. end;
  88763. procedure TCAN1_C1FIFOCON17.clearDONLY; inline;
  88764. begin
  88765. pTDefRegMap(@Self)^.clr := $00001000;
  88766. end;
  88767. procedure TCAN1_C1FIFOCON17.setDONLY(thebits : TBits_1); inline;
  88768. begin
  88769. if thebits = 0 then
  88770. pTDefRegMap(@Self)^.clr := $00001000
  88771. else
  88772. pTDefRegMap(@Self)^.&set := $00001000;
  88773. end;
  88774. function TCAN1_C1FIFOCON17.getDONLY : TBits_1; inline;
  88775. begin
  88776. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  88777. end;
  88778. procedure TCAN1_C1FIFOCON17.setUINC; inline;
  88779. begin
  88780. pTDefRegMap(@Self)^.&set := $00002000;
  88781. end;
  88782. procedure TCAN1_C1FIFOCON17.clearUINC; inline;
  88783. begin
  88784. pTDefRegMap(@Self)^.clr := $00002000;
  88785. end;
  88786. procedure TCAN1_C1FIFOCON17.setUINC(thebits : TBits_1); inline;
  88787. begin
  88788. if thebits = 0 then
  88789. pTDefRegMap(@Self)^.clr := $00002000
  88790. else
  88791. pTDefRegMap(@Self)^.&set := $00002000;
  88792. end;
  88793. function TCAN1_C1FIFOCON17.getUINC : TBits_1; inline;
  88794. begin
  88795. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  88796. end;
  88797. procedure TCAN1_C1FIFOCON17.setFRESET; inline;
  88798. begin
  88799. pTDefRegMap(@Self)^.&set := $00004000;
  88800. end;
  88801. procedure TCAN1_C1FIFOCON17.clearFRESET; inline;
  88802. begin
  88803. pTDefRegMap(@Self)^.clr := $00004000;
  88804. end;
  88805. procedure TCAN1_C1FIFOCON17.setFRESET(thebits : TBits_1); inline;
  88806. begin
  88807. if thebits = 0 then
  88808. pTDefRegMap(@Self)^.clr := $00004000
  88809. else
  88810. pTDefRegMap(@Self)^.&set := $00004000;
  88811. end;
  88812. function TCAN1_C1FIFOCON17.getFRESET : TBits_1; inline;
  88813. begin
  88814. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  88815. end;
  88816. procedure TCAN1_C1FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  88817. begin
  88818. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  88819. end;
  88820. function TCAN1_C1FIFOCON17.getFSIZE : TBits_5; inline;
  88821. begin
  88822. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  88823. end;
  88824. procedure TCAN1_C1FIFOCON17.setw(thebits : TBits_32); inline;
  88825. begin
  88826. pTDefRegMap(@Self)^.val := thebits;
  88827. end;
  88828. function TCAN1_C1FIFOCON17.getw : TBits_32; inline;
  88829. begin
  88830. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  88831. end;
  88832. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF; inline;
  88833. begin
  88834. pTDefRegMap(@Self)^.&set := $00000001;
  88835. end;
  88836. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIF; inline;
  88837. begin
  88838. pTDefRegMap(@Self)^.clr := $00000001;
  88839. end;
  88840. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  88841. begin
  88842. if thebits = 0 then
  88843. pTDefRegMap(@Self)^.clr := $00000001
  88844. else
  88845. pTDefRegMap(@Self)^.&set := $00000001;
  88846. end;
  88847. function TCAN1_C1FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  88848. begin
  88849. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  88850. end;
  88851. procedure TCAN1_C1FIFOINT17.setRXHALFIF; inline;
  88852. begin
  88853. pTDefRegMap(@Self)^.&set := $00000002;
  88854. end;
  88855. procedure TCAN1_C1FIFOINT17.clearRXHALFIF; inline;
  88856. begin
  88857. pTDefRegMap(@Self)^.clr := $00000002;
  88858. end;
  88859. procedure TCAN1_C1FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  88860. begin
  88861. if thebits = 0 then
  88862. pTDefRegMap(@Self)^.clr := $00000002
  88863. else
  88864. pTDefRegMap(@Self)^.&set := $00000002;
  88865. end;
  88866. function TCAN1_C1FIFOINT17.getRXHALFIF : TBits_1; inline;
  88867. begin
  88868. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  88869. end;
  88870. procedure TCAN1_C1FIFOINT17.setRXFULLIF; inline;
  88871. begin
  88872. pTDefRegMap(@Self)^.&set := $00000004;
  88873. end;
  88874. procedure TCAN1_C1FIFOINT17.clearRXFULLIF; inline;
  88875. begin
  88876. pTDefRegMap(@Self)^.clr := $00000004;
  88877. end;
  88878. procedure TCAN1_C1FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  88879. begin
  88880. if thebits = 0 then
  88881. pTDefRegMap(@Self)^.clr := $00000004
  88882. else
  88883. pTDefRegMap(@Self)^.&set := $00000004;
  88884. end;
  88885. function TCAN1_C1FIFOINT17.getRXFULLIF : TBits_1; inline;
  88886. begin
  88887. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  88888. end;
  88889. procedure TCAN1_C1FIFOINT17.setRXOVFLIF; inline;
  88890. begin
  88891. pTDefRegMap(@Self)^.&set := $00000008;
  88892. end;
  88893. procedure TCAN1_C1FIFOINT17.clearRXOVFLIF; inline;
  88894. begin
  88895. pTDefRegMap(@Self)^.clr := $00000008;
  88896. end;
  88897. procedure TCAN1_C1FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  88898. begin
  88899. if thebits = 0 then
  88900. pTDefRegMap(@Self)^.clr := $00000008
  88901. else
  88902. pTDefRegMap(@Self)^.&set := $00000008;
  88903. end;
  88904. function TCAN1_C1FIFOINT17.getRXOVFLIF : TBits_1; inline;
  88905. begin
  88906. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  88907. end;
  88908. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF; inline;
  88909. begin
  88910. pTDefRegMap(@Self)^.&set := $00000100;
  88911. end;
  88912. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIF; inline;
  88913. begin
  88914. pTDefRegMap(@Self)^.clr := $00000100;
  88915. end;
  88916. procedure TCAN1_C1FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  88917. begin
  88918. if thebits = 0 then
  88919. pTDefRegMap(@Self)^.clr := $00000100
  88920. else
  88921. pTDefRegMap(@Self)^.&set := $00000100;
  88922. end;
  88923. function TCAN1_C1FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  88924. begin
  88925. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  88926. end;
  88927. procedure TCAN1_C1FIFOINT17.setTXHALFIF; inline;
  88928. begin
  88929. pTDefRegMap(@Self)^.&set := $00000200;
  88930. end;
  88931. procedure TCAN1_C1FIFOINT17.clearTXHALFIF; inline;
  88932. begin
  88933. pTDefRegMap(@Self)^.clr := $00000200;
  88934. end;
  88935. procedure TCAN1_C1FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  88936. begin
  88937. if thebits = 0 then
  88938. pTDefRegMap(@Self)^.clr := $00000200
  88939. else
  88940. pTDefRegMap(@Self)^.&set := $00000200;
  88941. end;
  88942. function TCAN1_C1FIFOINT17.getTXHALFIF : TBits_1; inline;
  88943. begin
  88944. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  88945. end;
  88946. procedure TCAN1_C1FIFOINT17.setTXNFULLIF; inline;
  88947. begin
  88948. pTDefRegMap(@Self)^.&set := $00000400;
  88949. end;
  88950. procedure TCAN1_C1FIFOINT17.clearTXNFULLIF; inline;
  88951. begin
  88952. pTDefRegMap(@Self)^.clr := $00000400;
  88953. end;
  88954. procedure TCAN1_C1FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  88955. begin
  88956. if thebits = 0 then
  88957. pTDefRegMap(@Self)^.clr := $00000400
  88958. else
  88959. pTDefRegMap(@Self)^.&set := $00000400;
  88960. end;
  88961. function TCAN1_C1FIFOINT17.getTXNFULLIF : TBits_1; inline;
  88962. begin
  88963. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  88964. end;
  88965. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE; inline;
  88966. begin
  88967. pTDefRegMap(@Self)^.&set := $00010000;
  88968. end;
  88969. procedure TCAN1_C1FIFOINT17.clearRXNEMPTYIE; inline;
  88970. begin
  88971. pTDefRegMap(@Self)^.clr := $00010000;
  88972. end;
  88973. procedure TCAN1_C1FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  88974. begin
  88975. if thebits = 0 then
  88976. pTDefRegMap(@Self)^.clr := $00010000
  88977. else
  88978. pTDefRegMap(@Self)^.&set := $00010000;
  88979. end;
  88980. function TCAN1_C1FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  88981. begin
  88982. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  88983. end;
  88984. procedure TCAN1_C1FIFOINT17.setRXHALFIE; inline;
  88985. begin
  88986. pTDefRegMap(@Self)^.&set := $00020000;
  88987. end;
  88988. procedure TCAN1_C1FIFOINT17.clearRXHALFIE; inline;
  88989. begin
  88990. pTDefRegMap(@Self)^.clr := $00020000;
  88991. end;
  88992. procedure TCAN1_C1FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  88993. begin
  88994. if thebits = 0 then
  88995. pTDefRegMap(@Self)^.clr := $00020000
  88996. else
  88997. pTDefRegMap(@Self)^.&set := $00020000;
  88998. end;
  88999. function TCAN1_C1FIFOINT17.getRXHALFIE : TBits_1; inline;
  89000. begin
  89001. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  89002. end;
  89003. procedure TCAN1_C1FIFOINT17.setRXFULLIE; inline;
  89004. begin
  89005. pTDefRegMap(@Self)^.&set := $00040000;
  89006. end;
  89007. procedure TCAN1_C1FIFOINT17.clearRXFULLIE; inline;
  89008. begin
  89009. pTDefRegMap(@Self)^.clr := $00040000;
  89010. end;
  89011. procedure TCAN1_C1FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  89012. begin
  89013. if thebits = 0 then
  89014. pTDefRegMap(@Self)^.clr := $00040000
  89015. else
  89016. pTDefRegMap(@Self)^.&set := $00040000;
  89017. end;
  89018. function TCAN1_C1FIFOINT17.getRXFULLIE : TBits_1; inline;
  89019. begin
  89020. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  89021. end;
  89022. procedure TCAN1_C1FIFOINT17.setRXOVFLIE; inline;
  89023. begin
  89024. pTDefRegMap(@Self)^.&set := $00080000;
  89025. end;
  89026. procedure TCAN1_C1FIFOINT17.clearRXOVFLIE; inline;
  89027. begin
  89028. pTDefRegMap(@Self)^.clr := $00080000;
  89029. end;
  89030. procedure TCAN1_C1FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  89031. begin
  89032. if thebits = 0 then
  89033. pTDefRegMap(@Self)^.clr := $00080000
  89034. else
  89035. pTDefRegMap(@Self)^.&set := $00080000;
  89036. end;
  89037. function TCAN1_C1FIFOINT17.getRXOVFLIE : TBits_1; inline;
  89038. begin
  89039. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  89040. end;
  89041. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE; inline;
  89042. begin
  89043. pTDefRegMap(@Self)^.&set := $01000000;
  89044. end;
  89045. procedure TCAN1_C1FIFOINT17.clearTXEMPTYIE; inline;
  89046. begin
  89047. pTDefRegMap(@Self)^.clr := $01000000;
  89048. end;
  89049. procedure TCAN1_C1FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  89050. begin
  89051. if thebits = 0 then
  89052. pTDefRegMap(@Self)^.clr := $01000000
  89053. else
  89054. pTDefRegMap(@Self)^.&set := $01000000;
  89055. end;
  89056. function TCAN1_C1FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  89057. begin
  89058. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  89059. end;
  89060. procedure TCAN1_C1FIFOINT17.setTXHALFIE; inline;
  89061. begin
  89062. pTDefRegMap(@Self)^.&set := $02000000;
  89063. end;
  89064. procedure TCAN1_C1FIFOINT17.clearTXHALFIE; inline;
  89065. begin
  89066. pTDefRegMap(@Self)^.clr := $02000000;
  89067. end;
  89068. procedure TCAN1_C1FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  89069. begin
  89070. if thebits = 0 then
  89071. pTDefRegMap(@Self)^.clr := $02000000
  89072. else
  89073. pTDefRegMap(@Self)^.&set := $02000000;
  89074. end;
  89075. function TCAN1_C1FIFOINT17.getTXHALFIE : TBits_1; inline;
  89076. begin
  89077. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  89078. end;
  89079. procedure TCAN1_C1FIFOINT17.setTXNFULLIE; inline;
  89080. begin
  89081. pTDefRegMap(@Self)^.&set := $04000000;
  89082. end;
  89083. procedure TCAN1_C1FIFOINT17.clearTXNFULLIE; inline;
  89084. begin
  89085. pTDefRegMap(@Self)^.clr := $04000000;
  89086. end;
  89087. procedure TCAN1_C1FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  89088. begin
  89089. if thebits = 0 then
  89090. pTDefRegMap(@Self)^.clr := $04000000
  89091. else
  89092. pTDefRegMap(@Self)^.&set := $04000000;
  89093. end;
  89094. function TCAN1_C1FIFOINT17.getTXNFULLIE : TBits_1; inline;
  89095. begin
  89096. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  89097. end;
  89098. procedure TCAN1_C1FIFOINT17.setw(thebits : TBits_32); inline;
  89099. begin
  89100. pTDefRegMap(@Self)^.val := thebits;
  89101. end;
  89102. function TCAN1_C1FIFOINT17.getw : TBits_32; inline;
  89103. begin
  89104. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89105. end;
  89106. procedure TCAN1_C1FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  89107. begin
  89108. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  89109. end;
  89110. function TCAN1_C1FIFOCI17.getCFIFOCI : TBits_5; inline;
  89111. begin
  89112. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  89113. end;
  89114. procedure TCAN1_C1FIFOCI17.setw(thebits : TBits_32); inline;
  89115. begin
  89116. pTDefRegMap(@Self)^.val := thebits;
  89117. end;
  89118. function TCAN1_C1FIFOCI17.getw : TBits_32; inline;
  89119. begin
  89120. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89121. end;
  89122. procedure TCAN1_C1FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  89123. begin
  89124. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  89125. end;
  89126. function TCAN1_C1FIFOCON18.getTXPRI : TBits_2; inline;
  89127. begin
  89128. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  89129. end;
  89130. procedure TCAN1_C1FIFOCON18.setRTREN; inline;
  89131. begin
  89132. pTDefRegMap(@Self)^.&set := $00000004;
  89133. end;
  89134. procedure TCAN1_C1FIFOCON18.clearRTREN; inline;
  89135. begin
  89136. pTDefRegMap(@Self)^.clr := $00000004;
  89137. end;
  89138. procedure TCAN1_C1FIFOCON18.setRTREN(thebits : TBits_1); inline;
  89139. begin
  89140. if thebits = 0 then
  89141. pTDefRegMap(@Self)^.clr := $00000004
  89142. else
  89143. pTDefRegMap(@Self)^.&set := $00000004;
  89144. end;
  89145. function TCAN1_C1FIFOCON18.getRTREN : TBits_1; inline;
  89146. begin
  89147. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89148. end;
  89149. procedure TCAN1_C1FIFOCON18.setTXREQ; inline;
  89150. begin
  89151. pTDefRegMap(@Self)^.&set := $00000008;
  89152. end;
  89153. procedure TCAN1_C1FIFOCON18.clearTXREQ; inline;
  89154. begin
  89155. pTDefRegMap(@Self)^.clr := $00000008;
  89156. end;
  89157. procedure TCAN1_C1FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  89158. begin
  89159. if thebits = 0 then
  89160. pTDefRegMap(@Self)^.clr := $00000008
  89161. else
  89162. pTDefRegMap(@Self)^.&set := $00000008;
  89163. end;
  89164. function TCAN1_C1FIFOCON18.getTXREQ : TBits_1; inline;
  89165. begin
  89166. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89167. end;
  89168. procedure TCAN1_C1FIFOCON18.setTXERR; inline;
  89169. begin
  89170. pTDefRegMap(@Self)^.&set := $00000010;
  89171. end;
  89172. procedure TCAN1_C1FIFOCON18.clearTXERR; inline;
  89173. begin
  89174. pTDefRegMap(@Self)^.clr := $00000010;
  89175. end;
  89176. procedure TCAN1_C1FIFOCON18.setTXERR(thebits : TBits_1); inline;
  89177. begin
  89178. if thebits = 0 then
  89179. pTDefRegMap(@Self)^.clr := $00000010
  89180. else
  89181. pTDefRegMap(@Self)^.&set := $00000010;
  89182. end;
  89183. function TCAN1_C1FIFOCON18.getTXERR : TBits_1; inline;
  89184. begin
  89185. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  89186. end;
  89187. procedure TCAN1_C1FIFOCON18.setTXLARB; inline;
  89188. begin
  89189. pTDefRegMap(@Self)^.&set := $00000020;
  89190. end;
  89191. procedure TCAN1_C1FIFOCON18.clearTXLARB; inline;
  89192. begin
  89193. pTDefRegMap(@Self)^.clr := $00000020;
  89194. end;
  89195. procedure TCAN1_C1FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  89196. begin
  89197. if thebits = 0 then
  89198. pTDefRegMap(@Self)^.clr := $00000020
  89199. else
  89200. pTDefRegMap(@Self)^.&set := $00000020;
  89201. end;
  89202. function TCAN1_C1FIFOCON18.getTXLARB : TBits_1; inline;
  89203. begin
  89204. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  89205. end;
  89206. procedure TCAN1_C1FIFOCON18.setTXABAT; inline;
  89207. begin
  89208. pTDefRegMap(@Self)^.&set := $00000040;
  89209. end;
  89210. procedure TCAN1_C1FIFOCON18.clearTXABAT; inline;
  89211. begin
  89212. pTDefRegMap(@Self)^.clr := $00000040;
  89213. end;
  89214. procedure TCAN1_C1FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  89215. begin
  89216. if thebits = 0 then
  89217. pTDefRegMap(@Self)^.clr := $00000040
  89218. else
  89219. pTDefRegMap(@Self)^.&set := $00000040;
  89220. end;
  89221. function TCAN1_C1FIFOCON18.getTXABAT : TBits_1; inline;
  89222. begin
  89223. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  89224. end;
  89225. procedure TCAN1_C1FIFOCON18.setTXEN; inline;
  89226. begin
  89227. pTDefRegMap(@Self)^.&set := $00000080;
  89228. end;
  89229. procedure TCAN1_C1FIFOCON18.clearTXEN; inline;
  89230. begin
  89231. pTDefRegMap(@Self)^.clr := $00000080;
  89232. end;
  89233. procedure TCAN1_C1FIFOCON18.setTXEN(thebits : TBits_1); inline;
  89234. begin
  89235. if thebits = 0 then
  89236. pTDefRegMap(@Self)^.clr := $00000080
  89237. else
  89238. pTDefRegMap(@Self)^.&set := $00000080;
  89239. end;
  89240. function TCAN1_C1FIFOCON18.getTXEN : TBits_1; inline;
  89241. begin
  89242. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  89243. end;
  89244. procedure TCAN1_C1FIFOCON18.setDONLY; inline;
  89245. begin
  89246. pTDefRegMap(@Self)^.&set := $00001000;
  89247. end;
  89248. procedure TCAN1_C1FIFOCON18.clearDONLY; inline;
  89249. begin
  89250. pTDefRegMap(@Self)^.clr := $00001000;
  89251. end;
  89252. procedure TCAN1_C1FIFOCON18.setDONLY(thebits : TBits_1); inline;
  89253. begin
  89254. if thebits = 0 then
  89255. pTDefRegMap(@Self)^.clr := $00001000
  89256. else
  89257. pTDefRegMap(@Self)^.&set := $00001000;
  89258. end;
  89259. function TCAN1_C1FIFOCON18.getDONLY : TBits_1; inline;
  89260. begin
  89261. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  89262. end;
  89263. procedure TCAN1_C1FIFOCON18.setUINC; inline;
  89264. begin
  89265. pTDefRegMap(@Self)^.&set := $00002000;
  89266. end;
  89267. procedure TCAN1_C1FIFOCON18.clearUINC; inline;
  89268. begin
  89269. pTDefRegMap(@Self)^.clr := $00002000;
  89270. end;
  89271. procedure TCAN1_C1FIFOCON18.setUINC(thebits : TBits_1); inline;
  89272. begin
  89273. if thebits = 0 then
  89274. pTDefRegMap(@Self)^.clr := $00002000
  89275. else
  89276. pTDefRegMap(@Self)^.&set := $00002000;
  89277. end;
  89278. function TCAN1_C1FIFOCON18.getUINC : TBits_1; inline;
  89279. begin
  89280. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  89281. end;
  89282. procedure TCAN1_C1FIFOCON18.setFRESET; inline;
  89283. begin
  89284. pTDefRegMap(@Self)^.&set := $00004000;
  89285. end;
  89286. procedure TCAN1_C1FIFOCON18.clearFRESET; inline;
  89287. begin
  89288. pTDefRegMap(@Self)^.clr := $00004000;
  89289. end;
  89290. procedure TCAN1_C1FIFOCON18.setFRESET(thebits : TBits_1); inline;
  89291. begin
  89292. if thebits = 0 then
  89293. pTDefRegMap(@Self)^.clr := $00004000
  89294. else
  89295. pTDefRegMap(@Self)^.&set := $00004000;
  89296. end;
  89297. function TCAN1_C1FIFOCON18.getFRESET : TBits_1; inline;
  89298. begin
  89299. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  89300. end;
  89301. procedure TCAN1_C1FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  89302. begin
  89303. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  89304. end;
  89305. function TCAN1_C1FIFOCON18.getFSIZE : TBits_5; inline;
  89306. begin
  89307. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  89308. end;
  89309. procedure TCAN1_C1FIFOCON18.setw(thebits : TBits_32); inline;
  89310. begin
  89311. pTDefRegMap(@Self)^.val := thebits;
  89312. end;
  89313. function TCAN1_C1FIFOCON18.getw : TBits_32; inline;
  89314. begin
  89315. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89316. end;
  89317. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF; inline;
  89318. begin
  89319. pTDefRegMap(@Self)^.&set := $00000001;
  89320. end;
  89321. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIF; inline;
  89322. begin
  89323. pTDefRegMap(@Self)^.clr := $00000001;
  89324. end;
  89325. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  89326. begin
  89327. if thebits = 0 then
  89328. pTDefRegMap(@Self)^.clr := $00000001
  89329. else
  89330. pTDefRegMap(@Self)^.&set := $00000001;
  89331. end;
  89332. function TCAN1_C1FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  89333. begin
  89334. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  89335. end;
  89336. procedure TCAN1_C1FIFOINT18.setRXHALFIF; inline;
  89337. begin
  89338. pTDefRegMap(@Self)^.&set := $00000002;
  89339. end;
  89340. procedure TCAN1_C1FIFOINT18.clearRXHALFIF; inline;
  89341. begin
  89342. pTDefRegMap(@Self)^.clr := $00000002;
  89343. end;
  89344. procedure TCAN1_C1FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  89345. begin
  89346. if thebits = 0 then
  89347. pTDefRegMap(@Self)^.clr := $00000002
  89348. else
  89349. pTDefRegMap(@Self)^.&set := $00000002;
  89350. end;
  89351. function TCAN1_C1FIFOINT18.getRXHALFIF : TBits_1; inline;
  89352. begin
  89353. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  89354. end;
  89355. procedure TCAN1_C1FIFOINT18.setRXFULLIF; inline;
  89356. begin
  89357. pTDefRegMap(@Self)^.&set := $00000004;
  89358. end;
  89359. procedure TCAN1_C1FIFOINT18.clearRXFULLIF; inline;
  89360. begin
  89361. pTDefRegMap(@Self)^.clr := $00000004;
  89362. end;
  89363. procedure TCAN1_C1FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  89364. begin
  89365. if thebits = 0 then
  89366. pTDefRegMap(@Self)^.clr := $00000004
  89367. else
  89368. pTDefRegMap(@Self)^.&set := $00000004;
  89369. end;
  89370. function TCAN1_C1FIFOINT18.getRXFULLIF : TBits_1; inline;
  89371. begin
  89372. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89373. end;
  89374. procedure TCAN1_C1FIFOINT18.setRXOVFLIF; inline;
  89375. begin
  89376. pTDefRegMap(@Self)^.&set := $00000008;
  89377. end;
  89378. procedure TCAN1_C1FIFOINT18.clearRXOVFLIF; inline;
  89379. begin
  89380. pTDefRegMap(@Self)^.clr := $00000008;
  89381. end;
  89382. procedure TCAN1_C1FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  89383. begin
  89384. if thebits = 0 then
  89385. pTDefRegMap(@Self)^.clr := $00000008
  89386. else
  89387. pTDefRegMap(@Self)^.&set := $00000008;
  89388. end;
  89389. function TCAN1_C1FIFOINT18.getRXOVFLIF : TBits_1; inline;
  89390. begin
  89391. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89392. end;
  89393. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF; inline;
  89394. begin
  89395. pTDefRegMap(@Self)^.&set := $00000100;
  89396. end;
  89397. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIF; inline;
  89398. begin
  89399. pTDefRegMap(@Self)^.clr := $00000100;
  89400. end;
  89401. procedure TCAN1_C1FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  89402. begin
  89403. if thebits = 0 then
  89404. pTDefRegMap(@Self)^.clr := $00000100
  89405. else
  89406. pTDefRegMap(@Self)^.&set := $00000100;
  89407. end;
  89408. function TCAN1_C1FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  89409. begin
  89410. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  89411. end;
  89412. procedure TCAN1_C1FIFOINT18.setTXHALFIF; inline;
  89413. begin
  89414. pTDefRegMap(@Self)^.&set := $00000200;
  89415. end;
  89416. procedure TCAN1_C1FIFOINT18.clearTXHALFIF; inline;
  89417. begin
  89418. pTDefRegMap(@Self)^.clr := $00000200;
  89419. end;
  89420. procedure TCAN1_C1FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  89421. begin
  89422. if thebits = 0 then
  89423. pTDefRegMap(@Self)^.clr := $00000200
  89424. else
  89425. pTDefRegMap(@Self)^.&set := $00000200;
  89426. end;
  89427. function TCAN1_C1FIFOINT18.getTXHALFIF : TBits_1; inline;
  89428. begin
  89429. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  89430. end;
  89431. procedure TCAN1_C1FIFOINT18.setTXNFULLIF; inline;
  89432. begin
  89433. pTDefRegMap(@Self)^.&set := $00000400;
  89434. end;
  89435. procedure TCAN1_C1FIFOINT18.clearTXNFULLIF; inline;
  89436. begin
  89437. pTDefRegMap(@Self)^.clr := $00000400;
  89438. end;
  89439. procedure TCAN1_C1FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  89440. begin
  89441. if thebits = 0 then
  89442. pTDefRegMap(@Self)^.clr := $00000400
  89443. else
  89444. pTDefRegMap(@Self)^.&set := $00000400;
  89445. end;
  89446. function TCAN1_C1FIFOINT18.getTXNFULLIF : TBits_1; inline;
  89447. begin
  89448. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  89449. end;
  89450. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE; inline;
  89451. begin
  89452. pTDefRegMap(@Self)^.&set := $00010000;
  89453. end;
  89454. procedure TCAN1_C1FIFOINT18.clearRXNEMPTYIE; inline;
  89455. begin
  89456. pTDefRegMap(@Self)^.clr := $00010000;
  89457. end;
  89458. procedure TCAN1_C1FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  89459. begin
  89460. if thebits = 0 then
  89461. pTDefRegMap(@Self)^.clr := $00010000
  89462. else
  89463. pTDefRegMap(@Self)^.&set := $00010000;
  89464. end;
  89465. function TCAN1_C1FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  89466. begin
  89467. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  89468. end;
  89469. procedure TCAN1_C1FIFOINT18.setRXHALFIE; inline;
  89470. begin
  89471. pTDefRegMap(@Self)^.&set := $00020000;
  89472. end;
  89473. procedure TCAN1_C1FIFOINT18.clearRXHALFIE; inline;
  89474. begin
  89475. pTDefRegMap(@Self)^.clr := $00020000;
  89476. end;
  89477. procedure TCAN1_C1FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  89478. begin
  89479. if thebits = 0 then
  89480. pTDefRegMap(@Self)^.clr := $00020000
  89481. else
  89482. pTDefRegMap(@Self)^.&set := $00020000;
  89483. end;
  89484. function TCAN1_C1FIFOINT18.getRXHALFIE : TBits_1; inline;
  89485. begin
  89486. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  89487. end;
  89488. procedure TCAN1_C1FIFOINT18.setRXFULLIE; inline;
  89489. begin
  89490. pTDefRegMap(@Self)^.&set := $00040000;
  89491. end;
  89492. procedure TCAN1_C1FIFOINT18.clearRXFULLIE; inline;
  89493. begin
  89494. pTDefRegMap(@Self)^.clr := $00040000;
  89495. end;
  89496. procedure TCAN1_C1FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  89497. begin
  89498. if thebits = 0 then
  89499. pTDefRegMap(@Self)^.clr := $00040000
  89500. else
  89501. pTDefRegMap(@Self)^.&set := $00040000;
  89502. end;
  89503. function TCAN1_C1FIFOINT18.getRXFULLIE : TBits_1; inline;
  89504. begin
  89505. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  89506. end;
  89507. procedure TCAN1_C1FIFOINT18.setRXOVFLIE; inline;
  89508. begin
  89509. pTDefRegMap(@Self)^.&set := $00080000;
  89510. end;
  89511. procedure TCAN1_C1FIFOINT18.clearRXOVFLIE; inline;
  89512. begin
  89513. pTDefRegMap(@Self)^.clr := $00080000;
  89514. end;
  89515. procedure TCAN1_C1FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  89516. begin
  89517. if thebits = 0 then
  89518. pTDefRegMap(@Self)^.clr := $00080000
  89519. else
  89520. pTDefRegMap(@Self)^.&set := $00080000;
  89521. end;
  89522. function TCAN1_C1FIFOINT18.getRXOVFLIE : TBits_1; inline;
  89523. begin
  89524. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  89525. end;
  89526. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE; inline;
  89527. begin
  89528. pTDefRegMap(@Self)^.&set := $01000000;
  89529. end;
  89530. procedure TCAN1_C1FIFOINT18.clearTXEMPTYIE; inline;
  89531. begin
  89532. pTDefRegMap(@Self)^.clr := $01000000;
  89533. end;
  89534. procedure TCAN1_C1FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  89535. begin
  89536. if thebits = 0 then
  89537. pTDefRegMap(@Self)^.clr := $01000000
  89538. else
  89539. pTDefRegMap(@Self)^.&set := $01000000;
  89540. end;
  89541. function TCAN1_C1FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  89542. begin
  89543. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  89544. end;
  89545. procedure TCAN1_C1FIFOINT18.setTXHALFIE; inline;
  89546. begin
  89547. pTDefRegMap(@Self)^.&set := $02000000;
  89548. end;
  89549. procedure TCAN1_C1FIFOINT18.clearTXHALFIE; inline;
  89550. begin
  89551. pTDefRegMap(@Self)^.clr := $02000000;
  89552. end;
  89553. procedure TCAN1_C1FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  89554. begin
  89555. if thebits = 0 then
  89556. pTDefRegMap(@Self)^.clr := $02000000
  89557. else
  89558. pTDefRegMap(@Self)^.&set := $02000000;
  89559. end;
  89560. function TCAN1_C1FIFOINT18.getTXHALFIE : TBits_1; inline;
  89561. begin
  89562. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  89563. end;
  89564. procedure TCAN1_C1FIFOINT18.setTXNFULLIE; inline;
  89565. begin
  89566. pTDefRegMap(@Self)^.&set := $04000000;
  89567. end;
  89568. procedure TCAN1_C1FIFOINT18.clearTXNFULLIE; inline;
  89569. begin
  89570. pTDefRegMap(@Self)^.clr := $04000000;
  89571. end;
  89572. procedure TCAN1_C1FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  89573. begin
  89574. if thebits = 0 then
  89575. pTDefRegMap(@Self)^.clr := $04000000
  89576. else
  89577. pTDefRegMap(@Self)^.&set := $04000000;
  89578. end;
  89579. function TCAN1_C1FIFOINT18.getTXNFULLIE : TBits_1; inline;
  89580. begin
  89581. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  89582. end;
  89583. procedure TCAN1_C1FIFOINT18.setw(thebits : TBits_32); inline;
  89584. begin
  89585. pTDefRegMap(@Self)^.val := thebits;
  89586. end;
  89587. function TCAN1_C1FIFOINT18.getw : TBits_32; inline;
  89588. begin
  89589. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89590. end;
  89591. procedure TCAN1_C1FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  89592. begin
  89593. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  89594. end;
  89595. function TCAN1_C1FIFOCI18.getCFIFOCI : TBits_5; inline;
  89596. begin
  89597. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  89598. end;
  89599. procedure TCAN1_C1FIFOCI18.setw(thebits : TBits_32); inline;
  89600. begin
  89601. pTDefRegMap(@Self)^.val := thebits;
  89602. end;
  89603. function TCAN1_C1FIFOCI18.getw : TBits_32; inline;
  89604. begin
  89605. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89606. end;
  89607. procedure TCAN1_C1FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  89608. begin
  89609. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  89610. end;
  89611. function TCAN1_C1FIFOCON19.getTXPRI : TBits_2; inline;
  89612. begin
  89613. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  89614. end;
  89615. procedure TCAN1_C1FIFOCON19.setRTREN; inline;
  89616. begin
  89617. pTDefRegMap(@Self)^.&set := $00000004;
  89618. end;
  89619. procedure TCAN1_C1FIFOCON19.clearRTREN; inline;
  89620. begin
  89621. pTDefRegMap(@Self)^.clr := $00000004;
  89622. end;
  89623. procedure TCAN1_C1FIFOCON19.setRTREN(thebits : TBits_1); inline;
  89624. begin
  89625. if thebits = 0 then
  89626. pTDefRegMap(@Self)^.clr := $00000004
  89627. else
  89628. pTDefRegMap(@Self)^.&set := $00000004;
  89629. end;
  89630. function TCAN1_C1FIFOCON19.getRTREN : TBits_1; inline;
  89631. begin
  89632. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89633. end;
  89634. procedure TCAN1_C1FIFOCON19.setTXREQ; inline;
  89635. begin
  89636. pTDefRegMap(@Self)^.&set := $00000008;
  89637. end;
  89638. procedure TCAN1_C1FIFOCON19.clearTXREQ; inline;
  89639. begin
  89640. pTDefRegMap(@Self)^.clr := $00000008;
  89641. end;
  89642. procedure TCAN1_C1FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  89643. begin
  89644. if thebits = 0 then
  89645. pTDefRegMap(@Self)^.clr := $00000008
  89646. else
  89647. pTDefRegMap(@Self)^.&set := $00000008;
  89648. end;
  89649. function TCAN1_C1FIFOCON19.getTXREQ : TBits_1; inline;
  89650. begin
  89651. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89652. end;
  89653. procedure TCAN1_C1FIFOCON19.setTXERR; inline;
  89654. begin
  89655. pTDefRegMap(@Self)^.&set := $00000010;
  89656. end;
  89657. procedure TCAN1_C1FIFOCON19.clearTXERR; inline;
  89658. begin
  89659. pTDefRegMap(@Self)^.clr := $00000010;
  89660. end;
  89661. procedure TCAN1_C1FIFOCON19.setTXERR(thebits : TBits_1); inline;
  89662. begin
  89663. if thebits = 0 then
  89664. pTDefRegMap(@Self)^.clr := $00000010
  89665. else
  89666. pTDefRegMap(@Self)^.&set := $00000010;
  89667. end;
  89668. function TCAN1_C1FIFOCON19.getTXERR : TBits_1; inline;
  89669. begin
  89670. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  89671. end;
  89672. procedure TCAN1_C1FIFOCON19.setTXLARB; inline;
  89673. begin
  89674. pTDefRegMap(@Self)^.&set := $00000020;
  89675. end;
  89676. procedure TCAN1_C1FIFOCON19.clearTXLARB; inline;
  89677. begin
  89678. pTDefRegMap(@Self)^.clr := $00000020;
  89679. end;
  89680. procedure TCAN1_C1FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  89681. begin
  89682. if thebits = 0 then
  89683. pTDefRegMap(@Self)^.clr := $00000020
  89684. else
  89685. pTDefRegMap(@Self)^.&set := $00000020;
  89686. end;
  89687. function TCAN1_C1FIFOCON19.getTXLARB : TBits_1; inline;
  89688. begin
  89689. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  89690. end;
  89691. procedure TCAN1_C1FIFOCON19.setTXABAT; inline;
  89692. begin
  89693. pTDefRegMap(@Self)^.&set := $00000040;
  89694. end;
  89695. procedure TCAN1_C1FIFOCON19.clearTXABAT; inline;
  89696. begin
  89697. pTDefRegMap(@Self)^.clr := $00000040;
  89698. end;
  89699. procedure TCAN1_C1FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  89700. begin
  89701. if thebits = 0 then
  89702. pTDefRegMap(@Self)^.clr := $00000040
  89703. else
  89704. pTDefRegMap(@Self)^.&set := $00000040;
  89705. end;
  89706. function TCAN1_C1FIFOCON19.getTXABAT : TBits_1; inline;
  89707. begin
  89708. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  89709. end;
  89710. procedure TCAN1_C1FIFOCON19.setTXEN; inline;
  89711. begin
  89712. pTDefRegMap(@Self)^.&set := $00000080;
  89713. end;
  89714. procedure TCAN1_C1FIFOCON19.clearTXEN; inline;
  89715. begin
  89716. pTDefRegMap(@Self)^.clr := $00000080;
  89717. end;
  89718. procedure TCAN1_C1FIFOCON19.setTXEN(thebits : TBits_1); inline;
  89719. begin
  89720. if thebits = 0 then
  89721. pTDefRegMap(@Self)^.clr := $00000080
  89722. else
  89723. pTDefRegMap(@Self)^.&set := $00000080;
  89724. end;
  89725. function TCAN1_C1FIFOCON19.getTXEN : TBits_1; inline;
  89726. begin
  89727. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  89728. end;
  89729. procedure TCAN1_C1FIFOCON19.setDONLY; inline;
  89730. begin
  89731. pTDefRegMap(@Self)^.&set := $00001000;
  89732. end;
  89733. procedure TCAN1_C1FIFOCON19.clearDONLY; inline;
  89734. begin
  89735. pTDefRegMap(@Self)^.clr := $00001000;
  89736. end;
  89737. procedure TCAN1_C1FIFOCON19.setDONLY(thebits : TBits_1); inline;
  89738. begin
  89739. if thebits = 0 then
  89740. pTDefRegMap(@Self)^.clr := $00001000
  89741. else
  89742. pTDefRegMap(@Self)^.&set := $00001000;
  89743. end;
  89744. function TCAN1_C1FIFOCON19.getDONLY : TBits_1; inline;
  89745. begin
  89746. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  89747. end;
  89748. procedure TCAN1_C1FIFOCON19.setUINC; inline;
  89749. begin
  89750. pTDefRegMap(@Self)^.&set := $00002000;
  89751. end;
  89752. procedure TCAN1_C1FIFOCON19.clearUINC; inline;
  89753. begin
  89754. pTDefRegMap(@Self)^.clr := $00002000;
  89755. end;
  89756. procedure TCAN1_C1FIFOCON19.setUINC(thebits : TBits_1); inline;
  89757. begin
  89758. if thebits = 0 then
  89759. pTDefRegMap(@Self)^.clr := $00002000
  89760. else
  89761. pTDefRegMap(@Self)^.&set := $00002000;
  89762. end;
  89763. function TCAN1_C1FIFOCON19.getUINC : TBits_1; inline;
  89764. begin
  89765. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  89766. end;
  89767. procedure TCAN1_C1FIFOCON19.setFRESET; inline;
  89768. begin
  89769. pTDefRegMap(@Self)^.&set := $00004000;
  89770. end;
  89771. procedure TCAN1_C1FIFOCON19.clearFRESET; inline;
  89772. begin
  89773. pTDefRegMap(@Self)^.clr := $00004000;
  89774. end;
  89775. procedure TCAN1_C1FIFOCON19.setFRESET(thebits : TBits_1); inline;
  89776. begin
  89777. if thebits = 0 then
  89778. pTDefRegMap(@Self)^.clr := $00004000
  89779. else
  89780. pTDefRegMap(@Self)^.&set := $00004000;
  89781. end;
  89782. function TCAN1_C1FIFOCON19.getFRESET : TBits_1; inline;
  89783. begin
  89784. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  89785. end;
  89786. procedure TCAN1_C1FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  89787. begin
  89788. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  89789. end;
  89790. function TCAN1_C1FIFOCON19.getFSIZE : TBits_5; inline;
  89791. begin
  89792. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  89793. end;
  89794. procedure TCAN1_C1FIFOCON19.setw(thebits : TBits_32); inline;
  89795. begin
  89796. pTDefRegMap(@Self)^.val := thebits;
  89797. end;
  89798. function TCAN1_C1FIFOCON19.getw : TBits_32; inline;
  89799. begin
  89800. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  89801. end;
  89802. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF; inline;
  89803. begin
  89804. pTDefRegMap(@Self)^.&set := $00000001;
  89805. end;
  89806. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIF; inline;
  89807. begin
  89808. pTDefRegMap(@Self)^.clr := $00000001;
  89809. end;
  89810. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  89811. begin
  89812. if thebits = 0 then
  89813. pTDefRegMap(@Self)^.clr := $00000001
  89814. else
  89815. pTDefRegMap(@Self)^.&set := $00000001;
  89816. end;
  89817. function TCAN1_C1FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  89818. begin
  89819. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  89820. end;
  89821. procedure TCAN1_C1FIFOINT19.setRXHALFIF; inline;
  89822. begin
  89823. pTDefRegMap(@Self)^.&set := $00000002;
  89824. end;
  89825. procedure TCAN1_C1FIFOINT19.clearRXHALFIF; inline;
  89826. begin
  89827. pTDefRegMap(@Self)^.clr := $00000002;
  89828. end;
  89829. procedure TCAN1_C1FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  89830. begin
  89831. if thebits = 0 then
  89832. pTDefRegMap(@Self)^.clr := $00000002
  89833. else
  89834. pTDefRegMap(@Self)^.&set := $00000002;
  89835. end;
  89836. function TCAN1_C1FIFOINT19.getRXHALFIF : TBits_1; inline;
  89837. begin
  89838. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  89839. end;
  89840. procedure TCAN1_C1FIFOINT19.setRXFULLIF; inline;
  89841. begin
  89842. pTDefRegMap(@Self)^.&set := $00000004;
  89843. end;
  89844. procedure TCAN1_C1FIFOINT19.clearRXFULLIF; inline;
  89845. begin
  89846. pTDefRegMap(@Self)^.clr := $00000004;
  89847. end;
  89848. procedure TCAN1_C1FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  89849. begin
  89850. if thebits = 0 then
  89851. pTDefRegMap(@Self)^.clr := $00000004
  89852. else
  89853. pTDefRegMap(@Self)^.&set := $00000004;
  89854. end;
  89855. function TCAN1_C1FIFOINT19.getRXFULLIF : TBits_1; inline;
  89856. begin
  89857. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  89858. end;
  89859. procedure TCAN1_C1FIFOINT19.setRXOVFLIF; inline;
  89860. begin
  89861. pTDefRegMap(@Self)^.&set := $00000008;
  89862. end;
  89863. procedure TCAN1_C1FIFOINT19.clearRXOVFLIF; inline;
  89864. begin
  89865. pTDefRegMap(@Self)^.clr := $00000008;
  89866. end;
  89867. procedure TCAN1_C1FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  89868. begin
  89869. if thebits = 0 then
  89870. pTDefRegMap(@Self)^.clr := $00000008
  89871. else
  89872. pTDefRegMap(@Self)^.&set := $00000008;
  89873. end;
  89874. function TCAN1_C1FIFOINT19.getRXOVFLIF : TBits_1; inline;
  89875. begin
  89876. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  89877. end;
  89878. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF; inline;
  89879. begin
  89880. pTDefRegMap(@Self)^.&set := $00000100;
  89881. end;
  89882. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIF; inline;
  89883. begin
  89884. pTDefRegMap(@Self)^.clr := $00000100;
  89885. end;
  89886. procedure TCAN1_C1FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  89887. begin
  89888. if thebits = 0 then
  89889. pTDefRegMap(@Self)^.clr := $00000100
  89890. else
  89891. pTDefRegMap(@Self)^.&set := $00000100;
  89892. end;
  89893. function TCAN1_C1FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  89894. begin
  89895. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  89896. end;
  89897. procedure TCAN1_C1FIFOINT19.setTXHALFIF; inline;
  89898. begin
  89899. pTDefRegMap(@Self)^.&set := $00000200;
  89900. end;
  89901. procedure TCAN1_C1FIFOINT19.clearTXHALFIF; inline;
  89902. begin
  89903. pTDefRegMap(@Self)^.clr := $00000200;
  89904. end;
  89905. procedure TCAN1_C1FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  89906. begin
  89907. if thebits = 0 then
  89908. pTDefRegMap(@Self)^.clr := $00000200
  89909. else
  89910. pTDefRegMap(@Self)^.&set := $00000200;
  89911. end;
  89912. function TCAN1_C1FIFOINT19.getTXHALFIF : TBits_1; inline;
  89913. begin
  89914. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  89915. end;
  89916. procedure TCAN1_C1FIFOINT19.setTXNFULLIF; inline;
  89917. begin
  89918. pTDefRegMap(@Self)^.&set := $00000400;
  89919. end;
  89920. procedure TCAN1_C1FIFOINT19.clearTXNFULLIF; inline;
  89921. begin
  89922. pTDefRegMap(@Self)^.clr := $00000400;
  89923. end;
  89924. procedure TCAN1_C1FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  89925. begin
  89926. if thebits = 0 then
  89927. pTDefRegMap(@Self)^.clr := $00000400
  89928. else
  89929. pTDefRegMap(@Self)^.&set := $00000400;
  89930. end;
  89931. function TCAN1_C1FIFOINT19.getTXNFULLIF : TBits_1; inline;
  89932. begin
  89933. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  89934. end;
  89935. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE; inline;
  89936. begin
  89937. pTDefRegMap(@Self)^.&set := $00010000;
  89938. end;
  89939. procedure TCAN1_C1FIFOINT19.clearRXNEMPTYIE; inline;
  89940. begin
  89941. pTDefRegMap(@Self)^.clr := $00010000;
  89942. end;
  89943. procedure TCAN1_C1FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  89944. begin
  89945. if thebits = 0 then
  89946. pTDefRegMap(@Self)^.clr := $00010000
  89947. else
  89948. pTDefRegMap(@Self)^.&set := $00010000;
  89949. end;
  89950. function TCAN1_C1FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  89951. begin
  89952. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  89953. end;
  89954. procedure TCAN1_C1FIFOINT19.setRXHALFIE; inline;
  89955. begin
  89956. pTDefRegMap(@Self)^.&set := $00020000;
  89957. end;
  89958. procedure TCAN1_C1FIFOINT19.clearRXHALFIE; inline;
  89959. begin
  89960. pTDefRegMap(@Self)^.clr := $00020000;
  89961. end;
  89962. procedure TCAN1_C1FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  89963. begin
  89964. if thebits = 0 then
  89965. pTDefRegMap(@Self)^.clr := $00020000
  89966. else
  89967. pTDefRegMap(@Self)^.&set := $00020000;
  89968. end;
  89969. function TCAN1_C1FIFOINT19.getRXHALFIE : TBits_1; inline;
  89970. begin
  89971. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  89972. end;
  89973. procedure TCAN1_C1FIFOINT19.setRXFULLIE; inline;
  89974. begin
  89975. pTDefRegMap(@Self)^.&set := $00040000;
  89976. end;
  89977. procedure TCAN1_C1FIFOINT19.clearRXFULLIE; inline;
  89978. begin
  89979. pTDefRegMap(@Self)^.clr := $00040000;
  89980. end;
  89981. procedure TCAN1_C1FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  89982. begin
  89983. if thebits = 0 then
  89984. pTDefRegMap(@Self)^.clr := $00040000
  89985. else
  89986. pTDefRegMap(@Self)^.&set := $00040000;
  89987. end;
  89988. function TCAN1_C1FIFOINT19.getRXFULLIE : TBits_1; inline;
  89989. begin
  89990. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  89991. end;
  89992. procedure TCAN1_C1FIFOINT19.setRXOVFLIE; inline;
  89993. begin
  89994. pTDefRegMap(@Self)^.&set := $00080000;
  89995. end;
  89996. procedure TCAN1_C1FIFOINT19.clearRXOVFLIE; inline;
  89997. begin
  89998. pTDefRegMap(@Self)^.clr := $00080000;
  89999. end;
  90000. procedure TCAN1_C1FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  90001. begin
  90002. if thebits = 0 then
  90003. pTDefRegMap(@Self)^.clr := $00080000
  90004. else
  90005. pTDefRegMap(@Self)^.&set := $00080000;
  90006. end;
  90007. function TCAN1_C1FIFOINT19.getRXOVFLIE : TBits_1; inline;
  90008. begin
  90009. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  90010. end;
  90011. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE; inline;
  90012. begin
  90013. pTDefRegMap(@Self)^.&set := $01000000;
  90014. end;
  90015. procedure TCAN1_C1FIFOINT19.clearTXEMPTYIE; inline;
  90016. begin
  90017. pTDefRegMap(@Self)^.clr := $01000000;
  90018. end;
  90019. procedure TCAN1_C1FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  90020. begin
  90021. if thebits = 0 then
  90022. pTDefRegMap(@Self)^.clr := $01000000
  90023. else
  90024. pTDefRegMap(@Self)^.&set := $01000000;
  90025. end;
  90026. function TCAN1_C1FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  90027. begin
  90028. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  90029. end;
  90030. procedure TCAN1_C1FIFOINT19.setTXHALFIE; inline;
  90031. begin
  90032. pTDefRegMap(@Self)^.&set := $02000000;
  90033. end;
  90034. procedure TCAN1_C1FIFOINT19.clearTXHALFIE; inline;
  90035. begin
  90036. pTDefRegMap(@Self)^.clr := $02000000;
  90037. end;
  90038. procedure TCAN1_C1FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  90039. begin
  90040. if thebits = 0 then
  90041. pTDefRegMap(@Self)^.clr := $02000000
  90042. else
  90043. pTDefRegMap(@Self)^.&set := $02000000;
  90044. end;
  90045. function TCAN1_C1FIFOINT19.getTXHALFIE : TBits_1; inline;
  90046. begin
  90047. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  90048. end;
  90049. procedure TCAN1_C1FIFOINT19.setTXNFULLIE; inline;
  90050. begin
  90051. pTDefRegMap(@Self)^.&set := $04000000;
  90052. end;
  90053. procedure TCAN1_C1FIFOINT19.clearTXNFULLIE; inline;
  90054. begin
  90055. pTDefRegMap(@Self)^.clr := $04000000;
  90056. end;
  90057. procedure TCAN1_C1FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  90058. begin
  90059. if thebits = 0 then
  90060. pTDefRegMap(@Self)^.clr := $04000000
  90061. else
  90062. pTDefRegMap(@Self)^.&set := $04000000;
  90063. end;
  90064. function TCAN1_C1FIFOINT19.getTXNFULLIE : TBits_1; inline;
  90065. begin
  90066. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  90067. end;
  90068. procedure TCAN1_C1FIFOINT19.setw(thebits : TBits_32); inline;
  90069. begin
  90070. pTDefRegMap(@Self)^.val := thebits;
  90071. end;
  90072. function TCAN1_C1FIFOINT19.getw : TBits_32; inline;
  90073. begin
  90074. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90075. end;
  90076. procedure TCAN1_C1FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  90077. begin
  90078. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  90079. end;
  90080. function TCAN1_C1FIFOCI19.getCFIFOCI : TBits_5; inline;
  90081. begin
  90082. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  90083. end;
  90084. procedure TCAN1_C1FIFOCI19.setw(thebits : TBits_32); inline;
  90085. begin
  90086. pTDefRegMap(@Self)^.val := thebits;
  90087. end;
  90088. function TCAN1_C1FIFOCI19.getw : TBits_32; inline;
  90089. begin
  90090. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90091. end;
  90092. procedure TCAN1_C1FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  90093. begin
  90094. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  90095. end;
  90096. function TCAN1_C1FIFOCON20.getTXPRI : TBits_2; inline;
  90097. begin
  90098. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  90099. end;
  90100. procedure TCAN1_C1FIFOCON20.setRTREN; inline;
  90101. begin
  90102. pTDefRegMap(@Self)^.&set := $00000004;
  90103. end;
  90104. procedure TCAN1_C1FIFOCON20.clearRTREN; inline;
  90105. begin
  90106. pTDefRegMap(@Self)^.clr := $00000004;
  90107. end;
  90108. procedure TCAN1_C1FIFOCON20.setRTREN(thebits : TBits_1); inline;
  90109. begin
  90110. if thebits = 0 then
  90111. pTDefRegMap(@Self)^.clr := $00000004
  90112. else
  90113. pTDefRegMap(@Self)^.&set := $00000004;
  90114. end;
  90115. function TCAN1_C1FIFOCON20.getRTREN : TBits_1; inline;
  90116. begin
  90117. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90118. end;
  90119. procedure TCAN1_C1FIFOCON20.setTXREQ; inline;
  90120. begin
  90121. pTDefRegMap(@Self)^.&set := $00000008;
  90122. end;
  90123. procedure TCAN1_C1FIFOCON20.clearTXREQ; inline;
  90124. begin
  90125. pTDefRegMap(@Self)^.clr := $00000008;
  90126. end;
  90127. procedure TCAN1_C1FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  90128. begin
  90129. if thebits = 0 then
  90130. pTDefRegMap(@Self)^.clr := $00000008
  90131. else
  90132. pTDefRegMap(@Self)^.&set := $00000008;
  90133. end;
  90134. function TCAN1_C1FIFOCON20.getTXREQ : TBits_1; inline;
  90135. begin
  90136. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90137. end;
  90138. procedure TCAN1_C1FIFOCON20.setTXERR; inline;
  90139. begin
  90140. pTDefRegMap(@Self)^.&set := $00000010;
  90141. end;
  90142. procedure TCAN1_C1FIFOCON20.clearTXERR; inline;
  90143. begin
  90144. pTDefRegMap(@Self)^.clr := $00000010;
  90145. end;
  90146. procedure TCAN1_C1FIFOCON20.setTXERR(thebits : TBits_1); inline;
  90147. begin
  90148. if thebits = 0 then
  90149. pTDefRegMap(@Self)^.clr := $00000010
  90150. else
  90151. pTDefRegMap(@Self)^.&set := $00000010;
  90152. end;
  90153. function TCAN1_C1FIFOCON20.getTXERR : TBits_1; inline;
  90154. begin
  90155. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  90156. end;
  90157. procedure TCAN1_C1FIFOCON20.setTXLARB; inline;
  90158. begin
  90159. pTDefRegMap(@Self)^.&set := $00000020;
  90160. end;
  90161. procedure TCAN1_C1FIFOCON20.clearTXLARB; inline;
  90162. begin
  90163. pTDefRegMap(@Self)^.clr := $00000020;
  90164. end;
  90165. procedure TCAN1_C1FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  90166. begin
  90167. if thebits = 0 then
  90168. pTDefRegMap(@Self)^.clr := $00000020
  90169. else
  90170. pTDefRegMap(@Self)^.&set := $00000020;
  90171. end;
  90172. function TCAN1_C1FIFOCON20.getTXLARB : TBits_1; inline;
  90173. begin
  90174. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  90175. end;
  90176. procedure TCAN1_C1FIFOCON20.setTXABAT; inline;
  90177. begin
  90178. pTDefRegMap(@Self)^.&set := $00000040;
  90179. end;
  90180. procedure TCAN1_C1FIFOCON20.clearTXABAT; inline;
  90181. begin
  90182. pTDefRegMap(@Self)^.clr := $00000040;
  90183. end;
  90184. procedure TCAN1_C1FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  90185. begin
  90186. if thebits = 0 then
  90187. pTDefRegMap(@Self)^.clr := $00000040
  90188. else
  90189. pTDefRegMap(@Self)^.&set := $00000040;
  90190. end;
  90191. function TCAN1_C1FIFOCON20.getTXABAT : TBits_1; inline;
  90192. begin
  90193. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  90194. end;
  90195. procedure TCAN1_C1FIFOCON20.setTXEN; inline;
  90196. begin
  90197. pTDefRegMap(@Self)^.&set := $00000080;
  90198. end;
  90199. procedure TCAN1_C1FIFOCON20.clearTXEN; inline;
  90200. begin
  90201. pTDefRegMap(@Self)^.clr := $00000080;
  90202. end;
  90203. procedure TCAN1_C1FIFOCON20.setTXEN(thebits : TBits_1); inline;
  90204. begin
  90205. if thebits = 0 then
  90206. pTDefRegMap(@Self)^.clr := $00000080
  90207. else
  90208. pTDefRegMap(@Self)^.&set := $00000080;
  90209. end;
  90210. function TCAN1_C1FIFOCON20.getTXEN : TBits_1; inline;
  90211. begin
  90212. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  90213. end;
  90214. procedure TCAN1_C1FIFOCON20.setDONLY; inline;
  90215. begin
  90216. pTDefRegMap(@Self)^.&set := $00001000;
  90217. end;
  90218. procedure TCAN1_C1FIFOCON20.clearDONLY; inline;
  90219. begin
  90220. pTDefRegMap(@Self)^.clr := $00001000;
  90221. end;
  90222. procedure TCAN1_C1FIFOCON20.setDONLY(thebits : TBits_1); inline;
  90223. begin
  90224. if thebits = 0 then
  90225. pTDefRegMap(@Self)^.clr := $00001000
  90226. else
  90227. pTDefRegMap(@Self)^.&set := $00001000;
  90228. end;
  90229. function TCAN1_C1FIFOCON20.getDONLY : TBits_1; inline;
  90230. begin
  90231. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  90232. end;
  90233. procedure TCAN1_C1FIFOCON20.setUINC; inline;
  90234. begin
  90235. pTDefRegMap(@Self)^.&set := $00002000;
  90236. end;
  90237. procedure TCAN1_C1FIFOCON20.clearUINC; inline;
  90238. begin
  90239. pTDefRegMap(@Self)^.clr := $00002000;
  90240. end;
  90241. procedure TCAN1_C1FIFOCON20.setUINC(thebits : TBits_1); inline;
  90242. begin
  90243. if thebits = 0 then
  90244. pTDefRegMap(@Self)^.clr := $00002000
  90245. else
  90246. pTDefRegMap(@Self)^.&set := $00002000;
  90247. end;
  90248. function TCAN1_C1FIFOCON20.getUINC : TBits_1; inline;
  90249. begin
  90250. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  90251. end;
  90252. procedure TCAN1_C1FIFOCON20.setFRESET; inline;
  90253. begin
  90254. pTDefRegMap(@Self)^.&set := $00004000;
  90255. end;
  90256. procedure TCAN1_C1FIFOCON20.clearFRESET; inline;
  90257. begin
  90258. pTDefRegMap(@Self)^.clr := $00004000;
  90259. end;
  90260. procedure TCAN1_C1FIFOCON20.setFRESET(thebits : TBits_1); inline;
  90261. begin
  90262. if thebits = 0 then
  90263. pTDefRegMap(@Self)^.clr := $00004000
  90264. else
  90265. pTDefRegMap(@Self)^.&set := $00004000;
  90266. end;
  90267. function TCAN1_C1FIFOCON20.getFRESET : TBits_1; inline;
  90268. begin
  90269. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  90270. end;
  90271. procedure TCAN1_C1FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  90272. begin
  90273. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  90274. end;
  90275. function TCAN1_C1FIFOCON20.getFSIZE : TBits_5; inline;
  90276. begin
  90277. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  90278. end;
  90279. procedure TCAN1_C1FIFOCON20.setw(thebits : TBits_32); inline;
  90280. begin
  90281. pTDefRegMap(@Self)^.val := thebits;
  90282. end;
  90283. function TCAN1_C1FIFOCON20.getw : TBits_32; inline;
  90284. begin
  90285. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90286. end;
  90287. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF; inline;
  90288. begin
  90289. pTDefRegMap(@Self)^.&set := $00000001;
  90290. end;
  90291. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIF; inline;
  90292. begin
  90293. pTDefRegMap(@Self)^.clr := $00000001;
  90294. end;
  90295. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  90296. begin
  90297. if thebits = 0 then
  90298. pTDefRegMap(@Self)^.clr := $00000001
  90299. else
  90300. pTDefRegMap(@Self)^.&set := $00000001;
  90301. end;
  90302. function TCAN1_C1FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  90303. begin
  90304. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  90305. end;
  90306. procedure TCAN1_C1FIFOINT20.setRXHALFIF; inline;
  90307. begin
  90308. pTDefRegMap(@Self)^.&set := $00000002;
  90309. end;
  90310. procedure TCAN1_C1FIFOINT20.clearRXHALFIF; inline;
  90311. begin
  90312. pTDefRegMap(@Self)^.clr := $00000002;
  90313. end;
  90314. procedure TCAN1_C1FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  90315. begin
  90316. if thebits = 0 then
  90317. pTDefRegMap(@Self)^.clr := $00000002
  90318. else
  90319. pTDefRegMap(@Self)^.&set := $00000002;
  90320. end;
  90321. function TCAN1_C1FIFOINT20.getRXHALFIF : TBits_1; inline;
  90322. begin
  90323. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  90324. end;
  90325. procedure TCAN1_C1FIFOINT20.setRXFULLIF; inline;
  90326. begin
  90327. pTDefRegMap(@Self)^.&set := $00000004;
  90328. end;
  90329. procedure TCAN1_C1FIFOINT20.clearRXFULLIF; inline;
  90330. begin
  90331. pTDefRegMap(@Self)^.clr := $00000004;
  90332. end;
  90333. procedure TCAN1_C1FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  90334. begin
  90335. if thebits = 0 then
  90336. pTDefRegMap(@Self)^.clr := $00000004
  90337. else
  90338. pTDefRegMap(@Self)^.&set := $00000004;
  90339. end;
  90340. function TCAN1_C1FIFOINT20.getRXFULLIF : TBits_1; inline;
  90341. begin
  90342. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90343. end;
  90344. procedure TCAN1_C1FIFOINT20.setRXOVFLIF; inline;
  90345. begin
  90346. pTDefRegMap(@Self)^.&set := $00000008;
  90347. end;
  90348. procedure TCAN1_C1FIFOINT20.clearRXOVFLIF; inline;
  90349. begin
  90350. pTDefRegMap(@Self)^.clr := $00000008;
  90351. end;
  90352. procedure TCAN1_C1FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  90353. begin
  90354. if thebits = 0 then
  90355. pTDefRegMap(@Self)^.clr := $00000008
  90356. else
  90357. pTDefRegMap(@Self)^.&set := $00000008;
  90358. end;
  90359. function TCAN1_C1FIFOINT20.getRXOVFLIF : TBits_1; inline;
  90360. begin
  90361. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90362. end;
  90363. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF; inline;
  90364. begin
  90365. pTDefRegMap(@Self)^.&set := $00000100;
  90366. end;
  90367. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIF; inline;
  90368. begin
  90369. pTDefRegMap(@Self)^.clr := $00000100;
  90370. end;
  90371. procedure TCAN1_C1FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  90372. begin
  90373. if thebits = 0 then
  90374. pTDefRegMap(@Self)^.clr := $00000100
  90375. else
  90376. pTDefRegMap(@Self)^.&set := $00000100;
  90377. end;
  90378. function TCAN1_C1FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  90379. begin
  90380. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  90381. end;
  90382. procedure TCAN1_C1FIFOINT20.setTXHALFIF; inline;
  90383. begin
  90384. pTDefRegMap(@Self)^.&set := $00000200;
  90385. end;
  90386. procedure TCAN1_C1FIFOINT20.clearTXHALFIF; inline;
  90387. begin
  90388. pTDefRegMap(@Self)^.clr := $00000200;
  90389. end;
  90390. procedure TCAN1_C1FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  90391. begin
  90392. if thebits = 0 then
  90393. pTDefRegMap(@Self)^.clr := $00000200
  90394. else
  90395. pTDefRegMap(@Self)^.&set := $00000200;
  90396. end;
  90397. function TCAN1_C1FIFOINT20.getTXHALFIF : TBits_1; inline;
  90398. begin
  90399. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  90400. end;
  90401. procedure TCAN1_C1FIFOINT20.setTXNFULLIF; inline;
  90402. begin
  90403. pTDefRegMap(@Self)^.&set := $00000400;
  90404. end;
  90405. procedure TCAN1_C1FIFOINT20.clearTXNFULLIF; inline;
  90406. begin
  90407. pTDefRegMap(@Self)^.clr := $00000400;
  90408. end;
  90409. procedure TCAN1_C1FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  90410. begin
  90411. if thebits = 0 then
  90412. pTDefRegMap(@Self)^.clr := $00000400
  90413. else
  90414. pTDefRegMap(@Self)^.&set := $00000400;
  90415. end;
  90416. function TCAN1_C1FIFOINT20.getTXNFULLIF : TBits_1; inline;
  90417. begin
  90418. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  90419. end;
  90420. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE; inline;
  90421. begin
  90422. pTDefRegMap(@Self)^.&set := $00010000;
  90423. end;
  90424. procedure TCAN1_C1FIFOINT20.clearRXNEMPTYIE; inline;
  90425. begin
  90426. pTDefRegMap(@Self)^.clr := $00010000;
  90427. end;
  90428. procedure TCAN1_C1FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  90429. begin
  90430. if thebits = 0 then
  90431. pTDefRegMap(@Self)^.clr := $00010000
  90432. else
  90433. pTDefRegMap(@Self)^.&set := $00010000;
  90434. end;
  90435. function TCAN1_C1FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  90436. begin
  90437. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  90438. end;
  90439. procedure TCAN1_C1FIFOINT20.setRXHALFIE; inline;
  90440. begin
  90441. pTDefRegMap(@Self)^.&set := $00020000;
  90442. end;
  90443. procedure TCAN1_C1FIFOINT20.clearRXHALFIE; inline;
  90444. begin
  90445. pTDefRegMap(@Self)^.clr := $00020000;
  90446. end;
  90447. procedure TCAN1_C1FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  90448. begin
  90449. if thebits = 0 then
  90450. pTDefRegMap(@Self)^.clr := $00020000
  90451. else
  90452. pTDefRegMap(@Self)^.&set := $00020000;
  90453. end;
  90454. function TCAN1_C1FIFOINT20.getRXHALFIE : TBits_1; inline;
  90455. begin
  90456. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  90457. end;
  90458. procedure TCAN1_C1FIFOINT20.setRXFULLIE; inline;
  90459. begin
  90460. pTDefRegMap(@Self)^.&set := $00040000;
  90461. end;
  90462. procedure TCAN1_C1FIFOINT20.clearRXFULLIE; inline;
  90463. begin
  90464. pTDefRegMap(@Self)^.clr := $00040000;
  90465. end;
  90466. procedure TCAN1_C1FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  90467. begin
  90468. if thebits = 0 then
  90469. pTDefRegMap(@Self)^.clr := $00040000
  90470. else
  90471. pTDefRegMap(@Self)^.&set := $00040000;
  90472. end;
  90473. function TCAN1_C1FIFOINT20.getRXFULLIE : TBits_1; inline;
  90474. begin
  90475. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  90476. end;
  90477. procedure TCAN1_C1FIFOINT20.setRXOVFLIE; inline;
  90478. begin
  90479. pTDefRegMap(@Self)^.&set := $00080000;
  90480. end;
  90481. procedure TCAN1_C1FIFOINT20.clearRXOVFLIE; inline;
  90482. begin
  90483. pTDefRegMap(@Self)^.clr := $00080000;
  90484. end;
  90485. procedure TCAN1_C1FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  90486. begin
  90487. if thebits = 0 then
  90488. pTDefRegMap(@Self)^.clr := $00080000
  90489. else
  90490. pTDefRegMap(@Self)^.&set := $00080000;
  90491. end;
  90492. function TCAN1_C1FIFOINT20.getRXOVFLIE : TBits_1; inline;
  90493. begin
  90494. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  90495. end;
  90496. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE; inline;
  90497. begin
  90498. pTDefRegMap(@Self)^.&set := $01000000;
  90499. end;
  90500. procedure TCAN1_C1FIFOINT20.clearTXEMPTYIE; inline;
  90501. begin
  90502. pTDefRegMap(@Self)^.clr := $01000000;
  90503. end;
  90504. procedure TCAN1_C1FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  90505. begin
  90506. if thebits = 0 then
  90507. pTDefRegMap(@Self)^.clr := $01000000
  90508. else
  90509. pTDefRegMap(@Self)^.&set := $01000000;
  90510. end;
  90511. function TCAN1_C1FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  90512. begin
  90513. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  90514. end;
  90515. procedure TCAN1_C1FIFOINT20.setTXHALFIE; inline;
  90516. begin
  90517. pTDefRegMap(@Self)^.&set := $02000000;
  90518. end;
  90519. procedure TCAN1_C1FIFOINT20.clearTXHALFIE; inline;
  90520. begin
  90521. pTDefRegMap(@Self)^.clr := $02000000;
  90522. end;
  90523. procedure TCAN1_C1FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  90524. begin
  90525. if thebits = 0 then
  90526. pTDefRegMap(@Self)^.clr := $02000000
  90527. else
  90528. pTDefRegMap(@Self)^.&set := $02000000;
  90529. end;
  90530. function TCAN1_C1FIFOINT20.getTXHALFIE : TBits_1; inline;
  90531. begin
  90532. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  90533. end;
  90534. procedure TCAN1_C1FIFOINT20.setTXNFULLIE; inline;
  90535. begin
  90536. pTDefRegMap(@Self)^.&set := $04000000;
  90537. end;
  90538. procedure TCAN1_C1FIFOINT20.clearTXNFULLIE; inline;
  90539. begin
  90540. pTDefRegMap(@Self)^.clr := $04000000;
  90541. end;
  90542. procedure TCAN1_C1FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  90543. begin
  90544. if thebits = 0 then
  90545. pTDefRegMap(@Self)^.clr := $04000000
  90546. else
  90547. pTDefRegMap(@Self)^.&set := $04000000;
  90548. end;
  90549. function TCAN1_C1FIFOINT20.getTXNFULLIE : TBits_1; inline;
  90550. begin
  90551. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  90552. end;
  90553. procedure TCAN1_C1FIFOINT20.setw(thebits : TBits_32); inline;
  90554. begin
  90555. pTDefRegMap(@Self)^.val := thebits;
  90556. end;
  90557. function TCAN1_C1FIFOINT20.getw : TBits_32; inline;
  90558. begin
  90559. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90560. end;
  90561. procedure TCAN1_C1FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  90562. begin
  90563. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  90564. end;
  90565. function TCAN1_C1FIFOCI20.getCFIFOCI : TBits_5; inline;
  90566. begin
  90567. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  90568. end;
  90569. procedure TCAN1_C1FIFOCI20.setw(thebits : TBits_32); inline;
  90570. begin
  90571. pTDefRegMap(@Self)^.val := thebits;
  90572. end;
  90573. function TCAN1_C1FIFOCI20.getw : TBits_32; inline;
  90574. begin
  90575. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90576. end;
  90577. procedure TCAN1_C1FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  90578. begin
  90579. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  90580. end;
  90581. function TCAN1_C1FIFOCON21.getTXPRI : TBits_2; inline;
  90582. begin
  90583. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  90584. end;
  90585. procedure TCAN1_C1FIFOCON21.setRTREN; inline;
  90586. begin
  90587. pTDefRegMap(@Self)^.&set := $00000004;
  90588. end;
  90589. procedure TCAN1_C1FIFOCON21.clearRTREN; inline;
  90590. begin
  90591. pTDefRegMap(@Self)^.clr := $00000004;
  90592. end;
  90593. procedure TCAN1_C1FIFOCON21.setRTREN(thebits : TBits_1); inline;
  90594. begin
  90595. if thebits = 0 then
  90596. pTDefRegMap(@Self)^.clr := $00000004
  90597. else
  90598. pTDefRegMap(@Self)^.&set := $00000004;
  90599. end;
  90600. function TCAN1_C1FIFOCON21.getRTREN : TBits_1; inline;
  90601. begin
  90602. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90603. end;
  90604. procedure TCAN1_C1FIFOCON21.setTXREQ; inline;
  90605. begin
  90606. pTDefRegMap(@Self)^.&set := $00000008;
  90607. end;
  90608. procedure TCAN1_C1FIFOCON21.clearTXREQ; inline;
  90609. begin
  90610. pTDefRegMap(@Self)^.clr := $00000008;
  90611. end;
  90612. procedure TCAN1_C1FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  90613. begin
  90614. if thebits = 0 then
  90615. pTDefRegMap(@Self)^.clr := $00000008
  90616. else
  90617. pTDefRegMap(@Self)^.&set := $00000008;
  90618. end;
  90619. function TCAN1_C1FIFOCON21.getTXREQ : TBits_1; inline;
  90620. begin
  90621. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90622. end;
  90623. procedure TCAN1_C1FIFOCON21.setTXERR; inline;
  90624. begin
  90625. pTDefRegMap(@Self)^.&set := $00000010;
  90626. end;
  90627. procedure TCAN1_C1FIFOCON21.clearTXERR; inline;
  90628. begin
  90629. pTDefRegMap(@Self)^.clr := $00000010;
  90630. end;
  90631. procedure TCAN1_C1FIFOCON21.setTXERR(thebits : TBits_1); inline;
  90632. begin
  90633. if thebits = 0 then
  90634. pTDefRegMap(@Self)^.clr := $00000010
  90635. else
  90636. pTDefRegMap(@Self)^.&set := $00000010;
  90637. end;
  90638. function TCAN1_C1FIFOCON21.getTXERR : TBits_1; inline;
  90639. begin
  90640. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  90641. end;
  90642. procedure TCAN1_C1FIFOCON21.setTXLARB; inline;
  90643. begin
  90644. pTDefRegMap(@Self)^.&set := $00000020;
  90645. end;
  90646. procedure TCAN1_C1FIFOCON21.clearTXLARB; inline;
  90647. begin
  90648. pTDefRegMap(@Self)^.clr := $00000020;
  90649. end;
  90650. procedure TCAN1_C1FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  90651. begin
  90652. if thebits = 0 then
  90653. pTDefRegMap(@Self)^.clr := $00000020
  90654. else
  90655. pTDefRegMap(@Self)^.&set := $00000020;
  90656. end;
  90657. function TCAN1_C1FIFOCON21.getTXLARB : TBits_1; inline;
  90658. begin
  90659. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  90660. end;
  90661. procedure TCAN1_C1FIFOCON21.setTXABAT; inline;
  90662. begin
  90663. pTDefRegMap(@Self)^.&set := $00000040;
  90664. end;
  90665. procedure TCAN1_C1FIFOCON21.clearTXABAT; inline;
  90666. begin
  90667. pTDefRegMap(@Self)^.clr := $00000040;
  90668. end;
  90669. procedure TCAN1_C1FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  90670. begin
  90671. if thebits = 0 then
  90672. pTDefRegMap(@Self)^.clr := $00000040
  90673. else
  90674. pTDefRegMap(@Self)^.&set := $00000040;
  90675. end;
  90676. function TCAN1_C1FIFOCON21.getTXABAT : TBits_1; inline;
  90677. begin
  90678. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  90679. end;
  90680. procedure TCAN1_C1FIFOCON21.setTXEN; inline;
  90681. begin
  90682. pTDefRegMap(@Self)^.&set := $00000080;
  90683. end;
  90684. procedure TCAN1_C1FIFOCON21.clearTXEN; inline;
  90685. begin
  90686. pTDefRegMap(@Self)^.clr := $00000080;
  90687. end;
  90688. procedure TCAN1_C1FIFOCON21.setTXEN(thebits : TBits_1); inline;
  90689. begin
  90690. if thebits = 0 then
  90691. pTDefRegMap(@Self)^.clr := $00000080
  90692. else
  90693. pTDefRegMap(@Self)^.&set := $00000080;
  90694. end;
  90695. function TCAN1_C1FIFOCON21.getTXEN : TBits_1; inline;
  90696. begin
  90697. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  90698. end;
  90699. procedure TCAN1_C1FIFOCON21.setDONLY; inline;
  90700. begin
  90701. pTDefRegMap(@Self)^.&set := $00001000;
  90702. end;
  90703. procedure TCAN1_C1FIFOCON21.clearDONLY; inline;
  90704. begin
  90705. pTDefRegMap(@Self)^.clr := $00001000;
  90706. end;
  90707. procedure TCAN1_C1FIFOCON21.setDONLY(thebits : TBits_1); inline;
  90708. begin
  90709. if thebits = 0 then
  90710. pTDefRegMap(@Self)^.clr := $00001000
  90711. else
  90712. pTDefRegMap(@Self)^.&set := $00001000;
  90713. end;
  90714. function TCAN1_C1FIFOCON21.getDONLY : TBits_1; inline;
  90715. begin
  90716. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  90717. end;
  90718. procedure TCAN1_C1FIFOCON21.setUINC; inline;
  90719. begin
  90720. pTDefRegMap(@Self)^.&set := $00002000;
  90721. end;
  90722. procedure TCAN1_C1FIFOCON21.clearUINC; inline;
  90723. begin
  90724. pTDefRegMap(@Self)^.clr := $00002000;
  90725. end;
  90726. procedure TCAN1_C1FIFOCON21.setUINC(thebits : TBits_1); inline;
  90727. begin
  90728. if thebits = 0 then
  90729. pTDefRegMap(@Self)^.clr := $00002000
  90730. else
  90731. pTDefRegMap(@Self)^.&set := $00002000;
  90732. end;
  90733. function TCAN1_C1FIFOCON21.getUINC : TBits_1; inline;
  90734. begin
  90735. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  90736. end;
  90737. procedure TCAN1_C1FIFOCON21.setFRESET; inline;
  90738. begin
  90739. pTDefRegMap(@Self)^.&set := $00004000;
  90740. end;
  90741. procedure TCAN1_C1FIFOCON21.clearFRESET; inline;
  90742. begin
  90743. pTDefRegMap(@Self)^.clr := $00004000;
  90744. end;
  90745. procedure TCAN1_C1FIFOCON21.setFRESET(thebits : TBits_1); inline;
  90746. begin
  90747. if thebits = 0 then
  90748. pTDefRegMap(@Self)^.clr := $00004000
  90749. else
  90750. pTDefRegMap(@Self)^.&set := $00004000;
  90751. end;
  90752. function TCAN1_C1FIFOCON21.getFRESET : TBits_1; inline;
  90753. begin
  90754. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  90755. end;
  90756. procedure TCAN1_C1FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  90757. begin
  90758. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  90759. end;
  90760. function TCAN1_C1FIFOCON21.getFSIZE : TBits_5; inline;
  90761. begin
  90762. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  90763. end;
  90764. procedure TCAN1_C1FIFOCON21.setw(thebits : TBits_32); inline;
  90765. begin
  90766. pTDefRegMap(@Self)^.val := thebits;
  90767. end;
  90768. function TCAN1_C1FIFOCON21.getw : TBits_32; inline;
  90769. begin
  90770. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  90771. end;
  90772. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF; inline;
  90773. begin
  90774. pTDefRegMap(@Self)^.&set := $00000001;
  90775. end;
  90776. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIF; inline;
  90777. begin
  90778. pTDefRegMap(@Self)^.clr := $00000001;
  90779. end;
  90780. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  90781. begin
  90782. if thebits = 0 then
  90783. pTDefRegMap(@Self)^.clr := $00000001
  90784. else
  90785. pTDefRegMap(@Self)^.&set := $00000001;
  90786. end;
  90787. function TCAN1_C1FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  90788. begin
  90789. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  90790. end;
  90791. procedure TCAN1_C1FIFOINT21.setRXHALFIF; inline;
  90792. begin
  90793. pTDefRegMap(@Self)^.&set := $00000002;
  90794. end;
  90795. procedure TCAN1_C1FIFOINT21.clearRXHALFIF; inline;
  90796. begin
  90797. pTDefRegMap(@Self)^.clr := $00000002;
  90798. end;
  90799. procedure TCAN1_C1FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  90800. begin
  90801. if thebits = 0 then
  90802. pTDefRegMap(@Self)^.clr := $00000002
  90803. else
  90804. pTDefRegMap(@Self)^.&set := $00000002;
  90805. end;
  90806. function TCAN1_C1FIFOINT21.getRXHALFIF : TBits_1; inline;
  90807. begin
  90808. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  90809. end;
  90810. procedure TCAN1_C1FIFOINT21.setRXFULLIF; inline;
  90811. begin
  90812. pTDefRegMap(@Self)^.&set := $00000004;
  90813. end;
  90814. procedure TCAN1_C1FIFOINT21.clearRXFULLIF; inline;
  90815. begin
  90816. pTDefRegMap(@Self)^.clr := $00000004;
  90817. end;
  90818. procedure TCAN1_C1FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  90819. begin
  90820. if thebits = 0 then
  90821. pTDefRegMap(@Self)^.clr := $00000004
  90822. else
  90823. pTDefRegMap(@Self)^.&set := $00000004;
  90824. end;
  90825. function TCAN1_C1FIFOINT21.getRXFULLIF : TBits_1; inline;
  90826. begin
  90827. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  90828. end;
  90829. procedure TCAN1_C1FIFOINT21.setRXOVFLIF; inline;
  90830. begin
  90831. pTDefRegMap(@Self)^.&set := $00000008;
  90832. end;
  90833. procedure TCAN1_C1FIFOINT21.clearRXOVFLIF; inline;
  90834. begin
  90835. pTDefRegMap(@Self)^.clr := $00000008;
  90836. end;
  90837. procedure TCAN1_C1FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  90838. begin
  90839. if thebits = 0 then
  90840. pTDefRegMap(@Self)^.clr := $00000008
  90841. else
  90842. pTDefRegMap(@Self)^.&set := $00000008;
  90843. end;
  90844. function TCAN1_C1FIFOINT21.getRXOVFLIF : TBits_1; inline;
  90845. begin
  90846. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  90847. end;
  90848. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF; inline;
  90849. begin
  90850. pTDefRegMap(@Self)^.&set := $00000100;
  90851. end;
  90852. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIF; inline;
  90853. begin
  90854. pTDefRegMap(@Self)^.clr := $00000100;
  90855. end;
  90856. procedure TCAN1_C1FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  90857. begin
  90858. if thebits = 0 then
  90859. pTDefRegMap(@Self)^.clr := $00000100
  90860. else
  90861. pTDefRegMap(@Self)^.&set := $00000100;
  90862. end;
  90863. function TCAN1_C1FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  90864. begin
  90865. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  90866. end;
  90867. procedure TCAN1_C1FIFOINT21.setTXHALFIF; inline;
  90868. begin
  90869. pTDefRegMap(@Self)^.&set := $00000200;
  90870. end;
  90871. procedure TCAN1_C1FIFOINT21.clearTXHALFIF; inline;
  90872. begin
  90873. pTDefRegMap(@Self)^.clr := $00000200;
  90874. end;
  90875. procedure TCAN1_C1FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  90876. begin
  90877. if thebits = 0 then
  90878. pTDefRegMap(@Self)^.clr := $00000200
  90879. else
  90880. pTDefRegMap(@Self)^.&set := $00000200;
  90881. end;
  90882. function TCAN1_C1FIFOINT21.getTXHALFIF : TBits_1; inline;
  90883. begin
  90884. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  90885. end;
  90886. procedure TCAN1_C1FIFOINT21.setTXNFULLIF; inline;
  90887. begin
  90888. pTDefRegMap(@Self)^.&set := $00000400;
  90889. end;
  90890. procedure TCAN1_C1FIFOINT21.clearTXNFULLIF; inline;
  90891. begin
  90892. pTDefRegMap(@Self)^.clr := $00000400;
  90893. end;
  90894. procedure TCAN1_C1FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  90895. begin
  90896. if thebits = 0 then
  90897. pTDefRegMap(@Self)^.clr := $00000400
  90898. else
  90899. pTDefRegMap(@Self)^.&set := $00000400;
  90900. end;
  90901. function TCAN1_C1FIFOINT21.getTXNFULLIF : TBits_1; inline;
  90902. begin
  90903. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  90904. end;
  90905. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE; inline;
  90906. begin
  90907. pTDefRegMap(@Self)^.&set := $00010000;
  90908. end;
  90909. procedure TCAN1_C1FIFOINT21.clearRXNEMPTYIE; inline;
  90910. begin
  90911. pTDefRegMap(@Self)^.clr := $00010000;
  90912. end;
  90913. procedure TCAN1_C1FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  90914. begin
  90915. if thebits = 0 then
  90916. pTDefRegMap(@Self)^.clr := $00010000
  90917. else
  90918. pTDefRegMap(@Self)^.&set := $00010000;
  90919. end;
  90920. function TCAN1_C1FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  90921. begin
  90922. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  90923. end;
  90924. procedure TCAN1_C1FIFOINT21.setRXHALFIE; inline;
  90925. begin
  90926. pTDefRegMap(@Self)^.&set := $00020000;
  90927. end;
  90928. procedure TCAN1_C1FIFOINT21.clearRXHALFIE; inline;
  90929. begin
  90930. pTDefRegMap(@Self)^.clr := $00020000;
  90931. end;
  90932. procedure TCAN1_C1FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  90933. begin
  90934. if thebits = 0 then
  90935. pTDefRegMap(@Self)^.clr := $00020000
  90936. else
  90937. pTDefRegMap(@Self)^.&set := $00020000;
  90938. end;
  90939. function TCAN1_C1FIFOINT21.getRXHALFIE : TBits_1; inline;
  90940. begin
  90941. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  90942. end;
  90943. procedure TCAN1_C1FIFOINT21.setRXFULLIE; inline;
  90944. begin
  90945. pTDefRegMap(@Self)^.&set := $00040000;
  90946. end;
  90947. procedure TCAN1_C1FIFOINT21.clearRXFULLIE; inline;
  90948. begin
  90949. pTDefRegMap(@Self)^.clr := $00040000;
  90950. end;
  90951. procedure TCAN1_C1FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  90952. begin
  90953. if thebits = 0 then
  90954. pTDefRegMap(@Self)^.clr := $00040000
  90955. else
  90956. pTDefRegMap(@Self)^.&set := $00040000;
  90957. end;
  90958. function TCAN1_C1FIFOINT21.getRXFULLIE : TBits_1; inline;
  90959. begin
  90960. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  90961. end;
  90962. procedure TCAN1_C1FIFOINT21.setRXOVFLIE; inline;
  90963. begin
  90964. pTDefRegMap(@Self)^.&set := $00080000;
  90965. end;
  90966. procedure TCAN1_C1FIFOINT21.clearRXOVFLIE; inline;
  90967. begin
  90968. pTDefRegMap(@Self)^.clr := $00080000;
  90969. end;
  90970. procedure TCAN1_C1FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  90971. begin
  90972. if thebits = 0 then
  90973. pTDefRegMap(@Self)^.clr := $00080000
  90974. else
  90975. pTDefRegMap(@Self)^.&set := $00080000;
  90976. end;
  90977. function TCAN1_C1FIFOINT21.getRXOVFLIE : TBits_1; inline;
  90978. begin
  90979. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  90980. end;
  90981. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE; inline;
  90982. begin
  90983. pTDefRegMap(@Self)^.&set := $01000000;
  90984. end;
  90985. procedure TCAN1_C1FIFOINT21.clearTXEMPTYIE; inline;
  90986. begin
  90987. pTDefRegMap(@Self)^.clr := $01000000;
  90988. end;
  90989. procedure TCAN1_C1FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  90990. begin
  90991. if thebits = 0 then
  90992. pTDefRegMap(@Self)^.clr := $01000000
  90993. else
  90994. pTDefRegMap(@Self)^.&set := $01000000;
  90995. end;
  90996. function TCAN1_C1FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  90997. begin
  90998. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  90999. end;
  91000. procedure TCAN1_C1FIFOINT21.setTXHALFIE; inline;
  91001. begin
  91002. pTDefRegMap(@Self)^.&set := $02000000;
  91003. end;
  91004. procedure TCAN1_C1FIFOINT21.clearTXHALFIE; inline;
  91005. begin
  91006. pTDefRegMap(@Self)^.clr := $02000000;
  91007. end;
  91008. procedure TCAN1_C1FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  91009. begin
  91010. if thebits = 0 then
  91011. pTDefRegMap(@Self)^.clr := $02000000
  91012. else
  91013. pTDefRegMap(@Self)^.&set := $02000000;
  91014. end;
  91015. function TCAN1_C1FIFOINT21.getTXHALFIE : TBits_1; inline;
  91016. begin
  91017. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  91018. end;
  91019. procedure TCAN1_C1FIFOINT21.setTXNFULLIE; inline;
  91020. begin
  91021. pTDefRegMap(@Self)^.&set := $04000000;
  91022. end;
  91023. procedure TCAN1_C1FIFOINT21.clearTXNFULLIE; inline;
  91024. begin
  91025. pTDefRegMap(@Self)^.clr := $04000000;
  91026. end;
  91027. procedure TCAN1_C1FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  91028. begin
  91029. if thebits = 0 then
  91030. pTDefRegMap(@Self)^.clr := $04000000
  91031. else
  91032. pTDefRegMap(@Self)^.&set := $04000000;
  91033. end;
  91034. function TCAN1_C1FIFOINT21.getTXNFULLIE : TBits_1; inline;
  91035. begin
  91036. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  91037. end;
  91038. procedure TCAN1_C1FIFOINT21.setw(thebits : TBits_32); inline;
  91039. begin
  91040. pTDefRegMap(@Self)^.val := thebits;
  91041. end;
  91042. function TCAN1_C1FIFOINT21.getw : TBits_32; inline;
  91043. begin
  91044. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91045. end;
  91046. procedure TCAN1_C1FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  91047. begin
  91048. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  91049. end;
  91050. function TCAN1_C1FIFOCI21.getCFIFOCI : TBits_5; inline;
  91051. begin
  91052. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  91053. end;
  91054. procedure TCAN1_C1FIFOCI21.setw(thebits : TBits_32); inline;
  91055. begin
  91056. pTDefRegMap(@Self)^.val := thebits;
  91057. end;
  91058. function TCAN1_C1FIFOCI21.getw : TBits_32; inline;
  91059. begin
  91060. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91061. end;
  91062. procedure TCAN1_C1FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  91063. begin
  91064. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  91065. end;
  91066. function TCAN1_C1FIFOCON22.getTXPRI : TBits_2; inline;
  91067. begin
  91068. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  91069. end;
  91070. procedure TCAN1_C1FIFOCON22.setRTREN; inline;
  91071. begin
  91072. pTDefRegMap(@Self)^.&set := $00000004;
  91073. end;
  91074. procedure TCAN1_C1FIFOCON22.clearRTREN; inline;
  91075. begin
  91076. pTDefRegMap(@Self)^.clr := $00000004;
  91077. end;
  91078. procedure TCAN1_C1FIFOCON22.setRTREN(thebits : TBits_1); inline;
  91079. begin
  91080. if thebits = 0 then
  91081. pTDefRegMap(@Self)^.clr := $00000004
  91082. else
  91083. pTDefRegMap(@Self)^.&set := $00000004;
  91084. end;
  91085. function TCAN1_C1FIFOCON22.getRTREN : TBits_1; inline;
  91086. begin
  91087. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91088. end;
  91089. procedure TCAN1_C1FIFOCON22.setTXREQ; inline;
  91090. begin
  91091. pTDefRegMap(@Self)^.&set := $00000008;
  91092. end;
  91093. procedure TCAN1_C1FIFOCON22.clearTXREQ; inline;
  91094. begin
  91095. pTDefRegMap(@Self)^.clr := $00000008;
  91096. end;
  91097. procedure TCAN1_C1FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  91098. begin
  91099. if thebits = 0 then
  91100. pTDefRegMap(@Self)^.clr := $00000008
  91101. else
  91102. pTDefRegMap(@Self)^.&set := $00000008;
  91103. end;
  91104. function TCAN1_C1FIFOCON22.getTXREQ : TBits_1; inline;
  91105. begin
  91106. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91107. end;
  91108. procedure TCAN1_C1FIFOCON22.setTXERR; inline;
  91109. begin
  91110. pTDefRegMap(@Self)^.&set := $00000010;
  91111. end;
  91112. procedure TCAN1_C1FIFOCON22.clearTXERR; inline;
  91113. begin
  91114. pTDefRegMap(@Self)^.clr := $00000010;
  91115. end;
  91116. procedure TCAN1_C1FIFOCON22.setTXERR(thebits : TBits_1); inline;
  91117. begin
  91118. if thebits = 0 then
  91119. pTDefRegMap(@Self)^.clr := $00000010
  91120. else
  91121. pTDefRegMap(@Self)^.&set := $00000010;
  91122. end;
  91123. function TCAN1_C1FIFOCON22.getTXERR : TBits_1; inline;
  91124. begin
  91125. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  91126. end;
  91127. procedure TCAN1_C1FIFOCON22.setTXLARB; inline;
  91128. begin
  91129. pTDefRegMap(@Self)^.&set := $00000020;
  91130. end;
  91131. procedure TCAN1_C1FIFOCON22.clearTXLARB; inline;
  91132. begin
  91133. pTDefRegMap(@Self)^.clr := $00000020;
  91134. end;
  91135. procedure TCAN1_C1FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  91136. begin
  91137. if thebits = 0 then
  91138. pTDefRegMap(@Self)^.clr := $00000020
  91139. else
  91140. pTDefRegMap(@Self)^.&set := $00000020;
  91141. end;
  91142. function TCAN1_C1FIFOCON22.getTXLARB : TBits_1; inline;
  91143. begin
  91144. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  91145. end;
  91146. procedure TCAN1_C1FIFOCON22.setTXABAT; inline;
  91147. begin
  91148. pTDefRegMap(@Self)^.&set := $00000040;
  91149. end;
  91150. procedure TCAN1_C1FIFOCON22.clearTXABAT; inline;
  91151. begin
  91152. pTDefRegMap(@Self)^.clr := $00000040;
  91153. end;
  91154. procedure TCAN1_C1FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  91155. begin
  91156. if thebits = 0 then
  91157. pTDefRegMap(@Self)^.clr := $00000040
  91158. else
  91159. pTDefRegMap(@Self)^.&set := $00000040;
  91160. end;
  91161. function TCAN1_C1FIFOCON22.getTXABAT : TBits_1; inline;
  91162. begin
  91163. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  91164. end;
  91165. procedure TCAN1_C1FIFOCON22.setTXEN; inline;
  91166. begin
  91167. pTDefRegMap(@Self)^.&set := $00000080;
  91168. end;
  91169. procedure TCAN1_C1FIFOCON22.clearTXEN; inline;
  91170. begin
  91171. pTDefRegMap(@Self)^.clr := $00000080;
  91172. end;
  91173. procedure TCAN1_C1FIFOCON22.setTXEN(thebits : TBits_1); inline;
  91174. begin
  91175. if thebits = 0 then
  91176. pTDefRegMap(@Self)^.clr := $00000080
  91177. else
  91178. pTDefRegMap(@Self)^.&set := $00000080;
  91179. end;
  91180. function TCAN1_C1FIFOCON22.getTXEN : TBits_1; inline;
  91181. begin
  91182. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  91183. end;
  91184. procedure TCAN1_C1FIFOCON22.setDONLY; inline;
  91185. begin
  91186. pTDefRegMap(@Self)^.&set := $00001000;
  91187. end;
  91188. procedure TCAN1_C1FIFOCON22.clearDONLY; inline;
  91189. begin
  91190. pTDefRegMap(@Self)^.clr := $00001000;
  91191. end;
  91192. procedure TCAN1_C1FIFOCON22.setDONLY(thebits : TBits_1); inline;
  91193. begin
  91194. if thebits = 0 then
  91195. pTDefRegMap(@Self)^.clr := $00001000
  91196. else
  91197. pTDefRegMap(@Self)^.&set := $00001000;
  91198. end;
  91199. function TCAN1_C1FIFOCON22.getDONLY : TBits_1; inline;
  91200. begin
  91201. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  91202. end;
  91203. procedure TCAN1_C1FIFOCON22.setUINC; inline;
  91204. begin
  91205. pTDefRegMap(@Self)^.&set := $00002000;
  91206. end;
  91207. procedure TCAN1_C1FIFOCON22.clearUINC; inline;
  91208. begin
  91209. pTDefRegMap(@Self)^.clr := $00002000;
  91210. end;
  91211. procedure TCAN1_C1FIFOCON22.setUINC(thebits : TBits_1); inline;
  91212. begin
  91213. if thebits = 0 then
  91214. pTDefRegMap(@Self)^.clr := $00002000
  91215. else
  91216. pTDefRegMap(@Self)^.&set := $00002000;
  91217. end;
  91218. function TCAN1_C1FIFOCON22.getUINC : TBits_1; inline;
  91219. begin
  91220. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  91221. end;
  91222. procedure TCAN1_C1FIFOCON22.setFRESET; inline;
  91223. begin
  91224. pTDefRegMap(@Self)^.&set := $00004000;
  91225. end;
  91226. procedure TCAN1_C1FIFOCON22.clearFRESET; inline;
  91227. begin
  91228. pTDefRegMap(@Self)^.clr := $00004000;
  91229. end;
  91230. procedure TCAN1_C1FIFOCON22.setFRESET(thebits : TBits_1); inline;
  91231. begin
  91232. if thebits = 0 then
  91233. pTDefRegMap(@Self)^.clr := $00004000
  91234. else
  91235. pTDefRegMap(@Self)^.&set := $00004000;
  91236. end;
  91237. function TCAN1_C1FIFOCON22.getFRESET : TBits_1; inline;
  91238. begin
  91239. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  91240. end;
  91241. procedure TCAN1_C1FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  91242. begin
  91243. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  91244. end;
  91245. function TCAN1_C1FIFOCON22.getFSIZE : TBits_5; inline;
  91246. begin
  91247. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  91248. end;
  91249. procedure TCAN1_C1FIFOCON22.setw(thebits : TBits_32); inline;
  91250. begin
  91251. pTDefRegMap(@Self)^.val := thebits;
  91252. end;
  91253. function TCAN1_C1FIFOCON22.getw : TBits_32; inline;
  91254. begin
  91255. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91256. end;
  91257. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF; inline;
  91258. begin
  91259. pTDefRegMap(@Self)^.&set := $00000001;
  91260. end;
  91261. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIF; inline;
  91262. begin
  91263. pTDefRegMap(@Self)^.clr := $00000001;
  91264. end;
  91265. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  91266. begin
  91267. if thebits = 0 then
  91268. pTDefRegMap(@Self)^.clr := $00000001
  91269. else
  91270. pTDefRegMap(@Self)^.&set := $00000001;
  91271. end;
  91272. function TCAN1_C1FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  91273. begin
  91274. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  91275. end;
  91276. procedure TCAN1_C1FIFOINT22.setRXHALFIF; inline;
  91277. begin
  91278. pTDefRegMap(@Self)^.&set := $00000002;
  91279. end;
  91280. procedure TCAN1_C1FIFOINT22.clearRXHALFIF; inline;
  91281. begin
  91282. pTDefRegMap(@Self)^.clr := $00000002;
  91283. end;
  91284. procedure TCAN1_C1FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  91285. begin
  91286. if thebits = 0 then
  91287. pTDefRegMap(@Self)^.clr := $00000002
  91288. else
  91289. pTDefRegMap(@Self)^.&set := $00000002;
  91290. end;
  91291. function TCAN1_C1FIFOINT22.getRXHALFIF : TBits_1; inline;
  91292. begin
  91293. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  91294. end;
  91295. procedure TCAN1_C1FIFOINT22.setRXFULLIF; inline;
  91296. begin
  91297. pTDefRegMap(@Self)^.&set := $00000004;
  91298. end;
  91299. procedure TCAN1_C1FIFOINT22.clearRXFULLIF; inline;
  91300. begin
  91301. pTDefRegMap(@Self)^.clr := $00000004;
  91302. end;
  91303. procedure TCAN1_C1FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  91304. begin
  91305. if thebits = 0 then
  91306. pTDefRegMap(@Self)^.clr := $00000004
  91307. else
  91308. pTDefRegMap(@Self)^.&set := $00000004;
  91309. end;
  91310. function TCAN1_C1FIFOINT22.getRXFULLIF : TBits_1; inline;
  91311. begin
  91312. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91313. end;
  91314. procedure TCAN1_C1FIFOINT22.setRXOVFLIF; inline;
  91315. begin
  91316. pTDefRegMap(@Self)^.&set := $00000008;
  91317. end;
  91318. procedure TCAN1_C1FIFOINT22.clearRXOVFLIF; inline;
  91319. begin
  91320. pTDefRegMap(@Self)^.clr := $00000008;
  91321. end;
  91322. procedure TCAN1_C1FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  91323. begin
  91324. if thebits = 0 then
  91325. pTDefRegMap(@Self)^.clr := $00000008
  91326. else
  91327. pTDefRegMap(@Self)^.&set := $00000008;
  91328. end;
  91329. function TCAN1_C1FIFOINT22.getRXOVFLIF : TBits_1; inline;
  91330. begin
  91331. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91332. end;
  91333. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF; inline;
  91334. begin
  91335. pTDefRegMap(@Self)^.&set := $00000100;
  91336. end;
  91337. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIF; inline;
  91338. begin
  91339. pTDefRegMap(@Self)^.clr := $00000100;
  91340. end;
  91341. procedure TCAN1_C1FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  91342. begin
  91343. if thebits = 0 then
  91344. pTDefRegMap(@Self)^.clr := $00000100
  91345. else
  91346. pTDefRegMap(@Self)^.&set := $00000100;
  91347. end;
  91348. function TCAN1_C1FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  91349. begin
  91350. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  91351. end;
  91352. procedure TCAN1_C1FIFOINT22.setTXHALFIF; inline;
  91353. begin
  91354. pTDefRegMap(@Self)^.&set := $00000200;
  91355. end;
  91356. procedure TCAN1_C1FIFOINT22.clearTXHALFIF; inline;
  91357. begin
  91358. pTDefRegMap(@Self)^.clr := $00000200;
  91359. end;
  91360. procedure TCAN1_C1FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  91361. begin
  91362. if thebits = 0 then
  91363. pTDefRegMap(@Self)^.clr := $00000200
  91364. else
  91365. pTDefRegMap(@Self)^.&set := $00000200;
  91366. end;
  91367. function TCAN1_C1FIFOINT22.getTXHALFIF : TBits_1; inline;
  91368. begin
  91369. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  91370. end;
  91371. procedure TCAN1_C1FIFOINT22.setTXNFULLIF; inline;
  91372. begin
  91373. pTDefRegMap(@Self)^.&set := $00000400;
  91374. end;
  91375. procedure TCAN1_C1FIFOINT22.clearTXNFULLIF; inline;
  91376. begin
  91377. pTDefRegMap(@Self)^.clr := $00000400;
  91378. end;
  91379. procedure TCAN1_C1FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  91380. begin
  91381. if thebits = 0 then
  91382. pTDefRegMap(@Self)^.clr := $00000400
  91383. else
  91384. pTDefRegMap(@Self)^.&set := $00000400;
  91385. end;
  91386. function TCAN1_C1FIFOINT22.getTXNFULLIF : TBits_1; inline;
  91387. begin
  91388. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  91389. end;
  91390. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE; inline;
  91391. begin
  91392. pTDefRegMap(@Self)^.&set := $00010000;
  91393. end;
  91394. procedure TCAN1_C1FIFOINT22.clearRXNEMPTYIE; inline;
  91395. begin
  91396. pTDefRegMap(@Self)^.clr := $00010000;
  91397. end;
  91398. procedure TCAN1_C1FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  91399. begin
  91400. if thebits = 0 then
  91401. pTDefRegMap(@Self)^.clr := $00010000
  91402. else
  91403. pTDefRegMap(@Self)^.&set := $00010000;
  91404. end;
  91405. function TCAN1_C1FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  91406. begin
  91407. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  91408. end;
  91409. procedure TCAN1_C1FIFOINT22.setRXHALFIE; inline;
  91410. begin
  91411. pTDefRegMap(@Self)^.&set := $00020000;
  91412. end;
  91413. procedure TCAN1_C1FIFOINT22.clearRXHALFIE; inline;
  91414. begin
  91415. pTDefRegMap(@Self)^.clr := $00020000;
  91416. end;
  91417. procedure TCAN1_C1FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  91418. begin
  91419. if thebits = 0 then
  91420. pTDefRegMap(@Self)^.clr := $00020000
  91421. else
  91422. pTDefRegMap(@Self)^.&set := $00020000;
  91423. end;
  91424. function TCAN1_C1FIFOINT22.getRXHALFIE : TBits_1; inline;
  91425. begin
  91426. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  91427. end;
  91428. procedure TCAN1_C1FIFOINT22.setRXFULLIE; inline;
  91429. begin
  91430. pTDefRegMap(@Self)^.&set := $00040000;
  91431. end;
  91432. procedure TCAN1_C1FIFOINT22.clearRXFULLIE; inline;
  91433. begin
  91434. pTDefRegMap(@Self)^.clr := $00040000;
  91435. end;
  91436. procedure TCAN1_C1FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  91437. begin
  91438. if thebits = 0 then
  91439. pTDefRegMap(@Self)^.clr := $00040000
  91440. else
  91441. pTDefRegMap(@Self)^.&set := $00040000;
  91442. end;
  91443. function TCAN1_C1FIFOINT22.getRXFULLIE : TBits_1; inline;
  91444. begin
  91445. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  91446. end;
  91447. procedure TCAN1_C1FIFOINT22.setRXOVFLIE; inline;
  91448. begin
  91449. pTDefRegMap(@Self)^.&set := $00080000;
  91450. end;
  91451. procedure TCAN1_C1FIFOINT22.clearRXOVFLIE; inline;
  91452. begin
  91453. pTDefRegMap(@Self)^.clr := $00080000;
  91454. end;
  91455. procedure TCAN1_C1FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  91456. begin
  91457. if thebits = 0 then
  91458. pTDefRegMap(@Self)^.clr := $00080000
  91459. else
  91460. pTDefRegMap(@Self)^.&set := $00080000;
  91461. end;
  91462. function TCAN1_C1FIFOINT22.getRXOVFLIE : TBits_1; inline;
  91463. begin
  91464. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  91465. end;
  91466. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE; inline;
  91467. begin
  91468. pTDefRegMap(@Self)^.&set := $01000000;
  91469. end;
  91470. procedure TCAN1_C1FIFOINT22.clearTXEMPTYIE; inline;
  91471. begin
  91472. pTDefRegMap(@Self)^.clr := $01000000;
  91473. end;
  91474. procedure TCAN1_C1FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  91475. begin
  91476. if thebits = 0 then
  91477. pTDefRegMap(@Self)^.clr := $01000000
  91478. else
  91479. pTDefRegMap(@Self)^.&set := $01000000;
  91480. end;
  91481. function TCAN1_C1FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  91482. begin
  91483. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  91484. end;
  91485. procedure TCAN1_C1FIFOINT22.setTXHALFIE; inline;
  91486. begin
  91487. pTDefRegMap(@Self)^.&set := $02000000;
  91488. end;
  91489. procedure TCAN1_C1FIFOINT22.clearTXHALFIE; inline;
  91490. begin
  91491. pTDefRegMap(@Self)^.clr := $02000000;
  91492. end;
  91493. procedure TCAN1_C1FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  91494. begin
  91495. if thebits = 0 then
  91496. pTDefRegMap(@Self)^.clr := $02000000
  91497. else
  91498. pTDefRegMap(@Self)^.&set := $02000000;
  91499. end;
  91500. function TCAN1_C1FIFOINT22.getTXHALFIE : TBits_1; inline;
  91501. begin
  91502. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  91503. end;
  91504. procedure TCAN1_C1FIFOINT22.setTXNFULLIE; inline;
  91505. begin
  91506. pTDefRegMap(@Self)^.&set := $04000000;
  91507. end;
  91508. procedure TCAN1_C1FIFOINT22.clearTXNFULLIE; inline;
  91509. begin
  91510. pTDefRegMap(@Self)^.clr := $04000000;
  91511. end;
  91512. procedure TCAN1_C1FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  91513. begin
  91514. if thebits = 0 then
  91515. pTDefRegMap(@Self)^.clr := $04000000
  91516. else
  91517. pTDefRegMap(@Self)^.&set := $04000000;
  91518. end;
  91519. function TCAN1_C1FIFOINT22.getTXNFULLIE : TBits_1; inline;
  91520. begin
  91521. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  91522. end;
  91523. procedure TCAN1_C1FIFOINT22.setw(thebits : TBits_32); inline;
  91524. begin
  91525. pTDefRegMap(@Self)^.val := thebits;
  91526. end;
  91527. function TCAN1_C1FIFOINT22.getw : TBits_32; inline;
  91528. begin
  91529. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91530. end;
  91531. procedure TCAN1_C1FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  91532. begin
  91533. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  91534. end;
  91535. function TCAN1_C1FIFOCI22.getCFIFOCI : TBits_5; inline;
  91536. begin
  91537. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  91538. end;
  91539. procedure TCAN1_C1FIFOCI22.setw(thebits : TBits_32); inline;
  91540. begin
  91541. pTDefRegMap(@Self)^.val := thebits;
  91542. end;
  91543. function TCAN1_C1FIFOCI22.getw : TBits_32; inline;
  91544. begin
  91545. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91546. end;
  91547. procedure TCAN1_C1FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  91548. begin
  91549. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  91550. end;
  91551. function TCAN1_C1FIFOCON23.getTXPRI : TBits_2; inline;
  91552. begin
  91553. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  91554. end;
  91555. procedure TCAN1_C1FIFOCON23.setRTREN; inline;
  91556. begin
  91557. pTDefRegMap(@Self)^.&set := $00000004;
  91558. end;
  91559. procedure TCAN1_C1FIFOCON23.clearRTREN; inline;
  91560. begin
  91561. pTDefRegMap(@Self)^.clr := $00000004;
  91562. end;
  91563. procedure TCAN1_C1FIFOCON23.setRTREN(thebits : TBits_1); inline;
  91564. begin
  91565. if thebits = 0 then
  91566. pTDefRegMap(@Self)^.clr := $00000004
  91567. else
  91568. pTDefRegMap(@Self)^.&set := $00000004;
  91569. end;
  91570. function TCAN1_C1FIFOCON23.getRTREN : TBits_1; inline;
  91571. begin
  91572. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91573. end;
  91574. procedure TCAN1_C1FIFOCON23.setTXREQ; inline;
  91575. begin
  91576. pTDefRegMap(@Self)^.&set := $00000008;
  91577. end;
  91578. procedure TCAN1_C1FIFOCON23.clearTXREQ; inline;
  91579. begin
  91580. pTDefRegMap(@Self)^.clr := $00000008;
  91581. end;
  91582. procedure TCAN1_C1FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  91583. begin
  91584. if thebits = 0 then
  91585. pTDefRegMap(@Self)^.clr := $00000008
  91586. else
  91587. pTDefRegMap(@Self)^.&set := $00000008;
  91588. end;
  91589. function TCAN1_C1FIFOCON23.getTXREQ : TBits_1; inline;
  91590. begin
  91591. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91592. end;
  91593. procedure TCAN1_C1FIFOCON23.setTXERR; inline;
  91594. begin
  91595. pTDefRegMap(@Self)^.&set := $00000010;
  91596. end;
  91597. procedure TCAN1_C1FIFOCON23.clearTXERR; inline;
  91598. begin
  91599. pTDefRegMap(@Self)^.clr := $00000010;
  91600. end;
  91601. procedure TCAN1_C1FIFOCON23.setTXERR(thebits : TBits_1); inline;
  91602. begin
  91603. if thebits = 0 then
  91604. pTDefRegMap(@Self)^.clr := $00000010
  91605. else
  91606. pTDefRegMap(@Self)^.&set := $00000010;
  91607. end;
  91608. function TCAN1_C1FIFOCON23.getTXERR : TBits_1; inline;
  91609. begin
  91610. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  91611. end;
  91612. procedure TCAN1_C1FIFOCON23.setTXLARB; inline;
  91613. begin
  91614. pTDefRegMap(@Self)^.&set := $00000020;
  91615. end;
  91616. procedure TCAN1_C1FIFOCON23.clearTXLARB; inline;
  91617. begin
  91618. pTDefRegMap(@Self)^.clr := $00000020;
  91619. end;
  91620. procedure TCAN1_C1FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  91621. begin
  91622. if thebits = 0 then
  91623. pTDefRegMap(@Self)^.clr := $00000020
  91624. else
  91625. pTDefRegMap(@Self)^.&set := $00000020;
  91626. end;
  91627. function TCAN1_C1FIFOCON23.getTXLARB : TBits_1; inline;
  91628. begin
  91629. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  91630. end;
  91631. procedure TCAN1_C1FIFOCON23.setTXABAT; inline;
  91632. begin
  91633. pTDefRegMap(@Self)^.&set := $00000040;
  91634. end;
  91635. procedure TCAN1_C1FIFOCON23.clearTXABAT; inline;
  91636. begin
  91637. pTDefRegMap(@Self)^.clr := $00000040;
  91638. end;
  91639. procedure TCAN1_C1FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  91640. begin
  91641. if thebits = 0 then
  91642. pTDefRegMap(@Self)^.clr := $00000040
  91643. else
  91644. pTDefRegMap(@Self)^.&set := $00000040;
  91645. end;
  91646. function TCAN1_C1FIFOCON23.getTXABAT : TBits_1; inline;
  91647. begin
  91648. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  91649. end;
  91650. procedure TCAN1_C1FIFOCON23.setTXEN; inline;
  91651. begin
  91652. pTDefRegMap(@Self)^.&set := $00000080;
  91653. end;
  91654. procedure TCAN1_C1FIFOCON23.clearTXEN; inline;
  91655. begin
  91656. pTDefRegMap(@Self)^.clr := $00000080;
  91657. end;
  91658. procedure TCAN1_C1FIFOCON23.setTXEN(thebits : TBits_1); inline;
  91659. begin
  91660. if thebits = 0 then
  91661. pTDefRegMap(@Self)^.clr := $00000080
  91662. else
  91663. pTDefRegMap(@Self)^.&set := $00000080;
  91664. end;
  91665. function TCAN1_C1FIFOCON23.getTXEN : TBits_1; inline;
  91666. begin
  91667. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  91668. end;
  91669. procedure TCAN1_C1FIFOCON23.setDONLY; inline;
  91670. begin
  91671. pTDefRegMap(@Self)^.&set := $00001000;
  91672. end;
  91673. procedure TCAN1_C1FIFOCON23.clearDONLY; inline;
  91674. begin
  91675. pTDefRegMap(@Self)^.clr := $00001000;
  91676. end;
  91677. procedure TCAN1_C1FIFOCON23.setDONLY(thebits : TBits_1); inline;
  91678. begin
  91679. if thebits = 0 then
  91680. pTDefRegMap(@Self)^.clr := $00001000
  91681. else
  91682. pTDefRegMap(@Self)^.&set := $00001000;
  91683. end;
  91684. function TCAN1_C1FIFOCON23.getDONLY : TBits_1; inline;
  91685. begin
  91686. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  91687. end;
  91688. procedure TCAN1_C1FIFOCON23.setUINC; inline;
  91689. begin
  91690. pTDefRegMap(@Self)^.&set := $00002000;
  91691. end;
  91692. procedure TCAN1_C1FIFOCON23.clearUINC; inline;
  91693. begin
  91694. pTDefRegMap(@Self)^.clr := $00002000;
  91695. end;
  91696. procedure TCAN1_C1FIFOCON23.setUINC(thebits : TBits_1); inline;
  91697. begin
  91698. if thebits = 0 then
  91699. pTDefRegMap(@Self)^.clr := $00002000
  91700. else
  91701. pTDefRegMap(@Self)^.&set := $00002000;
  91702. end;
  91703. function TCAN1_C1FIFOCON23.getUINC : TBits_1; inline;
  91704. begin
  91705. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  91706. end;
  91707. procedure TCAN1_C1FIFOCON23.setFRESET; inline;
  91708. begin
  91709. pTDefRegMap(@Self)^.&set := $00004000;
  91710. end;
  91711. procedure TCAN1_C1FIFOCON23.clearFRESET; inline;
  91712. begin
  91713. pTDefRegMap(@Self)^.clr := $00004000;
  91714. end;
  91715. procedure TCAN1_C1FIFOCON23.setFRESET(thebits : TBits_1); inline;
  91716. begin
  91717. if thebits = 0 then
  91718. pTDefRegMap(@Self)^.clr := $00004000
  91719. else
  91720. pTDefRegMap(@Self)^.&set := $00004000;
  91721. end;
  91722. function TCAN1_C1FIFOCON23.getFRESET : TBits_1; inline;
  91723. begin
  91724. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  91725. end;
  91726. procedure TCAN1_C1FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  91727. begin
  91728. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  91729. end;
  91730. function TCAN1_C1FIFOCON23.getFSIZE : TBits_5; inline;
  91731. begin
  91732. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  91733. end;
  91734. procedure TCAN1_C1FIFOCON23.setw(thebits : TBits_32); inline;
  91735. begin
  91736. pTDefRegMap(@Self)^.val := thebits;
  91737. end;
  91738. function TCAN1_C1FIFOCON23.getw : TBits_32; inline;
  91739. begin
  91740. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  91741. end;
  91742. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF; inline;
  91743. begin
  91744. pTDefRegMap(@Self)^.&set := $00000001;
  91745. end;
  91746. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIF; inline;
  91747. begin
  91748. pTDefRegMap(@Self)^.clr := $00000001;
  91749. end;
  91750. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  91751. begin
  91752. if thebits = 0 then
  91753. pTDefRegMap(@Self)^.clr := $00000001
  91754. else
  91755. pTDefRegMap(@Self)^.&set := $00000001;
  91756. end;
  91757. function TCAN1_C1FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  91758. begin
  91759. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  91760. end;
  91761. procedure TCAN1_C1FIFOINT23.setRXHALFIF; inline;
  91762. begin
  91763. pTDefRegMap(@Self)^.&set := $00000002;
  91764. end;
  91765. procedure TCAN1_C1FIFOINT23.clearRXHALFIF; inline;
  91766. begin
  91767. pTDefRegMap(@Self)^.clr := $00000002;
  91768. end;
  91769. procedure TCAN1_C1FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  91770. begin
  91771. if thebits = 0 then
  91772. pTDefRegMap(@Self)^.clr := $00000002
  91773. else
  91774. pTDefRegMap(@Self)^.&set := $00000002;
  91775. end;
  91776. function TCAN1_C1FIFOINT23.getRXHALFIF : TBits_1; inline;
  91777. begin
  91778. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  91779. end;
  91780. procedure TCAN1_C1FIFOINT23.setRXFULLIF; inline;
  91781. begin
  91782. pTDefRegMap(@Self)^.&set := $00000004;
  91783. end;
  91784. procedure TCAN1_C1FIFOINT23.clearRXFULLIF; inline;
  91785. begin
  91786. pTDefRegMap(@Self)^.clr := $00000004;
  91787. end;
  91788. procedure TCAN1_C1FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  91789. begin
  91790. if thebits = 0 then
  91791. pTDefRegMap(@Self)^.clr := $00000004
  91792. else
  91793. pTDefRegMap(@Self)^.&set := $00000004;
  91794. end;
  91795. function TCAN1_C1FIFOINT23.getRXFULLIF : TBits_1; inline;
  91796. begin
  91797. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  91798. end;
  91799. procedure TCAN1_C1FIFOINT23.setRXOVFLIF; inline;
  91800. begin
  91801. pTDefRegMap(@Self)^.&set := $00000008;
  91802. end;
  91803. procedure TCAN1_C1FIFOINT23.clearRXOVFLIF; inline;
  91804. begin
  91805. pTDefRegMap(@Self)^.clr := $00000008;
  91806. end;
  91807. procedure TCAN1_C1FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  91808. begin
  91809. if thebits = 0 then
  91810. pTDefRegMap(@Self)^.clr := $00000008
  91811. else
  91812. pTDefRegMap(@Self)^.&set := $00000008;
  91813. end;
  91814. function TCAN1_C1FIFOINT23.getRXOVFLIF : TBits_1; inline;
  91815. begin
  91816. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  91817. end;
  91818. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF; inline;
  91819. begin
  91820. pTDefRegMap(@Self)^.&set := $00000100;
  91821. end;
  91822. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIF; inline;
  91823. begin
  91824. pTDefRegMap(@Self)^.clr := $00000100;
  91825. end;
  91826. procedure TCAN1_C1FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  91827. begin
  91828. if thebits = 0 then
  91829. pTDefRegMap(@Self)^.clr := $00000100
  91830. else
  91831. pTDefRegMap(@Self)^.&set := $00000100;
  91832. end;
  91833. function TCAN1_C1FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  91834. begin
  91835. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  91836. end;
  91837. procedure TCAN1_C1FIFOINT23.setTXHALFIF; inline;
  91838. begin
  91839. pTDefRegMap(@Self)^.&set := $00000200;
  91840. end;
  91841. procedure TCAN1_C1FIFOINT23.clearTXHALFIF; inline;
  91842. begin
  91843. pTDefRegMap(@Self)^.clr := $00000200;
  91844. end;
  91845. procedure TCAN1_C1FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  91846. begin
  91847. if thebits = 0 then
  91848. pTDefRegMap(@Self)^.clr := $00000200
  91849. else
  91850. pTDefRegMap(@Self)^.&set := $00000200;
  91851. end;
  91852. function TCAN1_C1FIFOINT23.getTXHALFIF : TBits_1; inline;
  91853. begin
  91854. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  91855. end;
  91856. procedure TCAN1_C1FIFOINT23.setTXNFULLIF; inline;
  91857. begin
  91858. pTDefRegMap(@Self)^.&set := $00000400;
  91859. end;
  91860. procedure TCAN1_C1FIFOINT23.clearTXNFULLIF; inline;
  91861. begin
  91862. pTDefRegMap(@Self)^.clr := $00000400;
  91863. end;
  91864. procedure TCAN1_C1FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  91865. begin
  91866. if thebits = 0 then
  91867. pTDefRegMap(@Self)^.clr := $00000400
  91868. else
  91869. pTDefRegMap(@Self)^.&set := $00000400;
  91870. end;
  91871. function TCAN1_C1FIFOINT23.getTXNFULLIF : TBits_1; inline;
  91872. begin
  91873. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  91874. end;
  91875. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE; inline;
  91876. begin
  91877. pTDefRegMap(@Self)^.&set := $00010000;
  91878. end;
  91879. procedure TCAN1_C1FIFOINT23.clearRXNEMPTYIE; inline;
  91880. begin
  91881. pTDefRegMap(@Self)^.clr := $00010000;
  91882. end;
  91883. procedure TCAN1_C1FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  91884. begin
  91885. if thebits = 0 then
  91886. pTDefRegMap(@Self)^.clr := $00010000
  91887. else
  91888. pTDefRegMap(@Self)^.&set := $00010000;
  91889. end;
  91890. function TCAN1_C1FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  91891. begin
  91892. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  91893. end;
  91894. procedure TCAN1_C1FIFOINT23.setRXHALFIE; inline;
  91895. begin
  91896. pTDefRegMap(@Self)^.&set := $00020000;
  91897. end;
  91898. procedure TCAN1_C1FIFOINT23.clearRXHALFIE; inline;
  91899. begin
  91900. pTDefRegMap(@Self)^.clr := $00020000;
  91901. end;
  91902. procedure TCAN1_C1FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  91903. begin
  91904. if thebits = 0 then
  91905. pTDefRegMap(@Self)^.clr := $00020000
  91906. else
  91907. pTDefRegMap(@Self)^.&set := $00020000;
  91908. end;
  91909. function TCAN1_C1FIFOINT23.getRXHALFIE : TBits_1; inline;
  91910. begin
  91911. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  91912. end;
  91913. procedure TCAN1_C1FIFOINT23.setRXFULLIE; inline;
  91914. begin
  91915. pTDefRegMap(@Self)^.&set := $00040000;
  91916. end;
  91917. procedure TCAN1_C1FIFOINT23.clearRXFULLIE; inline;
  91918. begin
  91919. pTDefRegMap(@Self)^.clr := $00040000;
  91920. end;
  91921. procedure TCAN1_C1FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  91922. begin
  91923. if thebits = 0 then
  91924. pTDefRegMap(@Self)^.clr := $00040000
  91925. else
  91926. pTDefRegMap(@Self)^.&set := $00040000;
  91927. end;
  91928. function TCAN1_C1FIFOINT23.getRXFULLIE : TBits_1; inline;
  91929. begin
  91930. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  91931. end;
  91932. procedure TCAN1_C1FIFOINT23.setRXOVFLIE; inline;
  91933. begin
  91934. pTDefRegMap(@Self)^.&set := $00080000;
  91935. end;
  91936. procedure TCAN1_C1FIFOINT23.clearRXOVFLIE; inline;
  91937. begin
  91938. pTDefRegMap(@Self)^.clr := $00080000;
  91939. end;
  91940. procedure TCAN1_C1FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  91941. begin
  91942. if thebits = 0 then
  91943. pTDefRegMap(@Self)^.clr := $00080000
  91944. else
  91945. pTDefRegMap(@Self)^.&set := $00080000;
  91946. end;
  91947. function TCAN1_C1FIFOINT23.getRXOVFLIE : TBits_1; inline;
  91948. begin
  91949. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  91950. end;
  91951. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE; inline;
  91952. begin
  91953. pTDefRegMap(@Self)^.&set := $01000000;
  91954. end;
  91955. procedure TCAN1_C1FIFOINT23.clearTXEMPTYIE; inline;
  91956. begin
  91957. pTDefRegMap(@Self)^.clr := $01000000;
  91958. end;
  91959. procedure TCAN1_C1FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  91960. begin
  91961. if thebits = 0 then
  91962. pTDefRegMap(@Self)^.clr := $01000000
  91963. else
  91964. pTDefRegMap(@Self)^.&set := $01000000;
  91965. end;
  91966. function TCAN1_C1FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  91967. begin
  91968. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  91969. end;
  91970. procedure TCAN1_C1FIFOINT23.setTXHALFIE; inline;
  91971. begin
  91972. pTDefRegMap(@Self)^.&set := $02000000;
  91973. end;
  91974. procedure TCAN1_C1FIFOINT23.clearTXHALFIE; inline;
  91975. begin
  91976. pTDefRegMap(@Self)^.clr := $02000000;
  91977. end;
  91978. procedure TCAN1_C1FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  91979. begin
  91980. if thebits = 0 then
  91981. pTDefRegMap(@Self)^.clr := $02000000
  91982. else
  91983. pTDefRegMap(@Self)^.&set := $02000000;
  91984. end;
  91985. function TCAN1_C1FIFOINT23.getTXHALFIE : TBits_1; inline;
  91986. begin
  91987. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  91988. end;
  91989. procedure TCAN1_C1FIFOINT23.setTXNFULLIE; inline;
  91990. begin
  91991. pTDefRegMap(@Self)^.&set := $04000000;
  91992. end;
  91993. procedure TCAN1_C1FIFOINT23.clearTXNFULLIE; inline;
  91994. begin
  91995. pTDefRegMap(@Self)^.clr := $04000000;
  91996. end;
  91997. procedure TCAN1_C1FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  91998. begin
  91999. if thebits = 0 then
  92000. pTDefRegMap(@Self)^.clr := $04000000
  92001. else
  92002. pTDefRegMap(@Self)^.&set := $04000000;
  92003. end;
  92004. function TCAN1_C1FIFOINT23.getTXNFULLIE : TBits_1; inline;
  92005. begin
  92006. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  92007. end;
  92008. procedure TCAN1_C1FIFOINT23.setw(thebits : TBits_32); inline;
  92009. begin
  92010. pTDefRegMap(@Self)^.val := thebits;
  92011. end;
  92012. function TCAN1_C1FIFOINT23.getw : TBits_32; inline;
  92013. begin
  92014. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92015. end;
  92016. procedure TCAN1_C1FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  92017. begin
  92018. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  92019. end;
  92020. function TCAN1_C1FIFOCI23.getCFIFOCI : TBits_5; inline;
  92021. begin
  92022. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  92023. end;
  92024. procedure TCAN1_C1FIFOCI23.setw(thebits : TBits_32); inline;
  92025. begin
  92026. pTDefRegMap(@Self)^.val := thebits;
  92027. end;
  92028. function TCAN1_C1FIFOCI23.getw : TBits_32; inline;
  92029. begin
  92030. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92031. end;
  92032. procedure TCAN1_C1FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  92033. begin
  92034. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  92035. end;
  92036. function TCAN1_C1FIFOCON24.getTXPRI : TBits_2; inline;
  92037. begin
  92038. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  92039. end;
  92040. procedure TCAN1_C1FIFOCON24.setRTREN; inline;
  92041. begin
  92042. pTDefRegMap(@Self)^.&set := $00000004;
  92043. end;
  92044. procedure TCAN1_C1FIFOCON24.clearRTREN; inline;
  92045. begin
  92046. pTDefRegMap(@Self)^.clr := $00000004;
  92047. end;
  92048. procedure TCAN1_C1FIFOCON24.setRTREN(thebits : TBits_1); inline;
  92049. begin
  92050. if thebits = 0 then
  92051. pTDefRegMap(@Self)^.clr := $00000004
  92052. else
  92053. pTDefRegMap(@Self)^.&set := $00000004;
  92054. end;
  92055. function TCAN1_C1FIFOCON24.getRTREN : TBits_1; inline;
  92056. begin
  92057. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92058. end;
  92059. procedure TCAN1_C1FIFOCON24.setTXREQ; inline;
  92060. begin
  92061. pTDefRegMap(@Self)^.&set := $00000008;
  92062. end;
  92063. procedure TCAN1_C1FIFOCON24.clearTXREQ; inline;
  92064. begin
  92065. pTDefRegMap(@Self)^.clr := $00000008;
  92066. end;
  92067. procedure TCAN1_C1FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  92068. begin
  92069. if thebits = 0 then
  92070. pTDefRegMap(@Self)^.clr := $00000008
  92071. else
  92072. pTDefRegMap(@Self)^.&set := $00000008;
  92073. end;
  92074. function TCAN1_C1FIFOCON24.getTXREQ : TBits_1; inline;
  92075. begin
  92076. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92077. end;
  92078. procedure TCAN1_C1FIFOCON24.setTXERR; inline;
  92079. begin
  92080. pTDefRegMap(@Self)^.&set := $00000010;
  92081. end;
  92082. procedure TCAN1_C1FIFOCON24.clearTXERR; inline;
  92083. begin
  92084. pTDefRegMap(@Self)^.clr := $00000010;
  92085. end;
  92086. procedure TCAN1_C1FIFOCON24.setTXERR(thebits : TBits_1); inline;
  92087. begin
  92088. if thebits = 0 then
  92089. pTDefRegMap(@Self)^.clr := $00000010
  92090. else
  92091. pTDefRegMap(@Self)^.&set := $00000010;
  92092. end;
  92093. function TCAN1_C1FIFOCON24.getTXERR : TBits_1; inline;
  92094. begin
  92095. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  92096. end;
  92097. procedure TCAN1_C1FIFOCON24.setTXLARB; inline;
  92098. begin
  92099. pTDefRegMap(@Self)^.&set := $00000020;
  92100. end;
  92101. procedure TCAN1_C1FIFOCON24.clearTXLARB; inline;
  92102. begin
  92103. pTDefRegMap(@Self)^.clr := $00000020;
  92104. end;
  92105. procedure TCAN1_C1FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  92106. begin
  92107. if thebits = 0 then
  92108. pTDefRegMap(@Self)^.clr := $00000020
  92109. else
  92110. pTDefRegMap(@Self)^.&set := $00000020;
  92111. end;
  92112. function TCAN1_C1FIFOCON24.getTXLARB : TBits_1; inline;
  92113. begin
  92114. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  92115. end;
  92116. procedure TCAN1_C1FIFOCON24.setTXABAT; inline;
  92117. begin
  92118. pTDefRegMap(@Self)^.&set := $00000040;
  92119. end;
  92120. procedure TCAN1_C1FIFOCON24.clearTXABAT; inline;
  92121. begin
  92122. pTDefRegMap(@Self)^.clr := $00000040;
  92123. end;
  92124. procedure TCAN1_C1FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  92125. begin
  92126. if thebits = 0 then
  92127. pTDefRegMap(@Self)^.clr := $00000040
  92128. else
  92129. pTDefRegMap(@Self)^.&set := $00000040;
  92130. end;
  92131. function TCAN1_C1FIFOCON24.getTXABAT : TBits_1; inline;
  92132. begin
  92133. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  92134. end;
  92135. procedure TCAN1_C1FIFOCON24.setTXEN; inline;
  92136. begin
  92137. pTDefRegMap(@Self)^.&set := $00000080;
  92138. end;
  92139. procedure TCAN1_C1FIFOCON24.clearTXEN; inline;
  92140. begin
  92141. pTDefRegMap(@Self)^.clr := $00000080;
  92142. end;
  92143. procedure TCAN1_C1FIFOCON24.setTXEN(thebits : TBits_1); inline;
  92144. begin
  92145. if thebits = 0 then
  92146. pTDefRegMap(@Self)^.clr := $00000080
  92147. else
  92148. pTDefRegMap(@Self)^.&set := $00000080;
  92149. end;
  92150. function TCAN1_C1FIFOCON24.getTXEN : TBits_1; inline;
  92151. begin
  92152. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  92153. end;
  92154. procedure TCAN1_C1FIFOCON24.setDONLY; inline;
  92155. begin
  92156. pTDefRegMap(@Self)^.&set := $00001000;
  92157. end;
  92158. procedure TCAN1_C1FIFOCON24.clearDONLY; inline;
  92159. begin
  92160. pTDefRegMap(@Self)^.clr := $00001000;
  92161. end;
  92162. procedure TCAN1_C1FIFOCON24.setDONLY(thebits : TBits_1); inline;
  92163. begin
  92164. if thebits = 0 then
  92165. pTDefRegMap(@Self)^.clr := $00001000
  92166. else
  92167. pTDefRegMap(@Self)^.&set := $00001000;
  92168. end;
  92169. function TCAN1_C1FIFOCON24.getDONLY : TBits_1; inline;
  92170. begin
  92171. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  92172. end;
  92173. procedure TCAN1_C1FIFOCON24.setUINC; inline;
  92174. begin
  92175. pTDefRegMap(@Self)^.&set := $00002000;
  92176. end;
  92177. procedure TCAN1_C1FIFOCON24.clearUINC; inline;
  92178. begin
  92179. pTDefRegMap(@Self)^.clr := $00002000;
  92180. end;
  92181. procedure TCAN1_C1FIFOCON24.setUINC(thebits : TBits_1); inline;
  92182. begin
  92183. if thebits = 0 then
  92184. pTDefRegMap(@Self)^.clr := $00002000
  92185. else
  92186. pTDefRegMap(@Self)^.&set := $00002000;
  92187. end;
  92188. function TCAN1_C1FIFOCON24.getUINC : TBits_1; inline;
  92189. begin
  92190. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  92191. end;
  92192. procedure TCAN1_C1FIFOCON24.setFRESET; inline;
  92193. begin
  92194. pTDefRegMap(@Self)^.&set := $00004000;
  92195. end;
  92196. procedure TCAN1_C1FIFOCON24.clearFRESET; inline;
  92197. begin
  92198. pTDefRegMap(@Self)^.clr := $00004000;
  92199. end;
  92200. procedure TCAN1_C1FIFOCON24.setFRESET(thebits : TBits_1); inline;
  92201. begin
  92202. if thebits = 0 then
  92203. pTDefRegMap(@Self)^.clr := $00004000
  92204. else
  92205. pTDefRegMap(@Self)^.&set := $00004000;
  92206. end;
  92207. function TCAN1_C1FIFOCON24.getFRESET : TBits_1; inline;
  92208. begin
  92209. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  92210. end;
  92211. procedure TCAN1_C1FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  92212. begin
  92213. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  92214. end;
  92215. function TCAN1_C1FIFOCON24.getFSIZE : TBits_5; inline;
  92216. begin
  92217. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  92218. end;
  92219. procedure TCAN1_C1FIFOCON24.setw(thebits : TBits_32); inline;
  92220. begin
  92221. pTDefRegMap(@Self)^.val := thebits;
  92222. end;
  92223. function TCAN1_C1FIFOCON24.getw : TBits_32; inline;
  92224. begin
  92225. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92226. end;
  92227. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF; inline;
  92228. begin
  92229. pTDefRegMap(@Self)^.&set := $00000001;
  92230. end;
  92231. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIF; inline;
  92232. begin
  92233. pTDefRegMap(@Self)^.clr := $00000001;
  92234. end;
  92235. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  92236. begin
  92237. if thebits = 0 then
  92238. pTDefRegMap(@Self)^.clr := $00000001
  92239. else
  92240. pTDefRegMap(@Self)^.&set := $00000001;
  92241. end;
  92242. function TCAN1_C1FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  92243. begin
  92244. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  92245. end;
  92246. procedure TCAN1_C1FIFOINT24.setRXHALFIF; inline;
  92247. begin
  92248. pTDefRegMap(@Self)^.&set := $00000002;
  92249. end;
  92250. procedure TCAN1_C1FIFOINT24.clearRXHALFIF; inline;
  92251. begin
  92252. pTDefRegMap(@Self)^.clr := $00000002;
  92253. end;
  92254. procedure TCAN1_C1FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  92255. begin
  92256. if thebits = 0 then
  92257. pTDefRegMap(@Self)^.clr := $00000002
  92258. else
  92259. pTDefRegMap(@Self)^.&set := $00000002;
  92260. end;
  92261. function TCAN1_C1FIFOINT24.getRXHALFIF : TBits_1; inline;
  92262. begin
  92263. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  92264. end;
  92265. procedure TCAN1_C1FIFOINT24.setRXFULLIF; inline;
  92266. begin
  92267. pTDefRegMap(@Self)^.&set := $00000004;
  92268. end;
  92269. procedure TCAN1_C1FIFOINT24.clearRXFULLIF; inline;
  92270. begin
  92271. pTDefRegMap(@Self)^.clr := $00000004;
  92272. end;
  92273. procedure TCAN1_C1FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  92274. begin
  92275. if thebits = 0 then
  92276. pTDefRegMap(@Self)^.clr := $00000004
  92277. else
  92278. pTDefRegMap(@Self)^.&set := $00000004;
  92279. end;
  92280. function TCAN1_C1FIFOINT24.getRXFULLIF : TBits_1; inline;
  92281. begin
  92282. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92283. end;
  92284. procedure TCAN1_C1FIFOINT24.setRXOVFLIF; inline;
  92285. begin
  92286. pTDefRegMap(@Self)^.&set := $00000008;
  92287. end;
  92288. procedure TCAN1_C1FIFOINT24.clearRXOVFLIF; inline;
  92289. begin
  92290. pTDefRegMap(@Self)^.clr := $00000008;
  92291. end;
  92292. procedure TCAN1_C1FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  92293. begin
  92294. if thebits = 0 then
  92295. pTDefRegMap(@Self)^.clr := $00000008
  92296. else
  92297. pTDefRegMap(@Self)^.&set := $00000008;
  92298. end;
  92299. function TCAN1_C1FIFOINT24.getRXOVFLIF : TBits_1; inline;
  92300. begin
  92301. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92302. end;
  92303. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF; inline;
  92304. begin
  92305. pTDefRegMap(@Self)^.&set := $00000100;
  92306. end;
  92307. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIF; inline;
  92308. begin
  92309. pTDefRegMap(@Self)^.clr := $00000100;
  92310. end;
  92311. procedure TCAN1_C1FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  92312. begin
  92313. if thebits = 0 then
  92314. pTDefRegMap(@Self)^.clr := $00000100
  92315. else
  92316. pTDefRegMap(@Self)^.&set := $00000100;
  92317. end;
  92318. function TCAN1_C1FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  92319. begin
  92320. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  92321. end;
  92322. procedure TCAN1_C1FIFOINT24.setTXHALFIF; inline;
  92323. begin
  92324. pTDefRegMap(@Self)^.&set := $00000200;
  92325. end;
  92326. procedure TCAN1_C1FIFOINT24.clearTXHALFIF; inline;
  92327. begin
  92328. pTDefRegMap(@Self)^.clr := $00000200;
  92329. end;
  92330. procedure TCAN1_C1FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  92331. begin
  92332. if thebits = 0 then
  92333. pTDefRegMap(@Self)^.clr := $00000200
  92334. else
  92335. pTDefRegMap(@Self)^.&set := $00000200;
  92336. end;
  92337. function TCAN1_C1FIFOINT24.getTXHALFIF : TBits_1; inline;
  92338. begin
  92339. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  92340. end;
  92341. procedure TCAN1_C1FIFOINT24.setTXNFULLIF; inline;
  92342. begin
  92343. pTDefRegMap(@Self)^.&set := $00000400;
  92344. end;
  92345. procedure TCAN1_C1FIFOINT24.clearTXNFULLIF; inline;
  92346. begin
  92347. pTDefRegMap(@Self)^.clr := $00000400;
  92348. end;
  92349. procedure TCAN1_C1FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  92350. begin
  92351. if thebits = 0 then
  92352. pTDefRegMap(@Self)^.clr := $00000400
  92353. else
  92354. pTDefRegMap(@Self)^.&set := $00000400;
  92355. end;
  92356. function TCAN1_C1FIFOINT24.getTXNFULLIF : TBits_1; inline;
  92357. begin
  92358. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  92359. end;
  92360. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE; inline;
  92361. begin
  92362. pTDefRegMap(@Self)^.&set := $00010000;
  92363. end;
  92364. procedure TCAN1_C1FIFOINT24.clearRXNEMPTYIE; inline;
  92365. begin
  92366. pTDefRegMap(@Self)^.clr := $00010000;
  92367. end;
  92368. procedure TCAN1_C1FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  92369. begin
  92370. if thebits = 0 then
  92371. pTDefRegMap(@Self)^.clr := $00010000
  92372. else
  92373. pTDefRegMap(@Self)^.&set := $00010000;
  92374. end;
  92375. function TCAN1_C1FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  92376. begin
  92377. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  92378. end;
  92379. procedure TCAN1_C1FIFOINT24.setRXHALFIE; inline;
  92380. begin
  92381. pTDefRegMap(@Self)^.&set := $00020000;
  92382. end;
  92383. procedure TCAN1_C1FIFOINT24.clearRXHALFIE; inline;
  92384. begin
  92385. pTDefRegMap(@Self)^.clr := $00020000;
  92386. end;
  92387. procedure TCAN1_C1FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  92388. begin
  92389. if thebits = 0 then
  92390. pTDefRegMap(@Self)^.clr := $00020000
  92391. else
  92392. pTDefRegMap(@Self)^.&set := $00020000;
  92393. end;
  92394. function TCAN1_C1FIFOINT24.getRXHALFIE : TBits_1; inline;
  92395. begin
  92396. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  92397. end;
  92398. procedure TCAN1_C1FIFOINT24.setRXFULLIE; inline;
  92399. begin
  92400. pTDefRegMap(@Self)^.&set := $00040000;
  92401. end;
  92402. procedure TCAN1_C1FIFOINT24.clearRXFULLIE; inline;
  92403. begin
  92404. pTDefRegMap(@Self)^.clr := $00040000;
  92405. end;
  92406. procedure TCAN1_C1FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  92407. begin
  92408. if thebits = 0 then
  92409. pTDefRegMap(@Self)^.clr := $00040000
  92410. else
  92411. pTDefRegMap(@Self)^.&set := $00040000;
  92412. end;
  92413. function TCAN1_C1FIFOINT24.getRXFULLIE : TBits_1; inline;
  92414. begin
  92415. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  92416. end;
  92417. procedure TCAN1_C1FIFOINT24.setRXOVFLIE; inline;
  92418. begin
  92419. pTDefRegMap(@Self)^.&set := $00080000;
  92420. end;
  92421. procedure TCAN1_C1FIFOINT24.clearRXOVFLIE; inline;
  92422. begin
  92423. pTDefRegMap(@Self)^.clr := $00080000;
  92424. end;
  92425. procedure TCAN1_C1FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  92426. begin
  92427. if thebits = 0 then
  92428. pTDefRegMap(@Self)^.clr := $00080000
  92429. else
  92430. pTDefRegMap(@Self)^.&set := $00080000;
  92431. end;
  92432. function TCAN1_C1FIFOINT24.getRXOVFLIE : TBits_1; inline;
  92433. begin
  92434. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  92435. end;
  92436. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE; inline;
  92437. begin
  92438. pTDefRegMap(@Self)^.&set := $01000000;
  92439. end;
  92440. procedure TCAN1_C1FIFOINT24.clearTXEMPTYIE; inline;
  92441. begin
  92442. pTDefRegMap(@Self)^.clr := $01000000;
  92443. end;
  92444. procedure TCAN1_C1FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  92445. begin
  92446. if thebits = 0 then
  92447. pTDefRegMap(@Self)^.clr := $01000000
  92448. else
  92449. pTDefRegMap(@Self)^.&set := $01000000;
  92450. end;
  92451. function TCAN1_C1FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  92452. begin
  92453. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  92454. end;
  92455. procedure TCAN1_C1FIFOINT24.setTXHALFIE; inline;
  92456. begin
  92457. pTDefRegMap(@Self)^.&set := $02000000;
  92458. end;
  92459. procedure TCAN1_C1FIFOINT24.clearTXHALFIE; inline;
  92460. begin
  92461. pTDefRegMap(@Self)^.clr := $02000000;
  92462. end;
  92463. procedure TCAN1_C1FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  92464. begin
  92465. if thebits = 0 then
  92466. pTDefRegMap(@Self)^.clr := $02000000
  92467. else
  92468. pTDefRegMap(@Self)^.&set := $02000000;
  92469. end;
  92470. function TCAN1_C1FIFOINT24.getTXHALFIE : TBits_1; inline;
  92471. begin
  92472. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  92473. end;
  92474. procedure TCAN1_C1FIFOINT24.setTXNFULLIE; inline;
  92475. begin
  92476. pTDefRegMap(@Self)^.&set := $04000000;
  92477. end;
  92478. procedure TCAN1_C1FIFOINT24.clearTXNFULLIE; inline;
  92479. begin
  92480. pTDefRegMap(@Self)^.clr := $04000000;
  92481. end;
  92482. procedure TCAN1_C1FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  92483. begin
  92484. if thebits = 0 then
  92485. pTDefRegMap(@Self)^.clr := $04000000
  92486. else
  92487. pTDefRegMap(@Self)^.&set := $04000000;
  92488. end;
  92489. function TCAN1_C1FIFOINT24.getTXNFULLIE : TBits_1; inline;
  92490. begin
  92491. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  92492. end;
  92493. procedure TCAN1_C1FIFOINT24.setw(thebits : TBits_32); inline;
  92494. begin
  92495. pTDefRegMap(@Self)^.val := thebits;
  92496. end;
  92497. function TCAN1_C1FIFOINT24.getw : TBits_32; inline;
  92498. begin
  92499. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92500. end;
  92501. procedure TCAN1_C1FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  92502. begin
  92503. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  92504. end;
  92505. function TCAN1_C1FIFOCI24.getCFIFOCI : TBits_5; inline;
  92506. begin
  92507. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  92508. end;
  92509. procedure TCAN1_C1FIFOCI24.setw(thebits : TBits_32); inline;
  92510. begin
  92511. pTDefRegMap(@Self)^.val := thebits;
  92512. end;
  92513. function TCAN1_C1FIFOCI24.getw : TBits_32; inline;
  92514. begin
  92515. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92516. end;
  92517. procedure TCAN1_C1FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  92518. begin
  92519. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  92520. end;
  92521. function TCAN1_C1FIFOCON25.getTXPRI : TBits_2; inline;
  92522. begin
  92523. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  92524. end;
  92525. procedure TCAN1_C1FIFOCON25.setRTREN; inline;
  92526. begin
  92527. pTDefRegMap(@Self)^.&set := $00000004;
  92528. end;
  92529. procedure TCAN1_C1FIFOCON25.clearRTREN; inline;
  92530. begin
  92531. pTDefRegMap(@Self)^.clr := $00000004;
  92532. end;
  92533. procedure TCAN1_C1FIFOCON25.setRTREN(thebits : TBits_1); inline;
  92534. begin
  92535. if thebits = 0 then
  92536. pTDefRegMap(@Self)^.clr := $00000004
  92537. else
  92538. pTDefRegMap(@Self)^.&set := $00000004;
  92539. end;
  92540. function TCAN1_C1FIFOCON25.getRTREN : TBits_1; inline;
  92541. begin
  92542. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92543. end;
  92544. procedure TCAN1_C1FIFOCON25.setTXREQ; inline;
  92545. begin
  92546. pTDefRegMap(@Self)^.&set := $00000008;
  92547. end;
  92548. procedure TCAN1_C1FIFOCON25.clearTXREQ; inline;
  92549. begin
  92550. pTDefRegMap(@Self)^.clr := $00000008;
  92551. end;
  92552. procedure TCAN1_C1FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  92553. begin
  92554. if thebits = 0 then
  92555. pTDefRegMap(@Self)^.clr := $00000008
  92556. else
  92557. pTDefRegMap(@Self)^.&set := $00000008;
  92558. end;
  92559. function TCAN1_C1FIFOCON25.getTXREQ : TBits_1; inline;
  92560. begin
  92561. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92562. end;
  92563. procedure TCAN1_C1FIFOCON25.setTXERR; inline;
  92564. begin
  92565. pTDefRegMap(@Self)^.&set := $00000010;
  92566. end;
  92567. procedure TCAN1_C1FIFOCON25.clearTXERR; inline;
  92568. begin
  92569. pTDefRegMap(@Self)^.clr := $00000010;
  92570. end;
  92571. procedure TCAN1_C1FIFOCON25.setTXERR(thebits : TBits_1); inline;
  92572. begin
  92573. if thebits = 0 then
  92574. pTDefRegMap(@Self)^.clr := $00000010
  92575. else
  92576. pTDefRegMap(@Self)^.&set := $00000010;
  92577. end;
  92578. function TCAN1_C1FIFOCON25.getTXERR : TBits_1; inline;
  92579. begin
  92580. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  92581. end;
  92582. procedure TCAN1_C1FIFOCON25.setTXLARB; inline;
  92583. begin
  92584. pTDefRegMap(@Self)^.&set := $00000020;
  92585. end;
  92586. procedure TCAN1_C1FIFOCON25.clearTXLARB; inline;
  92587. begin
  92588. pTDefRegMap(@Self)^.clr := $00000020;
  92589. end;
  92590. procedure TCAN1_C1FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  92591. begin
  92592. if thebits = 0 then
  92593. pTDefRegMap(@Self)^.clr := $00000020
  92594. else
  92595. pTDefRegMap(@Self)^.&set := $00000020;
  92596. end;
  92597. function TCAN1_C1FIFOCON25.getTXLARB : TBits_1; inline;
  92598. begin
  92599. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  92600. end;
  92601. procedure TCAN1_C1FIFOCON25.setTXABAT; inline;
  92602. begin
  92603. pTDefRegMap(@Self)^.&set := $00000040;
  92604. end;
  92605. procedure TCAN1_C1FIFOCON25.clearTXABAT; inline;
  92606. begin
  92607. pTDefRegMap(@Self)^.clr := $00000040;
  92608. end;
  92609. procedure TCAN1_C1FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  92610. begin
  92611. if thebits = 0 then
  92612. pTDefRegMap(@Self)^.clr := $00000040
  92613. else
  92614. pTDefRegMap(@Self)^.&set := $00000040;
  92615. end;
  92616. function TCAN1_C1FIFOCON25.getTXABAT : TBits_1; inline;
  92617. begin
  92618. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  92619. end;
  92620. procedure TCAN1_C1FIFOCON25.setTXEN; inline;
  92621. begin
  92622. pTDefRegMap(@Self)^.&set := $00000080;
  92623. end;
  92624. procedure TCAN1_C1FIFOCON25.clearTXEN; inline;
  92625. begin
  92626. pTDefRegMap(@Self)^.clr := $00000080;
  92627. end;
  92628. procedure TCAN1_C1FIFOCON25.setTXEN(thebits : TBits_1); inline;
  92629. begin
  92630. if thebits = 0 then
  92631. pTDefRegMap(@Self)^.clr := $00000080
  92632. else
  92633. pTDefRegMap(@Self)^.&set := $00000080;
  92634. end;
  92635. function TCAN1_C1FIFOCON25.getTXEN : TBits_1; inline;
  92636. begin
  92637. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  92638. end;
  92639. procedure TCAN1_C1FIFOCON25.setDONLY; inline;
  92640. begin
  92641. pTDefRegMap(@Self)^.&set := $00001000;
  92642. end;
  92643. procedure TCAN1_C1FIFOCON25.clearDONLY; inline;
  92644. begin
  92645. pTDefRegMap(@Self)^.clr := $00001000;
  92646. end;
  92647. procedure TCAN1_C1FIFOCON25.setDONLY(thebits : TBits_1); inline;
  92648. begin
  92649. if thebits = 0 then
  92650. pTDefRegMap(@Self)^.clr := $00001000
  92651. else
  92652. pTDefRegMap(@Self)^.&set := $00001000;
  92653. end;
  92654. function TCAN1_C1FIFOCON25.getDONLY : TBits_1; inline;
  92655. begin
  92656. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  92657. end;
  92658. procedure TCAN1_C1FIFOCON25.setUINC; inline;
  92659. begin
  92660. pTDefRegMap(@Self)^.&set := $00002000;
  92661. end;
  92662. procedure TCAN1_C1FIFOCON25.clearUINC; inline;
  92663. begin
  92664. pTDefRegMap(@Self)^.clr := $00002000;
  92665. end;
  92666. procedure TCAN1_C1FIFOCON25.setUINC(thebits : TBits_1); inline;
  92667. begin
  92668. if thebits = 0 then
  92669. pTDefRegMap(@Self)^.clr := $00002000
  92670. else
  92671. pTDefRegMap(@Self)^.&set := $00002000;
  92672. end;
  92673. function TCAN1_C1FIFOCON25.getUINC : TBits_1; inline;
  92674. begin
  92675. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  92676. end;
  92677. procedure TCAN1_C1FIFOCON25.setFRESET; inline;
  92678. begin
  92679. pTDefRegMap(@Self)^.&set := $00004000;
  92680. end;
  92681. procedure TCAN1_C1FIFOCON25.clearFRESET; inline;
  92682. begin
  92683. pTDefRegMap(@Self)^.clr := $00004000;
  92684. end;
  92685. procedure TCAN1_C1FIFOCON25.setFRESET(thebits : TBits_1); inline;
  92686. begin
  92687. if thebits = 0 then
  92688. pTDefRegMap(@Self)^.clr := $00004000
  92689. else
  92690. pTDefRegMap(@Self)^.&set := $00004000;
  92691. end;
  92692. function TCAN1_C1FIFOCON25.getFRESET : TBits_1; inline;
  92693. begin
  92694. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  92695. end;
  92696. procedure TCAN1_C1FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  92697. begin
  92698. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  92699. end;
  92700. function TCAN1_C1FIFOCON25.getFSIZE : TBits_5; inline;
  92701. begin
  92702. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  92703. end;
  92704. procedure TCAN1_C1FIFOCON25.setw(thebits : TBits_32); inline;
  92705. begin
  92706. pTDefRegMap(@Self)^.val := thebits;
  92707. end;
  92708. function TCAN1_C1FIFOCON25.getw : TBits_32; inline;
  92709. begin
  92710. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92711. end;
  92712. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF; inline;
  92713. begin
  92714. pTDefRegMap(@Self)^.&set := $00000001;
  92715. end;
  92716. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIF; inline;
  92717. begin
  92718. pTDefRegMap(@Self)^.clr := $00000001;
  92719. end;
  92720. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  92721. begin
  92722. if thebits = 0 then
  92723. pTDefRegMap(@Self)^.clr := $00000001
  92724. else
  92725. pTDefRegMap(@Self)^.&set := $00000001;
  92726. end;
  92727. function TCAN1_C1FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  92728. begin
  92729. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  92730. end;
  92731. procedure TCAN1_C1FIFOINT25.setRXHALFIF; inline;
  92732. begin
  92733. pTDefRegMap(@Self)^.&set := $00000002;
  92734. end;
  92735. procedure TCAN1_C1FIFOINT25.clearRXHALFIF; inline;
  92736. begin
  92737. pTDefRegMap(@Self)^.clr := $00000002;
  92738. end;
  92739. procedure TCAN1_C1FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  92740. begin
  92741. if thebits = 0 then
  92742. pTDefRegMap(@Self)^.clr := $00000002
  92743. else
  92744. pTDefRegMap(@Self)^.&set := $00000002;
  92745. end;
  92746. function TCAN1_C1FIFOINT25.getRXHALFIF : TBits_1; inline;
  92747. begin
  92748. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  92749. end;
  92750. procedure TCAN1_C1FIFOINT25.setRXFULLIF; inline;
  92751. begin
  92752. pTDefRegMap(@Self)^.&set := $00000004;
  92753. end;
  92754. procedure TCAN1_C1FIFOINT25.clearRXFULLIF; inline;
  92755. begin
  92756. pTDefRegMap(@Self)^.clr := $00000004;
  92757. end;
  92758. procedure TCAN1_C1FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  92759. begin
  92760. if thebits = 0 then
  92761. pTDefRegMap(@Self)^.clr := $00000004
  92762. else
  92763. pTDefRegMap(@Self)^.&set := $00000004;
  92764. end;
  92765. function TCAN1_C1FIFOINT25.getRXFULLIF : TBits_1; inline;
  92766. begin
  92767. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  92768. end;
  92769. procedure TCAN1_C1FIFOINT25.setRXOVFLIF; inline;
  92770. begin
  92771. pTDefRegMap(@Self)^.&set := $00000008;
  92772. end;
  92773. procedure TCAN1_C1FIFOINT25.clearRXOVFLIF; inline;
  92774. begin
  92775. pTDefRegMap(@Self)^.clr := $00000008;
  92776. end;
  92777. procedure TCAN1_C1FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  92778. begin
  92779. if thebits = 0 then
  92780. pTDefRegMap(@Self)^.clr := $00000008
  92781. else
  92782. pTDefRegMap(@Self)^.&set := $00000008;
  92783. end;
  92784. function TCAN1_C1FIFOINT25.getRXOVFLIF : TBits_1; inline;
  92785. begin
  92786. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  92787. end;
  92788. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF; inline;
  92789. begin
  92790. pTDefRegMap(@Self)^.&set := $00000100;
  92791. end;
  92792. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIF; inline;
  92793. begin
  92794. pTDefRegMap(@Self)^.clr := $00000100;
  92795. end;
  92796. procedure TCAN1_C1FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  92797. begin
  92798. if thebits = 0 then
  92799. pTDefRegMap(@Self)^.clr := $00000100
  92800. else
  92801. pTDefRegMap(@Self)^.&set := $00000100;
  92802. end;
  92803. function TCAN1_C1FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  92804. begin
  92805. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  92806. end;
  92807. procedure TCAN1_C1FIFOINT25.setTXHALFIF; inline;
  92808. begin
  92809. pTDefRegMap(@Self)^.&set := $00000200;
  92810. end;
  92811. procedure TCAN1_C1FIFOINT25.clearTXHALFIF; inline;
  92812. begin
  92813. pTDefRegMap(@Self)^.clr := $00000200;
  92814. end;
  92815. procedure TCAN1_C1FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  92816. begin
  92817. if thebits = 0 then
  92818. pTDefRegMap(@Self)^.clr := $00000200
  92819. else
  92820. pTDefRegMap(@Self)^.&set := $00000200;
  92821. end;
  92822. function TCAN1_C1FIFOINT25.getTXHALFIF : TBits_1; inline;
  92823. begin
  92824. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  92825. end;
  92826. procedure TCAN1_C1FIFOINT25.setTXNFULLIF; inline;
  92827. begin
  92828. pTDefRegMap(@Self)^.&set := $00000400;
  92829. end;
  92830. procedure TCAN1_C1FIFOINT25.clearTXNFULLIF; inline;
  92831. begin
  92832. pTDefRegMap(@Self)^.clr := $00000400;
  92833. end;
  92834. procedure TCAN1_C1FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  92835. begin
  92836. if thebits = 0 then
  92837. pTDefRegMap(@Self)^.clr := $00000400
  92838. else
  92839. pTDefRegMap(@Self)^.&set := $00000400;
  92840. end;
  92841. function TCAN1_C1FIFOINT25.getTXNFULLIF : TBits_1; inline;
  92842. begin
  92843. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  92844. end;
  92845. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE; inline;
  92846. begin
  92847. pTDefRegMap(@Self)^.&set := $00010000;
  92848. end;
  92849. procedure TCAN1_C1FIFOINT25.clearRXNEMPTYIE; inline;
  92850. begin
  92851. pTDefRegMap(@Self)^.clr := $00010000;
  92852. end;
  92853. procedure TCAN1_C1FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  92854. begin
  92855. if thebits = 0 then
  92856. pTDefRegMap(@Self)^.clr := $00010000
  92857. else
  92858. pTDefRegMap(@Self)^.&set := $00010000;
  92859. end;
  92860. function TCAN1_C1FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  92861. begin
  92862. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  92863. end;
  92864. procedure TCAN1_C1FIFOINT25.setRXHALFIE; inline;
  92865. begin
  92866. pTDefRegMap(@Self)^.&set := $00020000;
  92867. end;
  92868. procedure TCAN1_C1FIFOINT25.clearRXHALFIE; inline;
  92869. begin
  92870. pTDefRegMap(@Self)^.clr := $00020000;
  92871. end;
  92872. procedure TCAN1_C1FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  92873. begin
  92874. if thebits = 0 then
  92875. pTDefRegMap(@Self)^.clr := $00020000
  92876. else
  92877. pTDefRegMap(@Self)^.&set := $00020000;
  92878. end;
  92879. function TCAN1_C1FIFOINT25.getRXHALFIE : TBits_1; inline;
  92880. begin
  92881. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  92882. end;
  92883. procedure TCAN1_C1FIFOINT25.setRXFULLIE; inline;
  92884. begin
  92885. pTDefRegMap(@Self)^.&set := $00040000;
  92886. end;
  92887. procedure TCAN1_C1FIFOINT25.clearRXFULLIE; inline;
  92888. begin
  92889. pTDefRegMap(@Self)^.clr := $00040000;
  92890. end;
  92891. procedure TCAN1_C1FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  92892. begin
  92893. if thebits = 0 then
  92894. pTDefRegMap(@Self)^.clr := $00040000
  92895. else
  92896. pTDefRegMap(@Self)^.&set := $00040000;
  92897. end;
  92898. function TCAN1_C1FIFOINT25.getRXFULLIE : TBits_1; inline;
  92899. begin
  92900. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  92901. end;
  92902. procedure TCAN1_C1FIFOINT25.setRXOVFLIE; inline;
  92903. begin
  92904. pTDefRegMap(@Self)^.&set := $00080000;
  92905. end;
  92906. procedure TCAN1_C1FIFOINT25.clearRXOVFLIE; inline;
  92907. begin
  92908. pTDefRegMap(@Self)^.clr := $00080000;
  92909. end;
  92910. procedure TCAN1_C1FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  92911. begin
  92912. if thebits = 0 then
  92913. pTDefRegMap(@Self)^.clr := $00080000
  92914. else
  92915. pTDefRegMap(@Self)^.&set := $00080000;
  92916. end;
  92917. function TCAN1_C1FIFOINT25.getRXOVFLIE : TBits_1; inline;
  92918. begin
  92919. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  92920. end;
  92921. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE; inline;
  92922. begin
  92923. pTDefRegMap(@Self)^.&set := $01000000;
  92924. end;
  92925. procedure TCAN1_C1FIFOINT25.clearTXEMPTYIE; inline;
  92926. begin
  92927. pTDefRegMap(@Self)^.clr := $01000000;
  92928. end;
  92929. procedure TCAN1_C1FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  92930. begin
  92931. if thebits = 0 then
  92932. pTDefRegMap(@Self)^.clr := $01000000
  92933. else
  92934. pTDefRegMap(@Self)^.&set := $01000000;
  92935. end;
  92936. function TCAN1_C1FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  92937. begin
  92938. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  92939. end;
  92940. procedure TCAN1_C1FIFOINT25.setTXHALFIE; inline;
  92941. begin
  92942. pTDefRegMap(@Self)^.&set := $02000000;
  92943. end;
  92944. procedure TCAN1_C1FIFOINT25.clearTXHALFIE; inline;
  92945. begin
  92946. pTDefRegMap(@Self)^.clr := $02000000;
  92947. end;
  92948. procedure TCAN1_C1FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  92949. begin
  92950. if thebits = 0 then
  92951. pTDefRegMap(@Self)^.clr := $02000000
  92952. else
  92953. pTDefRegMap(@Self)^.&set := $02000000;
  92954. end;
  92955. function TCAN1_C1FIFOINT25.getTXHALFIE : TBits_1; inline;
  92956. begin
  92957. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  92958. end;
  92959. procedure TCAN1_C1FIFOINT25.setTXNFULLIE; inline;
  92960. begin
  92961. pTDefRegMap(@Self)^.&set := $04000000;
  92962. end;
  92963. procedure TCAN1_C1FIFOINT25.clearTXNFULLIE; inline;
  92964. begin
  92965. pTDefRegMap(@Self)^.clr := $04000000;
  92966. end;
  92967. procedure TCAN1_C1FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  92968. begin
  92969. if thebits = 0 then
  92970. pTDefRegMap(@Self)^.clr := $04000000
  92971. else
  92972. pTDefRegMap(@Self)^.&set := $04000000;
  92973. end;
  92974. function TCAN1_C1FIFOINT25.getTXNFULLIE : TBits_1; inline;
  92975. begin
  92976. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  92977. end;
  92978. procedure TCAN1_C1FIFOINT25.setw(thebits : TBits_32); inline;
  92979. begin
  92980. pTDefRegMap(@Self)^.val := thebits;
  92981. end;
  92982. function TCAN1_C1FIFOINT25.getw : TBits_32; inline;
  92983. begin
  92984. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  92985. end;
  92986. procedure TCAN1_C1FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  92987. begin
  92988. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  92989. end;
  92990. function TCAN1_C1FIFOCI25.getCFIFOCI : TBits_5; inline;
  92991. begin
  92992. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  92993. end;
  92994. procedure TCAN1_C1FIFOCI25.setw(thebits : TBits_32); inline;
  92995. begin
  92996. pTDefRegMap(@Self)^.val := thebits;
  92997. end;
  92998. function TCAN1_C1FIFOCI25.getw : TBits_32; inline;
  92999. begin
  93000. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93001. end;
  93002. procedure TCAN1_C1FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  93003. begin
  93004. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  93005. end;
  93006. function TCAN1_C1FIFOCON26.getTXPRI : TBits_2; inline;
  93007. begin
  93008. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  93009. end;
  93010. procedure TCAN1_C1FIFOCON26.setRTREN; inline;
  93011. begin
  93012. pTDefRegMap(@Self)^.&set := $00000004;
  93013. end;
  93014. procedure TCAN1_C1FIFOCON26.clearRTREN; inline;
  93015. begin
  93016. pTDefRegMap(@Self)^.clr := $00000004;
  93017. end;
  93018. procedure TCAN1_C1FIFOCON26.setRTREN(thebits : TBits_1); inline;
  93019. begin
  93020. if thebits = 0 then
  93021. pTDefRegMap(@Self)^.clr := $00000004
  93022. else
  93023. pTDefRegMap(@Self)^.&set := $00000004;
  93024. end;
  93025. function TCAN1_C1FIFOCON26.getRTREN : TBits_1; inline;
  93026. begin
  93027. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93028. end;
  93029. procedure TCAN1_C1FIFOCON26.setTXREQ; inline;
  93030. begin
  93031. pTDefRegMap(@Self)^.&set := $00000008;
  93032. end;
  93033. procedure TCAN1_C1FIFOCON26.clearTXREQ; inline;
  93034. begin
  93035. pTDefRegMap(@Self)^.clr := $00000008;
  93036. end;
  93037. procedure TCAN1_C1FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  93038. begin
  93039. if thebits = 0 then
  93040. pTDefRegMap(@Self)^.clr := $00000008
  93041. else
  93042. pTDefRegMap(@Self)^.&set := $00000008;
  93043. end;
  93044. function TCAN1_C1FIFOCON26.getTXREQ : TBits_1; inline;
  93045. begin
  93046. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93047. end;
  93048. procedure TCAN1_C1FIFOCON26.setTXERR; inline;
  93049. begin
  93050. pTDefRegMap(@Self)^.&set := $00000010;
  93051. end;
  93052. procedure TCAN1_C1FIFOCON26.clearTXERR; inline;
  93053. begin
  93054. pTDefRegMap(@Self)^.clr := $00000010;
  93055. end;
  93056. procedure TCAN1_C1FIFOCON26.setTXERR(thebits : TBits_1); inline;
  93057. begin
  93058. if thebits = 0 then
  93059. pTDefRegMap(@Self)^.clr := $00000010
  93060. else
  93061. pTDefRegMap(@Self)^.&set := $00000010;
  93062. end;
  93063. function TCAN1_C1FIFOCON26.getTXERR : TBits_1; inline;
  93064. begin
  93065. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  93066. end;
  93067. procedure TCAN1_C1FIFOCON26.setTXLARB; inline;
  93068. begin
  93069. pTDefRegMap(@Self)^.&set := $00000020;
  93070. end;
  93071. procedure TCAN1_C1FIFOCON26.clearTXLARB; inline;
  93072. begin
  93073. pTDefRegMap(@Self)^.clr := $00000020;
  93074. end;
  93075. procedure TCAN1_C1FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  93076. begin
  93077. if thebits = 0 then
  93078. pTDefRegMap(@Self)^.clr := $00000020
  93079. else
  93080. pTDefRegMap(@Self)^.&set := $00000020;
  93081. end;
  93082. function TCAN1_C1FIFOCON26.getTXLARB : TBits_1; inline;
  93083. begin
  93084. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  93085. end;
  93086. procedure TCAN1_C1FIFOCON26.setTXABAT; inline;
  93087. begin
  93088. pTDefRegMap(@Self)^.&set := $00000040;
  93089. end;
  93090. procedure TCAN1_C1FIFOCON26.clearTXABAT; inline;
  93091. begin
  93092. pTDefRegMap(@Self)^.clr := $00000040;
  93093. end;
  93094. procedure TCAN1_C1FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  93095. begin
  93096. if thebits = 0 then
  93097. pTDefRegMap(@Self)^.clr := $00000040
  93098. else
  93099. pTDefRegMap(@Self)^.&set := $00000040;
  93100. end;
  93101. function TCAN1_C1FIFOCON26.getTXABAT : TBits_1; inline;
  93102. begin
  93103. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  93104. end;
  93105. procedure TCAN1_C1FIFOCON26.setTXEN; inline;
  93106. begin
  93107. pTDefRegMap(@Self)^.&set := $00000080;
  93108. end;
  93109. procedure TCAN1_C1FIFOCON26.clearTXEN; inline;
  93110. begin
  93111. pTDefRegMap(@Self)^.clr := $00000080;
  93112. end;
  93113. procedure TCAN1_C1FIFOCON26.setTXEN(thebits : TBits_1); inline;
  93114. begin
  93115. if thebits = 0 then
  93116. pTDefRegMap(@Self)^.clr := $00000080
  93117. else
  93118. pTDefRegMap(@Self)^.&set := $00000080;
  93119. end;
  93120. function TCAN1_C1FIFOCON26.getTXEN : TBits_1; inline;
  93121. begin
  93122. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  93123. end;
  93124. procedure TCAN1_C1FIFOCON26.setDONLY; inline;
  93125. begin
  93126. pTDefRegMap(@Self)^.&set := $00001000;
  93127. end;
  93128. procedure TCAN1_C1FIFOCON26.clearDONLY; inline;
  93129. begin
  93130. pTDefRegMap(@Self)^.clr := $00001000;
  93131. end;
  93132. procedure TCAN1_C1FIFOCON26.setDONLY(thebits : TBits_1); inline;
  93133. begin
  93134. if thebits = 0 then
  93135. pTDefRegMap(@Self)^.clr := $00001000
  93136. else
  93137. pTDefRegMap(@Self)^.&set := $00001000;
  93138. end;
  93139. function TCAN1_C1FIFOCON26.getDONLY : TBits_1; inline;
  93140. begin
  93141. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  93142. end;
  93143. procedure TCAN1_C1FIFOCON26.setUINC; inline;
  93144. begin
  93145. pTDefRegMap(@Self)^.&set := $00002000;
  93146. end;
  93147. procedure TCAN1_C1FIFOCON26.clearUINC; inline;
  93148. begin
  93149. pTDefRegMap(@Self)^.clr := $00002000;
  93150. end;
  93151. procedure TCAN1_C1FIFOCON26.setUINC(thebits : TBits_1); inline;
  93152. begin
  93153. if thebits = 0 then
  93154. pTDefRegMap(@Self)^.clr := $00002000
  93155. else
  93156. pTDefRegMap(@Self)^.&set := $00002000;
  93157. end;
  93158. function TCAN1_C1FIFOCON26.getUINC : TBits_1; inline;
  93159. begin
  93160. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  93161. end;
  93162. procedure TCAN1_C1FIFOCON26.setFRESET; inline;
  93163. begin
  93164. pTDefRegMap(@Self)^.&set := $00004000;
  93165. end;
  93166. procedure TCAN1_C1FIFOCON26.clearFRESET; inline;
  93167. begin
  93168. pTDefRegMap(@Self)^.clr := $00004000;
  93169. end;
  93170. procedure TCAN1_C1FIFOCON26.setFRESET(thebits : TBits_1); inline;
  93171. begin
  93172. if thebits = 0 then
  93173. pTDefRegMap(@Self)^.clr := $00004000
  93174. else
  93175. pTDefRegMap(@Self)^.&set := $00004000;
  93176. end;
  93177. function TCAN1_C1FIFOCON26.getFRESET : TBits_1; inline;
  93178. begin
  93179. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  93180. end;
  93181. procedure TCAN1_C1FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  93182. begin
  93183. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  93184. end;
  93185. function TCAN1_C1FIFOCON26.getFSIZE : TBits_5; inline;
  93186. begin
  93187. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  93188. end;
  93189. procedure TCAN1_C1FIFOCON26.setw(thebits : TBits_32); inline;
  93190. begin
  93191. pTDefRegMap(@Self)^.val := thebits;
  93192. end;
  93193. function TCAN1_C1FIFOCON26.getw : TBits_32; inline;
  93194. begin
  93195. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93196. end;
  93197. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF; inline;
  93198. begin
  93199. pTDefRegMap(@Self)^.&set := $00000001;
  93200. end;
  93201. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIF; inline;
  93202. begin
  93203. pTDefRegMap(@Self)^.clr := $00000001;
  93204. end;
  93205. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  93206. begin
  93207. if thebits = 0 then
  93208. pTDefRegMap(@Self)^.clr := $00000001
  93209. else
  93210. pTDefRegMap(@Self)^.&set := $00000001;
  93211. end;
  93212. function TCAN1_C1FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  93213. begin
  93214. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  93215. end;
  93216. procedure TCAN1_C1FIFOINT26.setRXHALFIF; inline;
  93217. begin
  93218. pTDefRegMap(@Self)^.&set := $00000002;
  93219. end;
  93220. procedure TCAN1_C1FIFOINT26.clearRXHALFIF; inline;
  93221. begin
  93222. pTDefRegMap(@Self)^.clr := $00000002;
  93223. end;
  93224. procedure TCAN1_C1FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  93225. begin
  93226. if thebits = 0 then
  93227. pTDefRegMap(@Self)^.clr := $00000002
  93228. else
  93229. pTDefRegMap(@Self)^.&set := $00000002;
  93230. end;
  93231. function TCAN1_C1FIFOINT26.getRXHALFIF : TBits_1; inline;
  93232. begin
  93233. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  93234. end;
  93235. procedure TCAN1_C1FIFOINT26.setRXFULLIF; inline;
  93236. begin
  93237. pTDefRegMap(@Self)^.&set := $00000004;
  93238. end;
  93239. procedure TCAN1_C1FIFOINT26.clearRXFULLIF; inline;
  93240. begin
  93241. pTDefRegMap(@Self)^.clr := $00000004;
  93242. end;
  93243. procedure TCAN1_C1FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  93244. begin
  93245. if thebits = 0 then
  93246. pTDefRegMap(@Self)^.clr := $00000004
  93247. else
  93248. pTDefRegMap(@Self)^.&set := $00000004;
  93249. end;
  93250. function TCAN1_C1FIFOINT26.getRXFULLIF : TBits_1; inline;
  93251. begin
  93252. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93253. end;
  93254. procedure TCAN1_C1FIFOINT26.setRXOVFLIF; inline;
  93255. begin
  93256. pTDefRegMap(@Self)^.&set := $00000008;
  93257. end;
  93258. procedure TCAN1_C1FIFOINT26.clearRXOVFLIF; inline;
  93259. begin
  93260. pTDefRegMap(@Self)^.clr := $00000008;
  93261. end;
  93262. procedure TCAN1_C1FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  93263. begin
  93264. if thebits = 0 then
  93265. pTDefRegMap(@Self)^.clr := $00000008
  93266. else
  93267. pTDefRegMap(@Self)^.&set := $00000008;
  93268. end;
  93269. function TCAN1_C1FIFOINT26.getRXOVFLIF : TBits_1; inline;
  93270. begin
  93271. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93272. end;
  93273. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF; inline;
  93274. begin
  93275. pTDefRegMap(@Self)^.&set := $00000100;
  93276. end;
  93277. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIF; inline;
  93278. begin
  93279. pTDefRegMap(@Self)^.clr := $00000100;
  93280. end;
  93281. procedure TCAN1_C1FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  93282. begin
  93283. if thebits = 0 then
  93284. pTDefRegMap(@Self)^.clr := $00000100
  93285. else
  93286. pTDefRegMap(@Self)^.&set := $00000100;
  93287. end;
  93288. function TCAN1_C1FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  93289. begin
  93290. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  93291. end;
  93292. procedure TCAN1_C1FIFOINT26.setTXHALFIF; inline;
  93293. begin
  93294. pTDefRegMap(@Self)^.&set := $00000200;
  93295. end;
  93296. procedure TCAN1_C1FIFOINT26.clearTXHALFIF; inline;
  93297. begin
  93298. pTDefRegMap(@Self)^.clr := $00000200;
  93299. end;
  93300. procedure TCAN1_C1FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  93301. begin
  93302. if thebits = 0 then
  93303. pTDefRegMap(@Self)^.clr := $00000200
  93304. else
  93305. pTDefRegMap(@Self)^.&set := $00000200;
  93306. end;
  93307. function TCAN1_C1FIFOINT26.getTXHALFIF : TBits_1; inline;
  93308. begin
  93309. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  93310. end;
  93311. procedure TCAN1_C1FIFOINT26.setTXNFULLIF; inline;
  93312. begin
  93313. pTDefRegMap(@Self)^.&set := $00000400;
  93314. end;
  93315. procedure TCAN1_C1FIFOINT26.clearTXNFULLIF; inline;
  93316. begin
  93317. pTDefRegMap(@Self)^.clr := $00000400;
  93318. end;
  93319. procedure TCAN1_C1FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  93320. begin
  93321. if thebits = 0 then
  93322. pTDefRegMap(@Self)^.clr := $00000400
  93323. else
  93324. pTDefRegMap(@Self)^.&set := $00000400;
  93325. end;
  93326. function TCAN1_C1FIFOINT26.getTXNFULLIF : TBits_1; inline;
  93327. begin
  93328. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  93329. end;
  93330. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE; inline;
  93331. begin
  93332. pTDefRegMap(@Self)^.&set := $00010000;
  93333. end;
  93334. procedure TCAN1_C1FIFOINT26.clearRXNEMPTYIE; inline;
  93335. begin
  93336. pTDefRegMap(@Self)^.clr := $00010000;
  93337. end;
  93338. procedure TCAN1_C1FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  93339. begin
  93340. if thebits = 0 then
  93341. pTDefRegMap(@Self)^.clr := $00010000
  93342. else
  93343. pTDefRegMap(@Self)^.&set := $00010000;
  93344. end;
  93345. function TCAN1_C1FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  93346. begin
  93347. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  93348. end;
  93349. procedure TCAN1_C1FIFOINT26.setRXHALFIE; inline;
  93350. begin
  93351. pTDefRegMap(@Self)^.&set := $00020000;
  93352. end;
  93353. procedure TCAN1_C1FIFOINT26.clearRXHALFIE; inline;
  93354. begin
  93355. pTDefRegMap(@Self)^.clr := $00020000;
  93356. end;
  93357. procedure TCAN1_C1FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  93358. begin
  93359. if thebits = 0 then
  93360. pTDefRegMap(@Self)^.clr := $00020000
  93361. else
  93362. pTDefRegMap(@Self)^.&set := $00020000;
  93363. end;
  93364. function TCAN1_C1FIFOINT26.getRXHALFIE : TBits_1; inline;
  93365. begin
  93366. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  93367. end;
  93368. procedure TCAN1_C1FIFOINT26.setRXFULLIE; inline;
  93369. begin
  93370. pTDefRegMap(@Self)^.&set := $00040000;
  93371. end;
  93372. procedure TCAN1_C1FIFOINT26.clearRXFULLIE; inline;
  93373. begin
  93374. pTDefRegMap(@Self)^.clr := $00040000;
  93375. end;
  93376. procedure TCAN1_C1FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  93377. begin
  93378. if thebits = 0 then
  93379. pTDefRegMap(@Self)^.clr := $00040000
  93380. else
  93381. pTDefRegMap(@Self)^.&set := $00040000;
  93382. end;
  93383. function TCAN1_C1FIFOINT26.getRXFULLIE : TBits_1; inline;
  93384. begin
  93385. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  93386. end;
  93387. procedure TCAN1_C1FIFOINT26.setRXOVFLIE; inline;
  93388. begin
  93389. pTDefRegMap(@Self)^.&set := $00080000;
  93390. end;
  93391. procedure TCAN1_C1FIFOINT26.clearRXOVFLIE; inline;
  93392. begin
  93393. pTDefRegMap(@Self)^.clr := $00080000;
  93394. end;
  93395. procedure TCAN1_C1FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  93396. begin
  93397. if thebits = 0 then
  93398. pTDefRegMap(@Self)^.clr := $00080000
  93399. else
  93400. pTDefRegMap(@Self)^.&set := $00080000;
  93401. end;
  93402. function TCAN1_C1FIFOINT26.getRXOVFLIE : TBits_1; inline;
  93403. begin
  93404. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  93405. end;
  93406. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE; inline;
  93407. begin
  93408. pTDefRegMap(@Self)^.&set := $01000000;
  93409. end;
  93410. procedure TCAN1_C1FIFOINT26.clearTXEMPTYIE; inline;
  93411. begin
  93412. pTDefRegMap(@Self)^.clr := $01000000;
  93413. end;
  93414. procedure TCAN1_C1FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  93415. begin
  93416. if thebits = 0 then
  93417. pTDefRegMap(@Self)^.clr := $01000000
  93418. else
  93419. pTDefRegMap(@Self)^.&set := $01000000;
  93420. end;
  93421. function TCAN1_C1FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  93422. begin
  93423. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  93424. end;
  93425. procedure TCAN1_C1FIFOINT26.setTXHALFIE; inline;
  93426. begin
  93427. pTDefRegMap(@Self)^.&set := $02000000;
  93428. end;
  93429. procedure TCAN1_C1FIFOINT26.clearTXHALFIE; inline;
  93430. begin
  93431. pTDefRegMap(@Self)^.clr := $02000000;
  93432. end;
  93433. procedure TCAN1_C1FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  93434. begin
  93435. if thebits = 0 then
  93436. pTDefRegMap(@Self)^.clr := $02000000
  93437. else
  93438. pTDefRegMap(@Self)^.&set := $02000000;
  93439. end;
  93440. function TCAN1_C1FIFOINT26.getTXHALFIE : TBits_1; inline;
  93441. begin
  93442. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  93443. end;
  93444. procedure TCAN1_C1FIFOINT26.setTXNFULLIE; inline;
  93445. begin
  93446. pTDefRegMap(@Self)^.&set := $04000000;
  93447. end;
  93448. procedure TCAN1_C1FIFOINT26.clearTXNFULLIE; inline;
  93449. begin
  93450. pTDefRegMap(@Self)^.clr := $04000000;
  93451. end;
  93452. procedure TCAN1_C1FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  93453. begin
  93454. if thebits = 0 then
  93455. pTDefRegMap(@Self)^.clr := $04000000
  93456. else
  93457. pTDefRegMap(@Self)^.&set := $04000000;
  93458. end;
  93459. function TCAN1_C1FIFOINT26.getTXNFULLIE : TBits_1; inline;
  93460. begin
  93461. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  93462. end;
  93463. procedure TCAN1_C1FIFOINT26.setw(thebits : TBits_32); inline;
  93464. begin
  93465. pTDefRegMap(@Self)^.val := thebits;
  93466. end;
  93467. function TCAN1_C1FIFOINT26.getw : TBits_32; inline;
  93468. begin
  93469. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93470. end;
  93471. procedure TCAN1_C1FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  93472. begin
  93473. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  93474. end;
  93475. function TCAN1_C1FIFOCI26.getCFIFOCI : TBits_5; inline;
  93476. begin
  93477. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  93478. end;
  93479. procedure TCAN1_C1FIFOCI26.setw(thebits : TBits_32); inline;
  93480. begin
  93481. pTDefRegMap(@Self)^.val := thebits;
  93482. end;
  93483. function TCAN1_C1FIFOCI26.getw : TBits_32; inline;
  93484. begin
  93485. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93486. end;
  93487. procedure TCAN1_C1FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  93488. begin
  93489. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  93490. end;
  93491. function TCAN1_C1FIFOCON27.getTXPRI : TBits_2; inline;
  93492. begin
  93493. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  93494. end;
  93495. procedure TCAN1_C1FIFOCON27.setRTREN; inline;
  93496. begin
  93497. pTDefRegMap(@Self)^.&set := $00000004;
  93498. end;
  93499. procedure TCAN1_C1FIFOCON27.clearRTREN; inline;
  93500. begin
  93501. pTDefRegMap(@Self)^.clr := $00000004;
  93502. end;
  93503. procedure TCAN1_C1FIFOCON27.setRTREN(thebits : TBits_1); inline;
  93504. begin
  93505. if thebits = 0 then
  93506. pTDefRegMap(@Self)^.clr := $00000004
  93507. else
  93508. pTDefRegMap(@Self)^.&set := $00000004;
  93509. end;
  93510. function TCAN1_C1FIFOCON27.getRTREN : TBits_1; inline;
  93511. begin
  93512. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93513. end;
  93514. procedure TCAN1_C1FIFOCON27.setTXREQ; inline;
  93515. begin
  93516. pTDefRegMap(@Self)^.&set := $00000008;
  93517. end;
  93518. procedure TCAN1_C1FIFOCON27.clearTXREQ; inline;
  93519. begin
  93520. pTDefRegMap(@Self)^.clr := $00000008;
  93521. end;
  93522. procedure TCAN1_C1FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  93523. begin
  93524. if thebits = 0 then
  93525. pTDefRegMap(@Self)^.clr := $00000008
  93526. else
  93527. pTDefRegMap(@Self)^.&set := $00000008;
  93528. end;
  93529. function TCAN1_C1FIFOCON27.getTXREQ : TBits_1; inline;
  93530. begin
  93531. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93532. end;
  93533. procedure TCAN1_C1FIFOCON27.setTXERR; inline;
  93534. begin
  93535. pTDefRegMap(@Self)^.&set := $00000010;
  93536. end;
  93537. procedure TCAN1_C1FIFOCON27.clearTXERR; inline;
  93538. begin
  93539. pTDefRegMap(@Self)^.clr := $00000010;
  93540. end;
  93541. procedure TCAN1_C1FIFOCON27.setTXERR(thebits : TBits_1); inline;
  93542. begin
  93543. if thebits = 0 then
  93544. pTDefRegMap(@Self)^.clr := $00000010
  93545. else
  93546. pTDefRegMap(@Self)^.&set := $00000010;
  93547. end;
  93548. function TCAN1_C1FIFOCON27.getTXERR : TBits_1; inline;
  93549. begin
  93550. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  93551. end;
  93552. procedure TCAN1_C1FIFOCON27.setTXLARB; inline;
  93553. begin
  93554. pTDefRegMap(@Self)^.&set := $00000020;
  93555. end;
  93556. procedure TCAN1_C1FIFOCON27.clearTXLARB; inline;
  93557. begin
  93558. pTDefRegMap(@Self)^.clr := $00000020;
  93559. end;
  93560. procedure TCAN1_C1FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  93561. begin
  93562. if thebits = 0 then
  93563. pTDefRegMap(@Self)^.clr := $00000020
  93564. else
  93565. pTDefRegMap(@Self)^.&set := $00000020;
  93566. end;
  93567. function TCAN1_C1FIFOCON27.getTXLARB : TBits_1; inline;
  93568. begin
  93569. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  93570. end;
  93571. procedure TCAN1_C1FIFOCON27.setTXABAT; inline;
  93572. begin
  93573. pTDefRegMap(@Self)^.&set := $00000040;
  93574. end;
  93575. procedure TCAN1_C1FIFOCON27.clearTXABAT; inline;
  93576. begin
  93577. pTDefRegMap(@Self)^.clr := $00000040;
  93578. end;
  93579. procedure TCAN1_C1FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  93580. begin
  93581. if thebits = 0 then
  93582. pTDefRegMap(@Self)^.clr := $00000040
  93583. else
  93584. pTDefRegMap(@Self)^.&set := $00000040;
  93585. end;
  93586. function TCAN1_C1FIFOCON27.getTXABAT : TBits_1; inline;
  93587. begin
  93588. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  93589. end;
  93590. procedure TCAN1_C1FIFOCON27.setTXEN; inline;
  93591. begin
  93592. pTDefRegMap(@Self)^.&set := $00000080;
  93593. end;
  93594. procedure TCAN1_C1FIFOCON27.clearTXEN; inline;
  93595. begin
  93596. pTDefRegMap(@Self)^.clr := $00000080;
  93597. end;
  93598. procedure TCAN1_C1FIFOCON27.setTXEN(thebits : TBits_1); inline;
  93599. begin
  93600. if thebits = 0 then
  93601. pTDefRegMap(@Self)^.clr := $00000080
  93602. else
  93603. pTDefRegMap(@Self)^.&set := $00000080;
  93604. end;
  93605. function TCAN1_C1FIFOCON27.getTXEN : TBits_1; inline;
  93606. begin
  93607. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  93608. end;
  93609. procedure TCAN1_C1FIFOCON27.setDONLY; inline;
  93610. begin
  93611. pTDefRegMap(@Self)^.&set := $00001000;
  93612. end;
  93613. procedure TCAN1_C1FIFOCON27.clearDONLY; inline;
  93614. begin
  93615. pTDefRegMap(@Self)^.clr := $00001000;
  93616. end;
  93617. procedure TCAN1_C1FIFOCON27.setDONLY(thebits : TBits_1); inline;
  93618. begin
  93619. if thebits = 0 then
  93620. pTDefRegMap(@Self)^.clr := $00001000
  93621. else
  93622. pTDefRegMap(@Self)^.&set := $00001000;
  93623. end;
  93624. function TCAN1_C1FIFOCON27.getDONLY : TBits_1; inline;
  93625. begin
  93626. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  93627. end;
  93628. procedure TCAN1_C1FIFOCON27.setUINC; inline;
  93629. begin
  93630. pTDefRegMap(@Self)^.&set := $00002000;
  93631. end;
  93632. procedure TCAN1_C1FIFOCON27.clearUINC; inline;
  93633. begin
  93634. pTDefRegMap(@Self)^.clr := $00002000;
  93635. end;
  93636. procedure TCAN1_C1FIFOCON27.setUINC(thebits : TBits_1); inline;
  93637. begin
  93638. if thebits = 0 then
  93639. pTDefRegMap(@Self)^.clr := $00002000
  93640. else
  93641. pTDefRegMap(@Self)^.&set := $00002000;
  93642. end;
  93643. function TCAN1_C1FIFOCON27.getUINC : TBits_1; inline;
  93644. begin
  93645. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  93646. end;
  93647. procedure TCAN1_C1FIFOCON27.setFRESET; inline;
  93648. begin
  93649. pTDefRegMap(@Self)^.&set := $00004000;
  93650. end;
  93651. procedure TCAN1_C1FIFOCON27.clearFRESET; inline;
  93652. begin
  93653. pTDefRegMap(@Self)^.clr := $00004000;
  93654. end;
  93655. procedure TCAN1_C1FIFOCON27.setFRESET(thebits : TBits_1); inline;
  93656. begin
  93657. if thebits = 0 then
  93658. pTDefRegMap(@Self)^.clr := $00004000
  93659. else
  93660. pTDefRegMap(@Self)^.&set := $00004000;
  93661. end;
  93662. function TCAN1_C1FIFOCON27.getFRESET : TBits_1; inline;
  93663. begin
  93664. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  93665. end;
  93666. procedure TCAN1_C1FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  93667. begin
  93668. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  93669. end;
  93670. function TCAN1_C1FIFOCON27.getFSIZE : TBits_5; inline;
  93671. begin
  93672. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  93673. end;
  93674. procedure TCAN1_C1FIFOCON27.setw(thebits : TBits_32); inline;
  93675. begin
  93676. pTDefRegMap(@Self)^.val := thebits;
  93677. end;
  93678. function TCAN1_C1FIFOCON27.getw : TBits_32; inline;
  93679. begin
  93680. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93681. end;
  93682. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF; inline;
  93683. begin
  93684. pTDefRegMap(@Self)^.&set := $00000001;
  93685. end;
  93686. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIF; inline;
  93687. begin
  93688. pTDefRegMap(@Self)^.clr := $00000001;
  93689. end;
  93690. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  93691. begin
  93692. if thebits = 0 then
  93693. pTDefRegMap(@Self)^.clr := $00000001
  93694. else
  93695. pTDefRegMap(@Self)^.&set := $00000001;
  93696. end;
  93697. function TCAN1_C1FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  93698. begin
  93699. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  93700. end;
  93701. procedure TCAN1_C1FIFOINT27.setRXHALFIF; inline;
  93702. begin
  93703. pTDefRegMap(@Self)^.&set := $00000002;
  93704. end;
  93705. procedure TCAN1_C1FIFOINT27.clearRXHALFIF; inline;
  93706. begin
  93707. pTDefRegMap(@Self)^.clr := $00000002;
  93708. end;
  93709. procedure TCAN1_C1FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  93710. begin
  93711. if thebits = 0 then
  93712. pTDefRegMap(@Self)^.clr := $00000002
  93713. else
  93714. pTDefRegMap(@Self)^.&set := $00000002;
  93715. end;
  93716. function TCAN1_C1FIFOINT27.getRXHALFIF : TBits_1; inline;
  93717. begin
  93718. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  93719. end;
  93720. procedure TCAN1_C1FIFOINT27.setRXFULLIF; inline;
  93721. begin
  93722. pTDefRegMap(@Self)^.&set := $00000004;
  93723. end;
  93724. procedure TCAN1_C1FIFOINT27.clearRXFULLIF; inline;
  93725. begin
  93726. pTDefRegMap(@Self)^.clr := $00000004;
  93727. end;
  93728. procedure TCAN1_C1FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  93729. begin
  93730. if thebits = 0 then
  93731. pTDefRegMap(@Self)^.clr := $00000004
  93732. else
  93733. pTDefRegMap(@Self)^.&set := $00000004;
  93734. end;
  93735. function TCAN1_C1FIFOINT27.getRXFULLIF : TBits_1; inline;
  93736. begin
  93737. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93738. end;
  93739. procedure TCAN1_C1FIFOINT27.setRXOVFLIF; inline;
  93740. begin
  93741. pTDefRegMap(@Self)^.&set := $00000008;
  93742. end;
  93743. procedure TCAN1_C1FIFOINT27.clearRXOVFLIF; inline;
  93744. begin
  93745. pTDefRegMap(@Self)^.clr := $00000008;
  93746. end;
  93747. procedure TCAN1_C1FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  93748. begin
  93749. if thebits = 0 then
  93750. pTDefRegMap(@Self)^.clr := $00000008
  93751. else
  93752. pTDefRegMap(@Self)^.&set := $00000008;
  93753. end;
  93754. function TCAN1_C1FIFOINT27.getRXOVFLIF : TBits_1; inline;
  93755. begin
  93756. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  93757. end;
  93758. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF; inline;
  93759. begin
  93760. pTDefRegMap(@Self)^.&set := $00000100;
  93761. end;
  93762. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIF; inline;
  93763. begin
  93764. pTDefRegMap(@Self)^.clr := $00000100;
  93765. end;
  93766. procedure TCAN1_C1FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  93767. begin
  93768. if thebits = 0 then
  93769. pTDefRegMap(@Self)^.clr := $00000100
  93770. else
  93771. pTDefRegMap(@Self)^.&set := $00000100;
  93772. end;
  93773. function TCAN1_C1FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  93774. begin
  93775. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  93776. end;
  93777. procedure TCAN1_C1FIFOINT27.setTXHALFIF; inline;
  93778. begin
  93779. pTDefRegMap(@Self)^.&set := $00000200;
  93780. end;
  93781. procedure TCAN1_C1FIFOINT27.clearTXHALFIF; inline;
  93782. begin
  93783. pTDefRegMap(@Self)^.clr := $00000200;
  93784. end;
  93785. procedure TCAN1_C1FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  93786. begin
  93787. if thebits = 0 then
  93788. pTDefRegMap(@Self)^.clr := $00000200
  93789. else
  93790. pTDefRegMap(@Self)^.&set := $00000200;
  93791. end;
  93792. function TCAN1_C1FIFOINT27.getTXHALFIF : TBits_1; inline;
  93793. begin
  93794. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  93795. end;
  93796. procedure TCAN1_C1FIFOINT27.setTXNFULLIF; inline;
  93797. begin
  93798. pTDefRegMap(@Self)^.&set := $00000400;
  93799. end;
  93800. procedure TCAN1_C1FIFOINT27.clearTXNFULLIF; inline;
  93801. begin
  93802. pTDefRegMap(@Self)^.clr := $00000400;
  93803. end;
  93804. procedure TCAN1_C1FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  93805. begin
  93806. if thebits = 0 then
  93807. pTDefRegMap(@Self)^.clr := $00000400
  93808. else
  93809. pTDefRegMap(@Self)^.&set := $00000400;
  93810. end;
  93811. function TCAN1_C1FIFOINT27.getTXNFULLIF : TBits_1; inline;
  93812. begin
  93813. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  93814. end;
  93815. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE; inline;
  93816. begin
  93817. pTDefRegMap(@Self)^.&set := $00010000;
  93818. end;
  93819. procedure TCAN1_C1FIFOINT27.clearRXNEMPTYIE; inline;
  93820. begin
  93821. pTDefRegMap(@Self)^.clr := $00010000;
  93822. end;
  93823. procedure TCAN1_C1FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  93824. begin
  93825. if thebits = 0 then
  93826. pTDefRegMap(@Self)^.clr := $00010000
  93827. else
  93828. pTDefRegMap(@Self)^.&set := $00010000;
  93829. end;
  93830. function TCAN1_C1FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  93831. begin
  93832. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  93833. end;
  93834. procedure TCAN1_C1FIFOINT27.setRXHALFIE; inline;
  93835. begin
  93836. pTDefRegMap(@Self)^.&set := $00020000;
  93837. end;
  93838. procedure TCAN1_C1FIFOINT27.clearRXHALFIE; inline;
  93839. begin
  93840. pTDefRegMap(@Self)^.clr := $00020000;
  93841. end;
  93842. procedure TCAN1_C1FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  93843. begin
  93844. if thebits = 0 then
  93845. pTDefRegMap(@Self)^.clr := $00020000
  93846. else
  93847. pTDefRegMap(@Self)^.&set := $00020000;
  93848. end;
  93849. function TCAN1_C1FIFOINT27.getRXHALFIE : TBits_1; inline;
  93850. begin
  93851. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  93852. end;
  93853. procedure TCAN1_C1FIFOINT27.setRXFULLIE; inline;
  93854. begin
  93855. pTDefRegMap(@Self)^.&set := $00040000;
  93856. end;
  93857. procedure TCAN1_C1FIFOINT27.clearRXFULLIE; inline;
  93858. begin
  93859. pTDefRegMap(@Self)^.clr := $00040000;
  93860. end;
  93861. procedure TCAN1_C1FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  93862. begin
  93863. if thebits = 0 then
  93864. pTDefRegMap(@Self)^.clr := $00040000
  93865. else
  93866. pTDefRegMap(@Self)^.&set := $00040000;
  93867. end;
  93868. function TCAN1_C1FIFOINT27.getRXFULLIE : TBits_1; inline;
  93869. begin
  93870. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  93871. end;
  93872. procedure TCAN1_C1FIFOINT27.setRXOVFLIE; inline;
  93873. begin
  93874. pTDefRegMap(@Self)^.&set := $00080000;
  93875. end;
  93876. procedure TCAN1_C1FIFOINT27.clearRXOVFLIE; inline;
  93877. begin
  93878. pTDefRegMap(@Self)^.clr := $00080000;
  93879. end;
  93880. procedure TCAN1_C1FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  93881. begin
  93882. if thebits = 0 then
  93883. pTDefRegMap(@Self)^.clr := $00080000
  93884. else
  93885. pTDefRegMap(@Self)^.&set := $00080000;
  93886. end;
  93887. function TCAN1_C1FIFOINT27.getRXOVFLIE : TBits_1; inline;
  93888. begin
  93889. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  93890. end;
  93891. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE; inline;
  93892. begin
  93893. pTDefRegMap(@Self)^.&set := $01000000;
  93894. end;
  93895. procedure TCAN1_C1FIFOINT27.clearTXEMPTYIE; inline;
  93896. begin
  93897. pTDefRegMap(@Self)^.clr := $01000000;
  93898. end;
  93899. procedure TCAN1_C1FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  93900. begin
  93901. if thebits = 0 then
  93902. pTDefRegMap(@Self)^.clr := $01000000
  93903. else
  93904. pTDefRegMap(@Self)^.&set := $01000000;
  93905. end;
  93906. function TCAN1_C1FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  93907. begin
  93908. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  93909. end;
  93910. procedure TCAN1_C1FIFOINT27.setTXHALFIE; inline;
  93911. begin
  93912. pTDefRegMap(@Self)^.&set := $02000000;
  93913. end;
  93914. procedure TCAN1_C1FIFOINT27.clearTXHALFIE; inline;
  93915. begin
  93916. pTDefRegMap(@Self)^.clr := $02000000;
  93917. end;
  93918. procedure TCAN1_C1FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  93919. begin
  93920. if thebits = 0 then
  93921. pTDefRegMap(@Self)^.clr := $02000000
  93922. else
  93923. pTDefRegMap(@Self)^.&set := $02000000;
  93924. end;
  93925. function TCAN1_C1FIFOINT27.getTXHALFIE : TBits_1; inline;
  93926. begin
  93927. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  93928. end;
  93929. procedure TCAN1_C1FIFOINT27.setTXNFULLIE; inline;
  93930. begin
  93931. pTDefRegMap(@Self)^.&set := $04000000;
  93932. end;
  93933. procedure TCAN1_C1FIFOINT27.clearTXNFULLIE; inline;
  93934. begin
  93935. pTDefRegMap(@Self)^.clr := $04000000;
  93936. end;
  93937. procedure TCAN1_C1FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  93938. begin
  93939. if thebits = 0 then
  93940. pTDefRegMap(@Self)^.clr := $04000000
  93941. else
  93942. pTDefRegMap(@Self)^.&set := $04000000;
  93943. end;
  93944. function TCAN1_C1FIFOINT27.getTXNFULLIE : TBits_1; inline;
  93945. begin
  93946. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  93947. end;
  93948. procedure TCAN1_C1FIFOINT27.setw(thebits : TBits_32); inline;
  93949. begin
  93950. pTDefRegMap(@Self)^.val := thebits;
  93951. end;
  93952. function TCAN1_C1FIFOINT27.getw : TBits_32; inline;
  93953. begin
  93954. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93955. end;
  93956. procedure TCAN1_C1FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  93957. begin
  93958. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  93959. end;
  93960. function TCAN1_C1FIFOCI27.getCFIFOCI : TBits_5; inline;
  93961. begin
  93962. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  93963. end;
  93964. procedure TCAN1_C1FIFOCI27.setw(thebits : TBits_32); inline;
  93965. begin
  93966. pTDefRegMap(@Self)^.val := thebits;
  93967. end;
  93968. function TCAN1_C1FIFOCI27.getw : TBits_32; inline;
  93969. begin
  93970. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  93971. end;
  93972. procedure TCAN1_C1FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  93973. begin
  93974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  93975. end;
  93976. function TCAN1_C1FIFOCON28.getTXPRI : TBits_2; inline;
  93977. begin
  93978. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  93979. end;
  93980. procedure TCAN1_C1FIFOCON28.setRTREN; inline;
  93981. begin
  93982. pTDefRegMap(@Self)^.&set := $00000004;
  93983. end;
  93984. procedure TCAN1_C1FIFOCON28.clearRTREN; inline;
  93985. begin
  93986. pTDefRegMap(@Self)^.clr := $00000004;
  93987. end;
  93988. procedure TCAN1_C1FIFOCON28.setRTREN(thebits : TBits_1); inline;
  93989. begin
  93990. if thebits = 0 then
  93991. pTDefRegMap(@Self)^.clr := $00000004
  93992. else
  93993. pTDefRegMap(@Self)^.&set := $00000004;
  93994. end;
  93995. function TCAN1_C1FIFOCON28.getRTREN : TBits_1; inline;
  93996. begin
  93997. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  93998. end;
  93999. procedure TCAN1_C1FIFOCON28.setTXREQ; inline;
  94000. begin
  94001. pTDefRegMap(@Self)^.&set := $00000008;
  94002. end;
  94003. procedure TCAN1_C1FIFOCON28.clearTXREQ; inline;
  94004. begin
  94005. pTDefRegMap(@Self)^.clr := $00000008;
  94006. end;
  94007. procedure TCAN1_C1FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  94008. begin
  94009. if thebits = 0 then
  94010. pTDefRegMap(@Self)^.clr := $00000008
  94011. else
  94012. pTDefRegMap(@Self)^.&set := $00000008;
  94013. end;
  94014. function TCAN1_C1FIFOCON28.getTXREQ : TBits_1; inline;
  94015. begin
  94016. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94017. end;
  94018. procedure TCAN1_C1FIFOCON28.setTXERR; inline;
  94019. begin
  94020. pTDefRegMap(@Self)^.&set := $00000010;
  94021. end;
  94022. procedure TCAN1_C1FIFOCON28.clearTXERR; inline;
  94023. begin
  94024. pTDefRegMap(@Self)^.clr := $00000010;
  94025. end;
  94026. procedure TCAN1_C1FIFOCON28.setTXERR(thebits : TBits_1); inline;
  94027. begin
  94028. if thebits = 0 then
  94029. pTDefRegMap(@Self)^.clr := $00000010
  94030. else
  94031. pTDefRegMap(@Self)^.&set := $00000010;
  94032. end;
  94033. function TCAN1_C1FIFOCON28.getTXERR : TBits_1; inline;
  94034. begin
  94035. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  94036. end;
  94037. procedure TCAN1_C1FIFOCON28.setTXLARB; inline;
  94038. begin
  94039. pTDefRegMap(@Self)^.&set := $00000020;
  94040. end;
  94041. procedure TCAN1_C1FIFOCON28.clearTXLARB; inline;
  94042. begin
  94043. pTDefRegMap(@Self)^.clr := $00000020;
  94044. end;
  94045. procedure TCAN1_C1FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  94046. begin
  94047. if thebits = 0 then
  94048. pTDefRegMap(@Self)^.clr := $00000020
  94049. else
  94050. pTDefRegMap(@Self)^.&set := $00000020;
  94051. end;
  94052. function TCAN1_C1FIFOCON28.getTXLARB : TBits_1; inline;
  94053. begin
  94054. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  94055. end;
  94056. procedure TCAN1_C1FIFOCON28.setTXABAT; inline;
  94057. begin
  94058. pTDefRegMap(@Self)^.&set := $00000040;
  94059. end;
  94060. procedure TCAN1_C1FIFOCON28.clearTXABAT; inline;
  94061. begin
  94062. pTDefRegMap(@Self)^.clr := $00000040;
  94063. end;
  94064. procedure TCAN1_C1FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  94065. begin
  94066. if thebits = 0 then
  94067. pTDefRegMap(@Self)^.clr := $00000040
  94068. else
  94069. pTDefRegMap(@Self)^.&set := $00000040;
  94070. end;
  94071. function TCAN1_C1FIFOCON28.getTXABAT : TBits_1; inline;
  94072. begin
  94073. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  94074. end;
  94075. procedure TCAN1_C1FIFOCON28.setTXEN; inline;
  94076. begin
  94077. pTDefRegMap(@Self)^.&set := $00000080;
  94078. end;
  94079. procedure TCAN1_C1FIFOCON28.clearTXEN; inline;
  94080. begin
  94081. pTDefRegMap(@Self)^.clr := $00000080;
  94082. end;
  94083. procedure TCAN1_C1FIFOCON28.setTXEN(thebits : TBits_1); inline;
  94084. begin
  94085. if thebits = 0 then
  94086. pTDefRegMap(@Self)^.clr := $00000080
  94087. else
  94088. pTDefRegMap(@Self)^.&set := $00000080;
  94089. end;
  94090. function TCAN1_C1FIFOCON28.getTXEN : TBits_1; inline;
  94091. begin
  94092. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  94093. end;
  94094. procedure TCAN1_C1FIFOCON28.setDONLY; inline;
  94095. begin
  94096. pTDefRegMap(@Self)^.&set := $00001000;
  94097. end;
  94098. procedure TCAN1_C1FIFOCON28.clearDONLY; inline;
  94099. begin
  94100. pTDefRegMap(@Self)^.clr := $00001000;
  94101. end;
  94102. procedure TCAN1_C1FIFOCON28.setDONLY(thebits : TBits_1); inline;
  94103. begin
  94104. if thebits = 0 then
  94105. pTDefRegMap(@Self)^.clr := $00001000
  94106. else
  94107. pTDefRegMap(@Self)^.&set := $00001000;
  94108. end;
  94109. function TCAN1_C1FIFOCON28.getDONLY : TBits_1; inline;
  94110. begin
  94111. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  94112. end;
  94113. procedure TCAN1_C1FIFOCON28.setUINC; inline;
  94114. begin
  94115. pTDefRegMap(@Self)^.&set := $00002000;
  94116. end;
  94117. procedure TCAN1_C1FIFOCON28.clearUINC; inline;
  94118. begin
  94119. pTDefRegMap(@Self)^.clr := $00002000;
  94120. end;
  94121. procedure TCAN1_C1FIFOCON28.setUINC(thebits : TBits_1); inline;
  94122. begin
  94123. if thebits = 0 then
  94124. pTDefRegMap(@Self)^.clr := $00002000
  94125. else
  94126. pTDefRegMap(@Self)^.&set := $00002000;
  94127. end;
  94128. function TCAN1_C1FIFOCON28.getUINC : TBits_1; inline;
  94129. begin
  94130. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  94131. end;
  94132. procedure TCAN1_C1FIFOCON28.setFRESET; inline;
  94133. begin
  94134. pTDefRegMap(@Self)^.&set := $00004000;
  94135. end;
  94136. procedure TCAN1_C1FIFOCON28.clearFRESET; inline;
  94137. begin
  94138. pTDefRegMap(@Self)^.clr := $00004000;
  94139. end;
  94140. procedure TCAN1_C1FIFOCON28.setFRESET(thebits : TBits_1); inline;
  94141. begin
  94142. if thebits = 0 then
  94143. pTDefRegMap(@Self)^.clr := $00004000
  94144. else
  94145. pTDefRegMap(@Self)^.&set := $00004000;
  94146. end;
  94147. function TCAN1_C1FIFOCON28.getFRESET : TBits_1; inline;
  94148. begin
  94149. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  94150. end;
  94151. procedure TCAN1_C1FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  94152. begin
  94153. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  94154. end;
  94155. function TCAN1_C1FIFOCON28.getFSIZE : TBits_5; inline;
  94156. begin
  94157. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  94158. end;
  94159. procedure TCAN1_C1FIFOCON28.setw(thebits : TBits_32); inline;
  94160. begin
  94161. pTDefRegMap(@Self)^.val := thebits;
  94162. end;
  94163. function TCAN1_C1FIFOCON28.getw : TBits_32; inline;
  94164. begin
  94165. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94166. end;
  94167. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF; inline;
  94168. begin
  94169. pTDefRegMap(@Self)^.&set := $00000001;
  94170. end;
  94171. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIF; inline;
  94172. begin
  94173. pTDefRegMap(@Self)^.clr := $00000001;
  94174. end;
  94175. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  94176. begin
  94177. if thebits = 0 then
  94178. pTDefRegMap(@Self)^.clr := $00000001
  94179. else
  94180. pTDefRegMap(@Self)^.&set := $00000001;
  94181. end;
  94182. function TCAN1_C1FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  94183. begin
  94184. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  94185. end;
  94186. procedure TCAN1_C1FIFOINT28.setRXHALFIF; inline;
  94187. begin
  94188. pTDefRegMap(@Self)^.&set := $00000002;
  94189. end;
  94190. procedure TCAN1_C1FIFOINT28.clearRXHALFIF; inline;
  94191. begin
  94192. pTDefRegMap(@Self)^.clr := $00000002;
  94193. end;
  94194. procedure TCAN1_C1FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  94195. begin
  94196. if thebits = 0 then
  94197. pTDefRegMap(@Self)^.clr := $00000002
  94198. else
  94199. pTDefRegMap(@Self)^.&set := $00000002;
  94200. end;
  94201. function TCAN1_C1FIFOINT28.getRXHALFIF : TBits_1; inline;
  94202. begin
  94203. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  94204. end;
  94205. procedure TCAN1_C1FIFOINT28.setRXFULLIF; inline;
  94206. begin
  94207. pTDefRegMap(@Self)^.&set := $00000004;
  94208. end;
  94209. procedure TCAN1_C1FIFOINT28.clearRXFULLIF; inline;
  94210. begin
  94211. pTDefRegMap(@Self)^.clr := $00000004;
  94212. end;
  94213. procedure TCAN1_C1FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  94214. begin
  94215. if thebits = 0 then
  94216. pTDefRegMap(@Self)^.clr := $00000004
  94217. else
  94218. pTDefRegMap(@Self)^.&set := $00000004;
  94219. end;
  94220. function TCAN1_C1FIFOINT28.getRXFULLIF : TBits_1; inline;
  94221. begin
  94222. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94223. end;
  94224. procedure TCAN1_C1FIFOINT28.setRXOVFLIF; inline;
  94225. begin
  94226. pTDefRegMap(@Self)^.&set := $00000008;
  94227. end;
  94228. procedure TCAN1_C1FIFOINT28.clearRXOVFLIF; inline;
  94229. begin
  94230. pTDefRegMap(@Self)^.clr := $00000008;
  94231. end;
  94232. procedure TCAN1_C1FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  94233. begin
  94234. if thebits = 0 then
  94235. pTDefRegMap(@Self)^.clr := $00000008
  94236. else
  94237. pTDefRegMap(@Self)^.&set := $00000008;
  94238. end;
  94239. function TCAN1_C1FIFOINT28.getRXOVFLIF : TBits_1; inline;
  94240. begin
  94241. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94242. end;
  94243. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF; inline;
  94244. begin
  94245. pTDefRegMap(@Self)^.&set := $00000100;
  94246. end;
  94247. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIF; inline;
  94248. begin
  94249. pTDefRegMap(@Self)^.clr := $00000100;
  94250. end;
  94251. procedure TCAN1_C1FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  94252. begin
  94253. if thebits = 0 then
  94254. pTDefRegMap(@Self)^.clr := $00000100
  94255. else
  94256. pTDefRegMap(@Self)^.&set := $00000100;
  94257. end;
  94258. function TCAN1_C1FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  94259. begin
  94260. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  94261. end;
  94262. procedure TCAN1_C1FIFOINT28.setTXHALFIF; inline;
  94263. begin
  94264. pTDefRegMap(@Self)^.&set := $00000200;
  94265. end;
  94266. procedure TCAN1_C1FIFOINT28.clearTXHALFIF; inline;
  94267. begin
  94268. pTDefRegMap(@Self)^.clr := $00000200;
  94269. end;
  94270. procedure TCAN1_C1FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  94271. begin
  94272. if thebits = 0 then
  94273. pTDefRegMap(@Self)^.clr := $00000200
  94274. else
  94275. pTDefRegMap(@Self)^.&set := $00000200;
  94276. end;
  94277. function TCAN1_C1FIFOINT28.getTXHALFIF : TBits_1; inline;
  94278. begin
  94279. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  94280. end;
  94281. procedure TCAN1_C1FIFOINT28.setTXNFULLIF; inline;
  94282. begin
  94283. pTDefRegMap(@Self)^.&set := $00000400;
  94284. end;
  94285. procedure TCAN1_C1FIFOINT28.clearTXNFULLIF; inline;
  94286. begin
  94287. pTDefRegMap(@Self)^.clr := $00000400;
  94288. end;
  94289. procedure TCAN1_C1FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  94290. begin
  94291. if thebits = 0 then
  94292. pTDefRegMap(@Self)^.clr := $00000400
  94293. else
  94294. pTDefRegMap(@Self)^.&set := $00000400;
  94295. end;
  94296. function TCAN1_C1FIFOINT28.getTXNFULLIF : TBits_1; inline;
  94297. begin
  94298. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  94299. end;
  94300. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE; inline;
  94301. begin
  94302. pTDefRegMap(@Self)^.&set := $00010000;
  94303. end;
  94304. procedure TCAN1_C1FIFOINT28.clearRXNEMPTYIE; inline;
  94305. begin
  94306. pTDefRegMap(@Self)^.clr := $00010000;
  94307. end;
  94308. procedure TCAN1_C1FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  94309. begin
  94310. if thebits = 0 then
  94311. pTDefRegMap(@Self)^.clr := $00010000
  94312. else
  94313. pTDefRegMap(@Self)^.&set := $00010000;
  94314. end;
  94315. function TCAN1_C1FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  94316. begin
  94317. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  94318. end;
  94319. procedure TCAN1_C1FIFOINT28.setRXHALFIE; inline;
  94320. begin
  94321. pTDefRegMap(@Self)^.&set := $00020000;
  94322. end;
  94323. procedure TCAN1_C1FIFOINT28.clearRXHALFIE; inline;
  94324. begin
  94325. pTDefRegMap(@Self)^.clr := $00020000;
  94326. end;
  94327. procedure TCAN1_C1FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  94328. begin
  94329. if thebits = 0 then
  94330. pTDefRegMap(@Self)^.clr := $00020000
  94331. else
  94332. pTDefRegMap(@Self)^.&set := $00020000;
  94333. end;
  94334. function TCAN1_C1FIFOINT28.getRXHALFIE : TBits_1; inline;
  94335. begin
  94336. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  94337. end;
  94338. procedure TCAN1_C1FIFOINT28.setRXFULLIE; inline;
  94339. begin
  94340. pTDefRegMap(@Self)^.&set := $00040000;
  94341. end;
  94342. procedure TCAN1_C1FIFOINT28.clearRXFULLIE; inline;
  94343. begin
  94344. pTDefRegMap(@Self)^.clr := $00040000;
  94345. end;
  94346. procedure TCAN1_C1FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  94347. begin
  94348. if thebits = 0 then
  94349. pTDefRegMap(@Self)^.clr := $00040000
  94350. else
  94351. pTDefRegMap(@Self)^.&set := $00040000;
  94352. end;
  94353. function TCAN1_C1FIFOINT28.getRXFULLIE : TBits_1; inline;
  94354. begin
  94355. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  94356. end;
  94357. procedure TCAN1_C1FIFOINT28.setRXOVFLIE; inline;
  94358. begin
  94359. pTDefRegMap(@Self)^.&set := $00080000;
  94360. end;
  94361. procedure TCAN1_C1FIFOINT28.clearRXOVFLIE; inline;
  94362. begin
  94363. pTDefRegMap(@Self)^.clr := $00080000;
  94364. end;
  94365. procedure TCAN1_C1FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  94366. begin
  94367. if thebits = 0 then
  94368. pTDefRegMap(@Self)^.clr := $00080000
  94369. else
  94370. pTDefRegMap(@Self)^.&set := $00080000;
  94371. end;
  94372. function TCAN1_C1FIFOINT28.getRXOVFLIE : TBits_1; inline;
  94373. begin
  94374. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  94375. end;
  94376. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE; inline;
  94377. begin
  94378. pTDefRegMap(@Self)^.&set := $01000000;
  94379. end;
  94380. procedure TCAN1_C1FIFOINT28.clearTXEMPTYIE; inline;
  94381. begin
  94382. pTDefRegMap(@Self)^.clr := $01000000;
  94383. end;
  94384. procedure TCAN1_C1FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  94385. begin
  94386. if thebits = 0 then
  94387. pTDefRegMap(@Self)^.clr := $01000000
  94388. else
  94389. pTDefRegMap(@Self)^.&set := $01000000;
  94390. end;
  94391. function TCAN1_C1FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  94392. begin
  94393. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  94394. end;
  94395. procedure TCAN1_C1FIFOINT28.setTXHALFIE; inline;
  94396. begin
  94397. pTDefRegMap(@Self)^.&set := $02000000;
  94398. end;
  94399. procedure TCAN1_C1FIFOINT28.clearTXHALFIE; inline;
  94400. begin
  94401. pTDefRegMap(@Self)^.clr := $02000000;
  94402. end;
  94403. procedure TCAN1_C1FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  94404. begin
  94405. if thebits = 0 then
  94406. pTDefRegMap(@Self)^.clr := $02000000
  94407. else
  94408. pTDefRegMap(@Self)^.&set := $02000000;
  94409. end;
  94410. function TCAN1_C1FIFOINT28.getTXHALFIE : TBits_1; inline;
  94411. begin
  94412. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  94413. end;
  94414. procedure TCAN1_C1FIFOINT28.setTXNFULLIE; inline;
  94415. begin
  94416. pTDefRegMap(@Self)^.&set := $04000000;
  94417. end;
  94418. procedure TCAN1_C1FIFOINT28.clearTXNFULLIE; inline;
  94419. begin
  94420. pTDefRegMap(@Self)^.clr := $04000000;
  94421. end;
  94422. procedure TCAN1_C1FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  94423. begin
  94424. if thebits = 0 then
  94425. pTDefRegMap(@Self)^.clr := $04000000
  94426. else
  94427. pTDefRegMap(@Self)^.&set := $04000000;
  94428. end;
  94429. function TCAN1_C1FIFOINT28.getTXNFULLIE : TBits_1; inline;
  94430. begin
  94431. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  94432. end;
  94433. procedure TCAN1_C1FIFOINT28.setw(thebits : TBits_32); inline;
  94434. begin
  94435. pTDefRegMap(@Self)^.val := thebits;
  94436. end;
  94437. function TCAN1_C1FIFOINT28.getw : TBits_32; inline;
  94438. begin
  94439. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94440. end;
  94441. procedure TCAN1_C1FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  94442. begin
  94443. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  94444. end;
  94445. function TCAN1_C1FIFOCI28.getCFIFOCI : TBits_5; inline;
  94446. begin
  94447. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  94448. end;
  94449. procedure TCAN1_C1FIFOCI28.setw(thebits : TBits_32); inline;
  94450. begin
  94451. pTDefRegMap(@Self)^.val := thebits;
  94452. end;
  94453. function TCAN1_C1FIFOCI28.getw : TBits_32; inline;
  94454. begin
  94455. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94456. end;
  94457. procedure TCAN1_C1FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  94458. begin
  94459. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  94460. end;
  94461. function TCAN1_C1FIFOCON29.getTXPRI : TBits_2; inline;
  94462. begin
  94463. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  94464. end;
  94465. procedure TCAN1_C1FIFOCON29.setRTREN; inline;
  94466. begin
  94467. pTDefRegMap(@Self)^.&set := $00000004;
  94468. end;
  94469. procedure TCAN1_C1FIFOCON29.clearRTREN; inline;
  94470. begin
  94471. pTDefRegMap(@Self)^.clr := $00000004;
  94472. end;
  94473. procedure TCAN1_C1FIFOCON29.setRTREN(thebits : TBits_1); inline;
  94474. begin
  94475. if thebits = 0 then
  94476. pTDefRegMap(@Self)^.clr := $00000004
  94477. else
  94478. pTDefRegMap(@Self)^.&set := $00000004;
  94479. end;
  94480. function TCAN1_C1FIFOCON29.getRTREN : TBits_1; inline;
  94481. begin
  94482. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94483. end;
  94484. procedure TCAN1_C1FIFOCON29.setTXREQ; inline;
  94485. begin
  94486. pTDefRegMap(@Self)^.&set := $00000008;
  94487. end;
  94488. procedure TCAN1_C1FIFOCON29.clearTXREQ; inline;
  94489. begin
  94490. pTDefRegMap(@Self)^.clr := $00000008;
  94491. end;
  94492. procedure TCAN1_C1FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  94493. begin
  94494. if thebits = 0 then
  94495. pTDefRegMap(@Self)^.clr := $00000008
  94496. else
  94497. pTDefRegMap(@Self)^.&set := $00000008;
  94498. end;
  94499. function TCAN1_C1FIFOCON29.getTXREQ : TBits_1; inline;
  94500. begin
  94501. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94502. end;
  94503. procedure TCAN1_C1FIFOCON29.setTXERR; inline;
  94504. begin
  94505. pTDefRegMap(@Self)^.&set := $00000010;
  94506. end;
  94507. procedure TCAN1_C1FIFOCON29.clearTXERR; inline;
  94508. begin
  94509. pTDefRegMap(@Self)^.clr := $00000010;
  94510. end;
  94511. procedure TCAN1_C1FIFOCON29.setTXERR(thebits : TBits_1); inline;
  94512. begin
  94513. if thebits = 0 then
  94514. pTDefRegMap(@Self)^.clr := $00000010
  94515. else
  94516. pTDefRegMap(@Self)^.&set := $00000010;
  94517. end;
  94518. function TCAN1_C1FIFOCON29.getTXERR : TBits_1; inline;
  94519. begin
  94520. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  94521. end;
  94522. procedure TCAN1_C1FIFOCON29.setTXLARB; inline;
  94523. begin
  94524. pTDefRegMap(@Self)^.&set := $00000020;
  94525. end;
  94526. procedure TCAN1_C1FIFOCON29.clearTXLARB; inline;
  94527. begin
  94528. pTDefRegMap(@Self)^.clr := $00000020;
  94529. end;
  94530. procedure TCAN1_C1FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  94531. begin
  94532. if thebits = 0 then
  94533. pTDefRegMap(@Self)^.clr := $00000020
  94534. else
  94535. pTDefRegMap(@Self)^.&set := $00000020;
  94536. end;
  94537. function TCAN1_C1FIFOCON29.getTXLARB : TBits_1; inline;
  94538. begin
  94539. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  94540. end;
  94541. procedure TCAN1_C1FIFOCON29.setTXABAT; inline;
  94542. begin
  94543. pTDefRegMap(@Self)^.&set := $00000040;
  94544. end;
  94545. procedure TCAN1_C1FIFOCON29.clearTXABAT; inline;
  94546. begin
  94547. pTDefRegMap(@Self)^.clr := $00000040;
  94548. end;
  94549. procedure TCAN1_C1FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  94550. begin
  94551. if thebits = 0 then
  94552. pTDefRegMap(@Self)^.clr := $00000040
  94553. else
  94554. pTDefRegMap(@Self)^.&set := $00000040;
  94555. end;
  94556. function TCAN1_C1FIFOCON29.getTXABAT : TBits_1; inline;
  94557. begin
  94558. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  94559. end;
  94560. procedure TCAN1_C1FIFOCON29.setTXEN; inline;
  94561. begin
  94562. pTDefRegMap(@Self)^.&set := $00000080;
  94563. end;
  94564. procedure TCAN1_C1FIFOCON29.clearTXEN; inline;
  94565. begin
  94566. pTDefRegMap(@Self)^.clr := $00000080;
  94567. end;
  94568. procedure TCAN1_C1FIFOCON29.setTXEN(thebits : TBits_1); inline;
  94569. begin
  94570. if thebits = 0 then
  94571. pTDefRegMap(@Self)^.clr := $00000080
  94572. else
  94573. pTDefRegMap(@Self)^.&set := $00000080;
  94574. end;
  94575. function TCAN1_C1FIFOCON29.getTXEN : TBits_1; inline;
  94576. begin
  94577. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  94578. end;
  94579. procedure TCAN1_C1FIFOCON29.setDONLY; inline;
  94580. begin
  94581. pTDefRegMap(@Self)^.&set := $00001000;
  94582. end;
  94583. procedure TCAN1_C1FIFOCON29.clearDONLY; inline;
  94584. begin
  94585. pTDefRegMap(@Self)^.clr := $00001000;
  94586. end;
  94587. procedure TCAN1_C1FIFOCON29.setDONLY(thebits : TBits_1); inline;
  94588. begin
  94589. if thebits = 0 then
  94590. pTDefRegMap(@Self)^.clr := $00001000
  94591. else
  94592. pTDefRegMap(@Self)^.&set := $00001000;
  94593. end;
  94594. function TCAN1_C1FIFOCON29.getDONLY : TBits_1; inline;
  94595. begin
  94596. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  94597. end;
  94598. procedure TCAN1_C1FIFOCON29.setUINC; inline;
  94599. begin
  94600. pTDefRegMap(@Self)^.&set := $00002000;
  94601. end;
  94602. procedure TCAN1_C1FIFOCON29.clearUINC; inline;
  94603. begin
  94604. pTDefRegMap(@Self)^.clr := $00002000;
  94605. end;
  94606. procedure TCAN1_C1FIFOCON29.setUINC(thebits : TBits_1); inline;
  94607. begin
  94608. if thebits = 0 then
  94609. pTDefRegMap(@Self)^.clr := $00002000
  94610. else
  94611. pTDefRegMap(@Self)^.&set := $00002000;
  94612. end;
  94613. function TCAN1_C1FIFOCON29.getUINC : TBits_1; inline;
  94614. begin
  94615. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  94616. end;
  94617. procedure TCAN1_C1FIFOCON29.setFRESET; inline;
  94618. begin
  94619. pTDefRegMap(@Self)^.&set := $00004000;
  94620. end;
  94621. procedure TCAN1_C1FIFOCON29.clearFRESET; inline;
  94622. begin
  94623. pTDefRegMap(@Self)^.clr := $00004000;
  94624. end;
  94625. procedure TCAN1_C1FIFOCON29.setFRESET(thebits : TBits_1); inline;
  94626. begin
  94627. if thebits = 0 then
  94628. pTDefRegMap(@Self)^.clr := $00004000
  94629. else
  94630. pTDefRegMap(@Self)^.&set := $00004000;
  94631. end;
  94632. function TCAN1_C1FIFOCON29.getFRESET : TBits_1; inline;
  94633. begin
  94634. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  94635. end;
  94636. procedure TCAN1_C1FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  94637. begin
  94638. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  94639. end;
  94640. function TCAN1_C1FIFOCON29.getFSIZE : TBits_5; inline;
  94641. begin
  94642. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  94643. end;
  94644. procedure TCAN1_C1FIFOCON29.setw(thebits : TBits_32); inline;
  94645. begin
  94646. pTDefRegMap(@Self)^.val := thebits;
  94647. end;
  94648. function TCAN1_C1FIFOCON29.getw : TBits_32; inline;
  94649. begin
  94650. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94651. end;
  94652. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF; inline;
  94653. begin
  94654. pTDefRegMap(@Self)^.&set := $00000001;
  94655. end;
  94656. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIF; inline;
  94657. begin
  94658. pTDefRegMap(@Self)^.clr := $00000001;
  94659. end;
  94660. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  94661. begin
  94662. if thebits = 0 then
  94663. pTDefRegMap(@Self)^.clr := $00000001
  94664. else
  94665. pTDefRegMap(@Self)^.&set := $00000001;
  94666. end;
  94667. function TCAN1_C1FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  94668. begin
  94669. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  94670. end;
  94671. procedure TCAN1_C1FIFOINT29.setRXHALFIF; inline;
  94672. begin
  94673. pTDefRegMap(@Self)^.&set := $00000002;
  94674. end;
  94675. procedure TCAN1_C1FIFOINT29.clearRXHALFIF; inline;
  94676. begin
  94677. pTDefRegMap(@Self)^.clr := $00000002;
  94678. end;
  94679. procedure TCAN1_C1FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  94680. begin
  94681. if thebits = 0 then
  94682. pTDefRegMap(@Self)^.clr := $00000002
  94683. else
  94684. pTDefRegMap(@Self)^.&set := $00000002;
  94685. end;
  94686. function TCAN1_C1FIFOINT29.getRXHALFIF : TBits_1; inline;
  94687. begin
  94688. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  94689. end;
  94690. procedure TCAN1_C1FIFOINT29.setRXFULLIF; inline;
  94691. begin
  94692. pTDefRegMap(@Self)^.&set := $00000004;
  94693. end;
  94694. procedure TCAN1_C1FIFOINT29.clearRXFULLIF; inline;
  94695. begin
  94696. pTDefRegMap(@Self)^.clr := $00000004;
  94697. end;
  94698. procedure TCAN1_C1FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  94699. begin
  94700. if thebits = 0 then
  94701. pTDefRegMap(@Self)^.clr := $00000004
  94702. else
  94703. pTDefRegMap(@Self)^.&set := $00000004;
  94704. end;
  94705. function TCAN1_C1FIFOINT29.getRXFULLIF : TBits_1; inline;
  94706. begin
  94707. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94708. end;
  94709. procedure TCAN1_C1FIFOINT29.setRXOVFLIF; inline;
  94710. begin
  94711. pTDefRegMap(@Self)^.&set := $00000008;
  94712. end;
  94713. procedure TCAN1_C1FIFOINT29.clearRXOVFLIF; inline;
  94714. begin
  94715. pTDefRegMap(@Self)^.clr := $00000008;
  94716. end;
  94717. procedure TCAN1_C1FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  94718. begin
  94719. if thebits = 0 then
  94720. pTDefRegMap(@Self)^.clr := $00000008
  94721. else
  94722. pTDefRegMap(@Self)^.&set := $00000008;
  94723. end;
  94724. function TCAN1_C1FIFOINT29.getRXOVFLIF : TBits_1; inline;
  94725. begin
  94726. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94727. end;
  94728. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF; inline;
  94729. begin
  94730. pTDefRegMap(@Self)^.&set := $00000100;
  94731. end;
  94732. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIF; inline;
  94733. begin
  94734. pTDefRegMap(@Self)^.clr := $00000100;
  94735. end;
  94736. procedure TCAN1_C1FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  94737. begin
  94738. if thebits = 0 then
  94739. pTDefRegMap(@Self)^.clr := $00000100
  94740. else
  94741. pTDefRegMap(@Self)^.&set := $00000100;
  94742. end;
  94743. function TCAN1_C1FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  94744. begin
  94745. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  94746. end;
  94747. procedure TCAN1_C1FIFOINT29.setTXHALFIF; inline;
  94748. begin
  94749. pTDefRegMap(@Self)^.&set := $00000200;
  94750. end;
  94751. procedure TCAN1_C1FIFOINT29.clearTXHALFIF; inline;
  94752. begin
  94753. pTDefRegMap(@Self)^.clr := $00000200;
  94754. end;
  94755. procedure TCAN1_C1FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  94756. begin
  94757. if thebits = 0 then
  94758. pTDefRegMap(@Self)^.clr := $00000200
  94759. else
  94760. pTDefRegMap(@Self)^.&set := $00000200;
  94761. end;
  94762. function TCAN1_C1FIFOINT29.getTXHALFIF : TBits_1; inline;
  94763. begin
  94764. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  94765. end;
  94766. procedure TCAN1_C1FIFOINT29.setTXNFULLIF; inline;
  94767. begin
  94768. pTDefRegMap(@Self)^.&set := $00000400;
  94769. end;
  94770. procedure TCAN1_C1FIFOINT29.clearTXNFULLIF; inline;
  94771. begin
  94772. pTDefRegMap(@Self)^.clr := $00000400;
  94773. end;
  94774. procedure TCAN1_C1FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  94775. begin
  94776. if thebits = 0 then
  94777. pTDefRegMap(@Self)^.clr := $00000400
  94778. else
  94779. pTDefRegMap(@Self)^.&set := $00000400;
  94780. end;
  94781. function TCAN1_C1FIFOINT29.getTXNFULLIF : TBits_1; inline;
  94782. begin
  94783. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  94784. end;
  94785. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE; inline;
  94786. begin
  94787. pTDefRegMap(@Self)^.&set := $00010000;
  94788. end;
  94789. procedure TCAN1_C1FIFOINT29.clearRXNEMPTYIE; inline;
  94790. begin
  94791. pTDefRegMap(@Self)^.clr := $00010000;
  94792. end;
  94793. procedure TCAN1_C1FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  94794. begin
  94795. if thebits = 0 then
  94796. pTDefRegMap(@Self)^.clr := $00010000
  94797. else
  94798. pTDefRegMap(@Self)^.&set := $00010000;
  94799. end;
  94800. function TCAN1_C1FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  94801. begin
  94802. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  94803. end;
  94804. procedure TCAN1_C1FIFOINT29.setRXHALFIE; inline;
  94805. begin
  94806. pTDefRegMap(@Self)^.&set := $00020000;
  94807. end;
  94808. procedure TCAN1_C1FIFOINT29.clearRXHALFIE; inline;
  94809. begin
  94810. pTDefRegMap(@Self)^.clr := $00020000;
  94811. end;
  94812. procedure TCAN1_C1FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  94813. begin
  94814. if thebits = 0 then
  94815. pTDefRegMap(@Self)^.clr := $00020000
  94816. else
  94817. pTDefRegMap(@Self)^.&set := $00020000;
  94818. end;
  94819. function TCAN1_C1FIFOINT29.getRXHALFIE : TBits_1; inline;
  94820. begin
  94821. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  94822. end;
  94823. procedure TCAN1_C1FIFOINT29.setRXFULLIE; inline;
  94824. begin
  94825. pTDefRegMap(@Self)^.&set := $00040000;
  94826. end;
  94827. procedure TCAN1_C1FIFOINT29.clearRXFULLIE; inline;
  94828. begin
  94829. pTDefRegMap(@Self)^.clr := $00040000;
  94830. end;
  94831. procedure TCAN1_C1FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  94832. begin
  94833. if thebits = 0 then
  94834. pTDefRegMap(@Self)^.clr := $00040000
  94835. else
  94836. pTDefRegMap(@Self)^.&set := $00040000;
  94837. end;
  94838. function TCAN1_C1FIFOINT29.getRXFULLIE : TBits_1; inline;
  94839. begin
  94840. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  94841. end;
  94842. procedure TCAN1_C1FIFOINT29.setRXOVFLIE; inline;
  94843. begin
  94844. pTDefRegMap(@Self)^.&set := $00080000;
  94845. end;
  94846. procedure TCAN1_C1FIFOINT29.clearRXOVFLIE; inline;
  94847. begin
  94848. pTDefRegMap(@Self)^.clr := $00080000;
  94849. end;
  94850. procedure TCAN1_C1FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  94851. begin
  94852. if thebits = 0 then
  94853. pTDefRegMap(@Self)^.clr := $00080000
  94854. else
  94855. pTDefRegMap(@Self)^.&set := $00080000;
  94856. end;
  94857. function TCAN1_C1FIFOINT29.getRXOVFLIE : TBits_1; inline;
  94858. begin
  94859. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  94860. end;
  94861. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE; inline;
  94862. begin
  94863. pTDefRegMap(@Self)^.&set := $01000000;
  94864. end;
  94865. procedure TCAN1_C1FIFOINT29.clearTXEMPTYIE; inline;
  94866. begin
  94867. pTDefRegMap(@Self)^.clr := $01000000;
  94868. end;
  94869. procedure TCAN1_C1FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  94870. begin
  94871. if thebits = 0 then
  94872. pTDefRegMap(@Self)^.clr := $01000000
  94873. else
  94874. pTDefRegMap(@Self)^.&set := $01000000;
  94875. end;
  94876. function TCAN1_C1FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  94877. begin
  94878. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  94879. end;
  94880. procedure TCAN1_C1FIFOINT29.setTXHALFIE; inline;
  94881. begin
  94882. pTDefRegMap(@Self)^.&set := $02000000;
  94883. end;
  94884. procedure TCAN1_C1FIFOINT29.clearTXHALFIE; inline;
  94885. begin
  94886. pTDefRegMap(@Self)^.clr := $02000000;
  94887. end;
  94888. procedure TCAN1_C1FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  94889. begin
  94890. if thebits = 0 then
  94891. pTDefRegMap(@Self)^.clr := $02000000
  94892. else
  94893. pTDefRegMap(@Self)^.&set := $02000000;
  94894. end;
  94895. function TCAN1_C1FIFOINT29.getTXHALFIE : TBits_1; inline;
  94896. begin
  94897. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  94898. end;
  94899. procedure TCAN1_C1FIFOINT29.setTXNFULLIE; inline;
  94900. begin
  94901. pTDefRegMap(@Self)^.&set := $04000000;
  94902. end;
  94903. procedure TCAN1_C1FIFOINT29.clearTXNFULLIE; inline;
  94904. begin
  94905. pTDefRegMap(@Self)^.clr := $04000000;
  94906. end;
  94907. procedure TCAN1_C1FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  94908. begin
  94909. if thebits = 0 then
  94910. pTDefRegMap(@Self)^.clr := $04000000
  94911. else
  94912. pTDefRegMap(@Self)^.&set := $04000000;
  94913. end;
  94914. function TCAN1_C1FIFOINT29.getTXNFULLIE : TBits_1; inline;
  94915. begin
  94916. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  94917. end;
  94918. procedure TCAN1_C1FIFOINT29.setw(thebits : TBits_32); inline;
  94919. begin
  94920. pTDefRegMap(@Self)^.val := thebits;
  94921. end;
  94922. function TCAN1_C1FIFOINT29.getw : TBits_32; inline;
  94923. begin
  94924. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94925. end;
  94926. procedure TCAN1_C1FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  94927. begin
  94928. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  94929. end;
  94930. function TCAN1_C1FIFOCI29.getCFIFOCI : TBits_5; inline;
  94931. begin
  94932. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  94933. end;
  94934. procedure TCAN1_C1FIFOCI29.setw(thebits : TBits_32); inline;
  94935. begin
  94936. pTDefRegMap(@Self)^.val := thebits;
  94937. end;
  94938. function TCAN1_C1FIFOCI29.getw : TBits_32; inline;
  94939. begin
  94940. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  94941. end;
  94942. procedure TCAN1_C1FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  94943. begin
  94944. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  94945. end;
  94946. function TCAN1_C1FIFOCON30.getTXPRI : TBits_2; inline;
  94947. begin
  94948. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  94949. end;
  94950. procedure TCAN1_C1FIFOCON30.setRTREN; inline;
  94951. begin
  94952. pTDefRegMap(@Self)^.&set := $00000004;
  94953. end;
  94954. procedure TCAN1_C1FIFOCON30.clearRTREN; inline;
  94955. begin
  94956. pTDefRegMap(@Self)^.clr := $00000004;
  94957. end;
  94958. procedure TCAN1_C1FIFOCON30.setRTREN(thebits : TBits_1); inline;
  94959. begin
  94960. if thebits = 0 then
  94961. pTDefRegMap(@Self)^.clr := $00000004
  94962. else
  94963. pTDefRegMap(@Self)^.&set := $00000004;
  94964. end;
  94965. function TCAN1_C1FIFOCON30.getRTREN : TBits_1; inline;
  94966. begin
  94967. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  94968. end;
  94969. procedure TCAN1_C1FIFOCON30.setTXREQ; inline;
  94970. begin
  94971. pTDefRegMap(@Self)^.&set := $00000008;
  94972. end;
  94973. procedure TCAN1_C1FIFOCON30.clearTXREQ; inline;
  94974. begin
  94975. pTDefRegMap(@Self)^.clr := $00000008;
  94976. end;
  94977. procedure TCAN1_C1FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  94978. begin
  94979. if thebits = 0 then
  94980. pTDefRegMap(@Self)^.clr := $00000008
  94981. else
  94982. pTDefRegMap(@Self)^.&set := $00000008;
  94983. end;
  94984. function TCAN1_C1FIFOCON30.getTXREQ : TBits_1; inline;
  94985. begin
  94986. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  94987. end;
  94988. procedure TCAN1_C1FIFOCON30.setTXERR; inline;
  94989. begin
  94990. pTDefRegMap(@Self)^.&set := $00000010;
  94991. end;
  94992. procedure TCAN1_C1FIFOCON30.clearTXERR; inline;
  94993. begin
  94994. pTDefRegMap(@Self)^.clr := $00000010;
  94995. end;
  94996. procedure TCAN1_C1FIFOCON30.setTXERR(thebits : TBits_1); inline;
  94997. begin
  94998. if thebits = 0 then
  94999. pTDefRegMap(@Self)^.clr := $00000010
  95000. else
  95001. pTDefRegMap(@Self)^.&set := $00000010;
  95002. end;
  95003. function TCAN1_C1FIFOCON30.getTXERR : TBits_1; inline;
  95004. begin
  95005. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  95006. end;
  95007. procedure TCAN1_C1FIFOCON30.setTXLARB; inline;
  95008. begin
  95009. pTDefRegMap(@Self)^.&set := $00000020;
  95010. end;
  95011. procedure TCAN1_C1FIFOCON30.clearTXLARB; inline;
  95012. begin
  95013. pTDefRegMap(@Self)^.clr := $00000020;
  95014. end;
  95015. procedure TCAN1_C1FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  95016. begin
  95017. if thebits = 0 then
  95018. pTDefRegMap(@Self)^.clr := $00000020
  95019. else
  95020. pTDefRegMap(@Self)^.&set := $00000020;
  95021. end;
  95022. function TCAN1_C1FIFOCON30.getTXLARB : TBits_1; inline;
  95023. begin
  95024. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  95025. end;
  95026. procedure TCAN1_C1FIFOCON30.setTXABAT; inline;
  95027. begin
  95028. pTDefRegMap(@Self)^.&set := $00000040;
  95029. end;
  95030. procedure TCAN1_C1FIFOCON30.clearTXABAT; inline;
  95031. begin
  95032. pTDefRegMap(@Self)^.clr := $00000040;
  95033. end;
  95034. procedure TCAN1_C1FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  95035. begin
  95036. if thebits = 0 then
  95037. pTDefRegMap(@Self)^.clr := $00000040
  95038. else
  95039. pTDefRegMap(@Self)^.&set := $00000040;
  95040. end;
  95041. function TCAN1_C1FIFOCON30.getTXABAT : TBits_1; inline;
  95042. begin
  95043. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  95044. end;
  95045. procedure TCAN1_C1FIFOCON30.setTXEN; inline;
  95046. begin
  95047. pTDefRegMap(@Self)^.&set := $00000080;
  95048. end;
  95049. procedure TCAN1_C1FIFOCON30.clearTXEN; inline;
  95050. begin
  95051. pTDefRegMap(@Self)^.clr := $00000080;
  95052. end;
  95053. procedure TCAN1_C1FIFOCON30.setTXEN(thebits : TBits_1); inline;
  95054. begin
  95055. if thebits = 0 then
  95056. pTDefRegMap(@Self)^.clr := $00000080
  95057. else
  95058. pTDefRegMap(@Self)^.&set := $00000080;
  95059. end;
  95060. function TCAN1_C1FIFOCON30.getTXEN : TBits_1; inline;
  95061. begin
  95062. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  95063. end;
  95064. procedure TCAN1_C1FIFOCON30.setDONLY; inline;
  95065. begin
  95066. pTDefRegMap(@Self)^.&set := $00001000;
  95067. end;
  95068. procedure TCAN1_C1FIFOCON30.clearDONLY; inline;
  95069. begin
  95070. pTDefRegMap(@Self)^.clr := $00001000;
  95071. end;
  95072. procedure TCAN1_C1FIFOCON30.setDONLY(thebits : TBits_1); inline;
  95073. begin
  95074. if thebits = 0 then
  95075. pTDefRegMap(@Self)^.clr := $00001000
  95076. else
  95077. pTDefRegMap(@Self)^.&set := $00001000;
  95078. end;
  95079. function TCAN1_C1FIFOCON30.getDONLY : TBits_1; inline;
  95080. begin
  95081. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  95082. end;
  95083. procedure TCAN1_C1FIFOCON30.setUINC; inline;
  95084. begin
  95085. pTDefRegMap(@Self)^.&set := $00002000;
  95086. end;
  95087. procedure TCAN1_C1FIFOCON30.clearUINC; inline;
  95088. begin
  95089. pTDefRegMap(@Self)^.clr := $00002000;
  95090. end;
  95091. procedure TCAN1_C1FIFOCON30.setUINC(thebits : TBits_1); inline;
  95092. begin
  95093. if thebits = 0 then
  95094. pTDefRegMap(@Self)^.clr := $00002000
  95095. else
  95096. pTDefRegMap(@Self)^.&set := $00002000;
  95097. end;
  95098. function TCAN1_C1FIFOCON30.getUINC : TBits_1; inline;
  95099. begin
  95100. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  95101. end;
  95102. procedure TCAN1_C1FIFOCON30.setFRESET; inline;
  95103. begin
  95104. pTDefRegMap(@Self)^.&set := $00004000;
  95105. end;
  95106. procedure TCAN1_C1FIFOCON30.clearFRESET; inline;
  95107. begin
  95108. pTDefRegMap(@Self)^.clr := $00004000;
  95109. end;
  95110. procedure TCAN1_C1FIFOCON30.setFRESET(thebits : TBits_1); inline;
  95111. begin
  95112. if thebits = 0 then
  95113. pTDefRegMap(@Self)^.clr := $00004000
  95114. else
  95115. pTDefRegMap(@Self)^.&set := $00004000;
  95116. end;
  95117. function TCAN1_C1FIFOCON30.getFRESET : TBits_1; inline;
  95118. begin
  95119. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  95120. end;
  95121. procedure TCAN1_C1FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  95122. begin
  95123. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  95124. end;
  95125. function TCAN1_C1FIFOCON30.getFSIZE : TBits_5; inline;
  95126. begin
  95127. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  95128. end;
  95129. procedure TCAN1_C1FIFOCON30.setw(thebits : TBits_32); inline;
  95130. begin
  95131. pTDefRegMap(@Self)^.val := thebits;
  95132. end;
  95133. function TCAN1_C1FIFOCON30.getw : TBits_32; inline;
  95134. begin
  95135. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95136. end;
  95137. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF; inline;
  95138. begin
  95139. pTDefRegMap(@Self)^.&set := $00000001;
  95140. end;
  95141. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIF; inline;
  95142. begin
  95143. pTDefRegMap(@Self)^.clr := $00000001;
  95144. end;
  95145. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  95146. begin
  95147. if thebits = 0 then
  95148. pTDefRegMap(@Self)^.clr := $00000001
  95149. else
  95150. pTDefRegMap(@Self)^.&set := $00000001;
  95151. end;
  95152. function TCAN1_C1FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  95153. begin
  95154. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  95155. end;
  95156. procedure TCAN1_C1FIFOINT30.setRXHALFIF; inline;
  95157. begin
  95158. pTDefRegMap(@Self)^.&set := $00000002;
  95159. end;
  95160. procedure TCAN1_C1FIFOINT30.clearRXHALFIF; inline;
  95161. begin
  95162. pTDefRegMap(@Self)^.clr := $00000002;
  95163. end;
  95164. procedure TCAN1_C1FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  95165. begin
  95166. if thebits = 0 then
  95167. pTDefRegMap(@Self)^.clr := $00000002
  95168. else
  95169. pTDefRegMap(@Self)^.&set := $00000002;
  95170. end;
  95171. function TCAN1_C1FIFOINT30.getRXHALFIF : TBits_1; inline;
  95172. begin
  95173. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  95174. end;
  95175. procedure TCAN1_C1FIFOINT30.setRXFULLIF; inline;
  95176. begin
  95177. pTDefRegMap(@Self)^.&set := $00000004;
  95178. end;
  95179. procedure TCAN1_C1FIFOINT30.clearRXFULLIF; inline;
  95180. begin
  95181. pTDefRegMap(@Self)^.clr := $00000004;
  95182. end;
  95183. procedure TCAN1_C1FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  95184. begin
  95185. if thebits = 0 then
  95186. pTDefRegMap(@Self)^.clr := $00000004
  95187. else
  95188. pTDefRegMap(@Self)^.&set := $00000004;
  95189. end;
  95190. function TCAN1_C1FIFOINT30.getRXFULLIF : TBits_1; inline;
  95191. begin
  95192. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95193. end;
  95194. procedure TCAN1_C1FIFOINT30.setRXOVFLIF; inline;
  95195. begin
  95196. pTDefRegMap(@Self)^.&set := $00000008;
  95197. end;
  95198. procedure TCAN1_C1FIFOINT30.clearRXOVFLIF; inline;
  95199. begin
  95200. pTDefRegMap(@Self)^.clr := $00000008;
  95201. end;
  95202. procedure TCAN1_C1FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  95203. begin
  95204. if thebits = 0 then
  95205. pTDefRegMap(@Self)^.clr := $00000008
  95206. else
  95207. pTDefRegMap(@Self)^.&set := $00000008;
  95208. end;
  95209. function TCAN1_C1FIFOINT30.getRXOVFLIF : TBits_1; inline;
  95210. begin
  95211. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95212. end;
  95213. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF; inline;
  95214. begin
  95215. pTDefRegMap(@Self)^.&set := $00000100;
  95216. end;
  95217. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIF; inline;
  95218. begin
  95219. pTDefRegMap(@Self)^.clr := $00000100;
  95220. end;
  95221. procedure TCAN1_C1FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  95222. begin
  95223. if thebits = 0 then
  95224. pTDefRegMap(@Self)^.clr := $00000100
  95225. else
  95226. pTDefRegMap(@Self)^.&set := $00000100;
  95227. end;
  95228. function TCAN1_C1FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  95229. begin
  95230. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  95231. end;
  95232. procedure TCAN1_C1FIFOINT30.setTXHALFIF; inline;
  95233. begin
  95234. pTDefRegMap(@Self)^.&set := $00000200;
  95235. end;
  95236. procedure TCAN1_C1FIFOINT30.clearTXHALFIF; inline;
  95237. begin
  95238. pTDefRegMap(@Self)^.clr := $00000200;
  95239. end;
  95240. procedure TCAN1_C1FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  95241. begin
  95242. if thebits = 0 then
  95243. pTDefRegMap(@Self)^.clr := $00000200
  95244. else
  95245. pTDefRegMap(@Self)^.&set := $00000200;
  95246. end;
  95247. function TCAN1_C1FIFOINT30.getTXHALFIF : TBits_1; inline;
  95248. begin
  95249. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  95250. end;
  95251. procedure TCAN1_C1FIFOINT30.setTXNFULLIF; inline;
  95252. begin
  95253. pTDefRegMap(@Self)^.&set := $00000400;
  95254. end;
  95255. procedure TCAN1_C1FIFOINT30.clearTXNFULLIF; inline;
  95256. begin
  95257. pTDefRegMap(@Self)^.clr := $00000400;
  95258. end;
  95259. procedure TCAN1_C1FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  95260. begin
  95261. if thebits = 0 then
  95262. pTDefRegMap(@Self)^.clr := $00000400
  95263. else
  95264. pTDefRegMap(@Self)^.&set := $00000400;
  95265. end;
  95266. function TCAN1_C1FIFOINT30.getTXNFULLIF : TBits_1; inline;
  95267. begin
  95268. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  95269. end;
  95270. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE; inline;
  95271. begin
  95272. pTDefRegMap(@Self)^.&set := $00010000;
  95273. end;
  95274. procedure TCAN1_C1FIFOINT30.clearRXNEMPTYIE; inline;
  95275. begin
  95276. pTDefRegMap(@Self)^.clr := $00010000;
  95277. end;
  95278. procedure TCAN1_C1FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  95279. begin
  95280. if thebits = 0 then
  95281. pTDefRegMap(@Self)^.clr := $00010000
  95282. else
  95283. pTDefRegMap(@Self)^.&set := $00010000;
  95284. end;
  95285. function TCAN1_C1FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  95286. begin
  95287. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  95288. end;
  95289. procedure TCAN1_C1FIFOINT30.setRXHALFIE; inline;
  95290. begin
  95291. pTDefRegMap(@Self)^.&set := $00020000;
  95292. end;
  95293. procedure TCAN1_C1FIFOINT30.clearRXHALFIE; inline;
  95294. begin
  95295. pTDefRegMap(@Self)^.clr := $00020000;
  95296. end;
  95297. procedure TCAN1_C1FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  95298. begin
  95299. if thebits = 0 then
  95300. pTDefRegMap(@Self)^.clr := $00020000
  95301. else
  95302. pTDefRegMap(@Self)^.&set := $00020000;
  95303. end;
  95304. function TCAN1_C1FIFOINT30.getRXHALFIE : TBits_1; inline;
  95305. begin
  95306. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  95307. end;
  95308. procedure TCAN1_C1FIFOINT30.setRXFULLIE; inline;
  95309. begin
  95310. pTDefRegMap(@Self)^.&set := $00040000;
  95311. end;
  95312. procedure TCAN1_C1FIFOINT30.clearRXFULLIE; inline;
  95313. begin
  95314. pTDefRegMap(@Self)^.clr := $00040000;
  95315. end;
  95316. procedure TCAN1_C1FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  95317. begin
  95318. if thebits = 0 then
  95319. pTDefRegMap(@Self)^.clr := $00040000
  95320. else
  95321. pTDefRegMap(@Self)^.&set := $00040000;
  95322. end;
  95323. function TCAN1_C1FIFOINT30.getRXFULLIE : TBits_1; inline;
  95324. begin
  95325. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  95326. end;
  95327. procedure TCAN1_C1FIFOINT30.setRXOVFLIE; inline;
  95328. begin
  95329. pTDefRegMap(@Self)^.&set := $00080000;
  95330. end;
  95331. procedure TCAN1_C1FIFOINT30.clearRXOVFLIE; inline;
  95332. begin
  95333. pTDefRegMap(@Self)^.clr := $00080000;
  95334. end;
  95335. procedure TCAN1_C1FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  95336. begin
  95337. if thebits = 0 then
  95338. pTDefRegMap(@Self)^.clr := $00080000
  95339. else
  95340. pTDefRegMap(@Self)^.&set := $00080000;
  95341. end;
  95342. function TCAN1_C1FIFOINT30.getRXOVFLIE : TBits_1; inline;
  95343. begin
  95344. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  95345. end;
  95346. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE; inline;
  95347. begin
  95348. pTDefRegMap(@Self)^.&set := $01000000;
  95349. end;
  95350. procedure TCAN1_C1FIFOINT30.clearTXEMPTYIE; inline;
  95351. begin
  95352. pTDefRegMap(@Self)^.clr := $01000000;
  95353. end;
  95354. procedure TCAN1_C1FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  95355. begin
  95356. if thebits = 0 then
  95357. pTDefRegMap(@Self)^.clr := $01000000
  95358. else
  95359. pTDefRegMap(@Self)^.&set := $01000000;
  95360. end;
  95361. function TCAN1_C1FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  95362. begin
  95363. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  95364. end;
  95365. procedure TCAN1_C1FIFOINT30.setTXHALFIE; inline;
  95366. begin
  95367. pTDefRegMap(@Self)^.&set := $02000000;
  95368. end;
  95369. procedure TCAN1_C1FIFOINT30.clearTXHALFIE; inline;
  95370. begin
  95371. pTDefRegMap(@Self)^.clr := $02000000;
  95372. end;
  95373. procedure TCAN1_C1FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  95374. begin
  95375. if thebits = 0 then
  95376. pTDefRegMap(@Self)^.clr := $02000000
  95377. else
  95378. pTDefRegMap(@Self)^.&set := $02000000;
  95379. end;
  95380. function TCAN1_C1FIFOINT30.getTXHALFIE : TBits_1; inline;
  95381. begin
  95382. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  95383. end;
  95384. procedure TCAN1_C1FIFOINT30.setTXNFULLIE; inline;
  95385. begin
  95386. pTDefRegMap(@Self)^.&set := $04000000;
  95387. end;
  95388. procedure TCAN1_C1FIFOINT30.clearTXNFULLIE; inline;
  95389. begin
  95390. pTDefRegMap(@Self)^.clr := $04000000;
  95391. end;
  95392. procedure TCAN1_C1FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  95393. begin
  95394. if thebits = 0 then
  95395. pTDefRegMap(@Self)^.clr := $04000000
  95396. else
  95397. pTDefRegMap(@Self)^.&set := $04000000;
  95398. end;
  95399. function TCAN1_C1FIFOINT30.getTXNFULLIE : TBits_1; inline;
  95400. begin
  95401. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  95402. end;
  95403. procedure TCAN1_C1FIFOINT30.setw(thebits : TBits_32); inline;
  95404. begin
  95405. pTDefRegMap(@Self)^.val := thebits;
  95406. end;
  95407. function TCAN1_C1FIFOINT30.getw : TBits_32; inline;
  95408. begin
  95409. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95410. end;
  95411. procedure TCAN1_C1FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  95412. begin
  95413. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  95414. end;
  95415. function TCAN1_C1FIFOCI30.getCFIFOCI : TBits_5; inline;
  95416. begin
  95417. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  95418. end;
  95419. procedure TCAN1_C1FIFOCI30.setw(thebits : TBits_32); inline;
  95420. begin
  95421. pTDefRegMap(@Self)^.val := thebits;
  95422. end;
  95423. function TCAN1_C1FIFOCI30.getw : TBits_32; inline;
  95424. begin
  95425. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95426. end;
  95427. procedure TCAN1_C1FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  95428. begin
  95429. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  95430. end;
  95431. function TCAN1_C1FIFOCON31.getTXPRI : TBits_2; inline;
  95432. begin
  95433. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  95434. end;
  95435. procedure TCAN1_C1FIFOCON31.setRTREN; inline;
  95436. begin
  95437. pTDefRegMap(@Self)^.&set := $00000004;
  95438. end;
  95439. procedure TCAN1_C1FIFOCON31.clearRTREN; inline;
  95440. begin
  95441. pTDefRegMap(@Self)^.clr := $00000004;
  95442. end;
  95443. procedure TCAN1_C1FIFOCON31.setRTREN(thebits : TBits_1); inline;
  95444. begin
  95445. if thebits = 0 then
  95446. pTDefRegMap(@Self)^.clr := $00000004
  95447. else
  95448. pTDefRegMap(@Self)^.&set := $00000004;
  95449. end;
  95450. function TCAN1_C1FIFOCON31.getRTREN : TBits_1; inline;
  95451. begin
  95452. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95453. end;
  95454. procedure TCAN1_C1FIFOCON31.setTXREQ; inline;
  95455. begin
  95456. pTDefRegMap(@Self)^.&set := $00000008;
  95457. end;
  95458. procedure TCAN1_C1FIFOCON31.clearTXREQ; inline;
  95459. begin
  95460. pTDefRegMap(@Self)^.clr := $00000008;
  95461. end;
  95462. procedure TCAN1_C1FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  95463. begin
  95464. if thebits = 0 then
  95465. pTDefRegMap(@Self)^.clr := $00000008
  95466. else
  95467. pTDefRegMap(@Self)^.&set := $00000008;
  95468. end;
  95469. function TCAN1_C1FIFOCON31.getTXREQ : TBits_1; inline;
  95470. begin
  95471. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95472. end;
  95473. procedure TCAN1_C1FIFOCON31.setTXERR; inline;
  95474. begin
  95475. pTDefRegMap(@Self)^.&set := $00000010;
  95476. end;
  95477. procedure TCAN1_C1FIFOCON31.clearTXERR; inline;
  95478. begin
  95479. pTDefRegMap(@Self)^.clr := $00000010;
  95480. end;
  95481. procedure TCAN1_C1FIFOCON31.setTXERR(thebits : TBits_1); inline;
  95482. begin
  95483. if thebits = 0 then
  95484. pTDefRegMap(@Self)^.clr := $00000010
  95485. else
  95486. pTDefRegMap(@Self)^.&set := $00000010;
  95487. end;
  95488. function TCAN1_C1FIFOCON31.getTXERR : TBits_1; inline;
  95489. begin
  95490. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  95491. end;
  95492. procedure TCAN1_C1FIFOCON31.setTXLARB; inline;
  95493. begin
  95494. pTDefRegMap(@Self)^.&set := $00000020;
  95495. end;
  95496. procedure TCAN1_C1FIFOCON31.clearTXLARB; inline;
  95497. begin
  95498. pTDefRegMap(@Self)^.clr := $00000020;
  95499. end;
  95500. procedure TCAN1_C1FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  95501. begin
  95502. if thebits = 0 then
  95503. pTDefRegMap(@Self)^.clr := $00000020
  95504. else
  95505. pTDefRegMap(@Self)^.&set := $00000020;
  95506. end;
  95507. function TCAN1_C1FIFOCON31.getTXLARB : TBits_1; inline;
  95508. begin
  95509. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  95510. end;
  95511. procedure TCAN1_C1FIFOCON31.setTXABAT; inline;
  95512. begin
  95513. pTDefRegMap(@Self)^.&set := $00000040;
  95514. end;
  95515. procedure TCAN1_C1FIFOCON31.clearTXABAT; inline;
  95516. begin
  95517. pTDefRegMap(@Self)^.clr := $00000040;
  95518. end;
  95519. procedure TCAN1_C1FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  95520. begin
  95521. if thebits = 0 then
  95522. pTDefRegMap(@Self)^.clr := $00000040
  95523. else
  95524. pTDefRegMap(@Self)^.&set := $00000040;
  95525. end;
  95526. function TCAN1_C1FIFOCON31.getTXABAT : TBits_1; inline;
  95527. begin
  95528. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  95529. end;
  95530. procedure TCAN1_C1FIFOCON31.setTXEN; inline;
  95531. begin
  95532. pTDefRegMap(@Self)^.&set := $00000080;
  95533. end;
  95534. procedure TCAN1_C1FIFOCON31.clearTXEN; inline;
  95535. begin
  95536. pTDefRegMap(@Self)^.clr := $00000080;
  95537. end;
  95538. procedure TCAN1_C1FIFOCON31.setTXEN(thebits : TBits_1); inline;
  95539. begin
  95540. if thebits = 0 then
  95541. pTDefRegMap(@Self)^.clr := $00000080
  95542. else
  95543. pTDefRegMap(@Self)^.&set := $00000080;
  95544. end;
  95545. function TCAN1_C1FIFOCON31.getTXEN : TBits_1; inline;
  95546. begin
  95547. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  95548. end;
  95549. procedure TCAN1_C1FIFOCON31.setDONLY; inline;
  95550. begin
  95551. pTDefRegMap(@Self)^.&set := $00001000;
  95552. end;
  95553. procedure TCAN1_C1FIFOCON31.clearDONLY; inline;
  95554. begin
  95555. pTDefRegMap(@Self)^.clr := $00001000;
  95556. end;
  95557. procedure TCAN1_C1FIFOCON31.setDONLY(thebits : TBits_1); inline;
  95558. begin
  95559. if thebits = 0 then
  95560. pTDefRegMap(@Self)^.clr := $00001000
  95561. else
  95562. pTDefRegMap(@Self)^.&set := $00001000;
  95563. end;
  95564. function TCAN1_C1FIFOCON31.getDONLY : TBits_1; inline;
  95565. begin
  95566. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  95567. end;
  95568. procedure TCAN1_C1FIFOCON31.setUINC; inline;
  95569. begin
  95570. pTDefRegMap(@Self)^.&set := $00002000;
  95571. end;
  95572. procedure TCAN1_C1FIFOCON31.clearUINC; inline;
  95573. begin
  95574. pTDefRegMap(@Self)^.clr := $00002000;
  95575. end;
  95576. procedure TCAN1_C1FIFOCON31.setUINC(thebits : TBits_1); inline;
  95577. begin
  95578. if thebits = 0 then
  95579. pTDefRegMap(@Self)^.clr := $00002000
  95580. else
  95581. pTDefRegMap(@Self)^.&set := $00002000;
  95582. end;
  95583. function TCAN1_C1FIFOCON31.getUINC : TBits_1; inline;
  95584. begin
  95585. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  95586. end;
  95587. procedure TCAN1_C1FIFOCON31.setFRESET; inline;
  95588. begin
  95589. pTDefRegMap(@Self)^.&set := $00004000;
  95590. end;
  95591. procedure TCAN1_C1FIFOCON31.clearFRESET; inline;
  95592. begin
  95593. pTDefRegMap(@Self)^.clr := $00004000;
  95594. end;
  95595. procedure TCAN1_C1FIFOCON31.setFRESET(thebits : TBits_1); inline;
  95596. begin
  95597. if thebits = 0 then
  95598. pTDefRegMap(@Self)^.clr := $00004000
  95599. else
  95600. pTDefRegMap(@Self)^.&set := $00004000;
  95601. end;
  95602. function TCAN1_C1FIFOCON31.getFRESET : TBits_1; inline;
  95603. begin
  95604. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  95605. end;
  95606. procedure TCAN1_C1FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  95607. begin
  95608. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  95609. end;
  95610. function TCAN1_C1FIFOCON31.getFSIZE : TBits_5; inline;
  95611. begin
  95612. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  95613. end;
  95614. procedure TCAN1_C1FIFOCON31.setw(thebits : TBits_32); inline;
  95615. begin
  95616. pTDefRegMap(@Self)^.val := thebits;
  95617. end;
  95618. function TCAN1_C1FIFOCON31.getw : TBits_32; inline;
  95619. begin
  95620. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95621. end;
  95622. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF; inline;
  95623. begin
  95624. pTDefRegMap(@Self)^.&set := $00000001;
  95625. end;
  95626. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIF; inline;
  95627. begin
  95628. pTDefRegMap(@Self)^.clr := $00000001;
  95629. end;
  95630. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  95631. begin
  95632. if thebits = 0 then
  95633. pTDefRegMap(@Self)^.clr := $00000001
  95634. else
  95635. pTDefRegMap(@Self)^.&set := $00000001;
  95636. end;
  95637. function TCAN1_C1FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  95638. begin
  95639. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  95640. end;
  95641. procedure TCAN1_C1FIFOINT31.setRXHALFIF; inline;
  95642. begin
  95643. pTDefRegMap(@Self)^.&set := $00000002;
  95644. end;
  95645. procedure TCAN1_C1FIFOINT31.clearRXHALFIF; inline;
  95646. begin
  95647. pTDefRegMap(@Self)^.clr := $00000002;
  95648. end;
  95649. procedure TCAN1_C1FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  95650. begin
  95651. if thebits = 0 then
  95652. pTDefRegMap(@Self)^.clr := $00000002
  95653. else
  95654. pTDefRegMap(@Self)^.&set := $00000002;
  95655. end;
  95656. function TCAN1_C1FIFOINT31.getRXHALFIF : TBits_1; inline;
  95657. begin
  95658. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  95659. end;
  95660. procedure TCAN1_C1FIFOINT31.setRXFULLIF; inline;
  95661. begin
  95662. pTDefRegMap(@Self)^.&set := $00000004;
  95663. end;
  95664. procedure TCAN1_C1FIFOINT31.clearRXFULLIF; inline;
  95665. begin
  95666. pTDefRegMap(@Self)^.clr := $00000004;
  95667. end;
  95668. procedure TCAN1_C1FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  95669. begin
  95670. if thebits = 0 then
  95671. pTDefRegMap(@Self)^.clr := $00000004
  95672. else
  95673. pTDefRegMap(@Self)^.&set := $00000004;
  95674. end;
  95675. function TCAN1_C1FIFOINT31.getRXFULLIF : TBits_1; inline;
  95676. begin
  95677. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  95678. end;
  95679. procedure TCAN1_C1FIFOINT31.setRXOVFLIF; inline;
  95680. begin
  95681. pTDefRegMap(@Self)^.&set := $00000008;
  95682. end;
  95683. procedure TCAN1_C1FIFOINT31.clearRXOVFLIF; inline;
  95684. begin
  95685. pTDefRegMap(@Self)^.clr := $00000008;
  95686. end;
  95687. procedure TCAN1_C1FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  95688. begin
  95689. if thebits = 0 then
  95690. pTDefRegMap(@Self)^.clr := $00000008
  95691. else
  95692. pTDefRegMap(@Self)^.&set := $00000008;
  95693. end;
  95694. function TCAN1_C1FIFOINT31.getRXOVFLIF : TBits_1; inline;
  95695. begin
  95696. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  95697. end;
  95698. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF; inline;
  95699. begin
  95700. pTDefRegMap(@Self)^.&set := $00000100;
  95701. end;
  95702. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIF; inline;
  95703. begin
  95704. pTDefRegMap(@Self)^.clr := $00000100;
  95705. end;
  95706. procedure TCAN1_C1FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  95707. begin
  95708. if thebits = 0 then
  95709. pTDefRegMap(@Self)^.clr := $00000100
  95710. else
  95711. pTDefRegMap(@Self)^.&set := $00000100;
  95712. end;
  95713. function TCAN1_C1FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  95714. begin
  95715. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  95716. end;
  95717. procedure TCAN1_C1FIFOINT31.setTXHALFIF; inline;
  95718. begin
  95719. pTDefRegMap(@Self)^.&set := $00000200;
  95720. end;
  95721. procedure TCAN1_C1FIFOINT31.clearTXHALFIF; inline;
  95722. begin
  95723. pTDefRegMap(@Self)^.clr := $00000200;
  95724. end;
  95725. procedure TCAN1_C1FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  95726. begin
  95727. if thebits = 0 then
  95728. pTDefRegMap(@Self)^.clr := $00000200
  95729. else
  95730. pTDefRegMap(@Self)^.&set := $00000200;
  95731. end;
  95732. function TCAN1_C1FIFOINT31.getTXHALFIF : TBits_1; inline;
  95733. begin
  95734. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  95735. end;
  95736. procedure TCAN1_C1FIFOINT31.setTXNFULLIF; inline;
  95737. begin
  95738. pTDefRegMap(@Self)^.&set := $00000400;
  95739. end;
  95740. procedure TCAN1_C1FIFOINT31.clearTXNFULLIF; inline;
  95741. begin
  95742. pTDefRegMap(@Self)^.clr := $00000400;
  95743. end;
  95744. procedure TCAN1_C1FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  95745. begin
  95746. if thebits = 0 then
  95747. pTDefRegMap(@Self)^.clr := $00000400
  95748. else
  95749. pTDefRegMap(@Self)^.&set := $00000400;
  95750. end;
  95751. function TCAN1_C1FIFOINT31.getTXNFULLIF : TBits_1; inline;
  95752. begin
  95753. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  95754. end;
  95755. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE; inline;
  95756. begin
  95757. pTDefRegMap(@Self)^.&set := $00010000;
  95758. end;
  95759. procedure TCAN1_C1FIFOINT31.clearRXNEMPTYIE; inline;
  95760. begin
  95761. pTDefRegMap(@Self)^.clr := $00010000;
  95762. end;
  95763. procedure TCAN1_C1FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  95764. begin
  95765. if thebits = 0 then
  95766. pTDefRegMap(@Self)^.clr := $00010000
  95767. else
  95768. pTDefRegMap(@Self)^.&set := $00010000;
  95769. end;
  95770. function TCAN1_C1FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  95771. begin
  95772. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  95773. end;
  95774. procedure TCAN1_C1FIFOINT31.setRXHALFIE; inline;
  95775. begin
  95776. pTDefRegMap(@Self)^.&set := $00020000;
  95777. end;
  95778. procedure TCAN1_C1FIFOINT31.clearRXHALFIE; inline;
  95779. begin
  95780. pTDefRegMap(@Self)^.clr := $00020000;
  95781. end;
  95782. procedure TCAN1_C1FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  95783. begin
  95784. if thebits = 0 then
  95785. pTDefRegMap(@Self)^.clr := $00020000
  95786. else
  95787. pTDefRegMap(@Self)^.&set := $00020000;
  95788. end;
  95789. function TCAN1_C1FIFOINT31.getRXHALFIE : TBits_1; inline;
  95790. begin
  95791. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  95792. end;
  95793. procedure TCAN1_C1FIFOINT31.setRXFULLIE; inline;
  95794. begin
  95795. pTDefRegMap(@Self)^.&set := $00040000;
  95796. end;
  95797. procedure TCAN1_C1FIFOINT31.clearRXFULLIE; inline;
  95798. begin
  95799. pTDefRegMap(@Self)^.clr := $00040000;
  95800. end;
  95801. procedure TCAN1_C1FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  95802. begin
  95803. if thebits = 0 then
  95804. pTDefRegMap(@Self)^.clr := $00040000
  95805. else
  95806. pTDefRegMap(@Self)^.&set := $00040000;
  95807. end;
  95808. function TCAN1_C1FIFOINT31.getRXFULLIE : TBits_1; inline;
  95809. begin
  95810. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  95811. end;
  95812. procedure TCAN1_C1FIFOINT31.setRXOVFLIE; inline;
  95813. begin
  95814. pTDefRegMap(@Self)^.&set := $00080000;
  95815. end;
  95816. procedure TCAN1_C1FIFOINT31.clearRXOVFLIE; inline;
  95817. begin
  95818. pTDefRegMap(@Self)^.clr := $00080000;
  95819. end;
  95820. procedure TCAN1_C1FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  95821. begin
  95822. if thebits = 0 then
  95823. pTDefRegMap(@Self)^.clr := $00080000
  95824. else
  95825. pTDefRegMap(@Self)^.&set := $00080000;
  95826. end;
  95827. function TCAN1_C1FIFOINT31.getRXOVFLIE : TBits_1; inline;
  95828. begin
  95829. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  95830. end;
  95831. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE; inline;
  95832. begin
  95833. pTDefRegMap(@Self)^.&set := $01000000;
  95834. end;
  95835. procedure TCAN1_C1FIFOINT31.clearTXEMPTYIE; inline;
  95836. begin
  95837. pTDefRegMap(@Self)^.clr := $01000000;
  95838. end;
  95839. procedure TCAN1_C1FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  95840. begin
  95841. if thebits = 0 then
  95842. pTDefRegMap(@Self)^.clr := $01000000
  95843. else
  95844. pTDefRegMap(@Self)^.&set := $01000000;
  95845. end;
  95846. function TCAN1_C1FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  95847. begin
  95848. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  95849. end;
  95850. procedure TCAN1_C1FIFOINT31.setTXHALFIE; inline;
  95851. begin
  95852. pTDefRegMap(@Self)^.&set := $02000000;
  95853. end;
  95854. procedure TCAN1_C1FIFOINT31.clearTXHALFIE; inline;
  95855. begin
  95856. pTDefRegMap(@Self)^.clr := $02000000;
  95857. end;
  95858. procedure TCAN1_C1FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  95859. begin
  95860. if thebits = 0 then
  95861. pTDefRegMap(@Self)^.clr := $02000000
  95862. else
  95863. pTDefRegMap(@Self)^.&set := $02000000;
  95864. end;
  95865. function TCAN1_C1FIFOINT31.getTXHALFIE : TBits_1; inline;
  95866. begin
  95867. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  95868. end;
  95869. procedure TCAN1_C1FIFOINT31.setTXNFULLIE; inline;
  95870. begin
  95871. pTDefRegMap(@Self)^.&set := $04000000;
  95872. end;
  95873. procedure TCAN1_C1FIFOINT31.clearTXNFULLIE; inline;
  95874. begin
  95875. pTDefRegMap(@Self)^.clr := $04000000;
  95876. end;
  95877. procedure TCAN1_C1FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  95878. begin
  95879. if thebits = 0 then
  95880. pTDefRegMap(@Self)^.clr := $04000000
  95881. else
  95882. pTDefRegMap(@Self)^.&set := $04000000;
  95883. end;
  95884. function TCAN1_C1FIFOINT31.getTXNFULLIE : TBits_1; inline;
  95885. begin
  95886. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  95887. end;
  95888. procedure TCAN1_C1FIFOINT31.setw(thebits : TBits_32); inline;
  95889. begin
  95890. pTDefRegMap(@Self)^.val := thebits;
  95891. end;
  95892. function TCAN1_C1FIFOINT31.getw : TBits_32; inline;
  95893. begin
  95894. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95895. end;
  95896. procedure TCAN1_C1FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  95897. begin
  95898. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  95899. end;
  95900. function TCAN1_C1FIFOCI31.getCFIFOCI : TBits_5; inline;
  95901. begin
  95902. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  95903. end;
  95904. procedure TCAN1_C1FIFOCI31.setw(thebits : TBits_32); inline;
  95905. begin
  95906. pTDefRegMap(@Self)^.val := thebits;
  95907. end;
  95908. function TCAN1_C1FIFOCI31.getw : TBits_32; inline;
  95909. begin
  95910. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  95911. end;
  95912. procedure TCAN2_C2CON.setDNCNT(thebits : TBits_5); inline;
  95913. begin
  95914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  95915. end;
  95916. function TCAN2_C2CON.getDNCNT : TBits_5; inline;
  95917. begin
  95918. getDNCNT := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  95919. end;
  95920. procedure TCAN2_C2CON.setCANBUSY; inline;
  95921. begin
  95922. pTDefRegMap(@Self)^.&set := $00000800;
  95923. end;
  95924. procedure TCAN2_C2CON.clearCANBUSY; inline;
  95925. begin
  95926. pTDefRegMap(@Self)^.clr := $00000800;
  95927. end;
  95928. procedure TCAN2_C2CON.setCANBUSY(thebits : TBits_1); inline;
  95929. begin
  95930. if thebits = 0 then
  95931. pTDefRegMap(@Self)^.clr := $00000800
  95932. else
  95933. pTDefRegMap(@Self)^.&set := $00000800;
  95934. end;
  95935. function TCAN2_C2CON.getCANBUSY : TBits_1; inline;
  95936. begin
  95937. getCANBUSY := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  95938. end;
  95939. procedure TCAN2_C2CON.setSIDL; inline;
  95940. begin
  95941. pTDefRegMap(@Self)^.&set := $00002000;
  95942. end;
  95943. procedure TCAN2_C2CON.clearSIDL; inline;
  95944. begin
  95945. pTDefRegMap(@Self)^.clr := $00002000;
  95946. end;
  95947. procedure TCAN2_C2CON.setSIDL(thebits : TBits_1); inline;
  95948. begin
  95949. if thebits = 0 then
  95950. pTDefRegMap(@Self)^.clr := $00002000
  95951. else
  95952. pTDefRegMap(@Self)^.&set := $00002000;
  95953. end;
  95954. function TCAN2_C2CON.getSIDL : TBits_1; inline;
  95955. begin
  95956. getSIDL := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  95957. end;
  95958. procedure TCAN2_C2CON.setON; inline;
  95959. begin
  95960. pTDefRegMap(@Self)^.&set := $00008000;
  95961. end;
  95962. procedure TCAN2_C2CON.clearON; inline;
  95963. begin
  95964. pTDefRegMap(@Self)^.clr := $00008000;
  95965. end;
  95966. procedure TCAN2_C2CON.setON(thebits : TBits_1); inline;
  95967. begin
  95968. if thebits = 0 then
  95969. pTDefRegMap(@Self)^.clr := $00008000
  95970. else
  95971. pTDefRegMap(@Self)^.&set := $00008000;
  95972. end;
  95973. function TCAN2_C2CON.getON : TBits_1; inline;
  95974. begin
  95975. getON := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  95976. end;
  95977. procedure TCAN2_C2CON.setCANCAP; inline;
  95978. begin
  95979. pTDefRegMap(@Self)^.&set := $00100000;
  95980. end;
  95981. procedure TCAN2_C2CON.clearCANCAP; inline;
  95982. begin
  95983. pTDefRegMap(@Self)^.clr := $00100000;
  95984. end;
  95985. procedure TCAN2_C2CON.setCANCAP(thebits : TBits_1); inline;
  95986. begin
  95987. if thebits = 0 then
  95988. pTDefRegMap(@Self)^.clr := $00100000
  95989. else
  95990. pTDefRegMap(@Self)^.&set := $00100000;
  95991. end;
  95992. function TCAN2_C2CON.getCANCAP : TBits_1; inline;
  95993. begin
  95994. getCANCAP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  95995. end;
  95996. procedure TCAN2_C2CON.setOPMOD(thebits : TBits_3); inline;
  95997. begin
  95998. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF1FFFFF or ( thebits shl 21 );
  95999. end;
  96000. function TCAN2_C2CON.getOPMOD : TBits_3; inline;
  96001. begin
  96002. getOPMOD := (pTDefRegMap(@Self)^.val and $00E00000) shr 21;
  96003. end;
  96004. procedure TCAN2_C2CON.setREQOP(thebits : TBits_3); inline;
  96005. begin
  96006. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $F8FFFFFF or ( thebits shl 24 );
  96007. end;
  96008. function TCAN2_C2CON.getREQOP : TBits_3; inline;
  96009. begin
  96010. getREQOP := (pTDefRegMap(@Self)^.val and $07000000) shr 24;
  96011. end;
  96012. procedure TCAN2_C2CON.setABAT; inline;
  96013. begin
  96014. pTDefRegMap(@Self)^.&set := $08000000;
  96015. end;
  96016. procedure TCAN2_C2CON.clearABAT; inline;
  96017. begin
  96018. pTDefRegMap(@Self)^.clr := $08000000;
  96019. end;
  96020. procedure TCAN2_C2CON.setABAT(thebits : TBits_1); inline;
  96021. begin
  96022. if thebits = 0 then
  96023. pTDefRegMap(@Self)^.clr := $08000000
  96024. else
  96025. pTDefRegMap(@Self)^.&set := $08000000;
  96026. end;
  96027. function TCAN2_C2CON.getABAT : TBits_1; inline;
  96028. begin
  96029. getABAT := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  96030. end;
  96031. procedure TCAN2_C2CON.setw(thebits : TBits_32); inline;
  96032. begin
  96033. pTDefRegMap(@Self)^.val := thebits;
  96034. end;
  96035. function TCAN2_C2CON.getw : TBits_32; inline;
  96036. begin
  96037. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96038. end;
  96039. procedure TCAN2_C2CFG.setBRP(thebits : TBits_6); inline;
  96040. begin
  96041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFC0 or ( thebits shl 0 );
  96042. end;
  96043. function TCAN2_C2CFG.getBRP : TBits_6; inline;
  96044. begin
  96045. getBRP := (pTDefRegMap(@Self)^.val and $0000003F) shr 0;
  96046. end;
  96047. procedure TCAN2_C2CFG.setSJW(thebits : TBits_2); inline;
  96048. begin
  96049. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF3F or ( thebits shl 6 );
  96050. end;
  96051. function TCAN2_C2CFG.getSJW : TBits_2; inline;
  96052. begin
  96053. getSJW := (pTDefRegMap(@Self)^.val and $000000C0) shr 6;
  96054. end;
  96055. procedure TCAN2_C2CFG.setPRSEG(thebits : TBits_3); inline;
  96056. begin
  96057. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  96058. end;
  96059. function TCAN2_C2CFG.getPRSEG : TBits_3; inline;
  96060. begin
  96061. getPRSEG := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  96062. end;
  96063. procedure TCAN2_C2CFG.setSEG1PH(thebits : TBits_3); inline;
  96064. begin
  96065. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFC7FF or ( thebits shl 11 );
  96066. end;
  96067. function TCAN2_C2CFG.getSEG1PH : TBits_3; inline;
  96068. begin
  96069. getSEG1PH := (pTDefRegMap(@Self)^.val and $00003800) shr 11;
  96070. end;
  96071. procedure TCAN2_C2CFG.setSAM; inline;
  96072. begin
  96073. pTDefRegMap(@Self)^.&set := $00004000;
  96074. end;
  96075. procedure TCAN2_C2CFG.clearSAM; inline;
  96076. begin
  96077. pTDefRegMap(@Self)^.clr := $00004000;
  96078. end;
  96079. procedure TCAN2_C2CFG.setSAM(thebits : TBits_1); inline;
  96080. begin
  96081. if thebits = 0 then
  96082. pTDefRegMap(@Self)^.clr := $00004000
  96083. else
  96084. pTDefRegMap(@Self)^.&set := $00004000;
  96085. end;
  96086. function TCAN2_C2CFG.getSAM : TBits_1; inline;
  96087. begin
  96088. getSAM := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  96089. end;
  96090. procedure TCAN2_C2CFG.setSEG2PHTS; inline;
  96091. begin
  96092. pTDefRegMap(@Self)^.&set := $00008000;
  96093. end;
  96094. procedure TCAN2_C2CFG.clearSEG2PHTS; inline;
  96095. begin
  96096. pTDefRegMap(@Self)^.clr := $00008000;
  96097. end;
  96098. procedure TCAN2_C2CFG.setSEG2PHTS(thebits : TBits_1); inline;
  96099. begin
  96100. if thebits = 0 then
  96101. pTDefRegMap(@Self)^.clr := $00008000
  96102. else
  96103. pTDefRegMap(@Self)^.&set := $00008000;
  96104. end;
  96105. function TCAN2_C2CFG.getSEG2PHTS : TBits_1; inline;
  96106. begin
  96107. getSEG2PHTS := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  96108. end;
  96109. procedure TCAN2_C2CFG.setSEG2PH(thebits : TBits_3); inline;
  96110. begin
  96111. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  96112. end;
  96113. function TCAN2_C2CFG.getSEG2PH : TBits_3; inline;
  96114. begin
  96115. getSEG2PH := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  96116. end;
  96117. procedure TCAN2_C2CFG.setWAKFIL; inline;
  96118. begin
  96119. pTDefRegMap(@Self)^.&set := $00400000;
  96120. end;
  96121. procedure TCAN2_C2CFG.clearWAKFIL; inline;
  96122. begin
  96123. pTDefRegMap(@Self)^.clr := $00400000;
  96124. end;
  96125. procedure TCAN2_C2CFG.setWAKFIL(thebits : TBits_1); inline;
  96126. begin
  96127. if thebits = 0 then
  96128. pTDefRegMap(@Self)^.clr := $00400000
  96129. else
  96130. pTDefRegMap(@Self)^.&set := $00400000;
  96131. end;
  96132. function TCAN2_C2CFG.getWAKFIL : TBits_1; inline;
  96133. begin
  96134. getWAKFIL := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  96135. end;
  96136. procedure TCAN2_C2CFG.setw(thebits : TBits_32); inline;
  96137. begin
  96138. pTDefRegMap(@Self)^.val := thebits;
  96139. end;
  96140. function TCAN2_C2CFG.getw : TBits_32; inline;
  96141. begin
  96142. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96143. end;
  96144. procedure TCAN2_C2INT.setTBIF; inline;
  96145. begin
  96146. pTDefRegMap(@Self)^.&set := $00000001;
  96147. end;
  96148. procedure TCAN2_C2INT.clearTBIF; inline;
  96149. begin
  96150. pTDefRegMap(@Self)^.clr := $00000001;
  96151. end;
  96152. procedure TCAN2_C2INT.setTBIF(thebits : TBits_1); inline;
  96153. begin
  96154. if thebits = 0 then
  96155. pTDefRegMap(@Self)^.clr := $00000001
  96156. else
  96157. pTDefRegMap(@Self)^.&set := $00000001;
  96158. end;
  96159. function TCAN2_C2INT.getTBIF : TBits_1; inline;
  96160. begin
  96161. getTBIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  96162. end;
  96163. procedure TCAN2_C2INT.setRBIF; inline;
  96164. begin
  96165. pTDefRegMap(@Self)^.&set := $00000002;
  96166. end;
  96167. procedure TCAN2_C2INT.clearRBIF; inline;
  96168. begin
  96169. pTDefRegMap(@Self)^.clr := $00000002;
  96170. end;
  96171. procedure TCAN2_C2INT.setRBIF(thebits : TBits_1); inline;
  96172. begin
  96173. if thebits = 0 then
  96174. pTDefRegMap(@Self)^.clr := $00000002
  96175. else
  96176. pTDefRegMap(@Self)^.&set := $00000002;
  96177. end;
  96178. function TCAN2_C2INT.getRBIF : TBits_1; inline;
  96179. begin
  96180. getRBIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  96181. end;
  96182. procedure TCAN2_C2INT.setCTMRIF; inline;
  96183. begin
  96184. pTDefRegMap(@Self)^.&set := $00000004;
  96185. end;
  96186. procedure TCAN2_C2INT.clearCTMRIF; inline;
  96187. begin
  96188. pTDefRegMap(@Self)^.clr := $00000004;
  96189. end;
  96190. procedure TCAN2_C2INT.setCTMRIF(thebits : TBits_1); inline;
  96191. begin
  96192. if thebits = 0 then
  96193. pTDefRegMap(@Self)^.clr := $00000004
  96194. else
  96195. pTDefRegMap(@Self)^.&set := $00000004;
  96196. end;
  96197. function TCAN2_C2INT.getCTMRIF : TBits_1; inline;
  96198. begin
  96199. getCTMRIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96200. end;
  96201. procedure TCAN2_C2INT.setMODIF; inline;
  96202. begin
  96203. pTDefRegMap(@Self)^.&set := $00000008;
  96204. end;
  96205. procedure TCAN2_C2INT.clearMODIF; inline;
  96206. begin
  96207. pTDefRegMap(@Self)^.clr := $00000008;
  96208. end;
  96209. procedure TCAN2_C2INT.setMODIF(thebits : TBits_1); inline;
  96210. begin
  96211. if thebits = 0 then
  96212. pTDefRegMap(@Self)^.clr := $00000008
  96213. else
  96214. pTDefRegMap(@Self)^.&set := $00000008;
  96215. end;
  96216. function TCAN2_C2INT.getMODIF : TBits_1; inline;
  96217. begin
  96218. getMODIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96219. end;
  96220. procedure TCAN2_C2INT.setRBOVIF; inline;
  96221. begin
  96222. pTDefRegMap(@Self)^.&set := $00000800;
  96223. end;
  96224. procedure TCAN2_C2INT.clearRBOVIF; inline;
  96225. begin
  96226. pTDefRegMap(@Self)^.clr := $00000800;
  96227. end;
  96228. procedure TCAN2_C2INT.setRBOVIF(thebits : TBits_1); inline;
  96229. begin
  96230. if thebits = 0 then
  96231. pTDefRegMap(@Self)^.clr := $00000800
  96232. else
  96233. pTDefRegMap(@Self)^.&set := $00000800;
  96234. end;
  96235. function TCAN2_C2INT.getRBOVIF : TBits_1; inline;
  96236. begin
  96237. getRBOVIF := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  96238. end;
  96239. procedure TCAN2_C2INT.setSERRIF; inline;
  96240. begin
  96241. pTDefRegMap(@Self)^.&set := $00001000;
  96242. end;
  96243. procedure TCAN2_C2INT.clearSERRIF; inline;
  96244. begin
  96245. pTDefRegMap(@Self)^.clr := $00001000;
  96246. end;
  96247. procedure TCAN2_C2INT.setSERRIF(thebits : TBits_1); inline;
  96248. begin
  96249. if thebits = 0 then
  96250. pTDefRegMap(@Self)^.clr := $00001000
  96251. else
  96252. pTDefRegMap(@Self)^.&set := $00001000;
  96253. end;
  96254. function TCAN2_C2INT.getSERRIF : TBits_1; inline;
  96255. begin
  96256. getSERRIF := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  96257. end;
  96258. procedure TCAN2_C2INT.setCERRIF; inline;
  96259. begin
  96260. pTDefRegMap(@Self)^.&set := $00002000;
  96261. end;
  96262. procedure TCAN2_C2INT.clearCERRIF; inline;
  96263. begin
  96264. pTDefRegMap(@Self)^.clr := $00002000;
  96265. end;
  96266. procedure TCAN2_C2INT.setCERRIF(thebits : TBits_1); inline;
  96267. begin
  96268. if thebits = 0 then
  96269. pTDefRegMap(@Self)^.clr := $00002000
  96270. else
  96271. pTDefRegMap(@Self)^.&set := $00002000;
  96272. end;
  96273. function TCAN2_C2INT.getCERRIF : TBits_1; inline;
  96274. begin
  96275. getCERRIF := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  96276. end;
  96277. procedure TCAN2_C2INT.setWAKIF; inline;
  96278. begin
  96279. pTDefRegMap(@Self)^.&set := $00004000;
  96280. end;
  96281. procedure TCAN2_C2INT.clearWAKIF; inline;
  96282. begin
  96283. pTDefRegMap(@Self)^.clr := $00004000;
  96284. end;
  96285. procedure TCAN2_C2INT.setWAKIF(thebits : TBits_1); inline;
  96286. begin
  96287. if thebits = 0 then
  96288. pTDefRegMap(@Self)^.clr := $00004000
  96289. else
  96290. pTDefRegMap(@Self)^.&set := $00004000;
  96291. end;
  96292. function TCAN2_C2INT.getWAKIF : TBits_1; inline;
  96293. begin
  96294. getWAKIF := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  96295. end;
  96296. procedure TCAN2_C2INT.setIVRIF; inline;
  96297. begin
  96298. pTDefRegMap(@Self)^.&set := $00008000;
  96299. end;
  96300. procedure TCAN2_C2INT.clearIVRIF; inline;
  96301. begin
  96302. pTDefRegMap(@Self)^.clr := $00008000;
  96303. end;
  96304. procedure TCAN2_C2INT.setIVRIF(thebits : TBits_1); inline;
  96305. begin
  96306. if thebits = 0 then
  96307. pTDefRegMap(@Self)^.clr := $00008000
  96308. else
  96309. pTDefRegMap(@Self)^.&set := $00008000;
  96310. end;
  96311. function TCAN2_C2INT.getIVRIF : TBits_1; inline;
  96312. begin
  96313. getIVRIF := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  96314. end;
  96315. procedure TCAN2_C2INT.setTBIE; inline;
  96316. begin
  96317. pTDefRegMap(@Self)^.&set := $00010000;
  96318. end;
  96319. procedure TCAN2_C2INT.clearTBIE; inline;
  96320. begin
  96321. pTDefRegMap(@Self)^.clr := $00010000;
  96322. end;
  96323. procedure TCAN2_C2INT.setTBIE(thebits : TBits_1); inline;
  96324. begin
  96325. if thebits = 0 then
  96326. pTDefRegMap(@Self)^.clr := $00010000
  96327. else
  96328. pTDefRegMap(@Self)^.&set := $00010000;
  96329. end;
  96330. function TCAN2_C2INT.getTBIE : TBits_1; inline;
  96331. begin
  96332. getTBIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  96333. end;
  96334. procedure TCAN2_C2INT.setRBIE; inline;
  96335. begin
  96336. pTDefRegMap(@Self)^.&set := $00020000;
  96337. end;
  96338. procedure TCAN2_C2INT.clearRBIE; inline;
  96339. begin
  96340. pTDefRegMap(@Self)^.clr := $00020000;
  96341. end;
  96342. procedure TCAN2_C2INT.setRBIE(thebits : TBits_1); inline;
  96343. begin
  96344. if thebits = 0 then
  96345. pTDefRegMap(@Self)^.clr := $00020000
  96346. else
  96347. pTDefRegMap(@Self)^.&set := $00020000;
  96348. end;
  96349. function TCAN2_C2INT.getRBIE : TBits_1; inline;
  96350. begin
  96351. getRBIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  96352. end;
  96353. procedure TCAN2_C2INT.setCTMRIE; inline;
  96354. begin
  96355. pTDefRegMap(@Self)^.&set := $00040000;
  96356. end;
  96357. procedure TCAN2_C2INT.clearCTMRIE; inline;
  96358. begin
  96359. pTDefRegMap(@Self)^.clr := $00040000;
  96360. end;
  96361. procedure TCAN2_C2INT.setCTMRIE(thebits : TBits_1); inline;
  96362. begin
  96363. if thebits = 0 then
  96364. pTDefRegMap(@Self)^.clr := $00040000
  96365. else
  96366. pTDefRegMap(@Self)^.&set := $00040000;
  96367. end;
  96368. function TCAN2_C2INT.getCTMRIE : TBits_1; inline;
  96369. begin
  96370. getCTMRIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  96371. end;
  96372. procedure TCAN2_C2INT.setMODIE; inline;
  96373. begin
  96374. pTDefRegMap(@Self)^.&set := $00080000;
  96375. end;
  96376. procedure TCAN2_C2INT.clearMODIE; inline;
  96377. begin
  96378. pTDefRegMap(@Self)^.clr := $00080000;
  96379. end;
  96380. procedure TCAN2_C2INT.setMODIE(thebits : TBits_1); inline;
  96381. begin
  96382. if thebits = 0 then
  96383. pTDefRegMap(@Self)^.clr := $00080000
  96384. else
  96385. pTDefRegMap(@Self)^.&set := $00080000;
  96386. end;
  96387. function TCAN2_C2INT.getMODIE : TBits_1; inline;
  96388. begin
  96389. getMODIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  96390. end;
  96391. procedure TCAN2_C2INT.setRBOVIE; inline;
  96392. begin
  96393. pTDefRegMap(@Self)^.&set := $08000000;
  96394. end;
  96395. procedure TCAN2_C2INT.clearRBOVIE; inline;
  96396. begin
  96397. pTDefRegMap(@Self)^.clr := $08000000;
  96398. end;
  96399. procedure TCAN2_C2INT.setRBOVIE(thebits : TBits_1); inline;
  96400. begin
  96401. if thebits = 0 then
  96402. pTDefRegMap(@Self)^.clr := $08000000
  96403. else
  96404. pTDefRegMap(@Self)^.&set := $08000000;
  96405. end;
  96406. function TCAN2_C2INT.getRBOVIE : TBits_1; inline;
  96407. begin
  96408. getRBOVIE := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  96409. end;
  96410. procedure TCAN2_C2INT.setSERRIE; inline;
  96411. begin
  96412. pTDefRegMap(@Self)^.&set := $10000000;
  96413. end;
  96414. procedure TCAN2_C2INT.clearSERRIE; inline;
  96415. begin
  96416. pTDefRegMap(@Self)^.clr := $10000000;
  96417. end;
  96418. procedure TCAN2_C2INT.setSERRIE(thebits : TBits_1); inline;
  96419. begin
  96420. if thebits = 0 then
  96421. pTDefRegMap(@Self)^.clr := $10000000
  96422. else
  96423. pTDefRegMap(@Self)^.&set := $10000000;
  96424. end;
  96425. function TCAN2_C2INT.getSERRIE : TBits_1; inline;
  96426. begin
  96427. getSERRIE := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  96428. end;
  96429. procedure TCAN2_C2INT.setCERRIE; inline;
  96430. begin
  96431. pTDefRegMap(@Self)^.&set := $20000000;
  96432. end;
  96433. procedure TCAN2_C2INT.clearCERRIE; inline;
  96434. begin
  96435. pTDefRegMap(@Self)^.clr := $20000000;
  96436. end;
  96437. procedure TCAN2_C2INT.setCERRIE(thebits : TBits_1); inline;
  96438. begin
  96439. if thebits = 0 then
  96440. pTDefRegMap(@Self)^.clr := $20000000
  96441. else
  96442. pTDefRegMap(@Self)^.&set := $20000000;
  96443. end;
  96444. function TCAN2_C2INT.getCERRIE : TBits_1; inline;
  96445. begin
  96446. getCERRIE := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  96447. end;
  96448. procedure TCAN2_C2INT.setWAKIE; inline;
  96449. begin
  96450. pTDefRegMap(@Self)^.&set := $40000000;
  96451. end;
  96452. procedure TCAN2_C2INT.clearWAKIE; inline;
  96453. begin
  96454. pTDefRegMap(@Self)^.clr := $40000000;
  96455. end;
  96456. procedure TCAN2_C2INT.setWAKIE(thebits : TBits_1); inline;
  96457. begin
  96458. if thebits = 0 then
  96459. pTDefRegMap(@Self)^.clr := $40000000
  96460. else
  96461. pTDefRegMap(@Self)^.&set := $40000000;
  96462. end;
  96463. function TCAN2_C2INT.getWAKIE : TBits_1; inline;
  96464. begin
  96465. getWAKIE := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  96466. end;
  96467. procedure TCAN2_C2INT.setIVRIE; inline;
  96468. begin
  96469. pTDefRegMap(@Self)^.&set := $80000000;
  96470. end;
  96471. procedure TCAN2_C2INT.clearIVRIE; inline;
  96472. begin
  96473. pTDefRegMap(@Self)^.clr := $80000000;
  96474. end;
  96475. procedure TCAN2_C2INT.setIVRIE(thebits : TBits_1); inline;
  96476. begin
  96477. if thebits = 0 then
  96478. pTDefRegMap(@Self)^.clr := $80000000
  96479. else
  96480. pTDefRegMap(@Self)^.&set := $80000000;
  96481. end;
  96482. function TCAN2_C2INT.getIVRIE : TBits_1; inline;
  96483. begin
  96484. getIVRIE := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  96485. end;
  96486. procedure TCAN2_C2INT.setw(thebits : TBits_32); inline;
  96487. begin
  96488. pTDefRegMap(@Self)^.val := thebits;
  96489. end;
  96490. function TCAN2_C2INT.getw : TBits_32; inline;
  96491. begin
  96492. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96493. end;
  96494. procedure TCAN2_C2VEC.setICODE(thebits : TBits_7); inline;
  96495. begin
  96496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF80 or ( thebits shl 0 );
  96497. end;
  96498. function TCAN2_C2VEC.getICODE : TBits_7; inline;
  96499. begin
  96500. getICODE := (pTDefRegMap(@Self)^.val and $0000007F) shr 0;
  96501. end;
  96502. procedure TCAN2_C2VEC.setFILHIT(thebits : TBits_5); inline;
  96503. begin
  96504. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  96505. end;
  96506. function TCAN2_C2VEC.getFILHIT : TBits_5; inline;
  96507. begin
  96508. getFILHIT := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  96509. end;
  96510. procedure TCAN2_C2VEC.setw(thebits : TBits_32); inline;
  96511. begin
  96512. pTDefRegMap(@Self)^.val := thebits;
  96513. end;
  96514. function TCAN2_C2VEC.getw : TBits_32; inline;
  96515. begin
  96516. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96517. end;
  96518. procedure TCAN2_C2TREC.setRERRCNT(thebits : TBits_8); inline;
  96519. begin
  96520. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF00 or ( thebits shl 0 );
  96521. end;
  96522. function TCAN2_C2TREC.getRERRCNT : TBits_8; inline;
  96523. begin
  96524. getRERRCNT := (pTDefRegMap(@Self)^.val and $000000FF) shr 0;
  96525. end;
  96526. procedure TCAN2_C2TREC.setTERRCNT(thebits : TBits_8); inline;
  96527. begin
  96528. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF00FF or ( thebits shl 8 );
  96529. end;
  96530. function TCAN2_C2TREC.getTERRCNT : TBits_8; inline;
  96531. begin
  96532. getTERRCNT := (pTDefRegMap(@Self)^.val and $0000FF00) shr 8;
  96533. end;
  96534. procedure TCAN2_C2TREC.setEWARN; inline;
  96535. begin
  96536. pTDefRegMap(@Self)^.&set := $00010000;
  96537. end;
  96538. procedure TCAN2_C2TREC.clearEWARN; inline;
  96539. begin
  96540. pTDefRegMap(@Self)^.clr := $00010000;
  96541. end;
  96542. procedure TCAN2_C2TREC.setEWARN(thebits : TBits_1); inline;
  96543. begin
  96544. if thebits = 0 then
  96545. pTDefRegMap(@Self)^.clr := $00010000
  96546. else
  96547. pTDefRegMap(@Self)^.&set := $00010000;
  96548. end;
  96549. function TCAN2_C2TREC.getEWARN : TBits_1; inline;
  96550. begin
  96551. getEWARN := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  96552. end;
  96553. procedure TCAN2_C2TREC.setRXWARN; inline;
  96554. begin
  96555. pTDefRegMap(@Self)^.&set := $00020000;
  96556. end;
  96557. procedure TCAN2_C2TREC.clearRXWARN; inline;
  96558. begin
  96559. pTDefRegMap(@Self)^.clr := $00020000;
  96560. end;
  96561. procedure TCAN2_C2TREC.setRXWARN(thebits : TBits_1); inline;
  96562. begin
  96563. if thebits = 0 then
  96564. pTDefRegMap(@Self)^.clr := $00020000
  96565. else
  96566. pTDefRegMap(@Self)^.&set := $00020000;
  96567. end;
  96568. function TCAN2_C2TREC.getRXWARN : TBits_1; inline;
  96569. begin
  96570. getRXWARN := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  96571. end;
  96572. procedure TCAN2_C2TREC.setTXWARN; inline;
  96573. begin
  96574. pTDefRegMap(@Self)^.&set := $00040000;
  96575. end;
  96576. procedure TCAN2_C2TREC.clearTXWARN; inline;
  96577. begin
  96578. pTDefRegMap(@Self)^.clr := $00040000;
  96579. end;
  96580. procedure TCAN2_C2TREC.setTXWARN(thebits : TBits_1); inline;
  96581. begin
  96582. if thebits = 0 then
  96583. pTDefRegMap(@Self)^.clr := $00040000
  96584. else
  96585. pTDefRegMap(@Self)^.&set := $00040000;
  96586. end;
  96587. function TCAN2_C2TREC.getTXWARN : TBits_1; inline;
  96588. begin
  96589. getTXWARN := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  96590. end;
  96591. procedure TCAN2_C2TREC.setRXBP; inline;
  96592. begin
  96593. pTDefRegMap(@Self)^.&set := $00080000;
  96594. end;
  96595. procedure TCAN2_C2TREC.clearRXBP; inline;
  96596. begin
  96597. pTDefRegMap(@Self)^.clr := $00080000;
  96598. end;
  96599. procedure TCAN2_C2TREC.setRXBP(thebits : TBits_1); inline;
  96600. begin
  96601. if thebits = 0 then
  96602. pTDefRegMap(@Self)^.clr := $00080000
  96603. else
  96604. pTDefRegMap(@Self)^.&set := $00080000;
  96605. end;
  96606. function TCAN2_C2TREC.getRXBP : TBits_1; inline;
  96607. begin
  96608. getRXBP := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  96609. end;
  96610. procedure TCAN2_C2TREC.setTXBP; inline;
  96611. begin
  96612. pTDefRegMap(@Self)^.&set := $00100000;
  96613. end;
  96614. procedure TCAN2_C2TREC.clearTXBP; inline;
  96615. begin
  96616. pTDefRegMap(@Self)^.clr := $00100000;
  96617. end;
  96618. procedure TCAN2_C2TREC.setTXBP(thebits : TBits_1); inline;
  96619. begin
  96620. if thebits = 0 then
  96621. pTDefRegMap(@Self)^.clr := $00100000
  96622. else
  96623. pTDefRegMap(@Self)^.&set := $00100000;
  96624. end;
  96625. function TCAN2_C2TREC.getTXBP : TBits_1; inline;
  96626. begin
  96627. getTXBP := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  96628. end;
  96629. procedure TCAN2_C2TREC.setTXBO; inline;
  96630. begin
  96631. pTDefRegMap(@Self)^.&set := $00200000;
  96632. end;
  96633. procedure TCAN2_C2TREC.clearTXBO; inline;
  96634. begin
  96635. pTDefRegMap(@Self)^.clr := $00200000;
  96636. end;
  96637. procedure TCAN2_C2TREC.setTXBO(thebits : TBits_1); inline;
  96638. begin
  96639. if thebits = 0 then
  96640. pTDefRegMap(@Self)^.clr := $00200000
  96641. else
  96642. pTDefRegMap(@Self)^.&set := $00200000;
  96643. end;
  96644. function TCAN2_C2TREC.getTXBO : TBits_1; inline;
  96645. begin
  96646. getTXBO := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  96647. end;
  96648. procedure TCAN2_C2TREC.setw(thebits : TBits_32); inline;
  96649. begin
  96650. pTDefRegMap(@Self)^.val := thebits;
  96651. end;
  96652. function TCAN2_C2TREC.getw : TBits_32; inline;
  96653. begin
  96654. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96655. end;
  96656. procedure TCAN2_C2FSTAT.setFIFOIP(thebits : TBits_32); inline;
  96657. begin
  96658. pTDefRegMap(@Self)^.val := thebits;
  96659. end;
  96660. function TCAN2_C2FSTAT.getFIFOIP : TBits_32; inline;
  96661. begin
  96662. getFIFOIP := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  96663. end;
  96664. procedure TCAN2_C2FSTAT.setFIFOIP0; inline;
  96665. begin
  96666. pTDefRegMap(@Self)^.&set := $00000001;
  96667. end;
  96668. procedure TCAN2_C2FSTAT.clearFIFOIP0; inline;
  96669. begin
  96670. pTDefRegMap(@Self)^.clr := $00000001;
  96671. end;
  96672. procedure TCAN2_C2FSTAT.setFIFOIP0(thebits : TBits_1); inline;
  96673. begin
  96674. if thebits = 0 then
  96675. pTDefRegMap(@Self)^.clr := $00000001
  96676. else
  96677. pTDefRegMap(@Self)^.&set := $00000001;
  96678. end;
  96679. function TCAN2_C2FSTAT.getFIFOIP0 : TBits_1; inline;
  96680. begin
  96681. getFIFOIP0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  96682. end;
  96683. procedure TCAN2_C2FSTAT.setFIFOIP1; inline;
  96684. begin
  96685. pTDefRegMap(@Self)^.&set := $00000002;
  96686. end;
  96687. procedure TCAN2_C2FSTAT.clearFIFOIP1; inline;
  96688. begin
  96689. pTDefRegMap(@Self)^.clr := $00000002;
  96690. end;
  96691. procedure TCAN2_C2FSTAT.setFIFOIP1(thebits : TBits_1); inline;
  96692. begin
  96693. if thebits = 0 then
  96694. pTDefRegMap(@Self)^.clr := $00000002
  96695. else
  96696. pTDefRegMap(@Self)^.&set := $00000002;
  96697. end;
  96698. function TCAN2_C2FSTAT.getFIFOIP1 : TBits_1; inline;
  96699. begin
  96700. getFIFOIP1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  96701. end;
  96702. procedure TCAN2_C2FSTAT.setFIFOIP2; inline;
  96703. begin
  96704. pTDefRegMap(@Self)^.&set := $00000004;
  96705. end;
  96706. procedure TCAN2_C2FSTAT.clearFIFOIP2; inline;
  96707. begin
  96708. pTDefRegMap(@Self)^.clr := $00000004;
  96709. end;
  96710. procedure TCAN2_C2FSTAT.setFIFOIP2(thebits : TBits_1); inline;
  96711. begin
  96712. if thebits = 0 then
  96713. pTDefRegMap(@Self)^.clr := $00000004
  96714. else
  96715. pTDefRegMap(@Self)^.&set := $00000004;
  96716. end;
  96717. function TCAN2_C2FSTAT.getFIFOIP2 : TBits_1; inline;
  96718. begin
  96719. getFIFOIP2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  96720. end;
  96721. procedure TCAN2_C2FSTAT.setFIFOIP3; inline;
  96722. begin
  96723. pTDefRegMap(@Self)^.&set := $00000008;
  96724. end;
  96725. procedure TCAN2_C2FSTAT.clearFIFOIP3; inline;
  96726. begin
  96727. pTDefRegMap(@Self)^.clr := $00000008;
  96728. end;
  96729. procedure TCAN2_C2FSTAT.setFIFOIP3(thebits : TBits_1); inline;
  96730. begin
  96731. if thebits = 0 then
  96732. pTDefRegMap(@Self)^.clr := $00000008
  96733. else
  96734. pTDefRegMap(@Self)^.&set := $00000008;
  96735. end;
  96736. function TCAN2_C2FSTAT.getFIFOIP3 : TBits_1; inline;
  96737. begin
  96738. getFIFOIP3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  96739. end;
  96740. procedure TCAN2_C2FSTAT.setFIFOIP4; inline;
  96741. begin
  96742. pTDefRegMap(@Self)^.&set := $00000010;
  96743. end;
  96744. procedure TCAN2_C2FSTAT.clearFIFOIP4; inline;
  96745. begin
  96746. pTDefRegMap(@Self)^.clr := $00000010;
  96747. end;
  96748. procedure TCAN2_C2FSTAT.setFIFOIP4(thebits : TBits_1); inline;
  96749. begin
  96750. if thebits = 0 then
  96751. pTDefRegMap(@Self)^.clr := $00000010
  96752. else
  96753. pTDefRegMap(@Self)^.&set := $00000010;
  96754. end;
  96755. function TCAN2_C2FSTAT.getFIFOIP4 : TBits_1; inline;
  96756. begin
  96757. getFIFOIP4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  96758. end;
  96759. procedure TCAN2_C2FSTAT.setFIFOIP5; inline;
  96760. begin
  96761. pTDefRegMap(@Self)^.&set := $00000020;
  96762. end;
  96763. procedure TCAN2_C2FSTAT.clearFIFOIP5; inline;
  96764. begin
  96765. pTDefRegMap(@Self)^.clr := $00000020;
  96766. end;
  96767. procedure TCAN2_C2FSTAT.setFIFOIP5(thebits : TBits_1); inline;
  96768. begin
  96769. if thebits = 0 then
  96770. pTDefRegMap(@Self)^.clr := $00000020
  96771. else
  96772. pTDefRegMap(@Self)^.&set := $00000020;
  96773. end;
  96774. function TCAN2_C2FSTAT.getFIFOIP5 : TBits_1; inline;
  96775. begin
  96776. getFIFOIP5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  96777. end;
  96778. procedure TCAN2_C2FSTAT.setFIFOIP6; inline;
  96779. begin
  96780. pTDefRegMap(@Self)^.&set := $00000040;
  96781. end;
  96782. procedure TCAN2_C2FSTAT.clearFIFOIP6; inline;
  96783. begin
  96784. pTDefRegMap(@Self)^.clr := $00000040;
  96785. end;
  96786. procedure TCAN2_C2FSTAT.setFIFOIP6(thebits : TBits_1); inline;
  96787. begin
  96788. if thebits = 0 then
  96789. pTDefRegMap(@Self)^.clr := $00000040
  96790. else
  96791. pTDefRegMap(@Self)^.&set := $00000040;
  96792. end;
  96793. function TCAN2_C2FSTAT.getFIFOIP6 : TBits_1; inline;
  96794. begin
  96795. getFIFOIP6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  96796. end;
  96797. procedure TCAN2_C2FSTAT.setFIFOIP7; inline;
  96798. begin
  96799. pTDefRegMap(@Self)^.&set := $00000080;
  96800. end;
  96801. procedure TCAN2_C2FSTAT.clearFIFOIP7; inline;
  96802. begin
  96803. pTDefRegMap(@Self)^.clr := $00000080;
  96804. end;
  96805. procedure TCAN2_C2FSTAT.setFIFOIP7(thebits : TBits_1); inline;
  96806. begin
  96807. if thebits = 0 then
  96808. pTDefRegMap(@Self)^.clr := $00000080
  96809. else
  96810. pTDefRegMap(@Self)^.&set := $00000080;
  96811. end;
  96812. function TCAN2_C2FSTAT.getFIFOIP7 : TBits_1; inline;
  96813. begin
  96814. getFIFOIP7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  96815. end;
  96816. procedure TCAN2_C2FSTAT.setFIFOIP8; inline;
  96817. begin
  96818. pTDefRegMap(@Self)^.&set := $00000100;
  96819. end;
  96820. procedure TCAN2_C2FSTAT.clearFIFOIP8; inline;
  96821. begin
  96822. pTDefRegMap(@Self)^.clr := $00000100;
  96823. end;
  96824. procedure TCAN2_C2FSTAT.setFIFOIP8(thebits : TBits_1); inline;
  96825. begin
  96826. if thebits = 0 then
  96827. pTDefRegMap(@Self)^.clr := $00000100
  96828. else
  96829. pTDefRegMap(@Self)^.&set := $00000100;
  96830. end;
  96831. function TCAN2_C2FSTAT.getFIFOIP8 : TBits_1; inline;
  96832. begin
  96833. getFIFOIP8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  96834. end;
  96835. procedure TCAN2_C2FSTAT.setFIFOIP9; inline;
  96836. begin
  96837. pTDefRegMap(@Self)^.&set := $00000200;
  96838. end;
  96839. procedure TCAN2_C2FSTAT.clearFIFOIP9; inline;
  96840. begin
  96841. pTDefRegMap(@Self)^.clr := $00000200;
  96842. end;
  96843. procedure TCAN2_C2FSTAT.setFIFOIP9(thebits : TBits_1); inline;
  96844. begin
  96845. if thebits = 0 then
  96846. pTDefRegMap(@Self)^.clr := $00000200
  96847. else
  96848. pTDefRegMap(@Self)^.&set := $00000200;
  96849. end;
  96850. function TCAN2_C2FSTAT.getFIFOIP9 : TBits_1; inline;
  96851. begin
  96852. getFIFOIP9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  96853. end;
  96854. procedure TCAN2_C2FSTAT.setFIFOIP10; inline;
  96855. begin
  96856. pTDefRegMap(@Self)^.&set := $00000400;
  96857. end;
  96858. procedure TCAN2_C2FSTAT.clearFIFOIP10; inline;
  96859. begin
  96860. pTDefRegMap(@Self)^.clr := $00000400;
  96861. end;
  96862. procedure TCAN2_C2FSTAT.setFIFOIP10(thebits : TBits_1); inline;
  96863. begin
  96864. if thebits = 0 then
  96865. pTDefRegMap(@Self)^.clr := $00000400
  96866. else
  96867. pTDefRegMap(@Self)^.&set := $00000400;
  96868. end;
  96869. function TCAN2_C2FSTAT.getFIFOIP10 : TBits_1; inline;
  96870. begin
  96871. getFIFOIP10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  96872. end;
  96873. procedure TCAN2_C2FSTAT.setFIFOIP11; inline;
  96874. begin
  96875. pTDefRegMap(@Self)^.&set := $00000800;
  96876. end;
  96877. procedure TCAN2_C2FSTAT.clearFIFOIP11; inline;
  96878. begin
  96879. pTDefRegMap(@Self)^.clr := $00000800;
  96880. end;
  96881. procedure TCAN2_C2FSTAT.setFIFOIP11(thebits : TBits_1); inline;
  96882. begin
  96883. if thebits = 0 then
  96884. pTDefRegMap(@Self)^.clr := $00000800
  96885. else
  96886. pTDefRegMap(@Self)^.&set := $00000800;
  96887. end;
  96888. function TCAN2_C2FSTAT.getFIFOIP11 : TBits_1; inline;
  96889. begin
  96890. getFIFOIP11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  96891. end;
  96892. procedure TCAN2_C2FSTAT.setFIFOIP12; inline;
  96893. begin
  96894. pTDefRegMap(@Self)^.&set := $00001000;
  96895. end;
  96896. procedure TCAN2_C2FSTAT.clearFIFOIP12; inline;
  96897. begin
  96898. pTDefRegMap(@Self)^.clr := $00001000;
  96899. end;
  96900. procedure TCAN2_C2FSTAT.setFIFOIP12(thebits : TBits_1); inline;
  96901. begin
  96902. if thebits = 0 then
  96903. pTDefRegMap(@Self)^.clr := $00001000
  96904. else
  96905. pTDefRegMap(@Self)^.&set := $00001000;
  96906. end;
  96907. function TCAN2_C2FSTAT.getFIFOIP12 : TBits_1; inline;
  96908. begin
  96909. getFIFOIP12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  96910. end;
  96911. procedure TCAN2_C2FSTAT.setFIFOIP13; inline;
  96912. begin
  96913. pTDefRegMap(@Self)^.&set := $00002000;
  96914. end;
  96915. procedure TCAN2_C2FSTAT.clearFIFOIP13; inline;
  96916. begin
  96917. pTDefRegMap(@Self)^.clr := $00002000;
  96918. end;
  96919. procedure TCAN2_C2FSTAT.setFIFOIP13(thebits : TBits_1); inline;
  96920. begin
  96921. if thebits = 0 then
  96922. pTDefRegMap(@Self)^.clr := $00002000
  96923. else
  96924. pTDefRegMap(@Self)^.&set := $00002000;
  96925. end;
  96926. function TCAN2_C2FSTAT.getFIFOIP13 : TBits_1; inline;
  96927. begin
  96928. getFIFOIP13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  96929. end;
  96930. procedure TCAN2_C2FSTAT.setFIFOIP14; inline;
  96931. begin
  96932. pTDefRegMap(@Self)^.&set := $00004000;
  96933. end;
  96934. procedure TCAN2_C2FSTAT.clearFIFOIP14; inline;
  96935. begin
  96936. pTDefRegMap(@Self)^.clr := $00004000;
  96937. end;
  96938. procedure TCAN2_C2FSTAT.setFIFOIP14(thebits : TBits_1); inline;
  96939. begin
  96940. if thebits = 0 then
  96941. pTDefRegMap(@Self)^.clr := $00004000
  96942. else
  96943. pTDefRegMap(@Self)^.&set := $00004000;
  96944. end;
  96945. function TCAN2_C2FSTAT.getFIFOIP14 : TBits_1; inline;
  96946. begin
  96947. getFIFOIP14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  96948. end;
  96949. procedure TCAN2_C2FSTAT.setFIFOIP15; inline;
  96950. begin
  96951. pTDefRegMap(@Self)^.&set := $00008000;
  96952. end;
  96953. procedure TCAN2_C2FSTAT.clearFIFOIP15; inline;
  96954. begin
  96955. pTDefRegMap(@Self)^.clr := $00008000;
  96956. end;
  96957. procedure TCAN2_C2FSTAT.setFIFOIP15(thebits : TBits_1); inline;
  96958. begin
  96959. if thebits = 0 then
  96960. pTDefRegMap(@Self)^.clr := $00008000
  96961. else
  96962. pTDefRegMap(@Self)^.&set := $00008000;
  96963. end;
  96964. function TCAN2_C2FSTAT.getFIFOIP15 : TBits_1; inline;
  96965. begin
  96966. getFIFOIP15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  96967. end;
  96968. procedure TCAN2_C2FSTAT.setFIFOIP16; inline;
  96969. begin
  96970. pTDefRegMap(@Self)^.&set := $00010000;
  96971. end;
  96972. procedure TCAN2_C2FSTAT.clearFIFOIP16; inline;
  96973. begin
  96974. pTDefRegMap(@Self)^.clr := $00010000;
  96975. end;
  96976. procedure TCAN2_C2FSTAT.setFIFOIP16(thebits : TBits_1); inline;
  96977. begin
  96978. if thebits = 0 then
  96979. pTDefRegMap(@Self)^.clr := $00010000
  96980. else
  96981. pTDefRegMap(@Self)^.&set := $00010000;
  96982. end;
  96983. function TCAN2_C2FSTAT.getFIFOIP16 : TBits_1; inline;
  96984. begin
  96985. getFIFOIP16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  96986. end;
  96987. procedure TCAN2_C2FSTAT.setFIFOIP17; inline;
  96988. begin
  96989. pTDefRegMap(@Self)^.&set := $00020000;
  96990. end;
  96991. procedure TCAN2_C2FSTAT.clearFIFOIP17; inline;
  96992. begin
  96993. pTDefRegMap(@Self)^.clr := $00020000;
  96994. end;
  96995. procedure TCAN2_C2FSTAT.setFIFOIP17(thebits : TBits_1); inline;
  96996. begin
  96997. if thebits = 0 then
  96998. pTDefRegMap(@Self)^.clr := $00020000
  96999. else
  97000. pTDefRegMap(@Self)^.&set := $00020000;
  97001. end;
  97002. function TCAN2_C2FSTAT.getFIFOIP17 : TBits_1; inline;
  97003. begin
  97004. getFIFOIP17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  97005. end;
  97006. procedure TCAN2_C2FSTAT.setFIFOIP18; inline;
  97007. begin
  97008. pTDefRegMap(@Self)^.&set := $00040000;
  97009. end;
  97010. procedure TCAN2_C2FSTAT.clearFIFOIP18; inline;
  97011. begin
  97012. pTDefRegMap(@Self)^.clr := $00040000;
  97013. end;
  97014. procedure TCAN2_C2FSTAT.setFIFOIP18(thebits : TBits_1); inline;
  97015. begin
  97016. if thebits = 0 then
  97017. pTDefRegMap(@Self)^.clr := $00040000
  97018. else
  97019. pTDefRegMap(@Self)^.&set := $00040000;
  97020. end;
  97021. function TCAN2_C2FSTAT.getFIFOIP18 : TBits_1; inline;
  97022. begin
  97023. getFIFOIP18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  97024. end;
  97025. procedure TCAN2_C2FSTAT.setFIFOIP19; inline;
  97026. begin
  97027. pTDefRegMap(@Self)^.&set := $00080000;
  97028. end;
  97029. procedure TCAN2_C2FSTAT.clearFIFOIP19; inline;
  97030. begin
  97031. pTDefRegMap(@Self)^.clr := $00080000;
  97032. end;
  97033. procedure TCAN2_C2FSTAT.setFIFOIP19(thebits : TBits_1); inline;
  97034. begin
  97035. if thebits = 0 then
  97036. pTDefRegMap(@Self)^.clr := $00080000
  97037. else
  97038. pTDefRegMap(@Self)^.&set := $00080000;
  97039. end;
  97040. function TCAN2_C2FSTAT.getFIFOIP19 : TBits_1; inline;
  97041. begin
  97042. getFIFOIP19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  97043. end;
  97044. procedure TCAN2_C2FSTAT.setFIFOIP20; inline;
  97045. begin
  97046. pTDefRegMap(@Self)^.&set := $00100000;
  97047. end;
  97048. procedure TCAN2_C2FSTAT.clearFIFOIP20; inline;
  97049. begin
  97050. pTDefRegMap(@Self)^.clr := $00100000;
  97051. end;
  97052. procedure TCAN2_C2FSTAT.setFIFOIP20(thebits : TBits_1); inline;
  97053. begin
  97054. if thebits = 0 then
  97055. pTDefRegMap(@Self)^.clr := $00100000
  97056. else
  97057. pTDefRegMap(@Self)^.&set := $00100000;
  97058. end;
  97059. function TCAN2_C2FSTAT.getFIFOIP20 : TBits_1; inline;
  97060. begin
  97061. getFIFOIP20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  97062. end;
  97063. procedure TCAN2_C2FSTAT.setFIFOIP21; inline;
  97064. begin
  97065. pTDefRegMap(@Self)^.&set := $00200000;
  97066. end;
  97067. procedure TCAN2_C2FSTAT.clearFIFOIP21; inline;
  97068. begin
  97069. pTDefRegMap(@Self)^.clr := $00200000;
  97070. end;
  97071. procedure TCAN2_C2FSTAT.setFIFOIP21(thebits : TBits_1); inline;
  97072. begin
  97073. if thebits = 0 then
  97074. pTDefRegMap(@Self)^.clr := $00200000
  97075. else
  97076. pTDefRegMap(@Self)^.&set := $00200000;
  97077. end;
  97078. function TCAN2_C2FSTAT.getFIFOIP21 : TBits_1; inline;
  97079. begin
  97080. getFIFOIP21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  97081. end;
  97082. procedure TCAN2_C2FSTAT.setFIFOIP22; inline;
  97083. begin
  97084. pTDefRegMap(@Self)^.&set := $00400000;
  97085. end;
  97086. procedure TCAN2_C2FSTAT.clearFIFOIP22; inline;
  97087. begin
  97088. pTDefRegMap(@Self)^.clr := $00400000;
  97089. end;
  97090. procedure TCAN2_C2FSTAT.setFIFOIP22(thebits : TBits_1); inline;
  97091. begin
  97092. if thebits = 0 then
  97093. pTDefRegMap(@Self)^.clr := $00400000
  97094. else
  97095. pTDefRegMap(@Self)^.&set := $00400000;
  97096. end;
  97097. function TCAN2_C2FSTAT.getFIFOIP22 : TBits_1; inline;
  97098. begin
  97099. getFIFOIP22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  97100. end;
  97101. procedure TCAN2_C2FSTAT.setFIFOIP23; inline;
  97102. begin
  97103. pTDefRegMap(@Self)^.&set := $00800000;
  97104. end;
  97105. procedure TCAN2_C2FSTAT.clearFIFOIP23; inline;
  97106. begin
  97107. pTDefRegMap(@Self)^.clr := $00800000;
  97108. end;
  97109. procedure TCAN2_C2FSTAT.setFIFOIP23(thebits : TBits_1); inline;
  97110. begin
  97111. if thebits = 0 then
  97112. pTDefRegMap(@Self)^.clr := $00800000
  97113. else
  97114. pTDefRegMap(@Self)^.&set := $00800000;
  97115. end;
  97116. function TCAN2_C2FSTAT.getFIFOIP23 : TBits_1; inline;
  97117. begin
  97118. getFIFOIP23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  97119. end;
  97120. procedure TCAN2_C2FSTAT.setFIFOIP24; inline;
  97121. begin
  97122. pTDefRegMap(@Self)^.&set := $01000000;
  97123. end;
  97124. procedure TCAN2_C2FSTAT.clearFIFOIP24; inline;
  97125. begin
  97126. pTDefRegMap(@Self)^.clr := $01000000;
  97127. end;
  97128. procedure TCAN2_C2FSTAT.setFIFOIP24(thebits : TBits_1); inline;
  97129. begin
  97130. if thebits = 0 then
  97131. pTDefRegMap(@Self)^.clr := $01000000
  97132. else
  97133. pTDefRegMap(@Self)^.&set := $01000000;
  97134. end;
  97135. function TCAN2_C2FSTAT.getFIFOIP24 : TBits_1; inline;
  97136. begin
  97137. getFIFOIP24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  97138. end;
  97139. procedure TCAN2_C2FSTAT.setFIFOIP25; inline;
  97140. begin
  97141. pTDefRegMap(@Self)^.&set := $02000000;
  97142. end;
  97143. procedure TCAN2_C2FSTAT.clearFIFOIP25; inline;
  97144. begin
  97145. pTDefRegMap(@Self)^.clr := $02000000;
  97146. end;
  97147. procedure TCAN2_C2FSTAT.setFIFOIP25(thebits : TBits_1); inline;
  97148. begin
  97149. if thebits = 0 then
  97150. pTDefRegMap(@Self)^.clr := $02000000
  97151. else
  97152. pTDefRegMap(@Self)^.&set := $02000000;
  97153. end;
  97154. function TCAN2_C2FSTAT.getFIFOIP25 : TBits_1; inline;
  97155. begin
  97156. getFIFOIP25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  97157. end;
  97158. procedure TCAN2_C2FSTAT.setFIFOIP26; inline;
  97159. begin
  97160. pTDefRegMap(@Self)^.&set := $04000000;
  97161. end;
  97162. procedure TCAN2_C2FSTAT.clearFIFOIP26; inline;
  97163. begin
  97164. pTDefRegMap(@Self)^.clr := $04000000;
  97165. end;
  97166. procedure TCAN2_C2FSTAT.setFIFOIP26(thebits : TBits_1); inline;
  97167. begin
  97168. if thebits = 0 then
  97169. pTDefRegMap(@Self)^.clr := $04000000
  97170. else
  97171. pTDefRegMap(@Self)^.&set := $04000000;
  97172. end;
  97173. function TCAN2_C2FSTAT.getFIFOIP26 : TBits_1; inline;
  97174. begin
  97175. getFIFOIP26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  97176. end;
  97177. procedure TCAN2_C2FSTAT.setFIFOIP27; inline;
  97178. begin
  97179. pTDefRegMap(@Self)^.&set := $08000000;
  97180. end;
  97181. procedure TCAN2_C2FSTAT.clearFIFOIP27; inline;
  97182. begin
  97183. pTDefRegMap(@Self)^.clr := $08000000;
  97184. end;
  97185. procedure TCAN2_C2FSTAT.setFIFOIP27(thebits : TBits_1); inline;
  97186. begin
  97187. if thebits = 0 then
  97188. pTDefRegMap(@Self)^.clr := $08000000
  97189. else
  97190. pTDefRegMap(@Self)^.&set := $08000000;
  97191. end;
  97192. function TCAN2_C2FSTAT.getFIFOIP27 : TBits_1; inline;
  97193. begin
  97194. getFIFOIP27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  97195. end;
  97196. procedure TCAN2_C2FSTAT.setFIFOIP28; inline;
  97197. begin
  97198. pTDefRegMap(@Self)^.&set := $10000000;
  97199. end;
  97200. procedure TCAN2_C2FSTAT.clearFIFOIP28; inline;
  97201. begin
  97202. pTDefRegMap(@Self)^.clr := $10000000;
  97203. end;
  97204. procedure TCAN2_C2FSTAT.setFIFOIP28(thebits : TBits_1); inline;
  97205. begin
  97206. if thebits = 0 then
  97207. pTDefRegMap(@Self)^.clr := $10000000
  97208. else
  97209. pTDefRegMap(@Self)^.&set := $10000000;
  97210. end;
  97211. function TCAN2_C2FSTAT.getFIFOIP28 : TBits_1; inline;
  97212. begin
  97213. getFIFOIP28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  97214. end;
  97215. procedure TCAN2_C2FSTAT.setFIFOIP29; inline;
  97216. begin
  97217. pTDefRegMap(@Self)^.&set := $20000000;
  97218. end;
  97219. procedure TCAN2_C2FSTAT.clearFIFOIP29; inline;
  97220. begin
  97221. pTDefRegMap(@Self)^.clr := $20000000;
  97222. end;
  97223. procedure TCAN2_C2FSTAT.setFIFOIP29(thebits : TBits_1); inline;
  97224. begin
  97225. if thebits = 0 then
  97226. pTDefRegMap(@Self)^.clr := $20000000
  97227. else
  97228. pTDefRegMap(@Self)^.&set := $20000000;
  97229. end;
  97230. function TCAN2_C2FSTAT.getFIFOIP29 : TBits_1; inline;
  97231. begin
  97232. getFIFOIP29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  97233. end;
  97234. procedure TCAN2_C2FSTAT.setFIFOIP30; inline;
  97235. begin
  97236. pTDefRegMap(@Self)^.&set := $40000000;
  97237. end;
  97238. procedure TCAN2_C2FSTAT.clearFIFOIP30; inline;
  97239. begin
  97240. pTDefRegMap(@Self)^.clr := $40000000;
  97241. end;
  97242. procedure TCAN2_C2FSTAT.setFIFOIP30(thebits : TBits_1); inline;
  97243. begin
  97244. if thebits = 0 then
  97245. pTDefRegMap(@Self)^.clr := $40000000
  97246. else
  97247. pTDefRegMap(@Self)^.&set := $40000000;
  97248. end;
  97249. function TCAN2_C2FSTAT.getFIFOIP30 : TBits_1; inline;
  97250. begin
  97251. getFIFOIP30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  97252. end;
  97253. procedure TCAN2_C2FSTAT.setFIFOIP31; inline;
  97254. begin
  97255. pTDefRegMap(@Self)^.&set := $80000000;
  97256. end;
  97257. procedure TCAN2_C2FSTAT.clearFIFOIP31; inline;
  97258. begin
  97259. pTDefRegMap(@Self)^.clr := $80000000;
  97260. end;
  97261. procedure TCAN2_C2FSTAT.setFIFOIP31(thebits : TBits_1); inline;
  97262. begin
  97263. if thebits = 0 then
  97264. pTDefRegMap(@Self)^.clr := $80000000
  97265. else
  97266. pTDefRegMap(@Self)^.&set := $80000000;
  97267. end;
  97268. function TCAN2_C2FSTAT.getFIFOIP31 : TBits_1; inline;
  97269. begin
  97270. getFIFOIP31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  97271. end;
  97272. procedure TCAN2_C2FSTAT.setw(thebits : TBits_32); inline;
  97273. begin
  97274. pTDefRegMap(@Self)^.val := thebits;
  97275. end;
  97276. function TCAN2_C2FSTAT.getw : TBits_32; inline;
  97277. begin
  97278. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97279. end;
  97280. procedure TCAN2_C2RXOVF.setRXOVF(thebits : TBits_32); inline;
  97281. begin
  97282. pTDefRegMap(@Self)^.val := thebits;
  97283. end;
  97284. function TCAN2_C2RXOVF.getRXOVF : TBits_32; inline;
  97285. begin
  97286. getRXOVF := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97287. end;
  97288. procedure TCAN2_C2RXOVF.setRXOVF0; inline;
  97289. begin
  97290. pTDefRegMap(@Self)^.&set := $00000001;
  97291. end;
  97292. procedure TCAN2_C2RXOVF.clearRXOVF0; inline;
  97293. begin
  97294. pTDefRegMap(@Self)^.clr := $00000001;
  97295. end;
  97296. procedure TCAN2_C2RXOVF.setRXOVF0(thebits : TBits_1); inline;
  97297. begin
  97298. if thebits = 0 then
  97299. pTDefRegMap(@Self)^.clr := $00000001
  97300. else
  97301. pTDefRegMap(@Self)^.&set := $00000001;
  97302. end;
  97303. function TCAN2_C2RXOVF.getRXOVF0 : TBits_1; inline;
  97304. begin
  97305. getRXOVF0 := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  97306. end;
  97307. procedure TCAN2_C2RXOVF.setRXOVF1; inline;
  97308. begin
  97309. pTDefRegMap(@Self)^.&set := $00000002;
  97310. end;
  97311. procedure TCAN2_C2RXOVF.clearRXOVF1; inline;
  97312. begin
  97313. pTDefRegMap(@Self)^.clr := $00000002;
  97314. end;
  97315. procedure TCAN2_C2RXOVF.setRXOVF1(thebits : TBits_1); inline;
  97316. begin
  97317. if thebits = 0 then
  97318. pTDefRegMap(@Self)^.clr := $00000002
  97319. else
  97320. pTDefRegMap(@Self)^.&set := $00000002;
  97321. end;
  97322. function TCAN2_C2RXOVF.getRXOVF1 : TBits_1; inline;
  97323. begin
  97324. getRXOVF1 := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  97325. end;
  97326. procedure TCAN2_C2RXOVF.setRXOVF2; inline;
  97327. begin
  97328. pTDefRegMap(@Self)^.&set := $00000004;
  97329. end;
  97330. procedure TCAN2_C2RXOVF.clearRXOVF2; inline;
  97331. begin
  97332. pTDefRegMap(@Self)^.clr := $00000004;
  97333. end;
  97334. procedure TCAN2_C2RXOVF.setRXOVF2(thebits : TBits_1); inline;
  97335. begin
  97336. if thebits = 0 then
  97337. pTDefRegMap(@Self)^.clr := $00000004
  97338. else
  97339. pTDefRegMap(@Self)^.&set := $00000004;
  97340. end;
  97341. function TCAN2_C2RXOVF.getRXOVF2 : TBits_1; inline;
  97342. begin
  97343. getRXOVF2 := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  97344. end;
  97345. procedure TCAN2_C2RXOVF.setRXOVF3; inline;
  97346. begin
  97347. pTDefRegMap(@Self)^.&set := $00000008;
  97348. end;
  97349. procedure TCAN2_C2RXOVF.clearRXOVF3; inline;
  97350. begin
  97351. pTDefRegMap(@Self)^.clr := $00000008;
  97352. end;
  97353. procedure TCAN2_C2RXOVF.setRXOVF3(thebits : TBits_1); inline;
  97354. begin
  97355. if thebits = 0 then
  97356. pTDefRegMap(@Self)^.clr := $00000008
  97357. else
  97358. pTDefRegMap(@Self)^.&set := $00000008;
  97359. end;
  97360. function TCAN2_C2RXOVF.getRXOVF3 : TBits_1; inline;
  97361. begin
  97362. getRXOVF3 := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  97363. end;
  97364. procedure TCAN2_C2RXOVF.setRXOVF4; inline;
  97365. begin
  97366. pTDefRegMap(@Self)^.&set := $00000010;
  97367. end;
  97368. procedure TCAN2_C2RXOVF.clearRXOVF4; inline;
  97369. begin
  97370. pTDefRegMap(@Self)^.clr := $00000010;
  97371. end;
  97372. procedure TCAN2_C2RXOVF.setRXOVF4(thebits : TBits_1); inline;
  97373. begin
  97374. if thebits = 0 then
  97375. pTDefRegMap(@Self)^.clr := $00000010
  97376. else
  97377. pTDefRegMap(@Self)^.&set := $00000010;
  97378. end;
  97379. function TCAN2_C2RXOVF.getRXOVF4 : TBits_1; inline;
  97380. begin
  97381. getRXOVF4 := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  97382. end;
  97383. procedure TCAN2_C2RXOVF.setRXOVF5; inline;
  97384. begin
  97385. pTDefRegMap(@Self)^.&set := $00000020;
  97386. end;
  97387. procedure TCAN2_C2RXOVF.clearRXOVF5; inline;
  97388. begin
  97389. pTDefRegMap(@Self)^.clr := $00000020;
  97390. end;
  97391. procedure TCAN2_C2RXOVF.setRXOVF5(thebits : TBits_1); inline;
  97392. begin
  97393. if thebits = 0 then
  97394. pTDefRegMap(@Self)^.clr := $00000020
  97395. else
  97396. pTDefRegMap(@Self)^.&set := $00000020;
  97397. end;
  97398. function TCAN2_C2RXOVF.getRXOVF5 : TBits_1; inline;
  97399. begin
  97400. getRXOVF5 := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  97401. end;
  97402. procedure TCAN2_C2RXOVF.setRXOVF6; inline;
  97403. begin
  97404. pTDefRegMap(@Self)^.&set := $00000040;
  97405. end;
  97406. procedure TCAN2_C2RXOVF.clearRXOVF6; inline;
  97407. begin
  97408. pTDefRegMap(@Self)^.clr := $00000040;
  97409. end;
  97410. procedure TCAN2_C2RXOVF.setRXOVF6(thebits : TBits_1); inline;
  97411. begin
  97412. if thebits = 0 then
  97413. pTDefRegMap(@Self)^.clr := $00000040
  97414. else
  97415. pTDefRegMap(@Self)^.&set := $00000040;
  97416. end;
  97417. function TCAN2_C2RXOVF.getRXOVF6 : TBits_1; inline;
  97418. begin
  97419. getRXOVF6 := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  97420. end;
  97421. procedure TCAN2_C2RXOVF.setRXOVF7; inline;
  97422. begin
  97423. pTDefRegMap(@Self)^.&set := $00000080;
  97424. end;
  97425. procedure TCAN2_C2RXOVF.clearRXOVF7; inline;
  97426. begin
  97427. pTDefRegMap(@Self)^.clr := $00000080;
  97428. end;
  97429. procedure TCAN2_C2RXOVF.setRXOVF7(thebits : TBits_1); inline;
  97430. begin
  97431. if thebits = 0 then
  97432. pTDefRegMap(@Self)^.clr := $00000080
  97433. else
  97434. pTDefRegMap(@Self)^.&set := $00000080;
  97435. end;
  97436. function TCAN2_C2RXOVF.getRXOVF7 : TBits_1; inline;
  97437. begin
  97438. getRXOVF7 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  97439. end;
  97440. procedure TCAN2_C2RXOVF.setRXOVF8; inline;
  97441. begin
  97442. pTDefRegMap(@Self)^.&set := $00000100;
  97443. end;
  97444. procedure TCAN2_C2RXOVF.clearRXOVF8; inline;
  97445. begin
  97446. pTDefRegMap(@Self)^.clr := $00000100;
  97447. end;
  97448. procedure TCAN2_C2RXOVF.setRXOVF8(thebits : TBits_1); inline;
  97449. begin
  97450. if thebits = 0 then
  97451. pTDefRegMap(@Self)^.clr := $00000100
  97452. else
  97453. pTDefRegMap(@Self)^.&set := $00000100;
  97454. end;
  97455. function TCAN2_C2RXOVF.getRXOVF8 : TBits_1; inline;
  97456. begin
  97457. getRXOVF8 := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  97458. end;
  97459. procedure TCAN2_C2RXOVF.setRXOVF9; inline;
  97460. begin
  97461. pTDefRegMap(@Self)^.&set := $00000200;
  97462. end;
  97463. procedure TCAN2_C2RXOVF.clearRXOVF9; inline;
  97464. begin
  97465. pTDefRegMap(@Self)^.clr := $00000200;
  97466. end;
  97467. procedure TCAN2_C2RXOVF.setRXOVF9(thebits : TBits_1); inline;
  97468. begin
  97469. if thebits = 0 then
  97470. pTDefRegMap(@Self)^.clr := $00000200
  97471. else
  97472. pTDefRegMap(@Self)^.&set := $00000200;
  97473. end;
  97474. function TCAN2_C2RXOVF.getRXOVF9 : TBits_1; inline;
  97475. begin
  97476. getRXOVF9 := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  97477. end;
  97478. procedure TCAN2_C2RXOVF.setRXOVF10; inline;
  97479. begin
  97480. pTDefRegMap(@Self)^.&set := $00000400;
  97481. end;
  97482. procedure TCAN2_C2RXOVF.clearRXOVF10; inline;
  97483. begin
  97484. pTDefRegMap(@Self)^.clr := $00000400;
  97485. end;
  97486. procedure TCAN2_C2RXOVF.setRXOVF10(thebits : TBits_1); inline;
  97487. begin
  97488. if thebits = 0 then
  97489. pTDefRegMap(@Self)^.clr := $00000400
  97490. else
  97491. pTDefRegMap(@Self)^.&set := $00000400;
  97492. end;
  97493. function TCAN2_C2RXOVF.getRXOVF10 : TBits_1; inline;
  97494. begin
  97495. getRXOVF10 := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  97496. end;
  97497. procedure TCAN2_C2RXOVF.setRXOVF11; inline;
  97498. begin
  97499. pTDefRegMap(@Self)^.&set := $00000800;
  97500. end;
  97501. procedure TCAN2_C2RXOVF.clearRXOVF11; inline;
  97502. begin
  97503. pTDefRegMap(@Self)^.clr := $00000800;
  97504. end;
  97505. procedure TCAN2_C2RXOVF.setRXOVF11(thebits : TBits_1); inline;
  97506. begin
  97507. if thebits = 0 then
  97508. pTDefRegMap(@Self)^.clr := $00000800
  97509. else
  97510. pTDefRegMap(@Self)^.&set := $00000800;
  97511. end;
  97512. function TCAN2_C2RXOVF.getRXOVF11 : TBits_1; inline;
  97513. begin
  97514. getRXOVF11 := (pTDefRegMap(@Self)^.val and $00000800) shr 11;
  97515. end;
  97516. procedure TCAN2_C2RXOVF.setRXOVF12; inline;
  97517. begin
  97518. pTDefRegMap(@Self)^.&set := $00001000;
  97519. end;
  97520. procedure TCAN2_C2RXOVF.clearRXOVF12; inline;
  97521. begin
  97522. pTDefRegMap(@Self)^.clr := $00001000;
  97523. end;
  97524. procedure TCAN2_C2RXOVF.setRXOVF12(thebits : TBits_1); inline;
  97525. begin
  97526. if thebits = 0 then
  97527. pTDefRegMap(@Self)^.clr := $00001000
  97528. else
  97529. pTDefRegMap(@Self)^.&set := $00001000;
  97530. end;
  97531. function TCAN2_C2RXOVF.getRXOVF12 : TBits_1; inline;
  97532. begin
  97533. getRXOVF12 := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  97534. end;
  97535. procedure TCAN2_C2RXOVF.setRXOVF13; inline;
  97536. begin
  97537. pTDefRegMap(@Self)^.&set := $00002000;
  97538. end;
  97539. procedure TCAN2_C2RXOVF.clearRXOVF13; inline;
  97540. begin
  97541. pTDefRegMap(@Self)^.clr := $00002000;
  97542. end;
  97543. procedure TCAN2_C2RXOVF.setRXOVF13(thebits : TBits_1); inline;
  97544. begin
  97545. if thebits = 0 then
  97546. pTDefRegMap(@Self)^.clr := $00002000
  97547. else
  97548. pTDefRegMap(@Self)^.&set := $00002000;
  97549. end;
  97550. function TCAN2_C2RXOVF.getRXOVF13 : TBits_1; inline;
  97551. begin
  97552. getRXOVF13 := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  97553. end;
  97554. procedure TCAN2_C2RXOVF.setRXOVF14; inline;
  97555. begin
  97556. pTDefRegMap(@Self)^.&set := $00004000;
  97557. end;
  97558. procedure TCAN2_C2RXOVF.clearRXOVF14; inline;
  97559. begin
  97560. pTDefRegMap(@Self)^.clr := $00004000;
  97561. end;
  97562. procedure TCAN2_C2RXOVF.setRXOVF14(thebits : TBits_1); inline;
  97563. begin
  97564. if thebits = 0 then
  97565. pTDefRegMap(@Self)^.clr := $00004000
  97566. else
  97567. pTDefRegMap(@Self)^.&set := $00004000;
  97568. end;
  97569. function TCAN2_C2RXOVF.getRXOVF14 : TBits_1; inline;
  97570. begin
  97571. getRXOVF14 := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  97572. end;
  97573. procedure TCAN2_C2RXOVF.setRXOVF15; inline;
  97574. begin
  97575. pTDefRegMap(@Self)^.&set := $00008000;
  97576. end;
  97577. procedure TCAN2_C2RXOVF.clearRXOVF15; inline;
  97578. begin
  97579. pTDefRegMap(@Self)^.clr := $00008000;
  97580. end;
  97581. procedure TCAN2_C2RXOVF.setRXOVF15(thebits : TBits_1); inline;
  97582. begin
  97583. if thebits = 0 then
  97584. pTDefRegMap(@Self)^.clr := $00008000
  97585. else
  97586. pTDefRegMap(@Self)^.&set := $00008000;
  97587. end;
  97588. function TCAN2_C2RXOVF.getRXOVF15 : TBits_1; inline;
  97589. begin
  97590. getRXOVF15 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  97591. end;
  97592. procedure TCAN2_C2RXOVF.setRXOVF16; inline;
  97593. begin
  97594. pTDefRegMap(@Self)^.&set := $00010000;
  97595. end;
  97596. procedure TCAN2_C2RXOVF.clearRXOVF16; inline;
  97597. begin
  97598. pTDefRegMap(@Self)^.clr := $00010000;
  97599. end;
  97600. procedure TCAN2_C2RXOVF.setRXOVF16(thebits : TBits_1); inline;
  97601. begin
  97602. if thebits = 0 then
  97603. pTDefRegMap(@Self)^.clr := $00010000
  97604. else
  97605. pTDefRegMap(@Self)^.&set := $00010000;
  97606. end;
  97607. function TCAN2_C2RXOVF.getRXOVF16 : TBits_1; inline;
  97608. begin
  97609. getRXOVF16 := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  97610. end;
  97611. procedure TCAN2_C2RXOVF.setRXOVF17; inline;
  97612. begin
  97613. pTDefRegMap(@Self)^.&set := $00020000;
  97614. end;
  97615. procedure TCAN2_C2RXOVF.clearRXOVF17; inline;
  97616. begin
  97617. pTDefRegMap(@Self)^.clr := $00020000;
  97618. end;
  97619. procedure TCAN2_C2RXOVF.setRXOVF17(thebits : TBits_1); inline;
  97620. begin
  97621. if thebits = 0 then
  97622. pTDefRegMap(@Self)^.clr := $00020000
  97623. else
  97624. pTDefRegMap(@Self)^.&set := $00020000;
  97625. end;
  97626. function TCAN2_C2RXOVF.getRXOVF17 : TBits_1; inline;
  97627. begin
  97628. getRXOVF17 := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  97629. end;
  97630. procedure TCAN2_C2RXOVF.setRXOVF18; inline;
  97631. begin
  97632. pTDefRegMap(@Self)^.&set := $00040000;
  97633. end;
  97634. procedure TCAN2_C2RXOVF.clearRXOVF18; inline;
  97635. begin
  97636. pTDefRegMap(@Self)^.clr := $00040000;
  97637. end;
  97638. procedure TCAN2_C2RXOVF.setRXOVF18(thebits : TBits_1); inline;
  97639. begin
  97640. if thebits = 0 then
  97641. pTDefRegMap(@Self)^.clr := $00040000
  97642. else
  97643. pTDefRegMap(@Self)^.&set := $00040000;
  97644. end;
  97645. function TCAN2_C2RXOVF.getRXOVF18 : TBits_1; inline;
  97646. begin
  97647. getRXOVF18 := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  97648. end;
  97649. procedure TCAN2_C2RXOVF.setRXOVF19; inline;
  97650. begin
  97651. pTDefRegMap(@Self)^.&set := $00080000;
  97652. end;
  97653. procedure TCAN2_C2RXOVF.clearRXOVF19; inline;
  97654. begin
  97655. pTDefRegMap(@Self)^.clr := $00080000;
  97656. end;
  97657. procedure TCAN2_C2RXOVF.setRXOVF19(thebits : TBits_1); inline;
  97658. begin
  97659. if thebits = 0 then
  97660. pTDefRegMap(@Self)^.clr := $00080000
  97661. else
  97662. pTDefRegMap(@Self)^.&set := $00080000;
  97663. end;
  97664. function TCAN2_C2RXOVF.getRXOVF19 : TBits_1; inline;
  97665. begin
  97666. getRXOVF19 := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  97667. end;
  97668. procedure TCAN2_C2RXOVF.setRXOVF20; inline;
  97669. begin
  97670. pTDefRegMap(@Self)^.&set := $00100000;
  97671. end;
  97672. procedure TCAN2_C2RXOVF.clearRXOVF20; inline;
  97673. begin
  97674. pTDefRegMap(@Self)^.clr := $00100000;
  97675. end;
  97676. procedure TCAN2_C2RXOVF.setRXOVF20(thebits : TBits_1); inline;
  97677. begin
  97678. if thebits = 0 then
  97679. pTDefRegMap(@Self)^.clr := $00100000
  97680. else
  97681. pTDefRegMap(@Self)^.&set := $00100000;
  97682. end;
  97683. function TCAN2_C2RXOVF.getRXOVF20 : TBits_1; inline;
  97684. begin
  97685. getRXOVF20 := (pTDefRegMap(@Self)^.val and $00100000) shr 20;
  97686. end;
  97687. procedure TCAN2_C2RXOVF.setRXOVF21; inline;
  97688. begin
  97689. pTDefRegMap(@Self)^.&set := $00200000;
  97690. end;
  97691. procedure TCAN2_C2RXOVF.clearRXOVF21; inline;
  97692. begin
  97693. pTDefRegMap(@Self)^.clr := $00200000;
  97694. end;
  97695. procedure TCAN2_C2RXOVF.setRXOVF21(thebits : TBits_1); inline;
  97696. begin
  97697. if thebits = 0 then
  97698. pTDefRegMap(@Self)^.clr := $00200000
  97699. else
  97700. pTDefRegMap(@Self)^.&set := $00200000;
  97701. end;
  97702. function TCAN2_C2RXOVF.getRXOVF21 : TBits_1; inline;
  97703. begin
  97704. getRXOVF21 := (pTDefRegMap(@Self)^.val and $00200000) shr 21;
  97705. end;
  97706. procedure TCAN2_C2RXOVF.setRXOVF22; inline;
  97707. begin
  97708. pTDefRegMap(@Self)^.&set := $00400000;
  97709. end;
  97710. procedure TCAN2_C2RXOVF.clearRXOVF22; inline;
  97711. begin
  97712. pTDefRegMap(@Self)^.clr := $00400000;
  97713. end;
  97714. procedure TCAN2_C2RXOVF.setRXOVF22(thebits : TBits_1); inline;
  97715. begin
  97716. if thebits = 0 then
  97717. pTDefRegMap(@Self)^.clr := $00400000
  97718. else
  97719. pTDefRegMap(@Self)^.&set := $00400000;
  97720. end;
  97721. function TCAN2_C2RXOVF.getRXOVF22 : TBits_1; inline;
  97722. begin
  97723. getRXOVF22 := (pTDefRegMap(@Self)^.val and $00400000) shr 22;
  97724. end;
  97725. procedure TCAN2_C2RXOVF.setRXOVF23; inline;
  97726. begin
  97727. pTDefRegMap(@Self)^.&set := $00800000;
  97728. end;
  97729. procedure TCAN2_C2RXOVF.clearRXOVF23; inline;
  97730. begin
  97731. pTDefRegMap(@Self)^.clr := $00800000;
  97732. end;
  97733. procedure TCAN2_C2RXOVF.setRXOVF23(thebits : TBits_1); inline;
  97734. begin
  97735. if thebits = 0 then
  97736. pTDefRegMap(@Self)^.clr := $00800000
  97737. else
  97738. pTDefRegMap(@Self)^.&set := $00800000;
  97739. end;
  97740. function TCAN2_C2RXOVF.getRXOVF23 : TBits_1; inline;
  97741. begin
  97742. getRXOVF23 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  97743. end;
  97744. procedure TCAN2_C2RXOVF.setRXOVF24; inline;
  97745. begin
  97746. pTDefRegMap(@Self)^.&set := $01000000;
  97747. end;
  97748. procedure TCAN2_C2RXOVF.clearRXOVF24; inline;
  97749. begin
  97750. pTDefRegMap(@Self)^.clr := $01000000;
  97751. end;
  97752. procedure TCAN2_C2RXOVF.setRXOVF24(thebits : TBits_1); inline;
  97753. begin
  97754. if thebits = 0 then
  97755. pTDefRegMap(@Self)^.clr := $01000000
  97756. else
  97757. pTDefRegMap(@Self)^.&set := $01000000;
  97758. end;
  97759. function TCAN2_C2RXOVF.getRXOVF24 : TBits_1; inline;
  97760. begin
  97761. getRXOVF24 := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  97762. end;
  97763. procedure TCAN2_C2RXOVF.setRXOVF25; inline;
  97764. begin
  97765. pTDefRegMap(@Self)^.&set := $02000000;
  97766. end;
  97767. procedure TCAN2_C2RXOVF.clearRXOVF25; inline;
  97768. begin
  97769. pTDefRegMap(@Self)^.clr := $02000000;
  97770. end;
  97771. procedure TCAN2_C2RXOVF.setRXOVF25(thebits : TBits_1); inline;
  97772. begin
  97773. if thebits = 0 then
  97774. pTDefRegMap(@Self)^.clr := $02000000
  97775. else
  97776. pTDefRegMap(@Self)^.&set := $02000000;
  97777. end;
  97778. function TCAN2_C2RXOVF.getRXOVF25 : TBits_1; inline;
  97779. begin
  97780. getRXOVF25 := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  97781. end;
  97782. procedure TCAN2_C2RXOVF.setRXOVF26; inline;
  97783. begin
  97784. pTDefRegMap(@Self)^.&set := $04000000;
  97785. end;
  97786. procedure TCAN2_C2RXOVF.clearRXOVF26; inline;
  97787. begin
  97788. pTDefRegMap(@Self)^.clr := $04000000;
  97789. end;
  97790. procedure TCAN2_C2RXOVF.setRXOVF26(thebits : TBits_1); inline;
  97791. begin
  97792. if thebits = 0 then
  97793. pTDefRegMap(@Self)^.clr := $04000000
  97794. else
  97795. pTDefRegMap(@Self)^.&set := $04000000;
  97796. end;
  97797. function TCAN2_C2RXOVF.getRXOVF26 : TBits_1; inline;
  97798. begin
  97799. getRXOVF26 := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  97800. end;
  97801. procedure TCAN2_C2RXOVF.setRXOVF27; inline;
  97802. begin
  97803. pTDefRegMap(@Self)^.&set := $08000000;
  97804. end;
  97805. procedure TCAN2_C2RXOVF.clearRXOVF27; inline;
  97806. begin
  97807. pTDefRegMap(@Self)^.clr := $08000000;
  97808. end;
  97809. procedure TCAN2_C2RXOVF.setRXOVF27(thebits : TBits_1); inline;
  97810. begin
  97811. if thebits = 0 then
  97812. pTDefRegMap(@Self)^.clr := $08000000
  97813. else
  97814. pTDefRegMap(@Self)^.&set := $08000000;
  97815. end;
  97816. function TCAN2_C2RXOVF.getRXOVF27 : TBits_1; inline;
  97817. begin
  97818. getRXOVF27 := (pTDefRegMap(@Self)^.val and $08000000) shr 27;
  97819. end;
  97820. procedure TCAN2_C2RXOVF.setRXOVF28; inline;
  97821. begin
  97822. pTDefRegMap(@Self)^.&set := $10000000;
  97823. end;
  97824. procedure TCAN2_C2RXOVF.clearRXOVF28; inline;
  97825. begin
  97826. pTDefRegMap(@Self)^.clr := $10000000;
  97827. end;
  97828. procedure TCAN2_C2RXOVF.setRXOVF28(thebits : TBits_1); inline;
  97829. begin
  97830. if thebits = 0 then
  97831. pTDefRegMap(@Self)^.clr := $10000000
  97832. else
  97833. pTDefRegMap(@Self)^.&set := $10000000;
  97834. end;
  97835. function TCAN2_C2RXOVF.getRXOVF28 : TBits_1; inline;
  97836. begin
  97837. getRXOVF28 := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  97838. end;
  97839. procedure TCAN2_C2RXOVF.setRXOVF29; inline;
  97840. begin
  97841. pTDefRegMap(@Self)^.&set := $20000000;
  97842. end;
  97843. procedure TCAN2_C2RXOVF.clearRXOVF29; inline;
  97844. begin
  97845. pTDefRegMap(@Self)^.clr := $20000000;
  97846. end;
  97847. procedure TCAN2_C2RXOVF.setRXOVF29(thebits : TBits_1); inline;
  97848. begin
  97849. if thebits = 0 then
  97850. pTDefRegMap(@Self)^.clr := $20000000
  97851. else
  97852. pTDefRegMap(@Self)^.&set := $20000000;
  97853. end;
  97854. function TCAN2_C2RXOVF.getRXOVF29 : TBits_1; inline;
  97855. begin
  97856. getRXOVF29 := (pTDefRegMap(@Self)^.val and $20000000) shr 29;
  97857. end;
  97858. procedure TCAN2_C2RXOVF.setRXOVF30; inline;
  97859. begin
  97860. pTDefRegMap(@Self)^.&set := $40000000;
  97861. end;
  97862. procedure TCAN2_C2RXOVF.clearRXOVF30; inline;
  97863. begin
  97864. pTDefRegMap(@Self)^.clr := $40000000;
  97865. end;
  97866. procedure TCAN2_C2RXOVF.setRXOVF30(thebits : TBits_1); inline;
  97867. begin
  97868. if thebits = 0 then
  97869. pTDefRegMap(@Self)^.clr := $40000000
  97870. else
  97871. pTDefRegMap(@Self)^.&set := $40000000;
  97872. end;
  97873. function TCAN2_C2RXOVF.getRXOVF30 : TBits_1; inline;
  97874. begin
  97875. getRXOVF30 := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  97876. end;
  97877. procedure TCAN2_C2RXOVF.setRXOVF31; inline;
  97878. begin
  97879. pTDefRegMap(@Self)^.&set := $80000000;
  97880. end;
  97881. procedure TCAN2_C2RXOVF.clearRXOVF31; inline;
  97882. begin
  97883. pTDefRegMap(@Self)^.clr := $80000000;
  97884. end;
  97885. procedure TCAN2_C2RXOVF.setRXOVF31(thebits : TBits_1); inline;
  97886. begin
  97887. if thebits = 0 then
  97888. pTDefRegMap(@Self)^.clr := $80000000
  97889. else
  97890. pTDefRegMap(@Self)^.&set := $80000000;
  97891. end;
  97892. function TCAN2_C2RXOVF.getRXOVF31 : TBits_1; inline;
  97893. begin
  97894. getRXOVF31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  97895. end;
  97896. procedure TCAN2_C2RXOVF.setw(thebits : TBits_32); inline;
  97897. begin
  97898. pTDefRegMap(@Self)^.val := thebits;
  97899. end;
  97900. function TCAN2_C2RXOVF.getw : TBits_32; inline;
  97901. begin
  97902. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97903. end;
  97904. procedure TCAN2_C2TMR.setCANTSPRE(thebits : TBits_16); inline;
  97905. begin
  97906. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  97907. end;
  97908. function TCAN2_C2TMR.getCANTSPRE : TBits_16; inline;
  97909. begin
  97910. getCANTSPRE := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  97911. end;
  97912. procedure TCAN2_C2TMR.setCANTS(thebits : TBits_16); inline;
  97913. begin
  97914. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $0000FFFF or ( thebits shl 16 );
  97915. end;
  97916. function TCAN2_C2TMR.getCANTS : TBits_16; inline;
  97917. begin
  97918. getCANTS := (pTDefRegMap(@Self)^.val and $FFFF0000) shr 16;
  97919. end;
  97920. procedure TCAN2_C2TMR.setw(thebits : TBits_32); inline;
  97921. begin
  97922. pTDefRegMap(@Self)^.val := thebits;
  97923. end;
  97924. function TCAN2_C2TMR.getw : TBits_32; inline;
  97925. begin
  97926. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97927. end;
  97928. procedure TCAN2_C2RXM0.setEID(thebits : TBits_18); inline;
  97929. begin
  97930. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  97931. end;
  97932. function TCAN2_C2RXM0.getEID : TBits_18; inline;
  97933. begin
  97934. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  97935. end;
  97936. procedure TCAN2_C2RXM0.setMIDE; inline;
  97937. begin
  97938. pTDefRegMap(@Self)^.&set := $00080000;
  97939. end;
  97940. procedure TCAN2_C2RXM0.clearMIDE; inline;
  97941. begin
  97942. pTDefRegMap(@Self)^.clr := $00080000;
  97943. end;
  97944. procedure TCAN2_C2RXM0.setMIDE(thebits : TBits_1); inline;
  97945. begin
  97946. if thebits = 0 then
  97947. pTDefRegMap(@Self)^.clr := $00080000
  97948. else
  97949. pTDefRegMap(@Self)^.&set := $00080000;
  97950. end;
  97951. function TCAN2_C2RXM0.getMIDE : TBits_1; inline;
  97952. begin
  97953. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  97954. end;
  97955. procedure TCAN2_C2RXM0.setSID(thebits : TBits_11); inline;
  97956. begin
  97957. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  97958. end;
  97959. function TCAN2_C2RXM0.getSID : TBits_11; inline;
  97960. begin
  97961. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  97962. end;
  97963. procedure TCAN2_C2RXM0.setw(thebits : TBits_32); inline;
  97964. begin
  97965. pTDefRegMap(@Self)^.val := thebits;
  97966. end;
  97967. function TCAN2_C2RXM0.getw : TBits_32; inline;
  97968. begin
  97969. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  97970. end;
  97971. procedure TCAN2_C2RXM1.setEID(thebits : TBits_18); inline;
  97972. begin
  97973. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  97974. end;
  97975. function TCAN2_C2RXM1.getEID : TBits_18; inline;
  97976. begin
  97977. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  97978. end;
  97979. procedure TCAN2_C2RXM1.setMIDE; inline;
  97980. begin
  97981. pTDefRegMap(@Self)^.&set := $00080000;
  97982. end;
  97983. procedure TCAN2_C2RXM1.clearMIDE; inline;
  97984. begin
  97985. pTDefRegMap(@Self)^.clr := $00080000;
  97986. end;
  97987. procedure TCAN2_C2RXM1.setMIDE(thebits : TBits_1); inline;
  97988. begin
  97989. if thebits = 0 then
  97990. pTDefRegMap(@Self)^.clr := $00080000
  97991. else
  97992. pTDefRegMap(@Self)^.&set := $00080000;
  97993. end;
  97994. function TCAN2_C2RXM1.getMIDE : TBits_1; inline;
  97995. begin
  97996. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  97997. end;
  97998. procedure TCAN2_C2RXM1.setSID(thebits : TBits_11); inline;
  97999. begin
  98000. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  98001. end;
  98002. function TCAN2_C2RXM1.getSID : TBits_11; inline;
  98003. begin
  98004. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  98005. end;
  98006. procedure TCAN2_C2RXM1.setw(thebits : TBits_32); inline;
  98007. begin
  98008. pTDefRegMap(@Self)^.val := thebits;
  98009. end;
  98010. function TCAN2_C2RXM1.getw : TBits_32; inline;
  98011. begin
  98012. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98013. end;
  98014. procedure TCAN2_C2RXM2.setEID(thebits : TBits_18); inline;
  98015. begin
  98016. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  98017. end;
  98018. function TCAN2_C2RXM2.getEID : TBits_18; inline;
  98019. begin
  98020. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  98021. end;
  98022. procedure TCAN2_C2RXM2.setMIDE; inline;
  98023. begin
  98024. pTDefRegMap(@Self)^.&set := $00080000;
  98025. end;
  98026. procedure TCAN2_C2RXM2.clearMIDE; inline;
  98027. begin
  98028. pTDefRegMap(@Self)^.clr := $00080000;
  98029. end;
  98030. procedure TCAN2_C2RXM2.setMIDE(thebits : TBits_1); inline;
  98031. begin
  98032. if thebits = 0 then
  98033. pTDefRegMap(@Self)^.clr := $00080000
  98034. else
  98035. pTDefRegMap(@Self)^.&set := $00080000;
  98036. end;
  98037. function TCAN2_C2RXM2.getMIDE : TBits_1; inline;
  98038. begin
  98039. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  98040. end;
  98041. procedure TCAN2_C2RXM2.setSID(thebits : TBits_11); inline;
  98042. begin
  98043. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  98044. end;
  98045. function TCAN2_C2RXM2.getSID : TBits_11; inline;
  98046. begin
  98047. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  98048. end;
  98049. procedure TCAN2_C2RXM2.setw(thebits : TBits_32); inline;
  98050. begin
  98051. pTDefRegMap(@Self)^.val := thebits;
  98052. end;
  98053. function TCAN2_C2RXM2.getw : TBits_32; inline;
  98054. begin
  98055. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98056. end;
  98057. procedure TCAN2_C2RXM3.setEID(thebits : TBits_18); inline;
  98058. begin
  98059. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  98060. end;
  98061. function TCAN2_C2RXM3.getEID : TBits_18; inline;
  98062. begin
  98063. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  98064. end;
  98065. procedure TCAN2_C2RXM3.setMIDE; inline;
  98066. begin
  98067. pTDefRegMap(@Self)^.&set := $00080000;
  98068. end;
  98069. procedure TCAN2_C2RXM3.clearMIDE; inline;
  98070. begin
  98071. pTDefRegMap(@Self)^.clr := $00080000;
  98072. end;
  98073. procedure TCAN2_C2RXM3.setMIDE(thebits : TBits_1); inline;
  98074. begin
  98075. if thebits = 0 then
  98076. pTDefRegMap(@Self)^.clr := $00080000
  98077. else
  98078. pTDefRegMap(@Self)^.&set := $00080000;
  98079. end;
  98080. function TCAN2_C2RXM3.getMIDE : TBits_1; inline;
  98081. begin
  98082. getMIDE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  98083. end;
  98084. procedure TCAN2_C2RXM3.setSID(thebits : TBits_11); inline;
  98085. begin
  98086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  98087. end;
  98088. function TCAN2_C2RXM3.getSID : TBits_11; inline;
  98089. begin
  98090. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  98091. end;
  98092. procedure TCAN2_C2RXM3.setw(thebits : TBits_32); inline;
  98093. begin
  98094. pTDefRegMap(@Self)^.val := thebits;
  98095. end;
  98096. function TCAN2_C2RXM3.getw : TBits_32; inline;
  98097. begin
  98098. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98099. end;
  98100. procedure TCAN2_C2FLTCON0.setFSEL0(thebits : TBits_5); inline;
  98101. begin
  98102. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98103. end;
  98104. function TCAN2_C2FLTCON0.getFSEL0 : TBits_5; inline;
  98105. begin
  98106. getFSEL0 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98107. end;
  98108. procedure TCAN2_C2FLTCON0.setMSEL0(thebits : TBits_2); inline;
  98109. begin
  98110. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98111. end;
  98112. function TCAN2_C2FLTCON0.getMSEL0 : TBits_2; inline;
  98113. begin
  98114. getMSEL0 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  98115. end;
  98116. procedure TCAN2_C2FLTCON0.setFLTEN0; inline;
  98117. begin
  98118. pTDefRegMap(@Self)^.&set := $00000080;
  98119. end;
  98120. procedure TCAN2_C2FLTCON0.clearFLTEN0; inline;
  98121. begin
  98122. pTDefRegMap(@Self)^.clr := $00000080;
  98123. end;
  98124. procedure TCAN2_C2FLTCON0.setFLTEN0(thebits : TBits_1); inline;
  98125. begin
  98126. if thebits = 0 then
  98127. pTDefRegMap(@Self)^.clr := $00000080
  98128. else
  98129. pTDefRegMap(@Self)^.&set := $00000080;
  98130. end;
  98131. function TCAN2_C2FLTCON0.getFLTEN0 : TBits_1; inline;
  98132. begin
  98133. getFLTEN0 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98134. end;
  98135. procedure TCAN2_C2FLTCON0.setFSEL1(thebits : TBits_5); inline;
  98136. begin
  98137. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  98138. end;
  98139. function TCAN2_C2FLTCON0.getFSEL1 : TBits_5; inline;
  98140. begin
  98141. getFSEL1 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  98142. end;
  98143. procedure TCAN2_C2FLTCON0.setMSEL1(thebits : TBits_2); inline;
  98144. begin
  98145. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  98146. end;
  98147. function TCAN2_C2FLTCON0.getMSEL1 : TBits_2; inline;
  98148. begin
  98149. getMSEL1 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  98150. end;
  98151. procedure TCAN2_C2FLTCON0.setFLTEN1; inline;
  98152. begin
  98153. pTDefRegMap(@Self)^.&set := $00008000;
  98154. end;
  98155. procedure TCAN2_C2FLTCON0.clearFLTEN1; inline;
  98156. begin
  98157. pTDefRegMap(@Self)^.clr := $00008000;
  98158. end;
  98159. procedure TCAN2_C2FLTCON0.setFLTEN1(thebits : TBits_1); inline;
  98160. begin
  98161. if thebits = 0 then
  98162. pTDefRegMap(@Self)^.clr := $00008000
  98163. else
  98164. pTDefRegMap(@Self)^.&set := $00008000;
  98165. end;
  98166. function TCAN2_C2FLTCON0.getFLTEN1 : TBits_1; inline;
  98167. begin
  98168. getFLTEN1 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  98169. end;
  98170. procedure TCAN2_C2FLTCON0.setFSEL2(thebits : TBits_5); inline;
  98171. begin
  98172. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98173. end;
  98174. function TCAN2_C2FLTCON0.getFSEL2 : TBits_5; inline;
  98175. begin
  98176. getFSEL2 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98177. end;
  98178. procedure TCAN2_C2FLTCON0.setMSEL2(thebits : TBits_2); inline;
  98179. begin
  98180. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  98181. end;
  98182. function TCAN2_C2FLTCON0.getMSEL2 : TBits_2; inline;
  98183. begin
  98184. getMSEL2 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  98185. end;
  98186. procedure TCAN2_C2FLTCON0.setFLTEN2; inline;
  98187. begin
  98188. pTDefRegMap(@Self)^.&set := $00800000;
  98189. end;
  98190. procedure TCAN2_C2FLTCON0.clearFLTEN2; inline;
  98191. begin
  98192. pTDefRegMap(@Self)^.clr := $00800000;
  98193. end;
  98194. procedure TCAN2_C2FLTCON0.setFLTEN2(thebits : TBits_1); inline;
  98195. begin
  98196. if thebits = 0 then
  98197. pTDefRegMap(@Self)^.clr := $00800000
  98198. else
  98199. pTDefRegMap(@Self)^.&set := $00800000;
  98200. end;
  98201. function TCAN2_C2FLTCON0.getFLTEN2 : TBits_1; inline;
  98202. begin
  98203. getFLTEN2 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  98204. end;
  98205. procedure TCAN2_C2FLTCON0.setFSEL3(thebits : TBits_5); inline;
  98206. begin
  98207. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  98208. end;
  98209. function TCAN2_C2FLTCON0.getFSEL3 : TBits_5; inline;
  98210. begin
  98211. getFSEL3 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  98212. end;
  98213. procedure TCAN2_C2FLTCON0.setMSEL3(thebits : TBits_2); inline;
  98214. begin
  98215. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  98216. end;
  98217. function TCAN2_C2FLTCON0.getMSEL3 : TBits_2; inline;
  98218. begin
  98219. getMSEL3 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  98220. end;
  98221. procedure TCAN2_C2FLTCON0.setFLTEN3; inline;
  98222. begin
  98223. pTDefRegMap(@Self)^.&set := $80000000;
  98224. end;
  98225. procedure TCAN2_C2FLTCON0.clearFLTEN3; inline;
  98226. begin
  98227. pTDefRegMap(@Self)^.clr := $80000000;
  98228. end;
  98229. procedure TCAN2_C2FLTCON0.setFLTEN3(thebits : TBits_1); inline;
  98230. begin
  98231. if thebits = 0 then
  98232. pTDefRegMap(@Self)^.clr := $80000000
  98233. else
  98234. pTDefRegMap(@Self)^.&set := $80000000;
  98235. end;
  98236. function TCAN2_C2FLTCON0.getFLTEN3 : TBits_1; inline;
  98237. begin
  98238. getFLTEN3 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  98239. end;
  98240. procedure TCAN2_C2FLTCON0.setw(thebits : TBits_32); inline;
  98241. begin
  98242. pTDefRegMap(@Self)^.val := thebits;
  98243. end;
  98244. function TCAN2_C2FLTCON0.getw : TBits_32; inline;
  98245. begin
  98246. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98247. end;
  98248. procedure TCAN2_C2FLTCON1.setFSEL4(thebits : TBits_5); inline;
  98249. begin
  98250. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98251. end;
  98252. function TCAN2_C2FLTCON1.getFSEL4 : TBits_5; inline;
  98253. begin
  98254. getFSEL4 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98255. end;
  98256. procedure TCAN2_C2FLTCON1.setMSEL4(thebits : TBits_2); inline;
  98257. begin
  98258. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98259. end;
  98260. function TCAN2_C2FLTCON1.getMSEL4 : TBits_2; inline;
  98261. begin
  98262. getMSEL4 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  98263. end;
  98264. procedure TCAN2_C2FLTCON1.setFLTEN4; inline;
  98265. begin
  98266. pTDefRegMap(@Self)^.&set := $00000080;
  98267. end;
  98268. procedure TCAN2_C2FLTCON1.clearFLTEN4; inline;
  98269. begin
  98270. pTDefRegMap(@Self)^.clr := $00000080;
  98271. end;
  98272. procedure TCAN2_C2FLTCON1.setFLTEN4(thebits : TBits_1); inline;
  98273. begin
  98274. if thebits = 0 then
  98275. pTDefRegMap(@Self)^.clr := $00000080
  98276. else
  98277. pTDefRegMap(@Self)^.&set := $00000080;
  98278. end;
  98279. function TCAN2_C2FLTCON1.getFLTEN4 : TBits_1; inline;
  98280. begin
  98281. getFLTEN4 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98282. end;
  98283. procedure TCAN2_C2FLTCON1.setFSEL5(thebits : TBits_5); inline;
  98284. begin
  98285. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  98286. end;
  98287. function TCAN2_C2FLTCON1.getFSEL5 : TBits_5; inline;
  98288. begin
  98289. getFSEL5 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  98290. end;
  98291. procedure TCAN2_C2FLTCON1.setMSEL5(thebits : TBits_2); inline;
  98292. begin
  98293. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  98294. end;
  98295. function TCAN2_C2FLTCON1.getMSEL5 : TBits_2; inline;
  98296. begin
  98297. getMSEL5 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  98298. end;
  98299. procedure TCAN2_C2FLTCON1.setFLTEN5; inline;
  98300. begin
  98301. pTDefRegMap(@Self)^.&set := $00008000;
  98302. end;
  98303. procedure TCAN2_C2FLTCON1.clearFLTEN5; inline;
  98304. begin
  98305. pTDefRegMap(@Self)^.clr := $00008000;
  98306. end;
  98307. procedure TCAN2_C2FLTCON1.setFLTEN5(thebits : TBits_1); inline;
  98308. begin
  98309. if thebits = 0 then
  98310. pTDefRegMap(@Self)^.clr := $00008000
  98311. else
  98312. pTDefRegMap(@Self)^.&set := $00008000;
  98313. end;
  98314. function TCAN2_C2FLTCON1.getFLTEN5 : TBits_1; inline;
  98315. begin
  98316. getFLTEN5 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  98317. end;
  98318. procedure TCAN2_C2FLTCON1.setFSEL6(thebits : TBits_5); inline;
  98319. begin
  98320. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98321. end;
  98322. function TCAN2_C2FLTCON1.getFSEL6 : TBits_5; inline;
  98323. begin
  98324. getFSEL6 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98325. end;
  98326. procedure TCAN2_C2FLTCON1.setMSEL6(thebits : TBits_2); inline;
  98327. begin
  98328. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  98329. end;
  98330. function TCAN2_C2FLTCON1.getMSEL6 : TBits_2; inline;
  98331. begin
  98332. getMSEL6 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  98333. end;
  98334. procedure TCAN2_C2FLTCON1.setFLTEN6; inline;
  98335. begin
  98336. pTDefRegMap(@Self)^.&set := $00800000;
  98337. end;
  98338. procedure TCAN2_C2FLTCON1.clearFLTEN6; inline;
  98339. begin
  98340. pTDefRegMap(@Self)^.clr := $00800000;
  98341. end;
  98342. procedure TCAN2_C2FLTCON1.setFLTEN6(thebits : TBits_1); inline;
  98343. begin
  98344. if thebits = 0 then
  98345. pTDefRegMap(@Self)^.clr := $00800000
  98346. else
  98347. pTDefRegMap(@Self)^.&set := $00800000;
  98348. end;
  98349. function TCAN2_C2FLTCON1.getFLTEN6 : TBits_1; inline;
  98350. begin
  98351. getFLTEN6 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  98352. end;
  98353. procedure TCAN2_C2FLTCON1.setFSEL7(thebits : TBits_5); inline;
  98354. begin
  98355. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  98356. end;
  98357. function TCAN2_C2FLTCON1.getFSEL7 : TBits_5; inline;
  98358. begin
  98359. getFSEL7 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  98360. end;
  98361. procedure TCAN2_C2FLTCON1.setMSEL7(thebits : TBits_2); inline;
  98362. begin
  98363. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  98364. end;
  98365. function TCAN2_C2FLTCON1.getMSEL7 : TBits_2; inline;
  98366. begin
  98367. getMSEL7 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  98368. end;
  98369. procedure TCAN2_C2FLTCON1.setFLTEN7; inline;
  98370. begin
  98371. pTDefRegMap(@Self)^.&set := $80000000;
  98372. end;
  98373. procedure TCAN2_C2FLTCON1.clearFLTEN7; inline;
  98374. begin
  98375. pTDefRegMap(@Self)^.clr := $80000000;
  98376. end;
  98377. procedure TCAN2_C2FLTCON1.setFLTEN7(thebits : TBits_1); inline;
  98378. begin
  98379. if thebits = 0 then
  98380. pTDefRegMap(@Self)^.clr := $80000000
  98381. else
  98382. pTDefRegMap(@Self)^.&set := $80000000;
  98383. end;
  98384. function TCAN2_C2FLTCON1.getFLTEN7 : TBits_1; inline;
  98385. begin
  98386. getFLTEN7 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  98387. end;
  98388. procedure TCAN2_C2FLTCON1.setw(thebits : TBits_32); inline;
  98389. begin
  98390. pTDefRegMap(@Self)^.val := thebits;
  98391. end;
  98392. function TCAN2_C2FLTCON1.getw : TBits_32; inline;
  98393. begin
  98394. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98395. end;
  98396. procedure TCAN2_C2FLTCON2.setFSEL8(thebits : TBits_5); inline;
  98397. begin
  98398. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98399. end;
  98400. function TCAN2_C2FLTCON2.getFSEL8 : TBits_5; inline;
  98401. begin
  98402. getFSEL8 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98403. end;
  98404. procedure TCAN2_C2FLTCON2.setMSEL8(thebits : TBits_2); inline;
  98405. begin
  98406. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98407. end;
  98408. function TCAN2_C2FLTCON2.getMSEL8 : TBits_2; inline;
  98409. begin
  98410. getMSEL8 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  98411. end;
  98412. procedure TCAN2_C2FLTCON2.setFLTEN8; inline;
  98413. begin
  98414. pTDefRegMap(@Self)^.&set := $00000080;
  98415. end;
  98416. procedure TCAN2_C2FLTCON2.clearFLTEN8; inline;
  98417. begin
  98418. pTDefRegMap(@Self)^.clr := $00000080;
  98419. end;
  98420. procedure TCAN2_C2FLTCON2.setFLTEN8(thebits : TBits_1); inline;
  98421. begin
  98422. if thebits = 0 then
  98423. pTDefRegMap(@Self)^.clr := $00000080
  98424. else
  98425. pTDefRegMap(@Self)^.&set := $00000080;
  98426. end;
  98427. function TCAN2_C2FLTCON2.getFLTEN8 : TBits_1; inline;
  98428. begin
  98429. getFLTEN8 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98430. end;
  98431. procedure TCAN2_C2FLTCON2.setFSEL9(thebits : TBits_5); inline;
  98432. begin
  98433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  98434. end;
  98435. function TCAN2_C2FLTCON2.getFSEL9 : TBits_5; inline;
  98436. begin
  98437. getFSEL9 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  98438. end;
  98439. procedure TCAN2_C2FLTCON2.setMSEL9(thebits : TBits_2); inline;
  98440. begin
  98441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  98442. end;
  98443. function TCAN2_C2FLTCON2.getMSEL9 : TBits_2; inline;
  98444. begin
  98445. getMSEL9 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  98446. end;
  98447. procedure TCAN2_C2FLTCON2.setFLTEN9; inline;
  98448. begin
  98449. pTDefRegMap(@Self)^.&set := $00008000;
  98450. end;
  98451. procedure TCAN2_C2FLTCON2.clearFLTEN9; inline;
  98452. begin
  98453. pTDefRegMap(@Self)^.clr := $00008000;
  98454. end;
  98455. procedure TCAN2_C2FLTCON2.setFLTEN9(thebits : TBits_1); inline;
  98456. begin
  98457. if thebits = 0 then
  98458. pTDefRegMap(@Self)^.clr := $00008000
  98459. else
  98460. pTDefRegMap(@Self)^.&set := $00008000;
  98461. end;
  98462. function TCAN2_C2FLTCON2.getFLTEN9 : TBits_1; inline;
  98463. begin
  98464. getFLTEN9 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  98465. end;
  98466. procedure TCAN2_C2FLTCON2.setFSEL10(thebits : TBits_5); inline;
  98467. begin
  98468. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98469. end;
  98470. function TCAN2_C2FLTCON2.getFSEL10 : TBits_5; inline;
  98471. begin
  98472. getFSEL10 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98473. end;
  98474. procedure TCAN2_C2FLTCON2.setMSEL10(thebits : TBits_2); inline;
  98475. begin
  98476. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  98477. end;
  98478. function TCAN2_C2FLTCON2.getMSEL10 : TBits_2; inline;
  98479. begin
  98480. getMSEL10 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  98481. end;
  98482. procedure TCAN2_C2FLTCON2.setFLTEN10; inline;
  98483. begin
  98484. pTDefRegMap(@Self)^.&set := $00800000;
  98485. end;
  98486. procedure TCAN2_C2FLTCON2.clearFLTEN10; inline;
  98487. begin
  98488. pTDefRegMap(@Self)^.clr := $00800000;
  98489. end;
  98490. procedure TCAN2_C2FLTCON2.setFLTEN10(thebits : TBits_1); inline;
  98491. begin
  98492. if thebits = 0 then
  98493. pTDefRegMap(@Self)^.clr := $00800000
  98494. else
  98495. pTDefRegMap(@Self)^.&set := $00800000;
  98496. end;
  98497. function TCAN2_C2FLTCON2.getFLTEN10 : TBits_1; inline;
  98498. begin
  98499. getFLTEN10 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  98500. end;
  98501. procedure TCAN2_C2FLTCON2.setFSEL11(thebits : TBits_5); inline;
  98502. begin
  98503. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  98504. end;
  98505. function TCAN2_C2FLTCON2.getFSEL11 : TBits_5; inline;
  98506. begin
  98507. getFSEL11 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  98508. end;
  98509. procedure TCAN2_C2FLTCON2.setMSEL11(thebits : TBits_2); inline;
  98510. begin
  98511. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  98512. end;
  98513. function TCAN2_C2FLTCON2.getMSEL11 : TBits_2; inline;
  98514. begin
  98515. getMSEL11 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  98516. end;
  98517. procedure TCAN2_C2FLTCON2.setFLTEN11; inline;
  98518. begin
  98519. pTDefRegMap(@Self)^.&set := $80000000;
  98520. end;
  98521. procedure TCAN2_C2FLTCON2.clearFLTEN11; inline;
  98522. begin
  98523. pTDefRegMap(@Self)^.clr := $80000000;
  98524. end;
  98525. procedure TCAN2_C2FLTCON2.setFLTEN11(thebits : TBits_1); inline;
  98526. begin
  98527. if thebits = 0 then
  98528. pTDefRegMap(@Self)^.clr := $80000000
  98529. else
  98530. pTDefRegMap(@Self)^.&set := $80000000;
  98531. end;
  98532. function TCAN2_C2FLTCON2.getFLTEN11 : TBits_1; inline;
  98533. begin
  98534. getFLTEN11 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  98535. end;
  98536. procedure TCAN2_C2FLTCON2.setw(thebits : TBits_32); inline;
  98537. begin
  98538. pTDefRegMap(@Self)^.val := thebits;
  98539. end;
  98540. function TCAN2_C2FLTCON2.getw : TBits_32; inline;
  98541. begin
  98542. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98543. end;
  98544. procedure TCAN2_C2FLTCON3.setFSEL12(thebits : TBits_5); inline;
  98545. begin
  98546. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98547. end;
  98548. function TCAN2_C2FLTCON3.getFSEL12 : TBits_5; inline;
  98549. begin
  98550. getFSEL12 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98551. end;
  98552. procedure TCAN2_C2FLTCON3.setMSEL12(thebits : TBits_2); inline;
  98553. begin
  98554. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98555. end;
  98556. function TCAN2_C2FLTCON3.getMSEL12 : TBits_2; inline;
  98557. begin
  98558. getMSEL12 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  98559. end;
  98560. procedure TCAN2_C2FLTCON3.setFLTEN12; inline;
  98561. begin
  98562. pTDefRegMap(@Self)^.&set := $00000080;
  98563. end;
  98564. procedure TCAN2_C2FLTCON3.clearFLTEN12; inline;
  98565. begin
  98566. pTDefRegMap(@Self)^.clr := $00000080;
  98567. end;
  98568. procedure TCAN2_C2FLTCON3.setFLTEN12(thebits : TBits_1); inline;
  98569. begin
  98570. if thebits = 0 then
  98571. pTDefRegMap(@Self)^.clr := $00000080
  98572. else
  98573. pTDefRegMap(@Self)^.&set := $00000080;
  98574. end;
  98575. function TCAN2_C2FLTCON3.getFLTEN12 : TBits_1; inline;
  98576. begin
  98577. getFLTEN12 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98578. end;
  98579. procedure TCAN2_C2FLTCON3.setFSEL13(thebits : TBits_5); inline;
  98580. begin
  98581. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  98582. end;
  98583. function TCAN2_C2FLTCON3.getFSEL13 : TBits_5; inline;
  98584. begin
  98585. getFSEL13 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  98586. end;
  98587. procedure TCAN2_C2FLTCON3.setMSEL13(thebits : TBits_2); inline;
  98588. begin
  98589. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  98590. end;
  98591. function TCAN2_C2FLTCON3.getMSEL13 : TBits_2; inline;
  98592. begin
  98593. getMSEL13 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  98594. end;
  98595. procedure TCAN2_C2FLTCON3.setFLTEN13; inline;
  98596. begin
  98597. pTDefRegMap(@Self)^.&set := $00008000;
  98598. end;
  98599. procedure TCAN2_C2FLTCON3.clearFLTEN13; inline;
  98600. begin
  98601. pTDefRegMap(@Self)^.clr := $00008000;
  98602. end;
  98603. procedure TCAN2_C2FLTCON3.setFLTEN13(thebits : TBits_1); inline;
  98604. begin
  98605. if thebits = 0 then
  98606. pTDefRegMap(@Self)^.clr := $00008000
  98607. else
  98608. pTDefRegMap(@Self)^.&set := $00008000;
  98609. end;
  98610. function TCAN2_C2FLTCON3.getFLTEN13 : TBits_1; inline;
  98611. begin
  98612. getFLTEN13 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  98613. end;
  98614. procedure TCAN2_C2FLTCON3.setFSEL14(thebits : TBits_5); inline;
  98615. begin
  98616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98617. end;
  98618. function TCAN2_C2FLTCON3.getFSEL14 : TBits_5; inline;
  98619. begin
  98620. getFSEL14 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98621. end;
  98622. procedure TCAN2_C2FLTCON3.setMSEL14(thebits : TBits_2); inline;
  98623. begin
  98624. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  98625. end;
  98626. function TCAN2_C2FLTCON3.getMSEL14 : TBits_2; inline;
  98627. begin
  98628. getMSEL14 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  98629. end;
  98630. procedure TCAN2_C2FLTCON3.setFLTEN14; inline;
  98631. begin
  98632. pTDefRegMap(@Self)^.&set := $00800000;
  98633. end;
  98634. procedure TCAN2_C2FLTCON3.clearFLTEN14; inline;
  98635. begin
  98636. pTDefRegMap(@Self)^.clr := $00800000;
  98637. end;
  98638. procedure TCAN2_C2FLTCON3.setFLTEN14(thebits : TBits_1); inline;
  98639. begin
  98640. if thebits = 0 then
  98641. pTDefRegMap(@Self)^.clr := $00800000
  98642. else
  98643. pTDefRegMap(@Self)^.&set := $00800000;
  98644. end;
  98645. function TCAN2_C2FLTCON3.getFLTEN14 : TBits_1; inline;
  98646. begin
  98647. getFLTEN14 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  98648. end;
  98649. procedure TCAN2_C2FLTCON3.setFSEL15(thebits : TBits_5); inline;
  98650. begin
  98651. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  98652. end;
  98653. function TCAN2_C2FLTCON3.getFSEL15 : TBits_5; inline;
  98654. begin
  98655. getFSEL15 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  98656. end;
  98657. procedure TCAN2_C2FLTCON3.setMSEL15(thebits : TBits_2); inline;
  98658. begin
  98659. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  98660. end;
  98661. function TCAN2_C2FLTCON3.getMSEL15 : TBits_2; inline;
  98662. begin
  98663. getMSEL15 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  98664. end;
  98665. procedure TCAN2_C2FLTCON3.setFLTEN15; inline;
  98666. begin
  98667. pTDefRegMap(@Self)^.&set := $80000000;
  98668. end;
  98669. procedure TCAN2_C2FLTCON3.clearFLTEN15; inline;
  98670. begin
  98671. pTDefRegMap(@Self)^.clr := $80000000;
  98672. end;
  98673. procedure TCAN2_C2FLTCON3.setFLTEN15(thebits : TBits_1); inline;
  98674. begin
  98675. if thebits = 0 then
  98676. pTDefRegMap(@Self)^.clr := $80000000
  98677. else
  98678. pTDefRegMap(@Self)^.&set := $80000000;
  98679. end;
  98680. function TCAN2_C2FLTCON3.getFLTEN15 : TBits_1; inline;
  98681. begin
  98682. getFLTEN15 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  98683. end;
  98684. procedure TCAN2_C2FLTCON3.setw(thebits : TBits_32); inline;
  98685. begin
  98686. pTDefRegMap(@Self)^.val := thebits;
  98687. end;
  98688. function TCAN2_C2FLTCON3.getw : TBits_32; inline;
  98689. begin
  98690. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98691. end;
  98692. procedure TCAN2_C2FLTCON4.setFSEL16(thebits : TBits_5); inline;
  98693. begin
  98694. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98695. end;
  98696. function TCAN2_C2FLTCON4.getFSEL16 : TBits_5; inline;
  98697. begin
  98698. getFSEL16 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98699. end;
  98700. procedure TCAN2_C2FLTCON4.setMSEL16(thebits : TBits_2); inline;
  98701. begin
  98702. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98703. end;
  98704. function TCAN2_C2FLTCON4.getMSEL16 : TBits_2; inline;
  98705. begin
  98706. getMSEL16 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  98707. end;
  98708. procedure TCAN2_C2FLTCON4.setFLTEN16; inline;
  98709. begin
  98710. pTDefRegMap(@Self)^.&set := $00000080;
  98711. end;
  98712. procedure TCAN2_C2FLTCON4.clearFLTEN16; inline;
  98713. begin
  98714. pTDefRegMap(@Self)^.clr := $00000080;
  98715. end;
  98716. procedure TCAN2_C2FLTCON4.setFLTEN16(thebits : TBits_1); inline;
  98717. begin
  98718. if thebits = 0 then
  98719. pTDefRegMap(@Self)^.clr := $00000080
  98720. else
  98721. pTDefRegMap(@Self)^.&set := $00000080;
  98722. end;
  98723. function TCAN2_C2FLTCON4.getFLTEN16 : TBits_1; inline;
  98724. begin
  98725. getFLTEN16 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98726. end;
  98727. procedure TCAN2_C2FLTCON4.setFSEL17(thebits : TBits_5); inline;
  98728. begin
  98729. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  98730. end;
  98731. function TCAN2_C2FLTCON4.getFSEL17 : TBits_5; inline;
  98732. begin
  98733. getFSEL17 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  98734. end;
  98735. procedure TCAN2_C2FLTCON4.setMSEL17(thebits : TBits_2); inline;
  98736. begin
  98737. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  98738. end;
  98739. function TCAN2_C2FLTCON4.getMSEL17 : TBits_2; inline;
  98740. begin
  98741. getMSEL17 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  98742. end;
  98743. procedure TCAN2_C2FLTCON4.setFLTEN17; inline;
  98744. begin
  98745. pTDefRegMap(@Self)^.&set := $00008000;
  98746. end;
  98747. procedure TCAN2_C2FLTCON4.clearFLTEN17; inline;
  98748. begin
  98749. pTDefRegMap(@Self)^.clr := $00008000;
  98750. end;
  98751. procedure TCAN2_C2FLTCON4.setFLTEN17(thebits : TBits_1); inline;
  98752. begin
  98753. if thebits = 0 then
  98754. pTDefRegMap(@Self)^.clr := $00008000
  98755. else
  98756. pTDefRegMap(@Self)^.&set := $00008000;
  98757. end;
  98758. function TCAN2_C2FLTCON4.getFLTEN17 : TBits_1; inline;
  98759. begin
  98760. getFLTEN17 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  98761. end;
  98762. procedure TCAN2_C2FLTCON4.setFSEL18(thebits : TBits_5); inline;
  98763. begin
  98764. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98765. end;
  98766. function TCAN2_C2FLTCON4.getFSEL18 : TBits_5; inline;
  98767. begin
  98768. getFSEL18 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98769. end;
  98770. procedure TCAN2_C2FLTCON4.setMSEL18(thebits : TBits_2); inline;
  98771. begin
  98772. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  98773. end;
  98774. function TCAN2_C2FLTCON4.getMSEL18 : TBits_2; inline;
  98775. begin
  98776. getMSEL18 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  98777. end;
  98778. procedure TCAN2_C2FLTCON4.setFLTEN18; inline;
  98779. begin
  98780. pTDefRegMap(@Self)^.&set := $00800000;
  98781. end;
  98782. procedure TCAN2_C2FLTCON4.clearFLTEN18; inline;
  98783. begin
  98784. pTDefRegMap(@Self)^.clr := $00800000;
  98785. end;
  98786. procedure TCAN2_C2FLTCON4.setFLTEN18(thebits : TBits_1); inline;
  98787. begin
  98788. if thebits = 0 then
  98789. pTDefRegMap(@Self)^.clr := $00800000
  98790. else
  98791. pTDefRegMap(@Self)^.&set := $00800000;
  98792. end;
  98793. function TCAN2_C2FLTCON4.getFLTEN18 : TBits_1; inline;
  98794. begin
  98795. getFLTEN18 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  98796. end;
  98797. procedure TCAN2_C2FLTCON4.setFSEL19(thebits : TBits_5); inline;
  98798. begin
  98799. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  98800. end;
  98801. function TCAN2_C2FLTCON4.getFSEL19 : TBits_5; inline;
  98802. begin
  98803. getFSEL19 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  98804. end;
  98805. procedure TCAN2_C2FLTCON4.setMSEL19(thebits : TBits_2); inline;
  98806. begin
  98807. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  98808. end;
  98809. function TCAN2_C2FLTCON4.getMSEL19 : TBits_2; inline;
  98810. begin
  98811. getMSEL19 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  98812. end;
  98813. procedure TCAN2_C2FLTCON4.setFLTEN19; inline;
  98814. begin
  98815. pTDefRegMap(@Self)^.&set := $80000000;
  98816. end;
  98817. procedure TCAN2_C2FLTCON4.clearFLTEN19; inline;
  98818. begin
  98819. pTDefRegMap(@Self)^.clr := $80000000;
  98820. end;
  98821. procedure TCAN2_C2FLTCON4.setFLTEN19(thebits : TBits_1); inline;
  98822. begin
  98823. if thebits = 0 then
  98824. pTDefRegMap(@Self)^.clr := $80000000
  98825. else
  98826. pTDefRegMap(@Self)^.&set := $80000000;
  98827. end;
  98828. function TCAN2_C2FLTCON4.getFLTEN19 : TBits_1; inline;
  98829. begin
  98830. getFLTEN19 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  98831. end;
  98832. procedure TCAN2_C2FLTCON4.setw(thebits : TBits_32); inline;
  98833. begin
  98834. pTDefRegMap(@Self)^.val := thebits;
  98835. end;
  98836. function TCAN2_C2FLTCON4.getw : TBits_32; inline;
  98837. begin
  98838. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98839. end;
  98840. procedure TCAN2_C2FLTCON5.setFSEL20(thebits : TBits_5); inline;
  98841. begin
  98842. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98843. end;
  98844. function TCAN2_C2FLTCON5.getFSEL20 : TBits_5; inline;
  98845. begin
  98846. getFSEL20 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98847. end;
  98848. procedure TCAN2_C2FLTCON5.setMSEL20(thebits : TBits_2); inline;
  98849. begin
  98850. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98851. end;
  98852. function TCAN2_C2FLTCON5.getMSEL20 : TBits_2; inline;
  98853. begin
  98854. getMSEL20 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  98855. end;
  98856. procedure TCAN2_C2FLTCON5.setFLTEN20; inline;
  98857. begin
  98858. pTDefRegMap(@Self)^.&set := $00000080;
  98859. end;
  98860. procedure TCAN2_C2FLTCON5.clearFLTEN20; inline;
  98861. begin
  98862. pTDefRegMap(@Self)^.clr := $00000080;
  98863. end;
  98864. procedure TCAN2_C2FLTCON5.setFLTEN20(thebits : TBits_1); inline;
  98865. begin
  98866. if thebits = 0 then
  98867. pTDefRegMap(@Self)^.clr := $00000080
  98868. else
  98869. pTDefRegMap(@Self)^.&set := $00000080;
  98870. end;
  98871. function TCAN2_C2FLTCON5.getFLTEN20 : TBits_1; inline;
  98872. begin
  98873. getFLTEN20 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  98874. end;
  98875. procedure TCAN2_C2FLTCON5.setFSEL21(thebits : TBits_5); inline;
  98876. begin
  98877. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  98878. end;
  98879. function TCAN2_C2FLTCON5.getFSEL21 : TBits_5; inline;
  98880. begin
  98881. getFSEL21 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  98882. end;
  98883. procedure TCAN2_C2FLTCON5.setMSEL21(thebits : TBits_2); inline;
  98884. begin
  98885. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  98886. end;
  98887. function TCAN2_C2FLTCON5.getMSEL21 : TBits_2; inline;
  98888. begin
  98889. getMSEL21 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  98890. end;
  98891. procedure TCAN2_C2FLTCON5.setFLTEN21; inline;
  98892. begin
  98893. pTDefRegMap(@Self)^.&set := $00008000;
  98894. end;
  98895. procedure TCAN2_C2FLTCON5.clearFLTEN21; inline;
  98896. begin
  98897. pTDefRegMap(@Self)^.clr := $00008000;
  98898. end;
  98899. procedure TCAN2_C2FLTCON5.setFLTEN21(thebits : TBits_1); inline;
  98900. begin
  98901. if thebits = 0 then
  98902. pTDefRegMap(@Self)^.clr := $00008000
  98903. else
  98904. pTDefRegMap(@Self)^.&set := $00008000;
  98905. end;
  98906. function TCAN2_C2FLTCON5.getFLTEN21 : TBits_1; inline;
  98907. begin
  98908. getFLTEN21 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  98909. end;
  98910. procedure TCAN2_C2FLTCON5.setFSEL22(thebits : TBits_5); inline;
  98911. begin
  98912. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  98913. end;
  98914. function TCAN2_C2FLTCON5.getFSEL22 : TBits_5; inline;
  98915. begin
  98916. getFSEL22 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  98917. end;
  98918. procedure TCAN2_C2FLTCON5.setMSEL22(thebits : TBits_2); inline;
  98919. begin
  98920. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  98921. end;
  98922. function TCAN2_C2FLTCON5.getMSEL22 : TBits_2; inline;
  98923. begin
  98924. getMSEL22 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  98925. end;
  98926. procedure TCAN2_C2FLTCON5.setFLTEN22; inline;
  98927. begin
  98928. pTDefRegMap(@Self)^.&set := $00800000;
  98929. end;
  98930. procedure TCAN2_C2FLTCON5.clearFLTEN22; inline;
  98931. begin
  98932. pTDefRegMap(@Self)^.clr := $00800000;
  98933. end;
  98934. procedure TCAN2_C2FLTCON5.setFLTEN22(thebits : TBits_1); inline;
  98935. begin
  98936. if thebits = 0 then
  98937. pTDefRegMap(@Self)^.clr := $00800000
  98938. else
  98939. pTDefRegMap(@Self)^.&set := $00800000;
  98940. end;
  98941. function TCAN2_C2FLTCON5.getFLTEN22 : TBits_1; inline;
  98942. begin
  98943. getFLTEN22 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  98944. end;
  98945. procedure TCAN2_C2FLTCON5.setFSEL23(thebits : TBits_5); inline;
  98946. begin
  98947. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  98948. end;
  98949. function TCAN2_C2FLTCON5.getFSEL23 : TBits_5; inline;
  98950. begin
  98951. getFSEL23 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  98952. end;
  98953. procedure TCAN2_C2FLTCON5.setMSEL23(thebits : TBits_2); inline;
  98954. begin
  98955. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  98956. end;
  98957. function TCAN2_C2FLTCON5.getMSEL23 : TBits_2; inline;
  98958. begin
  98959. getMSEL23 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  98960. end;
  98961. procedure TCAN2_C2FLTCON5.setFLTEN23; inline;
  98962. begin
  98963. pTDefRegMap(@Self)^.&set := $80000000;
  98964. end;
  98965. procedure TCAN2_C2FLTCON5.clearFLTEN23; inline;
  98966. begin
  98967. pTDefRegMap(@Self)^.clr := $80000000;
  98968. end;
  98969. procedure TCAN2_C2FLTCON5.setFLTEN23(thebits : TBits_1); inline;
  98970. begin
  98971. if thebits = 0 then
  98972. pTDefRegMap(@Self)^.clr := $80000000
  98973. else
  98974. pTDefRegMap(@Self)^.&set := $80000000;
  98975. end;
  98976. function TCAN2_C2FLTCON5.getFLTEN23 : TBits_1; inline;
  98977. begin
  98978. getFLTEN23 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  98979. end;
  98980. procedure TCAN2_C2FLTCON5.setw(thebits : TBits_32); inline;
  98981. begin
  98982. pTDefRegMap(@Self)^.val := thebits;
  98983. end;
  98984. function TCAN2_C2FLTCON5.getw : TBits_32; inline;
  98985. begin
  98986. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  98987. end;
  98988. procedure TCAN2_C2FLTCON6.setFSEL24(thebits : TBits_5); inline;
  98989. begin
  98990. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  98991. end;
  98992. function TCAN2_C2FLTCON6.getFSEL24 : TBits_5; inline;
  98993. begin
  98994. getFSEL24 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  98995. end;
  98996. procedure TCAN2_C2FLTCON6.setMSEL24(thebits : TBits_2); inline;
  98997. begin
  98998. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  98999. end;
  99000. function TCAN2_C2FLTCON6.getMSEL24 : TBits_2; inline;
  99001. begin
  99002. getMSEL24 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  99003. end;
  99004. procedure TCAN2_C2FLTCON6.setFLTEN24; inline;
  99005. begin
  99006. pTDefRegMap(@Self)^.&set := $00000080;
  99007. end;
  99008. procedure TCAN2_C2FLTCON6.clearFLTEN24; inline;
  99009. begin
  99010. pTDefRegMap(@Self)^.clr := $00000080;
  99011. end;
  99012. procedure TCAN2_C2FLTCON6.setFLTEN24(thebits : TBits_1); inline;
  99013. begin
  99014. if thebits = 0 then
  99015. pTDefRegMap(@Self)^.clr := $00000080
  99016. else
  99017. pTDefRegMap(@Self)^.&set := $00000080;
  99018. end;
  99019. function TCAN2_C2FLTCON6.getFLTEN24 : TBits_1; inline;
  99020. begin
  99021. getFLTEN24 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  99022. end;
  99023. procedure TCAN2_C2FLTCON6.setFSEL25(thebits : TBits_5); inline;
  99024. begin
  99025. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  99026. end;
  99027. function TCAN2_C2FLTCON6.getFSEL25 : TBits_5; inline;
  99028. begin
  99029. getFSEL25 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  99030. end;
  99031. procedure TCAN2_C2FLTCON6.setMSEL25(thebits : TBits_2); inline;
  99032. begin
  99033. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  99034. end;
  99035. function TCAN2_C2FLTCON6.getMSEL25 : TBits_2; inline;
  99036. begin
  99037. getMSEL25 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  99038. end;
  99039. procedure TCAN2_C2FLTCON6.setFLTEN25; inline;
  99040. begin
  99041. pTDefRegMap(@Self)^.&set := $00008000;
  99042. end;
  99043. procedure TCAN2_C2FLTCON6.clearFLTEN25; inline;
  99044. begin
  99045. pTDefRegMap(@Self)^.clr := $00008000;
  99046. end;
  99047. procedure TCAN2_C2FLTCON6.setFLTEN25(thebits : TBits_1); inline;
  99048. begin
  99049. if thebits = 0 then
  99050. pTDefRegMap(@Self)^.clr := $00008000
  99051. else
  99052. pTDefRegMap(@Self)^.&set := $00008000;
  99053. end;
  99054. function TCAN2_C2FLTCON6.getFLTEN25 : TBits_1; inline;
  99055. begin
  99056. getFLTEN25 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  99057. end;
  99058. procedure TCAN2_C2FLTCON6.setFSEL26(thebits : TBits_5); inline;
  99059. begin
  99060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  99061. end;
  99062. function TCAN2_C2FLTCON6.getFSEL26 : TBits_5; inline;
  99063. begin
  99064. getFSEL26 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  99065. end;
  99066. procedure TCAN2_C2FLTCON6.setMSEL26(thebits : TBits_2); inline;
  99067. begin
  99068. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  99069. end;
  99070. function TCAN2_C2FLTCON6.getMSEL26 : TBits_2; inline;
  99071. begin
  99072. getMSEL26 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  99073. end;
  99074. procedure TCAN2_C2FLTCON6.setFLTEN26; inline;
  99075. begin
  99076. pTDefRegMap(@Self)^.&set := $00800000;
  99077. end;
  99078. procedure TCAN2_C2FLTCON6.clearFLTEN26; inline;
  99079. begin
  99080. pTDefRegMap(@Self)^.clr := $00800000;
  99081. end;
  99082. procedure TCAN2_C2FLTCON6.setFLTEN26(thebits : TBits_1); inline;
  99083. begin
  99084. if thebits = 0 then
  99085. pTDefRegMap(@Self)^.clr := $00800000
  99086. else
  99087. pTDefRegMap(@Self)^.&set := $00800000;
  99088. end;
  99089. function TCAN2_C2FLTCON6.getFLTEN26 : TBits_1; inline;
  99090. begin
  99091. getFLTEN26 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  99092. end;
  99093. procedure TCAN2_C2FLTCON6.setFSEL27(thebits : TBits_5); inline;
  99094. begin
  99095. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  99096. end;
  99097. function TCAN2_C2FLTCON6.getFSEL27 : TBits_5; inline;
  99098. begin
  99099. getFSEL27 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  99100. end;
  99101. procedure TCAN2_C2FLTCON6.setMSEL27(thebits : TBits_2); inline;
  99102. begin
  99103. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  99104. end;
  99105. function TCAN2_C2FLTCON6.getMSEL27 : TBits_2; inline;
  99106. begin
  99107. getMSEL27 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  99108. end;
  99109. procedure TCAN2_C2FLTCON6.setFLTEN27; inline;
  99110. begin
  99111. pTDefRegMap(@Self)^.&set := $80000000;
  99112. end;
  99113. procedure TCAN2_C2FLTCON6.clearFLTEN27; inline;
  99114. begin
  99115. pTDefRegMap(@Self)^.clr := $80000000;
  99116. end;
  99117. procedure TCAN2_C2FLTCON6.setFLTEN27(thebits : TBits_1); inline;
  99118. begin
  99119. if thebits = 0 then
  99120. pTDefRegMap(@Self)^.clr := $80000000
  99121. else
  99122. pTDefRegMap(@Self)^.&set := $80000000;
  99123. end;
  99124. function TCAN2_C2FLTCON6.getFLTEN27 : TBits_1; inline;
  99125. begin
  99126. getFLTEN27 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  99127. end;
  99128. procedure TCAN2_C2FLTCON6.setw(thebits : TBits_32); inline;
  99129. begin
  99130. pTDefRegMap(@Self)^.val := thebits;
  99131. end;
  99132. function TCAN2_C2FLTCON6.getw : TBits_32; inline;
  99133. begin
  99134. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99135. end;
  99136. procedure TCAN2_C2FLTCON7.setFSEL28(thebits : TBits_5); inline;
  99137. begin
  99138. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  99139. end;
  99140. function TCAN2_C2FLTCON7.getFSEL28 : TBits_5; inline;
  99141. begin
  99142. getFSEL28 := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  99143. end;
  99144. procedure TCAN2_C2FLTCON7.setMSEL28(thebits : TBits_2); inline;
  99145. begin
  99146. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF9F or ( thebits shl 5 );
  99147. end;
  99148. function TCAN2_C2FLTCON7.getMSEL28 : TBits_2; inline;
  99149. begin
  99150. getMSEL28 := (pTDefRegMap(@Self)^.val and $00000060) shr 5;
  99151. end;
  99152. procedure TCAN2_C2FLTCON7.setFLTEN28; inline;
  99153. begin
  99154. pTDefRegMap(@Self)^.&set := $00000080;
  99155. end;
  99156. procedure TCAN2_C2FLTCON7.clearFLTEN28; inline;
  99157. begin
  99158. pTDefRegMap(@Self)^.clr := $00000080;
  99159. end;
  99160. procedure TCAN2_C2FLTCON7.setFLTEN28(thebits : TBits_1); inline;
  99161. begin
  99162. if thebits = 0 then
  99163. pTDefRegMap(@Self)^.clr := $00000080
  99164. else
  99165. pTDefRegMap(@Self)^.&set := $00000080;
  99166. end;
  99167. function TCAN2_C2FLTCON7.getFLTEN28 : TBits_1; inline;
  99168. begin
  99169. getFLTEN28 := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  99170. end;
  99171. procedure TCAN2_C2FLTCON7.setFSEL29(thebits : TBits_5); inline;
  99172. begin
  99173. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFE0FF or ( thebits shl 8 );
  99174. end;
  99175. function TCAN2_C2FLTCON7.getFSEL29 : TBits_5; inline;
  99176. begin
  99177. getFSEL29 := (pTDefRegMap(@Self)^.val and $00001F00) shr 8;
  99178. end;
  99179. procedure TCAN2_C2FLTCON7.setMSEL29(thebits : TBits_2); inline;
  99180. begin
  99181. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF9FFF or ( thebits shl 13 );
  99182. end;
  99183. function TCAN2_C2FLTCON7.getMSEL29 : TBits_2; inline;
  99184. begin
  99185. getMSEL29 := (pTDefRegMap(@Self)^.val and $00006000) shr 13;
  99186. end;
  99187. procedure TCAN2_C2FLTCON7.setFLTEN29; inline;
  99188. begin
  99189. pTDefRegMap(@Self)^.&set := $00008000;
  99190. end;
  99191. procedure TCAN2_C2FLTCON7.clearFLTEN29; inline;
  99192. begin
  99193. pTDefRegMap(@Self)^.clr := $00008000;
  99194. end;
  99195. procedure TCAN2_C2FLTCON7.setFLTEN29(thebits : TBits_1); inline;
  99196. begin
  99197. if thebits = 0 then
  99198. pTDefRegMap(@Self)^.clr := $00008000
  99199. else
  99200. pTDefRegMap(@Self)^.&set := $00008000;
  99201. end;
  99202. function TCAN2_C2FLTCON7.getFLTEN29 : TBits_1; inline;
  99203. begin
  99204. getFLTEN29 := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  99205. end;
  99206. procedure TCAN2_C2FLTCON7.setFSEL30(thebits : TBits_5); inline;
  99207. begin
  99208. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  99209. end;
  99210. function TCAN2_C2FLTCON7.getFSEL30 : TBits_5; inline;
  99211. begin
  99212. getFSEL30 := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  99213. end;
  99214. procedure TCAN2_C2FLTCON7.setMSEL30(thebits : TBits_2); inline;
  99215. begin
  99216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FF9FFFFF or ( thebits shl 21 );
  99217. end;
  99218. function TCAN2_C2FLTCON7.getMSEL30 : TBits_2; inline;
  99219. begin
  99220. getMSEL30 := (pTDefRegMap(@Self)^.val and $00600000) shr 21;
  99221. end;
  99222. procedure TCAN2_C2FLTCON7.setFLTEN30; inline;
  99223. begin
  99224. pTDefRegMap(@Self)^.&set := $00800000;
  99225. end;
  99226. procedure TCAN2_C2FLTCON7.clearFLTEN30; inline;
  99227. begin
  99228. pTDefRegMap(@Self)^.clr := $00800000;
  99229. end;
  99230. procedure TCAN2_C2FLTCON7.setFLTEN30(thebits : TBits_1); inline;
  99231. begin
  99232. if thebits = 0 then
  99233. pTDefRegMap(@Self)^.clr := $00800000
  99234. else
  99235. pTDefRegMap(@Self)^.&set := $00800000;
  99236. end;
  99237. function TCAN2_C2FLTCON7.getFLTEN30 : TBits_1; inline;
  99238. begin
  99239. getFLTEN30 := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  99240. end;
  99241. procedure TCAN2_C2FLTCON7.setFSEL31(thebits : TBits_5); inline;
  99242. begin
  99243. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $E0FFFFFF or ( thebits shl 24 );
  99244. end;
  99245. function TCAN2_C2FLTCON7.getFSEL31 : TBits_5; inline;
  99246. begin
  99247. getFSEL31 := (pTDefRegMap(@Self)^.val and $1F000000) shr 24;
  99248. end;
  99249. procedure TCAN2_C2FLTCON7.setMSEL31(thebits : TBits_2); inline;
  99250. begin
  99251. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $9FFFFFFF or ( thebits shl 29 );
  99252. end;
  99253. function TCAN2_C2FLTCON7.getMSEL31 : TBits_2; inline;
  99254. begin
  99255. getMSEL31 := (pTDefRegMap(@Self)^.val and $60000000) shr 29;
  99256. end;
  99257. procedure TCAN2_C2FLTCON7.setFLTEN31; inline;
  99258. begin
  99259. pTDefRegMap(@Self)^.&set := $80000000;
  99260. end;
  99261. procedure TCAN2_C2FLTCON7.clearFLTEN31; inline;
  99262. begin
  99263. pTDefRegMap(@Self)^.clr := $80000000;
  99264. end;
  99265. procedure TCAN2_C2FLTCON7.setFLTEN31(thebits : TBits_1); inline;
  99266. begin
  99267. if thebits = 0 then
  99268. pTDefRegMap(@Self)^.clr := $80000000
  99269. else
  99270. pTDefRegMap(@Self)^.&set := $80000000;
  99271. end;
  99272. function TCAN2_C2FLTCON7.getFLTEN31 : TBits_1; inline;
  99273. begin
  99274. getFLTEN31 := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  99275. end;
  99276. procedure TCAN2_C2FLTCON7.setw(thebits : TBits_32); inline;
  99277. begin
  99278. pTDefRegMap(@Self)^.val := thebits;
  99279. end;
  99280. function TCAN2_C2FLTCON7.getw : TBits_32; inline;
  99281. begin
  99282. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99283. end;
  99284. procedure TCAN2_C2RXF0.setEID(thebits : TBits_18); inline;
  99285. begin
  99286. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99287. end;
  99288. function TCAN2_C2RXF0.getEID : TBits_18; inline;
  99289. begin
  99290. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99291. end;
  99292. procedure TCAN2_C2RXF0.setEXID; inline;
  99293. begin
  99294. pTDefRegMap(@Self)^.&set := $00080000;
  99295. end;
  99296. procedure TCAN2_C2RXF0.clearEXID; inline;
  99297. begin
  99298. pTDefRegMap(@Self)^.clr := $00080000;
  99299. end;
  99300. procedure TCAN2_C2RXF0.setEXID(thebits : TBits_1); inline;
  99301. begin
  99302. if thebits = 0 then
  99303. pTDefRegMap(@Self)^.clr := $00080000
  99304. else
  99305. pTDefRegMap(@Self)^.&set := $00080000;
  99306. end;
  99307. function TCAN2_C2RXF0.getEXID : TBits_1; inline;
  99308. begin
  99309. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99310. end;
  99311. procedure TCAN2_C2RXF0.setSID(thebits : TBits_11); inline;
  99312. begin
  99313. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99314. end;
  99315. function TCAN2_C2RXF0.getSID : TBits_11; inline;
  99316. begin
  99317. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99318. end;
  99319. procedure TCAN2_C2RXF0.setw(thebits : TBits_32); inline;
  99320. begin
  99321. pTDefRegMap(@Self)^.val := thebits;
  99322. end;
  99323. function TCAN2_C2RXF0.getw : TBits_32; inline;
  99324. begin
  99325. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99326. end;
  99327. procedure TCAN2_C2RXF1.setEID(thebits : TBits_18); inline;
  99328. begin
  99329. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99330. end;
  99331. function TCAN2_C2RXF1.getEID : TBits_18; inline;
  99332. begin
  99333. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99334. end;
  99335. procedure TCAN2_C2RXF1.setEXID; inline;
  99336. begin
  99337. pTDefRegMap(@Self)^.&set := $00080000;
  99338. end;
  99339. procedure TCAN2_C2RXF1.clearEXID; inline;
  99340. begin
  99341. pTDefRegMap(@Self)^.clr := $00080000;
  99342. end;
  99343. procedure TCAN2_C2RXF1.setEXID(thebits : TBits_1); inline;
  99344. begin
  99345. if thebits = 0 then
  99346. pTDefRegMap(@Self)^.clr := $00080000
  99347. else
  99348. pTDefRegMap(@Self)^.&set := $00080000;
  99349. end;
  99350. function TCAN2_C2RXF1.getEXID : TBits_1; inline;
  99351. begin
  99352. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99353. end;
  99354. procedure TCAN2_C2RXF1.setSID(thebits : TBits_11); inline;
  99355. begin
  99356. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99357. end;
  99358. function TCAN2_C2RXF1.getSID : TBits_11; inline;
  99359. begin
  99360. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99361. end;
  99362. procedure TCAN2_C2RXF1.setw(thebits : TBits_32); inline;
  99363. begin
  99364. pTDefRegMap(@Self)^.val := thebits;
  99365. end;
  99366. function TCAN2_C2RXF1.getw : TBits_32; inline;
  99367. begin
  99368. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99369. end;
  99370. procedure TCAN2_C2RXF2.setEID(thebits : TBits_18); inline;
  99371. begin
  99372. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99373. end;
  99374. function TCAN2_C2RXF2.getEID : TBits_18; inline;
  99375. begin
  99376. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99377. end;
  99378. procedure TCAN2_C2RXF2.setEXID; inline;
  99379. begin
  99380. pTDefRegMap(@Self)^.&set := $00080000;
  99381. end;
  99382. procedure TCAN2_C2RXF2.clearEXID; inline;
  99383. begin
  99384. pTDefRegMap(@Self)^.clr := $00080000;
  99385. end;
  99386. procedure TCAN2_C2RXF2.setEXID(thebits : TBits_1); inline;
  99387. begin
  99388. if thebits = 0 then
  99389. pTDefRegMap(@Self)^.clr := $00080000
  99390. else
  99391. pTDefRegMap(@Self)^.&set := $00080000;
  99392. end;
  99393. function TCAN2_C2RXF2.getEXID : TBits_1; inline;
  99394. begin
  99395. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99396. end;
  99397. procedure TCAN2_C2RXF2.setSID(thebits : TBits_11); inline;
  99398. begin
  99399. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99400. end;
  99401. function TCAN2_C2RXF2.getSID : TBits_11; inline;
  99402. begin
  99403. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99404. end;
  99405. procedure TCAN2_C2RXF2.setw(thebits : TBits_32); inline;
  99406. begin
  99407. pTDefRegMap(@Self)^.val := thebits;
  99408. end;
  99409. function TCAN2_C2RXF2.getw : TBits_32; inline;
  99410. begin
  99411. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99412. end;
  99413. procedure TCAN2_C2RXF3.setEID(thebits : TBits_18); inline;
  99414. begin
  99415. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99416. end;
  99417. function TCAN2_C2RXF3.getEID : TBits_18; inline;
  99418. begin
  99419. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99420. end;
  99421. procedure TCAN2_C2RXF3.setEXID; inline;
  99422. begin
  99423. pTDefRegMap(@Self)^.&set := $00080000;
  99424. end;
  99425. procedure TCAN2_C2RXF3.clearEXID; inline;
  99426. begin
  99427. pTDefRegMap(@Self)^.clr := $00080000;
  99428. end;
  99429. procedure TCAN2_C2RXF3.setEXID(thebits : TBits_1); inline;
  99430. begin
  99431. if thebits = 0 then
  99432. pTDefRegMap(@Self)^.clr := $00080000
  99433. else
  99434. pTDefRegMap(@Self)^.&set := $00080000;
  99435. end;
  99436. function TCAN2_C2RXF3.getEXID : TBits_1; inline;
  99437. begin
  99438. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99439. end;
  99440. procedure TCAN2_C2RXF3.setSID(thebits : TBits_11); inline;
  99441. begin
  99442. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99443. end;
  99444. function TCAN2_C2RXF3.getSID : TBits_11; inline;
  99445. begin
  99446. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99447. end;
  99448. procedure TCAN2_C2RXF3.setw(thebits : TBits_32); inline;
  99449. begin
  99450. pTDefRegMap(@Self)^.val := thebits;
  99451. end;
  99452. function TCAN2_C2RXF3.getw : TBits_32; inline;
  99453. begin
  99454. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99455. end;
  99456. procedure TCAN2_C2RXF4.setEID(thebits : TBits_18); inline;
  99457. begin
  99458. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99459. end;
  99460. function TCAN2_C2RXF4.getEID : TBits_18; inline;
  99461. begin
  99462. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99463. end;
  99464. procedure TCAN2_C2RXF4.setEXID; inline;
  99465. begin
  99466. pTDefRegMap(@Self)^.&set := $00080000;
  99467. end;
  99468. procedure TCAN2_C2RXF4.clearEXID; inline;
  99469. begin
  99470. pTDefRegMap(@Self)^.clr := $00080000;
  99471. end;
  99472. procedure TCAN2_C2RXF4.setEXID(thebits : TBits_1); inline;
  99473. begin
  99474. if thebits = 0 then
  99475. pTDefRegMap(@Self)^.clr := $00080000
  99476. else
  99477. pTDefRegMap(@Self)^.&set := $00080000;
  99478. end;
  99479. function TCAN2_C2RXF4.getEXID : TBits_1; inline;
  99480. begin
  99481. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99482. end;
  99483. procedure TCAN2_C2RXF4.setSID(thebits : TBits_11); inline;
  99484. begin
  99485. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99486. end;
  99487. function TCAN2_C2RXF4.getSID : TBits_11; inline;
  99488. begin
  99489. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99490. end;
  99491. procedure TCAN2_C2RXF4.setw(thebits : TBits_32); inline;
  99492. begin
  99493. pTDefRegMap(@Self)^.val := thebits;
  99494. end;
  99495. function TCAN2_C2RXF4.getw : TBits_32; inline;
  99496. begin
  99497. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99498. end;
  99499. procedure TCAN2_C2RXF5.setEID(thebits : TBits_18); inline;
  99500. begin
  99501. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99502. end;
  99503. function TCAN2_C2RXF5.getEID : TBits_18; inline;
  99504. begin
  99505. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99506. end;
  99507. procedure TCAN2_C2RXF5.setEXID; inline;
  99508. begin
  99509. pTDefRegMap(@Self)^.&set := $00080000;
  99510. end;
  99511. procedure TCAN2_C2RXF5.clearEXID; inline;
  99512. begin
  99513. pTDefRegMap(@Self)^.clr := $00080000;
  99514. end;
  99515. procedure TCAN2_C2RXF5.setEXID(thebits : TBits_1); inline;
  99516. begin
  99517. if thebits = 0 then
  99518. pTDefRegMap(@Self)^.clr := $00080000
  99519. else
  99520. pTDefRegMap(@Self)^.&set := $00080000;
  99521. end;
  99522. function TCAN2_C2RXF5.getEXID : TBits_1; inline;
  99523. begin
  99524. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99525. end;
  99526. procedure TCAN2_C2RXF5.setSID(thebits : TBits_11); inline;
  99527. begin
  99528. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99529. end;
  99530. function TCAN2_C2RXF5.getSID : TBits_11; inline;
  99531. begin
  99532. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99533. end;
  99534. procedure TCAN2_C2RXF5.setw(thebits : TBits_32); inline;
  99535. begin
  99536. pTDefRegMap(@Self)^.val := thebits;
  99537. end;
  99538. function TCAN2_C2RXF5.getw : TBits_32; inline;
  99539. begin
  99540. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99541. end;
  99542. procedure TCAN2_C2RXF6.setEID(thebits : TBits_18); inline;
  99543. begin
  99544. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99545. end;
  99546. function TCAN2_C2RXF6.getEID : TBits_18; inline;
  99547. begin
  99548. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99549. end;
  99550. procedure TCAN2_C2RXF6.setEXID; inline;
  99551. begin
  99552. pTDefRegMap(@Self)^.&set := $00080000;
  99553. end;
  99554. procedure TCAN2_C2RXF6.clearEXID; inline;
  99555. begin
  99556. pTDefRegMap(@Self)^.clr := $00080000;
  99557. end;
  99558. procedure TCAN2_C2RXF6.setEXID(thebits : TBits_1); inline;
  99559. begin
  99560. if thebits = 0 then
  99561. pTDefRegMap(@Self)^.clr := $00080000
  99562. else
  99563. pTDefRegMap(@Self)^.&set := $00080000;
  99564. end;
  99565. function TCAN2_C2RXF6.getEXID : TBits_1; inline;
  99566. begin
  99567. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99568. end;
  99569. procedure TCAN2_C2RXF6.setSID(thebits : TBits_11); inline;
  99570. begin
  99571. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99572. end;
  99573. function TCAN2_C2RXF6.getSID : TBits_11; inline;
  99574. begin
  99575. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99576. end;
  99577. procedure TCAN2_C2RXF6.setw(thebits : TBits_32); inline;
  99578. begin
  99579. pTDefRegMap(@Self)^.val := thebits;
  99580. end;
  99581. function TCAN2_C2RXF6.getw : TBits_32; inline;
  99582. begin
  99583. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99584. end;
  99585. procedure TCAN2_C2RXF7.setEID(thebits : TBits_18); inline;
  99586. begin
  99587. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99588. end;
  99589. function TCAN2_C2RXF7.getEID : TBits_18; inline;
  99590. begin
  99591. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99592. end;
  99593. procedure TCAN2_C2RXF7.setEXID; inline;
  99594. begin
  99595. pTDefRegMap(@Self)^.&set := $00080000;
  99596. end;
  99597. procedure TCAN2_C2RXF7.clearEXID; inline;
  99598. begin
  99599. pTDefRegMap(@Self)^.clr := $00080000;
  99600. end;
  99601. procedure TCAN2_C2RXF7.setEXID(thebits : TBits_1); inline;
  99602. begin
  99603. if thebits = 0 then
  99604. pTDefRegMap(@Self)^.clr := $00080000
  99605. else
  99606. pTDefRegMap(@Self)^.&set := $00080000;
  99607. end;
  99608. function TCAN2_C2RXF7.getEXID : TBits_1; inline;
  99609. begin
  99610. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99611. end;
  99612. procedure TCAN2_C2RXF7.setSID(thebits : TBits_11); inline;
  99613. begin
  99614. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99615. end;
  99616. function TCAN2_C2RXF7.getSID : TBits_11; inline;
  99617. begin
  99618. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99619. end;
  99620. procedure TCAN2_C2RXF7.setw(thebits : TBits_32); inline;
  99621. begin
  99622. pTDefRegMap(@Self)^.val := thebits;
  99623. end;
  99624. function TCAN2_C2RXF7.getw : TBits_32; inline;
  99625. begin
  99626. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99627. end;
  99628. procedure TCAN2_C2RXF8.setEID(thebits : TBits_18); inline;
  99629. begin
  99630. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99631. end;
  99632. function TCAN2_C2RXF8.getEID : TBits_18; inline;
  99633. begin
  99634. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99635. end;
  99636. procedure TCAN2_C2RXF8.setEXID; inline;
  99637. begin
  99638. pTDefRegMap(@Self)^.&set := $00080000;
  99639. end;
  99640. procedure TCAN2_C2RXF8.clearEXID; inline;
  99641. begin
  99642. pTDefRegMap(@Self)^.clr := $00080000;
  99643. end;
  99644. procedure TCAN2_C2RXF8.setEXID(thebits : TBits_1); inline;
  99645. begin
  99646. if thebits = 0 then
  99647. pTDefRegMap(@Self)^.clr := $00080000
  99648. else
  99649. pTDefRegMap(@Self)^.&set := $00080000;
  99650. end;
  99651. function TCAN2_C2RXF8.getEXID : TBits_1; inline;
  99652. begin
  99653. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99654. end;
  99655. procedure TCAN2_C2RXF8.setSID(thebits : TBits_11); inline;
  99656. begin
  99657. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99658. end;
  99659. function TCAN2_C2RXF8.getSID : TBits_11; inline;
  99660. begin
  99661. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99662. end;
  99663. procedure TCAN2_C2RXF8.setw(thebits : TBits_32); inline;
  99664. begin
  99665. pTDefRegMap(@Self)^.val := thebits;
  99666. end;
  99667. function TCAN2_C2RXF8.getw : TBits_32; inline;
  99668. begin
  99669. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99670. end;
  99671. procedure TCAN2_C2RXF9.setEID(thebits : TBits_18); inline;
  99672. begin
  99673. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99674. end;
  99675. function TCAN2_C2RXF9.getEID : TBits_18; inline;
  99676. begin
  99677. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99678. end;
  99679. procedure TCAN2_C2RXF9.setEXID; inline;
  99680. begin
  99681. pTDefRegMap(@Self)^.&set := $00080000;
  99682. end;
  99683. procedure TCAN2_C2RXF9.clearEXID; inline;
  99684. begin
  99685. pTDefRegMap(@Self)^.clr := $00080000;
  99686. end;
  99687. procedure TCAN2_C2RXF9.setEXID(thebits : TBits_1); inline;
  99688. begin
  99689. if thebits = 0 then
  99690. pTDefRegMap(@Self)^.clr := $00080000
  99691. else
  99692. pTDefRegMap(@Self)^.&set := $00080000;
  99693. end;
  99694. function TCAN2_C2RXF9.getEXID : TBits_1; inline;
  99695. begin
  99696. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99697. end;
  99698. procedure TCAN2_C2RXF9.setSID(thebits : TBits_11); inline;
  99699. begin
  99700. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99701. end;
  99702. function TCAN2_C2RXF9.getSID : TBits_11; inline;
  99703. begin
  99704. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99705. end;
  99706. procedure TCAN2_C2RXF9.setw(thebits : TBits_32); inline;
  99707. begin
  99708. pTDefRegMap(@Self)^.val := thebits;
  99709. end;
  99710. function TCAN2_C2RXF9.getw : TBits_32; inline;
  99711. begin
  99712. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99713. end;
  99714. procedure TCAN2_C2RXF10.setEID(thebits : TBits_18); inline;
  99715. begin
  99716. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99717. end;
  99718. function TCAN2_C2RXF10.getEID : TBits_18; inline;
  99719. begin
  99720. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99721. end;
  99722. procedure TCAN2_C2RXF10.setEXID; inline;
  99723. begin
  99724. pTDefRegMap(@Self)^.&set := $00080000;
  99725. end;
  99726. procedure TCAN2_C2RXF10.clearEXID; inline;
  99727. begin
  99728. pTDefRegMap(@Self)^.clr := $00080000;
  99729. end;
  99730. procedure TCAN2_C2RXF10.setEXID(thebits : TBits_1); inline;
  99731. begin
  99732. if thebits = 0 then
  99733. pTDefRegMap(@Self)^.clr := $00080000
  99734. else
  99735. pTDefRegMap(@Self)^.&set := $00080000;
  99736. end;
  99737. function TCAN2_C2RXF10.getEXID : TBits_1; inline;
  99738. begin
  99739. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99740. end;
  99741. procedure TCAN2_C2RXF10.setSID(thebits : TBits_11); inline;
  99742. begin
  99743. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99744. end;
  99745. function TCAN2_C2RXF10.getSID : TBits_11; inline;
  99746. begin
  99747. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99748. end;
  99749. procedure TCAN2_C2RXF10.setw(thebits : TBits_32); inline;
  99750. begin
  99751. pTDefRegMap(@Self)^.val := thebits;
  99752. end;
  99753. function TCAN2_C2RXF10.getw : TBits_32; inline;
  99754. begin
  99755. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99756. end;
  99757. procedure TCAN2_C2RXF11.setEID(thebits : TBits_18); inline;
  99758. begin
  99759. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99760. end;
  99761. function TCAN2_C2RXF11.getEID : TBits_18; inline;
  99762. begin
  99763. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99764. end;
  99765. procedure TCAN2_C2RXF11.setEXID; inline;
  99766. begin
  99767. pTDefRegMap(@Self)^.&set := $00080000;
  99768. end;
  99769. procedure TCAN2_C2RXF11.clearEXID; inline;
  99770. begin
  99771. pTDefRegMap(@Self)^.clr := $00080000;
  99772. end;
  99773. procedure TCAN2_C2RXF11.setEXID(thebits : TBits_1); inline;
  99774. begin
  99775. if thebits = 0 then
  99776. pTDefRegMap(@Self)^.clr := $00080000
  99777. else
  99778. pTDefRegMap(@Self)^.&set := $00080000;
  99779. end;
  99780. function TCAN2_C2RXF11.getEXID : TBits_1; inline;
  99781. begin
  99782. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99783. end;
  99784. procedure TCAN2_C2RXF11.setSID(thebits : TBits_11); inline;
  99785. begin
  99786. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99787. end;
  99788. function TCAN2_C2RXF11.getSID : TBits_11; inline;
  99789. begin
  99790. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99791. end;
  99792. procedure TCAN2_C2RXF11.setw(thebits : TBits_32); inline;
  99793. begin
  99794. pTDefRegMap(@Self)^.val := thebits;
  99795. end;
  99796. function TCAN2_C2RXF11.getw : TBits_32; inline;
  99797. begin
  99798. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99799. end;
  99800. procedure TCAN2_C2RXF12.setEID(thebits : TBits_18); inline;
  99801. begin
  99802. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99803. end;
  99804. function TCAN2_C2RXF12.getEID : TBits_18; inline;
  99805. begin
  99806. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99807. end;
  99808. procedure TCAN2_C2RXF12.setEXID; inline;
  99809. begin
  99810. pTDefRegMap(@Self)^.&set := $00080000;
  99811. end;
  99812. procedure TCAN2_C2RXF12.clearEXID; inline;
  99813. begin
  99814. pTDefRegMap(@Self)^.clr := $00080000;
  99815. end;
  99816. procedure TCAN2_C2RXF12.setEXID(thebits : TBits_1); inline;
  99817. begin
  99818. if thebits = 0 then
  99819. pTDefRegMap(@Self)^.clr := $00080000
  99820. else
  99821. pTDefRegMap(@Self)^.&set := $00080000;
  99822. end;
  99823. function TCAN2_C2RXF12.getEXID : TBits_1; inline;
  99824. begin
  99825. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99826. end;
  99827. procedure TCAN2_C2RXF12.setSID(thebits : TBits_11); inline;
  99828. begin
  99829. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99830. end;
  99831. function TCAN2_C2RXF12.getSID : TBits_11; inline;
  99832. begin
  99833. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99834. end;
  99835. procedure TCAN2_C2RXF12.setw(thebits : TBits_32); inline;
  99836. begin
  99837. pTDefRegMap(@Self)^.val := thebits;
  99838. end;
  99839. function TCAN2_C2RXF12.getw : TBits_32; inline;
  99840. begin
  99841. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99842. end;
  99843. procedure TCAN2_C2RXF13.setEID(thebits : TBits_18); inline;
  99844. begin
  99845. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99846. end;
  99847. function TCAN2_C2RXF13.getEID : TBits_18; inline;
  99848. begin
  99849. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99850. end;
  99851. procedure TCAN2_C2RXF13.setEXID; inline;
  99852. begin
  99853. pTDefRegMap(@Self)^.&set := $00080000;
  99854. end;
  99855. procedure TCAN2_C2RXF13.clearEXID; inline;
  99856. begin
  99857. pTDefRegMap(@Self)^.clr := $00080000;
  99858. end;
  99859. procedure TCAN2_C2RXF13.setEXID(thebits : TBits_1); inline;
  99860. begin
  99861. if thebits = 0 then
  99862. pTDefRegMap(@Self)^.clr := $00080000
  99863. else
  99864. pTDefRegMap(@Self)^.&set := $00080000;
  99865. end;
  99866. function TCAN2_C2RXF13.getEXID : TBits_1; inline;
  99867. begin
  99868. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99869. end;
  99870. procedure TCAN2_C2RXF13.setSID(thebits : TBits_11); inline;
  99871. begin
  99872. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99873. end;
  99874. function TCAN2_C2RXF13.getSID : TBits_11; inline;
  99875. begin
  99876. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99877. end;
  99878. procedure TCAN2_C2RXF13.setw(thebits : TBits_32); inline;
  99879. begin
  99880. pTDefRegMap(@Self)^.val := thebits;
  99881. end;
  99882. function TCAN2_C2RXF13.getw : TBits_32; inline;
  99883. begin
  99884. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99885. end;
  99886. procedure TCAN2_C2RXF14.setEID(thebits : TBits_18); inline;
  99887. begin
  99888. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99889. end;
  99890. function TCAN2_C2RXF14.getEID : TBits_18; inline;
  99891. begin
  99892. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99893. end;
  99894. procedure TCAN2_C2RXF14.setEXID; inline;
  99895. begin
  99896. pTDefRegMap(@Self)^.&set := $00080000;
  99897. end;
  99898. procedure TCAN2_C2RXF14.clearEXID; inline;
  99899. begin
  99900. pTDefRegMap(@Self)^.clr := $00080000;
  99901. end;
  99902. procedure TCAN2_C2RXF14.setEXID(thebits : TBits_1); inline;
  99903. begin
  99904. if thebits = 0 then
  99905. pTDefRegMap(@Self)^.clr := $00080000
  99906. else
  99907. pTDefRegMap(@Self)^.&set := $00080000;
  99908. end;
  99909. function TCAN2_C2RXF14.getEXID : TBits_1; inline;
  99910. begin
  99911. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99912. end;
  99913. procedure TCAN2_C2RXF14.setSID(thebits : TBits_11); inline;
  99914. begin
  99915. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99916. end;
  99917. function TCAN2_C2RXF14.getSID : TBits_11; inline;
  99918. begin
  99919. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99920. end;
  99921. procedure TCAN2_C2RXF14.setw(thebits : TBits_32); inline;
  99922. begin
  99923. pTDefRegMap(@Self)^.val := thebits;
  99924. end;
  99925. function TCAN2_C2RXF14.getw : TBits_32; inline;
  99926. begin
  99927. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99928. end;
  99929. procedure TCAN2_C2RXF15.setEID(thebits : TBits_18); inline;
  99930. begin
  99931. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99932. end;
  99933. function TCAN2_C2RXF15.getEID : TBits_18; inline;
  99934. begin
  99935. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99936. end;
  99937. procedure TCAN2_C2RXF15.setEXID; inline;
  99938. begin
  99939. pTDefRegMap(@Self)^.&set := $00080000;
  99940. end;
  99941. procedure TCAN2_C2RXF15.clearEXID; inline;
  99942. begin
  99943. pTDefRegMap(@Self)^.clr := $00080000;
  99944. end;
  99945. procedure TCAN2_C2RXF15.setEXID(thebits : TBits_1); inline;
  99946. begin
  99947. if thebits = 0 then
  99948. pTDefRegMap(@Self)^.clr := $00080000
  99949. else
  99950. pTDefRegMap(@Self)^.&set := $00080000;
  99951. end;
  99952. function TCAN2_C2RXF15.getEXID : TBits_1; inline;
  99953. begin
  99954. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99955. end;
  99956. procedure TCAN2_C2RXF15.setSID(thebits : TBits_11); inline;
  99957. begin
  99958. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  99959. end;
  99960. function TCAN2_C2RXF15.getSID : TBits_11; inline;
  99961. begin
  99962. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  99963. end;
  99964. procedure TCAN2_C2RXF15.setw(thebits : TBits_32); inline;
  99965. begin
  99966. pTDefRegMap(@Self)^.val := thebits;
  99967. end;
  99968. function TCAN2_C2RXF15.getw : TBits_32; inline;
  99969. begin
  99970. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  99971. end;
  99972. procedure TCAN2_C2RXF16.setEID(thebits : TBits_18); inline;
  99973. begin
  99974. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  99975. end;
  99976. function TCAN2_C2RXF16.getEID : TBits_18; inline;
  99977. begin
  99978. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  99979. end;
  99980. procedure TCAN2_C2RXF16.setEXID; inline;
  99981. begin
  99982. pTDefRegMap(@Self)^.&set := $00080000;
  99983. end;
  99984. procedure TCAN2_C2RXF16.clearEXID; inline;
  99985. begin
  99986. pTDefRegMap(@Self)^.clr := $00080000;
  99987. end;
  99988. procedure TCAN2_C2RXF16.setEXID(thebits : TBits_1); inline;
  99989. begin
  99990. if thebits = 0 then
  99991. pTDefRegMap(@Self)^.clr := $00080000
  99992. else
  99993. pTDefRegMap(@Self)^.&set := $00080000;
  99994. end;
  99995. function TCAN2_C2RXF16.getEXID : TBits_1; inline;
  99996. begin
  99997. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  99998. end;
  99999. procedure TCAN2_C2RXF16.setSID(thebits : TBits_11); inline;
  100000. begin
  100001. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100002. end;
  100003. function TCAN2_C2RXF16.getSID : TBits_11; inline;
  100004. begin
  100005. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100006. end;
  100007. procedure TCAN2_C2RXF16.setw(thebits : TBits_32); inline;
  100008. begin
  100009. pTDefRegMap(@Self)^.val := thebits;
  100010. end;
  100011. function TCAN2_C2RXF16.getw : TBits_32; inline;
  100012. begin
  100013. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100014. end;
  100015. procedure TCAN2_C2RXF17.setEID(thebits : TBits_18); inline;
  100016. begin
  100017. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100018. end;
  100019. function TCAN2_C2RXF17.getEID : TBits_18; inline;
  100020. begin
  100021. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100022. end;
  100023. procedure TCAN2_C2RXF17.setEXID; inline;
  100024. begin
  100025. pTDefRegMap(@Self)^.&set := $00080000;
  100026. end;
  100027. procedure TCAN2_C2RXF17.clearEXID; inline;
  100028. begin
  100029. pTDefRegMap(@Self)^.clr := $00080000;
  100030. end;
  100031. procedure TCAN2_C2RXF17.setEXID(thebits : TBits_1); inline;
  100032. begin
  100033. if thebits = 0 then
  100034. pTDefRegMap(@Self)^.clr := $00080000
  100035. else
  100036. pTDefRegMap(@Self)^.&set := $00080000;
  100037. end;
  100038. function TCAN2_C2RXF17.getEXID : TBits_1; inline;
  100039. begin
  100040. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100041. end;
  100042. procedure TCAN2_C2RXF17.setSID(thebits : TBits_11); inline;
  100043. begin
  100044. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100045. end;
  100046. function TCAN2_C2RXF17.getSID : TBits_11; inline;
  100047. begin
  100048. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100049. end;
  100050. procedure TCAN2_C2RXF17.setw(thebits : TBits_32); inline;
  100051. begin
  100052. pTDefRegMap(@Self)^.val := thebits;
  100053. end;
  100054. function TCAN2_C2RXF17.getw : TBits_32; inline;
  100055. begin
  100056. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100057. end;
  100058. procedure TCAN2_C2RXF18.setEID(thebits : TBits_18); inline;
  100059. begin
  100060. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100061. end;
  100062. function TCAN2_C2RXF18.getEID : TBits_18; inline;
  100063. begin
  100064. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100065. end;
  100066. procedure TCAN2_C2RXF18.setEXID; inline;
  100067. begin
  100068. pTDefRegMap(@Self)^.&set := $00080000;
  100069. end;
  100070. procedure TCAN2_C2RXF18.clearEXID; inline;
  100071. begin
  100072. pTDefRegMap(@Self)^.clr := $00080000;
  100073. end;
  100074. procedure TCAN2_C2RXF18.setEXID(thebits : TBits_1); inline;
  100075. begin
  100076. if thebits = 0 then
  100077. pTDefRegMap(@Self)^.clr := $00080000
  100078. else
  100079. pTDefRegMap(@Self)^.&set := $00080000;
  100080. end;
  100081. function TCAN2_C2RXF18.getEXID : TBits_1; inline;
  100082. begin
  100083. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100084. end;
  100085. procedure TCAN2_C2RXF18.setSID(thebits : TBits_11); inline;
  100086. begin
  100087. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100088. end;
  100089. function TCAN2_C2RXF18.getSID : TBits_11; inline;
  100090. begin
  100091. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100092. end;
  100093. procedure TCAN2_C2RXF18.setw(thebits : TBits_32); inline;
  100094. begin
  100095. pTDefRegMap(@Self)^.val := thebits;
  100096. end;
  100097. function TCAN2_C2RXF18.getw : TBits_32; inline;
  100098. begin
  100099. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100100. end;
  100101. procedure TCAN2_C2RXF19.setEID(thebits : TBits_18); inline;
  100102. begin
  100103. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100104. end;
  100105. function TCAN2_C2RXF19.getEID : TBits_18; inline;
  100106. begin
  100107. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100108. end;
  100109. procedure TCAN2_C2RXF19.setEXID; inline;
  100110. begin
  100111. pTDefRegMap(@Self)^.&set := $00080000;
  100112. end;
  100113. procedure TCAN2_C2RXF19.clearEXID; inline;
  100114. begin
  100115. pTDefRegMap(@Self)^.clr := $00080000;
  100116. end;
  100117. procedure TCAN2_C2RXF19.setEXID(thebits : TBits_1); inline;
  100118. begin
  100119. if thebits = 0 then
  100120. pTDefRegMap(@Self)^.clr := $00080000
  100121. else
  100122. pTDefRegMap(@Self)^.&set := $00080000;
  100123. end;
  100124. function TCAN2_C2RXF19.getEXID : TBits_1; inline;
  100125. begin
  100126. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100127. end;
  100128. procedure TCAN2_C2RXF19.setSID(thebits : TBits_11); inline;
  100129. begin
  100130. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100131. end;
  100132. function TCAN2_C2RXF19.getSID : TBits_11; inline;
  100133. begin
  100134. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100135. end;
  100136. procedure TCAN2_C2RXF19.setw(thebits : TBits_32); inline;
  100137. begin
  100138. pTDefRegMap(@Self)^.val := thebits;
  100139. end;
  100140. function TCAN2_C2RXF19.getw : TBits_32; inline;
  100141. begin
  100142. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100143. end;
  100144. procedure TCAN2_C2RXF20.setEID(thebits : TBits_18); inline;
  100145. begin
  100146. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100147. end;
  100148. function TCAN2_C2RXF20.getEID : TBits_18; inline;
  100149. begin
  100150. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100151. end;
  100152. procedure TCAN2_C2RXF20.setEXID; inline;
  100153. begin
  100154. pTDefRegMap(@Self)^.&set := $00080000;
  100155. end;
  100156. procedure TCAN2_C2RXF20.clearEXID; inline;
  100157. begin
  100158. pTDefRegMap(@Self)^.clr := $00080000;
  100159. end;
  100160. procedure TCAN2_C2RXF20.setEXID(thebits : TBits_1); inline;
  100161. begin
  100162. if thebits = 0 then
  100163. pTDefRegMap(@Self)^.clr := $00080000
  100164. else
  100165. pTDefRegMap(@Self)^.&set := $00080000;
  100166. end;
  100167. function TCAN2_C2RXF20.getEXID : TBits_1; inline;
  100168. begin
  100169. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100170. end;
  100171. procedure TCAN2_C2RXF20.setSID(thebits : TBits_11); inline;
  100172. begin
  100173. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100174. end;
  100175. function TCAN2_C2RXF20.getSID : TBits_11; inline;
  100176. begin
  100177. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100178. end;
  100179. procedure TCAN2_C2RXF20.setw(thebits : TBits_32); inline;
  100180. begin
  100181. pTDefRegMap(@Self)^.val := thebits;
  100182. end;
  100183. function TCAN2_C2RXF20.getw : TBits_32; inline;
  100184. begin
  100185. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100186. end;
  100187. procedure TCAN2_C2RXF21.setEID(thebits : TBits_18); inline;
  100188. begin
  100189. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100190. end;
  100191. function TCAN2_C2RXF21.getEID : TBits_18; inline;
  100192. begin
  100193. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100194. end;
  100195. procedure TCAN2_C2RXF21.setEXID; inline;
  100196. begin
  100197. pTDefRegMap(@Self)^.&set := $00080000;
  100198. end;
  100199. procedure TCAN2_C2RXF21.clearEXID; inline;
  100200. begin
  100201. pTDefRegMap(@Self)^.clr := $00080000;
  100202. end;
  100203. procedure TCAN2_C2RXF21.setEXID(thebits : TBits_1); inline;
  100204. begin
  100205. if thebits = 0 then
  100206. pTDefRegMap(@Self)^.clr := $00080000
  100207. else
  100208. pTDefRegMap(@Self)^.&set := $00080000;
  100209. end;
  100210. function TCAN2_C2RXF21.getEXID : TBits_1; inline;
  100211. begin
  100212. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100213. end;
  100214. procedure TCAN2_C2RXF21.setSID(thebits : TBits_11); inline;
  100215. begin
  100216. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100217. end;
  100218. function TCAN2_C2RXF21.getSID : TBits_11; inline;
  100219. begin
  100220. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100221. end;
  100222. procedure TCAN2_C2RXF21.setw(thebits : TBits_32); inline;
  100223. begin
  100224. pTDefRegMap(@Self)^.val := thebits;
  100225. end;
  100226. function TCAN2_C2RXF21.getw : TBits_32; inline;
  100227. begin
  100228. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100229. end;
  100230. procedure TCAN2_C2RXF22.setEID(thebits : TBits_18); inline;
  100231. begin
  100232. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100233. end;
  100234. function TCAN2_C2RXF22.getEID : TBits_18; inline;
  100235. begin
  100236. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100237. end;
  100238. procedure TCAN2_C2RXF22.setEXID; inline;
  100239. begin
  100240. pTDefRegMap(@Self)^.&set := $00080000;
  100241. end;
  100242. procedure TCAN2_C2RXF22.clearEXID; inline;
  100243. begin
  100244. pTDefRegMap(@Self)^.clr := $00080000;
  100245. end;
  100246. procedure TCAN2_C2RXF22.setEXID(thebits : TBits_1); inline;
  100247. begin
  100248. if thebits = 0 then
  100249. pTDefRegMap(@Self)^.clr := $00080000
  100250. else
  100251. pTDefRegMap(@Self)^.&set := $00080000;
  100252. end;
  100253. function TCAN2_C2RXF22.getEXID : TBits_1; inline;
  100254. begin
  100255. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100256. end;
  100257. procedure TCAN2_C2RXF22.setSID(thebits : TBits_11); inline;
  100258. begin
  100259. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100260. end;
  100261. function TCAN2_C2RXF22.getSID : TBits_11; inline;
  100262. begin
  100263. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100264. end;
  100265. procedure TCAN2_C2RXF22.setw(thebits : TBits_32); inline;
  100266. begin
  100267. pTDefRegMap(@Self)^.val := thebits;
  100268. end;
  100269. function TCAN2_C2RXF22.getw : TBits_32; inline;
  100270. begin
  100271. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100272. end;
  100273. procedure TCAN2_C2RXF23.setEID(thebits : TBits_18); inline;
  100274. begin
  100275. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100276. end;
  100277. function TCAN2_C2RXF23.getEID : TBits_18; inline;
  100278. begin
  100279. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100280. end;
  100281. procedure TCAN2_C2RXF23.setEXID; inline;
  100282. begin
  100283. pTDefRegMap(@Self)^.&set := $00080000;
  100284. end;
  100285. procedure TCAN2_C2RXF23.clearEXID; inline;
  100286. begin
  100287. pTDefRegMap(@Self)^.clr := $00080000;
  100288. end;
  100289. procedure TCAN2_C2RXF23.setEXID(thebits : TBits_1); inline;
  100290. begin
  100291. if thebits = 0 then
  100292. pTDefRegMap(@Self)^.clr := $00080000
  100293. else
  100294. pTDefRegMap(@Self)^.&set := $00080000;
  100295. end;
  100296. function TCAN2_C2RXF23.getEXID : TBits_1; inline;
  100297. begin
  100298. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100299. end;
  100300. procedure TCAN2_C2RXF23.setSID(thebits : TBits_11); inline;
  100301. begin
  100302. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100303. end;
  100304. function TCAN2_C2RXF23.getSID : TBits_11; inline;
  100305. begin
  100306. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100307. end;
  100308. procedure TCAN2_C2RXF23.setw(thebits : TBits_32); inline;
  100309. begin
  100310. pTDefRegMap(@Self)^.val := thebits;
  100311. end;
  100312. function TCAN2_C2RXF23.getw : TBits_32; inline;
  100313. begin
  100314. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100315. end;
  100316. procedure TCAN2_C2RXF24.setEID(thebits : TBits_18); inline;
  100317. begin
  100318. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100319. end;
  100320. function TCAN2_C2RXF24.getEID : TBits_18; inline;
  100321. begin
  100322. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100323. end;
  100324. procedure TCAN2_C2RXF24.setEXID; inline;
  100325. begin
  100326. pTDefRegMap(@Self)^.&set := $00080000;
  100327. end;
  100328. procedure TCAN2_C2RXF24.clearEXID; inline;
  100329. begin
  100330. pTDefRegMap(@Self)^.clr := $00080000;
  100331. end;
  100332. procedure TCAN2_C2RXF24.setEXID(thebits : TBits_1); inline;
  100333. begin
  100334. if thebits = 0 then
  100335. pTDefRegMap(@Self)^.clr := $00080000
  100336. else
  100337. pTDefRegMap(@Self)^.&set := $00080000;
  100338. end;
  100339. function TCAN2_C2RXF24.getEXID : TBits_1; inline;
  100340. begin
  100341. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100342. end;
  100343. procedure TCAN2_C2RXF24.setSID(thebits : TBits_11); inline;
  100344. begin
  100345. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100346. end;
  100347. function TCAN2_C2RXF24.getSID : TBits_11; inline;
  100348. begin
  100349. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100350. end;
  100351. procedure TCAN2_C2RXF24.setw(thebits : TBits_32); inline;
  100352. begin
  100353. pTDefRegMap(@Self)^.val := thebits;
  100354. end;
  100355. function TCAN2_C2RXF24.getw : TBits_32; inline;
  100356. begin
  100357. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100358. end;
  100359. procedure TCAN2_C2RXF25.setEID(thebits : TBits_18); inline;
  100360. begin
  100361. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100362. end;
  100363. function TCAN2_C2RXF25.getEID : TBits_18; inline;
  100364. begin
  100365. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100366. end;
  100367. procedure TCAN2_C2RXF25.setEXID; inline;
  100368. begin
  100369. pTDefRegMap(@Self)^.&set := $00080000;
  100370. end;
  100371. procedure TCAN2_C2RXF25.clearEXID; inline;
  100372. begin
  100373. pTDefRegMap(@Self)^.clr := $00080000;
  100374. end;
  100375. procedure TCAN2_C2RXF25.setEXID(thebits : TBits_1); inline;
  100376. begin
  100377. if thebits = 0 then
  100378. pTDefRegMap(@Self)^.clr := $00080000
  100379. else
  100380. pTDefRegMap(@Self)^.&set := $00080000;
  100381. end;
  100382. function TCAN2_C2RXF25.getEXID : TBits_1; inline;
  100383. begin
  100384. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100385. end;
  100386. procedure TCAN2_C2RXF25.setSID(thebits : TBits_11); inline;
  100387. begin
  100388. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100389. end;
  100390. function TCAN2_C2RXF25.getSID : TBits_11; inline;
  100391. begin
  100392. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100393. end;
  100394. procedure TCAN2_C2RXF25.setw(thebits : TBits_32); inline;
  100395. begin
  100396. pTDefRegMap(@Self)^.val := thebits;
  100397. end;
  100398. function TCAN2_C2RXF25.getw : TBits_32; inline;
  100399. begin
  100400. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100401. end;
  100402. procedure TCAN2_C2RXF26.setEID(thebits : TBits_18); inline;
  100403. begin
  100404. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100405. end;
  100406. function TCAN2_C2RXF26.getEID : TBits_18; inline;
  100407. begin
  100408. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100409. end;
  100410. procedure TCAN2_C2RXF26.setEXID; inline;
  100411. begin
  100412. pTDefRegMap(@Self)^.&set := $00080000;
  100413. end;
  100414. procedure TCAN2_C2RXF26.clearEXID; inline;
  100415. begin
  100416. pTDefRegMap(@Self)^.clr := $00080000;
  100417. end;
  100418. procedure TCAN2_C2RXF26.setEXID(thebits : TBits_1); inline;
  100419. begin
  100420. if thebits = 0 then
  100421. pTDefRegMap(@Self)^.clr := $00080000
  100422. else
  100423. pTDefRegMap(@Self)^.&set := $00080000;
  100424. end;
  100425. function TCAN2_C2RXF26.getEXID : TBits_1; inline;
  100426. begin
  100427. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100428. end;
  100429. procedure TCAN2_C2RXF26.setSID(thebits : TBits_11); inline;
  100430. begin
  100431. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100432. end;
  100433. function TCAN2_C2RXF26.getSID : TBits_11; inline;
  100434. begin
  100435. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100436. end;
  100437. procedure TCAN2_C2RXF26.setw(thebits : TBits_32); inline;
  100438. begin
  100439. pTDefRegMap(@Self)^.val := thebits;
  100440. end;
  100441. function TCAN2_C2RXF26.getw : TBits_32; inline;
  100442. begin
  100443. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100444. end;
  100445. procedure TCAN2_C2RXF27.setEID(thebits : TBits_18); inline;
  100446. begin
  100447. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100448. end;
  100449. function TCAN2_C2RXF27.getEID : TBits_18; inline;
  100450. begin
  100451. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100452. end;
  100453. procedure TCAN2_C2RXF27.setEXID; inline;
  100454. begin
  100455. pTDefRegMap(@Self)^.&set := $00080000;
  100456. end;
  100457. procedure TCAN2_C2RXF27.clearEXID; inline;
  100458. begin
  100459. pTDefRegMap(@Self)^.clr := $00080000;
  100460. end;
  100461. procedure TCAN2_C2RXF27.setEXID(thebits : TBits_1); inline;
  100462. begin
  100463. if thebits = 0 then
  100464. pTDefRegMap(@Self)^.clr := $00080000
  100465. else
  100466. pTDefRegMap(@Self)^.&set := $00080000;
  100467. end;
  100468. function TCAN2_C2RXF27.getEXID : TBits_1; inline;
  100469. begin
  100470. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100471. end;
  100472. procedure TCAN2_C2RXF27.setSID(thebits : TBits_11); inline;
  100473. begin
  100474. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100475. end;
  100476. function TCAN2_C2RXF27.getSID : TBits_11; inline;
  100477. begin
  100478. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100479. end;
  100480. procedure TCAN2_C2RXF27.setw(thebits : TBits_32); inline;
  100481. begin
  100482. pTDefRegMap(@Self)^.val := thebits;
  100483. end;
  100484. function TCAN2_C2RXF27.getw : TBits_32; inline;
  100485. begin
  100486. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100487. end;
  100488. procedure TCAN2_C2RXF28.setEID(thebits : TBits_18); inline;
  100489. begin
  100490. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100491. end;
  100492. function TCAN2_C2RXF28.getEID : TBits_18; inline;
  100493. begin
  100494. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100495. end;
  100496. procedure TCAN2_C2RXF28.setEXID; inline;
  100497. begin
  100498. pTDefRegMap(@Self)^.&set := $00080000;
  100499. end;
  100500. procedure TCAN2_C2RXF28.clearEXID; inline;
  100501. begin
  100502. pTDefRegMap(@Self)^.clr := $00080000;
  100503. end;
  100504. procedure TCAN2_C2RXF28.setEXID(thebits : TBits_1); inline;
  100505. begin
  100506. if thebits = 0 then
  100507. pTDefRegMap(@Self)^.clr := $00080000
  100508. else
  100509. pTDefRegMap(@Self)^.&set := $00080000;
  100510. end;
  100511. function TCAN2_C2RXF28.getEXID : TBits_1; inline;
  100512. begin
  100513. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100514. end;
  100515. procedure TCAN2_C2RXF28.setSID(thebits : TBits_11); inline;
  100516. begin
  100517. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100518. end;
  100519. function TCAN2_C2RXF28.getSID : TBits_11; inline;
  100520. begin
  100521. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100522. end;
  100523. procedure TCAN2_C2RXF28.setw(thebits : TBits_32); inline;
  100524. begin
  100525. pTDefRegMap(@Self)^.val := thebits;
  100526. end;
  100527. function TCAN2_C2RXF28.getw : TBits_32; inline;
  100528. begin
  100529. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100530. end;
  100531. procedure TCAN2_C2RXF29.setEID(thebits : TBits_18); inline;
  100532. begin
  100533. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100534. end;
  100535. function TCAN2_C2RXF29.getEID : TBits_18; inline;
  100536. begin
  100537. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100538. end;
  100539. procedure TCAN2_C2RXF29.setEXID; inline;
  100540. begin
  100541. pTDefRegMap(@Self)^.&set := $00080000;
  100542. end;
  100543. procedure TCAN2_C2RXF29.clearEXID; inline;
  100544. begin
  100545. pTDefRegMap(@Self)^.clr := $00080000;
  100546. end;
  100547. procedure TCAN2_C2RXF29.setEXID(thebits : TBits_1); inline;
  100548. begin
  100549. if thebits = 0 then
  100550. pTDefRegMap(@Self)^.clr := $00080000
  100551. else
  100552. pTDefRegMap(@Self)^.&set := $00080000;
  100553. end;
  100554. function TCAN2_C2RXF29.getEXID : TBits_1; inline;
  100555. begin
  100556. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100557. end;
  100558. procedure TCAN2_C2RXF29.setSID(thebits : TBits_11); inline;
  100559. begin
  100560. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100561. end;
  100562. function TCAN2_C2RXF29.getSID : TBits_11; inline;
  100563. begin
  100564. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100565. end;
  100566. procedure TCAN2_C2RXF29.setw(thebits : TBits_32); inline;
  100567. begin
  100568. pTDefRegMap(@Self)^.val := thebits;
  100569. end;
  100570. function TCAN2_C2RXF29.getw : TBits_32; inline;
  100571. begin
  100572. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100573. end;
  100574. procedure TCAN2_C2RXF30.setEID(thebits : TBits_18); inline;
  100575. begin
  100576. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100577. end;
  100578. function TCAN2_C2RXF30.getEID : TBits_18; inline;
  100579. begin
  100580. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100581. end;
  100582. procedure TCAN2_C2RXF30.setEXID; inline;
  100583. begin
  100584. pTDefRegMap(@Self)^.&set := $00080000;
  100585. end;
  100586. procedure TCAN2_C2RXF30.clearEXID; inline;
  100587. begin
  100588. pTDefRegMap(@Self)^.clr := $00080000;
  100589. end;
  100590. procedure TCAN2_C2RXF30.setEXID(thebits : TBits_1); inline;
  100591. begin
  100592. if thebits = 0 then
  100593. pTDefRegMap(@Self)^.clr := $00080000
  100594. else
  100595. pTDefRegMap(@Self)^.&set := $00080000;
  100596. end;
  100597. function TCAN2_C2RXF30.getEXID : TBits_1; inline;
  100598. begin
  100599. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100600. end;
  100601. procedure TCAN2_C2RXF30.setSID(thebits : TBits_11); inline;
  100602. begin
  100603. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100604. end;
  100605. function TCAN2_C2RXF30.getSID : TBits_11; inline;
  100606. begin
  100607. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100608. end;
  100609. procedure TCAN2_C2RXF30.setw(thebits : TBits_32); inline;
  100610. begin
  100611. pTDefRegMap(@Self)^.val := thebits;
  100612. end;
  100613. function TCAN2_C2RXF30.getw : TBits_32; inline;
  100614. begin
  100615. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100616. end;
  100617. procedure TCAN2_C2RXF31.setEID(thebits : TBits_18); inline;
  100618. begin
  100619. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFC0000 or ( thebits shl 0 );
  100620. end;
  100621. function TCAN2_C2RXF31.getEID : TBits_18; inline;
  100622. begin
  100623. getEID := (pTDefRegMap(@Self)^.val and $0003FFFF) shr 0;
  100624. end;
  100625. procedure TCAN2_C2RXF31.setEXID; inline;
  100626. begin
  100627. pTDefRegMap(@Self)^.&set := $00080000;
  100628. end;
  100629. procedure TCAN2_C2RXF31.clearEXID; inline;
  100630. begin
  100631. pTDefRegMap(@Self)^.clr := $00080000;
  100632. end;
  100633. procedure TCAN2_C2RXF31.setEXID(thebits : TBits_1); inline;
  100634. begin
  100635. if thebits = 0 then
  100636. pTDefRegMap(@Self)^.clr := $00080000
  100637. else
  100638. pTDefRegMap(@Self)^.&set := $00080000;
  100639. end;
  100640. function TCAN2_C2RXF31.getEXID : TBits_1; inline;
  100641. begin
  100642. getEXID := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  100643. end;
  100644. procedure TCAN2_C2RXF31.setSID(thebits : TBits_11); inline;
  100645. begin
  100646. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $001FFFFF or ( thebits shl 21 );
  100647. end;
  100648. function TCAN2_C2RXF31.getSID : TBits_11; inline;
  100649. begin
  100650. getSID := (pTDefRegMap(@Self)^.val and $FFE00000) shr 21;
  100651. end;
  100652. procedure TCAN2_C2RXF31.setw(thebits : TBits_32); inline;
  100653. begin
  100654. pTDefRegMap(@Self)^.val := thebits;
  100655. end;
  100656. function TCAN2_C2RXF31.getw : TBits_32; inline;
  100657. begin
  100658. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100659. end;
  100660. procedure TCAN2_C2FIFOCON0.setTXPRI(thebits : TBits_2); inline;
  100661. begin
  100662. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  100663. end;
  100664. function TCAN2_C2FIFOCON0.getTXPRI : TBits_2; inline;
  100665. begin
  100666. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  100667. end;
  100668. procedure TCAN2_C2FIFOCON0.setRTREN; inline;
  100669. begin
  100670. pTDefRegMap(@Self)^.&set := $00000004;
  100671. end;
  100672. procedure TCAN2_C2FIFOCON0.clearRTREN; inline;
  100673. begin
  100674. pTDefRegMap(@Self)^.clr := $00000004;
  100675. end;
  100676. procedure TCAN2_C2FIFOCON0.setRTREN(thebits : TBits_1); inline;
  100677. begin
  100678. if thebits = 0 then
  100679. pTDefRegMap(@Self)^.clr := $00000004
  100680. else
  100681. pTDefRegMap(@Self)^.&set := $00000004;
  100682. end;
  100683. function TCAN2_C2FIFOCON0.getRTREN : TBits_1; inline;
  100684. begin
  100685. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  100686. end;
  100687. procedure TCAN2_C2FIFOCON0.setTXREQ; inline;
  100688. begin
  100689. pTDefRegMap(@Self)^.&set := $00000008;
  100690. end;
  100691. procedure TCAN2_C2FIFOCON0.clearTXREQ; inline;
  100692. begin
  100693. pTDefRegMap(@Self)^.clr := $00000008;
  100694. end;
  100695. procedure TCAN2_C2FIFOCON0.setTXREQ(thebits : TBits_1); inline;
  100696. begin
  100697. if thebits = 0 then
  100698. pTDefRegMap(@Self)^.clr := $00000008
  100699. else
  100700. pTDefRegMap(@Self)^.&set := $00000008;
  100701. end;
  100702. function TCAN2_C2FIFOCON0.getTXREQ : TBits_1; inline;
  100703. begin
  100704. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  100705. end;
  100706. procedure TCAN2_C2FIFOCON0.setTXERR; inline;
  100707. begin
  100708. pTDefRegMap(@Self)^.&set := $00000010;
  100709. end;
  100710. procedure TCAN2_C2FIFOCON0.clearTXERR; inline;
  100711. begin
  100712. pTDefRegMap(@Self)^.clr := $00000010;
  100713. end;
  100714. procedure TCAN2_C2FIFOCON0.setTXERR(thebits : TBits_1); inline;
  100715. begin
  100716. if thebits = 0 then
  100717. pTDefRegMap(@Self)^.clr := $00000010
  100718. else
  100719. pTDefRegMap(@Self)^.&set := $00000010;
  100720. end;
  100721. function TCAN2_C2FIFOCON0.getTXERR : TBits_1; inline;
  100722. begin
  100723. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  100724. end;
  100725. procedure TCAN2_C2FIFOCON0.setTXLARB; inline;
  100726. begin
  100727. pTDefRegMap(@Self)^.&set := $00000020;
  100728. end;
  100729. procedure TCAN2_C2FIFOCON0.clearTXLARB; inline;
  100730. begin
  100731. pTDefRegMap(@Self)^.clr := $00000020;
  100732. end;
  100733. procedure TCAN2_C2FIFOCON0.setTXLARB(thebits : TBits_1); inline;
  100734. begin
  100735. if thebits = 0 then
  100736. pTDefRegMap(@Self)^.clr := $00000020
  100737. else
  100738. pTDefRegMap(@Self)^.&set := $00000020;
  100739. end;
  100740. function TCAN2_C2FIFOCON0.getTXLARB : TBits_1; inline;
  100741. begin
  100742. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  100743. end;
  100744. procedure TCAN2_C2FIFOCON0.setTXABAT; inline;
  100745. begin
  100746. pTDefRegMap(@Self)^.&set := $00000040;
  100747. end;
  100748. procedure TCAN2_C2FIFOCON0.clearTXABAT; inline;
  100749. begin
  100750. pTDefRegMap(@Self)^.clr := $00000040;
  100751. end;
  100752. procedure TCAN2_C2FIFOCON0.setTXABAT(thebits : TBits_1); inline;
  100753. begin
  100754. if thebits = 0 then
  100755. pTDefRegMap(@Self)^.clr := $00000040
  100756. else
  100757. pTDefRegMap(@Self)^.&set := $00000040;
  100758. end;
  100759. function TCAN2_C2FIFOCON0.getTXABAT : TBits_1; inline;
  100760. begin
  100761. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  100762. end;
  100763. procedure TCAN2_C2FIFOCON0.setTXEN; inline;
  100764. begin
  100765. pTDefRegMap(@Self)^.&set := $00000080;
  100766. end;
  100767. procedure TCAN2_C2FIFOCON0.clearTXEN; inline;
  100768. begin
  100769. pTDefRegMap(@Self)^.clr := $00000080;
  100770. end;
  100771. procedure TCAN2_C2FIFOCON0.setTXEN(thebits : TBits_1); inline;
  100772. begin
  100773. if thebits = 0 then
  100774. pTDefRegMap(@Self)^.clr := $00000080
  100775. else
  100776. pTDefRegMap(@Self)^.&set := $00000080;
  100777. end;
  100778. function TCAN2_C2FIFOCON0.getTXEN : TBits_1; inline;
  100779. begin
  100780. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  100781. end;
  100782. procedure TCAN2_C2FIFOCON0.setDONLY; inline;
  100783. begin
  100784. pTDefRegMap(@Self)^.&set := $00001000;
  100785. end;
  100786. procedure TCAN2_C2FIFOCON0.clearDONLY; inline;
  100787. begin
  100788. pTDefRegMap(@Self)^.clr := $00001000;
  100789. end;
  100790. procedure TCAN2_C2FIFOCON0.setDONLY(thebits : TBits_1); inline;
  100791. begin
  100792. if thebits = 0 then
  100793. pTDefRegMap(@Self)^.clr := $00001000
  100794. else
  100795. pTDefRegMap(@Self)^.&set := $00001000;
  100796. end;
  100797. function TCAN2_C2FIFOCON0.getDONLY : TBits_1; inline;
  100798. begin
  100799. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  100800. end;
  100801. procedure TCAN2_C2FIFOCON0.setUINC; inline;
  100802. begin
  100803. pTDefRegMap(@Self)^.&set := $00002000;
  100804. end;
  100805. procedure TCAN2_C2FIFOCON0.clearUINC; inline;
  100806. begin
  100807. pTDefRegMap(@Self)^.clr := $00002000;
  100808. end;
  100809. procedure TCAN2_C2FIFOCON0.setUINC(thebits : TBits_1); inline;
  100810. begin
  100811. if thebits = 0 then
  100812. pTDefRegMap(@Self)^.clr := $00002000
  100813. else
  100814. pTDefRegMap(@Self)^.&set := $00002000;
  100815. end;
  100816. function TCAN2_C2FIFOCON0.getUINC : TBits_1; inline;
  100817. begin
  100818. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  100819. end;
  100820. procedure TCAN2_C2FIFOCON0.setFRESET; inline;
  100821. begin
  100822. pTDefRegMap(@Self)^.&set := $00004000;
  100823. end;
  100824. procedure TCAN2_C2FIFOCON0.clearFRESET; inline;
  100825. begin
  100826. pTDefRegMap(@Self)^.clr := $00004000;
  100827. end;
  100828. procedure TCAN2_C2FIFOCON0.setFRESET(thebits : TBits_1); inline;
  100829. begin
  100830. if thebits = 0 then
  100831. pTDefRegMap(@Self)^.clr := $00004000
  100832. else
  100833. pTDefRegMap(@Self)^.&set := $00004000;
  100834. end;
  100835. function TCAN2_C2FIFOCON0.getFRESET : TBits_1; inline;
  100836. begin
  100837. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  100838. end;
  100839. procedure TCAN2_C2FIFOCON0.setFSIZE(thebits : TBits_5); inline;
  100840. begin
  100841. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  100842. end;
  100843. function TCAN2_C2FIFOCON0.getFSIZE : TBits_5; inline;
  100844. begin
  100845. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  100846. end;
  100847. procedure TCAN2_C2FIFOCON0.setw(thebits : TBits_32); inline;
  100848. begin
  100849. pTDefRegMap(@Self)^.val := thebits;
  100850. end;
  100851. function TCAN2_C2FIFOCON0.getw : TBits_32; inline;
  100852. begin
  100853. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  100854. end;
  100855. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIF; inline;
  100856. begin
  100857. pTDefRegMap(@Self)^.&set := $00000001;
  100858. end;
  100859. procedure TCAN2_C2FIFOINT0.clearRXNEMPTYIF; inline;
  100860. begin
  100861. pTDefRegMap(@Self)^.clr := $00000001;
  100862. end;
  100863. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIF(thebits : TBits_1); inline;
  100864. begin
  100865. if thebits = 0 then
  100866. pTDefRegMap(@Self)^.clr := $00000001
  100867. else
  100868. pTDefRegMap(@Self)^.&set := $00000001;
  100869. end;
  100870. function TCAN2_C2FIFOINT0.getRXNEMPTYIF : TBits_1; inline;
  100871. begin
  100872. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  100873. end;
  100874. procedure TCAN2_C2FIFOINT0.setRXHALFIF; inline;
  100875. begin
  100876. pTDefRegMap(@Self)^.&set := $00000002;
  100877. end;
  100878. procedure TCAN2_C2FIFOINT0.clearRXHALFIF; inline;
  100879. begin
  100880. pTDefRegMap(@Self)^.clr := $00000002;
  100881. end;
  100882. procedure TCAN2_C2FIFOINT0.setRXHALFIF(thebits : TBits_1); inline;
  100883. begin
  100884. if thebits = 0 then
  100885. pTDefRegMap(@Self)^.clr := $00000002
  100886. else
  100887. pTDefRegMap(@Self)^.&set := $00000002;
  100888. end;
  100889. function TCAN2_C2FIFOINT0.getRXHALFIF : TBits_1; inline;
  100890. begin
  100891. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  100892. end;
  100893. procedure TCAN2_C2FIFOINT0.setRXFULLIF; inline;
  100894. begin
  100895. pTDefRegMap(@Self)^.&set := $00000004;
  100896. end;
  100897. procedure TCAN2_C2FIFOINT0.clearRXFULLIF; inline;
  100898. begin
  100899. pTDefRegMap(@Self)^.clr := $00000004;
  100900. end;
  100901. procedure TCAN2_C2FIFOINT0.setRXFULLIF(thebits : TBits_1); inline;
  100902. begin
  100903. if thebits = 0 then
  100904. pTDefRegMap(@Self)^.clr := $00000004
  100905. else
  100906. pTDefRegMap(@Self)^.&set := $00000004;
  100907. end;
  100908. function TCAN2_C2FIFOINT0.getRXFULLIF : TBits_1; inline;
  100909. begin
  100910. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  100911. end;
  100912. procedure TCAN2_C2FIFOINT0.setRXOVFLIF; inline;
  100913. begin
  100914. pTDefRegMap(@Self)^.&set := $00000008;
  100915. end;
  100916. procedure TCAN2_C2FIFOINT0.clearRXOVFLIF; inline;
  100917. begin
  100918. pTDefRegMap(@Self)^.clr := $00000008;
  100919. end;
  100920. procedure TCAN2_C2FIFOINT0.setRXOVFLIF(thebits : TBits_1); inline;
  100921. begin
  100922. if thebits = 0 then
  100923. pTDefRegMap(@Self)^.clr := $00000008
  100924. else
  100925. pTDefRegMap(@Self)^.&set := $00000008;
  100926. end;
  100927. function TCAN2_C2FIFOINT0.getRXOVFLIF : TBits_1; inline;
  100928. begin
  100929. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  100930. end;
  100931. procedure TCAN2_C2FIFOINT0.setTXEMPTYIF; inline;
  100932. begin
  100933. pTDefRegMap(@Self)^.&set := $00000100;
  100934. end;
  100935. procedure TCAN2_C2FIFOINT0.clearTXEMPTYIF; inline;
  100936. begin
  100937. pTDefRegMap(@Self)^.clr := $00000100;
  100938. end;
  100939. procedure TCAN2_C2FIFOINT0.setTXEMPTYIF(thebits : TBits_1); inline;
  100940. begin
  100941. if thebits = 0 then
  100942. pTDefRegMap(@Self)^.clr := $00000100
  100943. else
  100944. pTDefRegMap(@Self)^.&set := $00000100;
  100945. end;
  100946. function TCAN2_C2FIFOINT0.getTXEMPTYIF : TBits_1; inline;
  100947. begin
  100948. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  100949. end;
  100950. procedure TCAN2_C2FIFOINT0.setTXHALFIF; inline;
  100951. begin
  100952. pTDefRegMap(@Self)^.&set := $00000200;
  100953. end;
  100954. procedure TCAN2_C2FIFOINT0.clearTXHALFIF; inline;
  100955. begin
  100956. pTDefRegMap(@Self)^.clr := $00000200;
  100957. end;
  100958. procedure TCAN2_C2FIFOINT0.setTXHALFIF(thebits : TBits_1); inline;
  100959. begin
  100960. if thebits = 0 then
  100961. pTDefRegMap(@Self)^.clr := $00000200
  100962. else
  100963. pTDefRegMap(@Self)^.&set := $00000200;
  100964. end;
  100965. function TCAN2_C2FIFOINT0.getTXHALFIF : TBits_1; inline;
  100966. begin
  100967. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  100968. end;
  100969. procedure TCAN2_C2FIFOINT0.setTXNFULLIF; inline;
  100970. begin
  100971. pTDefRegMap(@Self)^.&set := $00000400;
  100972. end;
  100973. procedure TCAN2_C2FIFOINT0.clearTXNFULLIF; inline;
  100974. begin
  100975. pTDefRegMap(@Self)^.clr := $00000400;
  100976. end;
  100977. procedure TCAN2_C2FIFOINT0.setTXNFULLIF(thebits : TBits_1); inline;
  100978. begin
  100979. if thebits = 0 then
  100980. pTDefRegMap(@Self)^.clr := $00000400
  100981. else
  100982. pTDefRegMap(@Self)^.&set := $00000400;
  100983. end;
  100984. function TCAN2_C2FIFOINT0.getTXNFULLIF : TBits_1; inline;
  100985. begin
  100986. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  100987. end;
  100988. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIE; inline;
  100989. begin
  100990. pTDefRegMap(@Self)^.&set := $00010000;
  100991. end;
  100992. procedure TCAN2_C2FIFOINT0.clearRXNEMPTYIE; inline;
  100993. begin
  100994. pTDefRegMap(@Self)^.clr := $00010000;
  100995. end;
  100996. procedure TCAN2_C2FIFOINT0.setRXNEMPTYIE(thebits : TBits_1); inline;
  100997. begin
  100998. if thebits = 0 then
  100999. pTDefRegMap(@Self)^.clr := $00010000
  101000. else
  101001. pTDefRegMap(@Self)^.&set := $00010000;
  101002. end;
  101003. function TCAN2_C2FIFOINT0.getRXNEMPTYIE : TBits_1; inline;
  101004. begin
  101005. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  101006. end;
  101007. procedure TCAN2_C2FIFOINT0.setRXHALFIE; inline;
  101008. begin
  101009. pTDefRegMap(@Self)^.&set := $00020000;
  101010. end;
  101011. procedure TCAN2_C2FIFOINT0.clearRXHALFIE; inline;
  101012. begin
  101013. pTDefRegMap(@Self)^.clr := $00020000;
  101014. end;
  101015. procedure TCAN2_C2FIFOINT0.setRXHALFIE(thebits : TBits_1); inline;
  101016. begin
  101017. if thebits = 0 then
  101018. pTDefRegMap(@Self)^.clr := $00020000
  101019. else
  101020. pTDefRegMap(@Self)^.&set := $00020000;
  101021. end;
  101022. function TCAN2_C2FIFOINT0.getRXHALFIE : TBits_1; inline;
  101023. begin
  101024. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  101025. end;
  101026. procedure TCAN2_C2FIFOINT0.setRXFULLIE; inline;
  101027. begin
  101028. pTDefRegMap(@Self)^.&set := $00040000;
  101029. end;
  101030. procedure TCAN2_C2FIFOINT0.clearRXFULLIE; inline;
  101031. begin
  101032. pTDefRegMap(@Self)^.clr := $00040000;
  101033. end;
  101034. procedure TCAN2_C2FIFOINT0.setRXFULLIE(thebits : TBits_1); inline;
  101035. begin
  101036. if thebits = 0 then
  101037. pTDefRegMap(@Self)^.clr := $00040000
  101038. else
  101039. pTDefRegMap(@Self)^.&set := $00040000;
  101040. end;
  101041. function TCAN2_C2FIFOINT0.getRXFULLIE : TBits_1; inline;
  101042. begin
  101043. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  101044. end;
  101045. procedure TCAN2_C2FIFOINT0.setRXOVFLIE; inline;
  101046. begin
  101047. pTDefRegMap(@Self)^.&set := $00080000;
  101048. end;
  101049. procedure TCAN2_C2FIFOINT0.clearRXOVFLIE; inline;
  101050. begin
  101051. pTDefRegMap(@Self)^.clr := $00080000;
  101052. end;
  101053. procedure TCAN2_C2FIFOINT0.setRXOVFLIE(thebits : TBits_1); inline;
  101054. begin
  101055. if thebits = 0 then
  101056. pTDefRegMap(@Self)^.clr := $00080000
  101057. else
  101058. pTDefRegMap(@Self)^.&set := $00080000;
  101059. end;
  101060. function TCAN2_C2FIFOINT0.getRXOVFLIE : TBits_1; inline;
  101061. begin
  101062. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  101063. end;
  101064. procedure TCAN2_C2FIFOINT0.setTXEMPTYIE; inline;
  101065. begin
  101066. pTDefRegMap(@Self)^.&set := $01000000;
  101067. end;
  101068. procedure TCAN2_C2FIFOINT0.clearTXEMPTYIE; inline;
  101069. begin
  101070. pTDefRegMap(@Self)^.clr := $01000000;
  101071. end;
  101072. procedure TCAN2_C2FIFOINT0.setTXEMPTYIE(thebits : TBits_1); inline;
  101073. begin
  101074. if thebits = 0 then
  101075. pTDefRegMap(@Self)^.clr := $01000000
  101076. else
  101077. pTDefRegMap(@Self)^.&set := $01000000;
  101078. end;
  101079. function TCAN2_C2FIFOINT0.getTXEMPTYIE : TBits_1; inline;
  101080. begin
  101081. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  101082. end;
  101083. procedure TCAN2_C2FIFOINT0.setTXHALFIE; inline;
  101084. begin
  101085. pTDefRegMap(@Self)^.&set := $02000000;
  101086. end;
  101087. procedure TCAN2_C2FIFOINT0.clearTXHALFIE; inline;
  101088. begin
  101089. pTDefRegMap(@Self)^.clr := $02000000;
  101090. end;
  101091. procedure TCAN2_C2FIFOINT0.setTXHALFIE(thebits : TBits_1); inline;
  101092. begin
  101093. if thebits = 0 then
  101094. pTDefRegMap(@Self)^.clr := $02000000
  101095. else
  101096. pTDefRegMap(@Self)^.&set := $02000000;
  101097. end;
  101098. function TCAN2_C2FIFOINT0.getTXHALFIE : TBits_1; inline;
  101099. begin
  101100. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  101101. end;
  101102. procedure TCAN2_C2FIFOINT0.setTXNFULLIE; inline;
  101103. begin
  101104. pTDefRegMap(@Self)^.&set := $04000000;
  101105. end;
  101106. procedure TCAN2_C2FIFOINT0.clearTXNFULLIE; inline;
  101107. begin
  101108. pTDefRegMap(@Self)^.clr := $04000000;
  101109. end;
  101110. procedure TCAN2_C2FIFOINT0.setTXNFULLIE(thebits : TBits_1); inline;
  101111. begin
  101112. if thebits = 0 then
  101113. pTDefRegMap(@Self)^.clr := $04000000
  101114. else
  101115. pTDefRegMap(@Self)^.&set := $04000000;
  101116. end;
  101117. function TCAN2_C2FIFOINT0.getTXNFULLIE : TBits_1; inline;
  101118. begin
  101119. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  101120. end;
  101121. procedure TCAN2_C2FIFOINT0.setw(thebits : TBits_32); inline;
  101122. begin
  101123. pTDefRegMap(@Self)^.val := thebits;
  101124. end;
  101125. function TCAN2_C2FIFOINT0.getw : TBits_32; inline;
  101126. begin
  101127. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101128. end;
  101129. procedure TCAN2_C2FIFOCI0.setCFIFOCI(thebits : TBits_5); inline;
  101130. begin
  101131. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  101132. end;
  101133. function TCAN2_C2FIFOCI0.getCFIFOCI : TBits_5; inline;
  101134. begin
  101135. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  101136. end;
  101137. procedure TCAN2_C2FIFOCI0.setw(thebits : TBits_32); inline;
  101138. begin
  101139. pTDefRegMap(@Self)^.val := thebits;
  101140. end;
  101141. function TCAN2_C2FIFOCI0.getw : TBits_32; inline;
  101142. begin
  101143. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101144. end;
  101145. procedure TCAN2_C2FIFOCON1.setTXPRI(thebits : TBits_2); inline;
  101146. begin
  101147. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  101148. end;
  101149. function TCAN2_C2FIFOCON1.getTXPRI : TBits_2; inline;
  101150. begin
  101151. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  101152. end;
  101153. procedure TCAN2_C2FIFOCON1.setRTREN; inline;
  101154. begin
  101155. pTDefRegMap(@Self)^.&set := $00000004;
  101156. end;
  101157. procedure TCAN2_C2FIFOCON1.clearRTREN; inline;
  101158. begin
  101159. pTDefRegMap(@Self)^.clr := $00000004;
  101160. end;
  101161. procedure TCAN2_C2FIFOCON1.setRTREN(thebits : TBits_1); inline;
  101162. begin
  101163. if thebits = 0 then
  101164. pTDefRegMap(@Self)^.clr := $00000004
  101165. else
  101166. pTDefRegMap(@Self)^.&set := $00000004;
  101167. end;
  101168. function TCAN2_C2FIFOCON1.getRTREN : TBits_1; inline;
  101169. begin
  101170. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  101171. end;
  101172. procedure TCAN2_C2FIFOCON1.setTXREQ; inline;
  101173. begin
  101174. pTDefRegMap(@Self)^.&set := $00000008;
  101175. end;
  101176. procedure TCAN2_C2FIFOCON1.clearTXREQ; inline;
  101177. begin
  101178. pTDefRegMap(@Self)^.clr := $00000008;
  101179. end;
  101180. procedure TCAN2_C2FIFOCON1.setTXREQ(thebits : TBits_1); inline;
  101181. begin
  101182. if thebits = 0 then
  101183. pTDefRegMap(@Self)^.clr := $00000008
  101184. else
  101185. pTDefRegMap(@Self)^.&set := $00000008;
  101186. end;
  101187. function TCAN2_C2FIFOCON1.getTXREQ : TBits_1; inline;
  101188. begin
  101189. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  101190. end;
  101191. procedure TCAN2_C2FIFOCON1.setTXERR; inline;
  101192. begin
  101193. pTDefRegMap(@Self)^.&set := $00000010;
  101194. end;
  101195. procedure TCAN2_C2FIFOCON1.clearTXERR; inline;
  101196. begin
  101197. pTDefRegMap(@Self)^.clr := $00000010;
  101198. end;
  101199. procedure TCAN2_C2FIFOCON1.setTXERR(thebits : TBits_1); inline;
  101200. begin
  101201. if thebits = 0 then
  101202. pTDefRegMap(@Self)^.clr := $00000010
  101203. else
  101204. pTDefRegMap(@Self)^.&set := $00000010;
  101205. end;
  101206. function TCAN2_C2FIFOCON1.getTXERR : TBits_1; inline;
  101207. begin
  101208. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  101209. end;
  101210. procedure TCAN2_C2FIFOCON1.setTXLARB; inline;
  101211. begin
  101212. pTDefRegMap(@Self)^.&set := $00000020;
  101213. end;
  101214. procedure TCAN2_C2FIFOCON1.clearTXLARB; inline;
  101215. begin
  101216. pTDefRegMap(@Self)^.clr := $00000020;
  101217. end;
  101218. procedure TCAN2_C2FIFOCON1.setTXLARB(thebits : TBits_1); inline;
  101219. begin
  101220. if thebits = 0 then
  101221. pTDefRegMap(@Self)^.clr := $00000020
  101222. else
  101223. pTDefRegMap(@Self)^.&set := $00000020;
  101224. end;
  101225. function TCAN2_C2FIFOCON1.getTXLARB : TBits_1; inline;
  101226. begin
  101227. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  101228. end;
  101229. procedure TCAN2_C2FIFOCON1.setTXABAT; inline;
  101230. begin
  101231. pTDefRegMap(@Self)^.&set := $00000040;
  101232. end;
  101233. procedure TCAN2_C2FIFOCON1.clearTXABAT; inline;
  101234. begin
  101235. pTDefRegMap(@Self)^.clr := $00000040;
  101236. end;
  101237. procedure TCAN2_C2FIFOCON1.setTXABAT(thebits : TBits_1); inline;
  101238. begin
  101239. if thebits = 0 then
  101240. pTDefRegMap(@Self)^.clr := $00000040
  101241. else
  101242. pTDefRegMap(@Self)^.&set := $00000040;
  101243. end;
  101244. function TCAN2_C2FIFOCON1.getTXABAT : TBits_1; inline;
  101245. begin
  101246. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  101247. end;
  101248. procedure TCAN2_C2FIFOCON1.setTXEN; inline;
  101249. begin
  101250. pTDefRegMap(@Self)^.&set := $00000080;
  101251. end;
  101252. procedure TCAN2_C2FIFOCON1.clearTXEN; inline;
  101253. begin
  101254. pTDefRegMap(@Self)^.clr := $00000080;
  101255. end;
  101256. procedure TCAN2_C2FIFOCON1.setTXEN(thebits : TBits_1); inline;
  101257. begin
  101258. if thebits = 0 then
  101259. pTDefRegMap(@Self)^.clr := $00000080
  101260. else
  101261. pTDefRegMap(@Self)^.&set := $00000080;
  101262. end;
  101263. function TCAN2_C2FIFOCON1.getTXEN : TBits_1; inline;
  101264. begin
  101265. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  101266. end;
  101267. procedure TCAN2_C2FIFOCON1.setDONLY; inline;
  101268. begin
  101269. pTDefRegMap(@Self)^.&set := $00001000;
  101270. end;
  101271. procedure TCAN2_C2FIFOCON1.clearDONLY; inline;
  101272. begin
  101273. pTDefRegMap(@Self)^.clr := $00001000;
  101274. end;
  101275. procedure TCAN2_C2FIFOCON1.setDONLY(thebits : TBits_1); inline;
  101276. begin
  101277. if thebits = 0 then
  101278. pTDefRegMap(@Self)^.clr := $00001000
  101279. else
  101280. pTDefRegMap(@Self)^.&set := $00001000;
  101281. end;
  101282. function TCAN2_C2FIFOCON1.getDONLY : TBits_1; inline;
  101283. begin
  101284. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  101285. end;
  101286. procedure TCAN2_C2FIFOCON1.setUINC; inline;
  101287. begin
  101288. pTDefRegMap(@Self)^.&set := $00002000;
  101289. end;
  101290. procedure TCAN2_C2FIFOCON1.clearUINC; inline;
  101291. begin
  101292. pTDefRegMap(@Self)^.clr := $00002000;
  101293. end;
  101294. procedure TCAN2_C2FIFOCON1.setUINC(thebits : TBits_1); inline;
  101295. begin
  101296. if thebits = 0 then
  101297. pTDefRegMap(@Self)^.clr := $00002000
  101298. else
  101299. pTDefRegMap(@Self)^.&set := $00002000;
  101300. end;
  101301. function TCAN2_C2FIFOCON1.getUINC : TBits_1; inline;
  101302. begin
  101303. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  101304. end;
  101305. procedure TCAN2_C2FIFOCON1.setFRESET; inline;
  101306. begin
  101307. pTDefRegMap(@Self)^.&set := $00004000;
  101308. end;
  101309. procedure TCAN2_C2FIFOCON1.clearFRESET; inline;
  101310. begin
  101311. pTDefRegMap(@Self)^.clr := $00004000;
  101312. end;
  101313. procedure TCAN2_C2FIFOCON1.setFRESET(thebits : TBits_1); inline;
  101314. begin
  101315. if thebits = 0 then
  101316. pTDefRegMap(@Self)^.clr := $00004000
  101317. else
  101318. pTDefRegMap(@Self)^.&set := $00004000;
  101319. end;
  101320. function TCAN2_C2FIFOCON1.getFRESET : TBits_1; inline;
  101321. begin
  101322. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  101323. end;
  101324. procedure TCAN2_C2FIFOCON1.setFSIZE(thebits : TBits_5); inline;
  101325. begin
  101326. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  101327. end;
  101328. function TCAN2_C2FIFOCON1.getFSIZE : TBits_5; inline;
  101329. begin
  101330. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  101331. end;
  101332. procedure TCAN2_C2FIFOCON1.setw(thebits : TBits_32); inline;
  101333. begin
  101334. pTDefRegMap(@Self)^.val := thebits;
  101335. end;
  101336. function TCAN2_C2FIFOCON1.getw : TBits_32; inline;
  101337. begin
  101338. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101339. end;
  101340. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIF; inline;
  101341. begin
  101342. pTDefRegMap(@Self)^.&set := $00000001;
  101343. end;
  101344. procedure TCAN2_C2FIFOINT1.clearRXNEMPTYIF; inline;
  101345. begin
  101346. pTDefRegMap(@Self)^.clr := $00000001;
  101347. end;
  101348. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIF(thebits : TBits_1); inline;
  101349. begin
  101350. if thebits = 0 then
  101351. pTDefRegMap(@Self)^.clr := $00000001
  101352. else
  101353. pTDefRegMap(@Self)^.&set := $00000001;
  101354. end;
  101355. function TCAN2_C2FIFOINT1.getRXNEMPTYIF : TBits_1; inline;
  101356. begin
  101357. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  101358. end;
  101359. procedure TCAN2_C2FIFOINT1.setRXHALFIF; inline;
  101360. begin
  101361. pTDefRegMap(@Self)^.&set := $00000002;
  101362. end;
  101363. procedure TCAN2_C2FIFOINT1.clearRXHALFIF; inline;
  101364. begin
  101365. pTDefRegMap(@Self)^.clr := $00000002;
  101366. end;
  101367. procedure TCAN2_C2FIFOINT1.setRXHALFIF(thebits : TBits_1); inline;
  101368. begin
  101369. if thebits = 0 then
  101370. pTDefRegMap(@Self)^.clr := $00000002
  101371. else
  101372. pTDefRegMap(@Self)^.&set := $00000002;
  101373. end;
  101374. function TCAN2_C2FIFOINT1.getRXHALFIF : TBits_1; inline;
  101375. begin
  101376. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  101377. end;
  101378. procedure TCAN2_C2FIFOINT1.setRXFULLIF; inline;
  101379. begin
  101380. pTDefRegMap(@Self)^.&set := $00000004;
  101381. end;
  101382. procedure TCAN2_C2FIFOINT1.clearRXFULLIF; inline;
  101383. begin
  101384. pTDefRegMap(@Self)^.clr := $00000004;
  101385. end;
  101386. procedure TCAN2_C2FIFOINT1.setRXFULLIF(thebits : TBits_1); inline;
  101387. begin
  101388. if thebits = 0 then
  101389. pTDefRegMap(@Self)^.clr := $00000004
  101390. else
  101391. pTDefRegMap(@Self)^.&set := $00000004;
  101392. end;
  101393. function TCAN2_C2FIFOINT1.getRXFULLIF : TBits_1; inline;
  101394. begin
  101395. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  101396. end;
  101397. procedure TCAN2_C2FIFOINT1.setRXOVFLIF; inline;
  101398. begin
  101399. pTDefRegMap(@Self)^.&set := $00000008;
  101400. end;
  101401. procedure TCAN2_C2FIFOINT1.clearRXOVFLIF; inline;
  101402. begin
  101403. pTDefRegMap(@Self)^.clr := $00000008;
  101404. end;
  101405. procedure TCAN2_C2FIFOINT1.setRXOVFLIF(thebits : TBits_1); inline;
  101406. begin
  101407. if thebits = 0 then
  101408. pTDefRegMap(@Self)^.clr := $00000008
  101409. else
  101410. pTDefRegMap(@Self)^.&set := $00000008;
  101411. end;
  101412. function TCAN2_C2FIFOINT1.getRXOVFLIF : TBits_1; inline;
  101413. begin
  101414. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  101415. end;
  101416. procedure TCAN2_C2FIFOINT1.setTXEMPTYIF; inline;
  101417. begin
  101418. pTDefRegMap(@Self)^.&set := $00000100;
  101419. end;
  101420. procedure TCAN2_C2FIFOINT1.clearTXEMPTYIF; inline;
  101421. begin
  101422. pTDefRegMap(@Self)^.clr := $00000100;
  101423. end;
  101424. procedure TCAN2_C2FIFOINT1.setTXEMPTYIF(thebits : TBits_1); inline;
  101425. begin
  101426. if thebits = 0 then
  101427. pTDefRegMap(@Self)^.clr := $00000100
  101428. else
  101429. pTDefRegMap(@Self)^.&set := $00000100;
  101430. end;
  101431. function TCAN2_C2FIFOINT1.getTXEMPTYIF : TBits_1; inline;
  101432. begin
  101433. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  101434. end;
  101435. procedure TCAN2_C2FIFOINT1.setTXHALFIF; inline;
  101436. begin
  101437. pTDefRegMap(@Self)^.&set := $00000200;
  101438. end;
  101439. procedure TCAN2_C2FIFOINT1.clearTXHALFIF; inline;
  101440. begin
  101441. pTDefRegMap(@Self)^.clr := $00000200;
  101442. end;
  101443. procedure TCAN2_C2FIFOINT1.setTXHALFIF(thebits : TBits_1); inline;
  101444. begin
  101445. if thebits = 0 then
  101446. pTDefRegMap(@Self)^.clr := $00000200
  101447. else
  101448. pTDefRegMap(@Self)^.&set := $00000200;
  101449. end;
  101450. function TCAN2_C2FIFOINT1.getTXHALFIF : TBits_1; inline;
  101451. begin
  101452. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  101453. end;
  101454. procedure TCAN2_C2FIFOINT1.setTXNFULLIF; inline;
  101455. begin
  101456. pTDefRegMap(@Self)^.&set := $00000400;
  101457. end;
  101458. procedure TCAN2_C2FIFOINT1.clearTXNFULLIF; inline;
  101459. begin
  101460. pTDefRegMap(@Self)^.clr := $00000400;
  101461. end;
  101462. procedure TCAN2_C2FIFOINT1.setTXNFULLIF(thebits : TBits_1); inline;
  101463. begin
  101464. if thebits = 0 then
  101465. pTDefRegMap(@Self)^.clr := $00000400
  101466. else
  101467. pTDefRegMap(@Self)^.&set := $00000400;
  101468. end;
  101469. function TCAN2_C2FIFOINT1.getTXNFULLIF : TBits_1; inline;
  101470. begin
  101471. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  101472. end;
  101473. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIE; inline;
  101474. begin
  101475. pTDefRegMap(@Self)^.&set := $00010000;
  101476. end;
  101477. procedure TCAN2_C2FIFOINT1.clearRXNEMPTYIE; inline;
  101478. begin
  101479. pTDefRegMap(@Self)^.clr := $00010000;
  101480. end;
  101481. procedure TCAN2_C2FIFOINT1.setRXNEMPTYIE(thebits : TBits_1); inline;
  101482. begin
  101483. if thebits = 0 then
  101484. pTDefRegMap(@Self)^.clr := $00010000
  101485. else
  101486. pTDefRegMap(@Self)^.&set := $00010000;
  101487. end;
  101488. function TCAN2_C2FIFOINT1.getRXNEMPTYIE : TBits_1; inline;
  101489. begin
  101490. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  101491. end;
  101492. procedure TCAN2_C2FIFOINT1.setRXHALFIE; inline;
  101493. begin
  101494. pTDefRegMap(@Self)^.&set := $00020000;
  101495. end;
  101496. procedure TCAN2_C2FIFOINT1.clearRXHALFIE; inline;
  101497. begin
  101498. pTDefRegMap(@Self)^.clr := $00020000;
  101499. end;
  101500. procedure TCAN2_C2FIFOINT1.setRXHALFIE(thebits : TBits_1); inline;
  101501. begin
  101502. if thebits = 0 then
  101503. pTDefRegMap(@Self)^.clr := $00020000
  101504. else
  101505. pTDefRegMap(@Self)^.&set := $00020000;
  101506. end;
  101507. function TCAN2_C2FIFOINT1.getRXHALFIE : TBits_1; inline;
  101508. begin
  101509. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  101510. end;
  101511. procedure TCAN2_C2FIFOINT1.setRXFULLIE; inline;
  101512. begin
  101513. pTDefRegMap(@Self)^.&set := $00040000;
  101514. end;
  101515. procedure TCAN2_C2FIFOINT1.clearRXFULLIE; inline;
  101516. begin
  101517. pTDefRegMap(@Self)^.clr := $00040000;
  101518. end;
  101519. procedure TCAN2_C2FIFOINT1.setRXFULLIE(thebits : TBits_1); inline;
  101520. begin
  101521. if thebits = 0 then
  101522. pTDefRegMap(@Self)^.clr := $00040000
  101523. else
  101524. pTDefRegMap(@Self)^.&set := $00040000;
  101525. end;
  101526. function TCAN2_C2FIFOINT1.getRXFULLIE : TBits_1; inline;
  101527. begin
  101528. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  101529. end;
  101530. procedure TCAN2_C2FIFOINT1.setRXOVFLIE; inline;
  101531. begin
  101532. pTDefRegMap(@Self)^.&set := $00080000;
  101533. end;
  101534. procedure TCAN2_C2FIFOINT1.clearRXOVFLIE; inline;
  101535. begin
  101536. pTDefRegMap(@Self)^.clr := $00080000;
  101537. end;
  101538. procedure TCAN2_C2FIFOINT1.setRXOVFLIE(thebits : TBits_1); inline;
  101539. begin
  101540. if thebits = 0 then
  101541. pTDefRegMap(@Self)^.clr := $00080000
  101542. else
  101543. pTDefRegMap(@Self)^.&set := $00080000;
  101544. end;
  101545. function TCAN2_C2FIFOINT1.getRXOVFLIE : TBits_1; inline;
  101546. begin
  101547. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  101548. end;
  101549. procedure TCAN2_C2FIFOINT1.setTXEMPTYIE; inline;
  101550. begin
  101551. pTDefRegMap(@Self)^.&set := $01000000;
  101552. end;
  101553. procedure TCAN2_C2FIFOINT1.clearTXEMPTYIE; inline;
  101554. begin
  101555. pTDefRegMap(@Self)^.clr := $01000000;
  101556. end;
  101557. procedure TCAN2_C2FIFOINT1.setTXEMPTYIE(thebits : TBits_1); inline;
  101558. begin
  101559. if thebits = 0 then
  101560. pTDefRegMap(@Self)^.clr := $01000000
  101561. else
  101562. pTDefRegMap(@Self)^.&set := $01000000;
  101563. end;
  101564. function TCAN2_C2FIFOINT1.getTXEMPTYIE : TBits_1; inline;
  101565. begin
  101566. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  101567. end;
  101568. procedure TCAN2_C2FIFOINT1.setTXHALFIE; inline;
  101569. begin
  101570. pTDefRegMap(@Self)^.&set := $02000000;
  101571. end;
  101572. procedure TCAN2_C2FIFOINT1.clearTXHALFIE; inline;
  101573. begin
  101574. pTDefRegMap(@Self)^.clr := $02000000;
  101575. end;
  101576. procedure TCAN2_C2FIFOINT1.setTXHALFIE(thebits : TBits_1); inline;
  101577. begin
  101578. if thebits = 0 then
  101579. pTDefRegMap(@Self)^.clr := $02000000
  101580. else
  101581. pTDefRegMap(@Self)^.&set := $02000000;
  101582. end;
  101583. function TCAN2_C2FIFOINT1.getTXHALFIE : TBits_1; inline;
  101584. begin
  101585. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  101586. end;
  101587. procedure TCAN2_C2FIFOINT1.setTXNFULLIE; inline;
  101588. begin
  101589. pTDefRegMap(@Self)^.&set := $04000000;
  101590. end;
  101591. procedure TCAN2_C2FIFOINT1.clearTXNFULLIE; inline;
  101592. begin
  101593. pTDefRegMap(@Self)^.clr := $04000000;
  101594. end;
  101595. procedure TCAN2_C2FIFOINT1.setTXNFULLIE(thebits : TBits_1); inline;
  101596. begin
  101597. if thebits = 0 then
  101598. pTDefRegMap(@Self)^.clr := $04000000
  101599. else
  101600. pTDefRegMap(@Self)^.&set := $04000000;
  101601. end;
  101602. function TCAN2_C2FIFOINT1.getTXNFULLIE : TBits_1; inline;
  101603. begin
  101604. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  101605. end;
  101606. procedure TCAN2_C2FIFOINT1.setw(thebits : TBits_32); inline;
  101607. begin
  101608. pTDefRegMap(@Self)^.val := thebits;
  101609. end;
  101610. function TCAN2_C2FIFOINT1.getw : TBits_32; inline;
  101611. begin
  101612. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101613. end;
  101614. procedure TCAN2_C2FIFOCI1.setCFIFOCI(thebits : TBits_5); inline;
  101615. begin
  101616. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  101617. end;
  101618. function TCAN2_C2FIFOCI1.getCFIFOCI : TBits_5; inline;
  101619. begin
  101620. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  101621. end;
  101622. procedure TCAN2_C2FIFOCI1.setw(thebits : TBits_32); inline;
  101623. begin
  101624. pTDefRegMap(@Self)^.val := thebits;
  101625. end;
  101626. function TCAN2_C2FIFOCI1.getw : TBits_32; inline;
  101627. begin
  101628. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101629. end;
  101630. procedure TCAN2_C2FIFOCON2.setTXPRI(thebits : TBits_2); inline;
  101631. begin
  101632. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  101633. end;
  101634. function TCAN2_C2FIFOCON2.getTXPRI : TBits_2; inline;
  101635. begin
  101636. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  101637. end;
  101638. procedure TCAN2_C2FIFOCON2.setRTREN; inline;
  101639. begin
  101640. pTDefRegMap(@Self)^.&set := $00000004;
  101641. end;
  101642. procedure TCAN2_C2FIFOCON2.clearRTREN; inline;
  101643. begin
  101644. pTDefRegMap(@Self)^.clr := $00000004;
  101645. end;
  101646. procedure TCAN2_C2FIFOCON2.setRTREN(thebits : TBits_1); inline;
  101647. begin
  101648. if thebits = 0 then
  101649. pTDefRegMap(@Self)^.clr := $00000004
  101650. else
  101651. pTDefRegMap(@Self)^.&set := $00000004;
  101652. end;
  101653. function TCAN2_C2FIFOCON2.getRTREN : TBits_1; inline;
  101654. begin
  101655. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  101656. end;
  101657. procedure TCAN2_C2FIFOCON2.setTXREQ; inline;
  101658. begin
  101659. pTDefRegMap(@Self)^.&set := $00000008;
  101660. end;
  101661. procedure TCAN2_C2FIFOCON2.clearTXREQ; inline;
  101662. begin
  101663. pTDefRegMap(@Self)^.clr := $00000008;
  101664. end;
  101665. procedure TCAN2_C2FIFOCON2.setTXREQ(thebits : TBits_1); inline;
  101666. begin
  101667. if thebits = 0 then
  101668. pTDefRegMap(@Self)^.clr := $00000008
  101669. else
  101670. pTDefRegMap(@Self)^.&set := $00000008;
  101671. end;
  101672. function TCAN2_C2FIFOCON2.getTXREQ : TBits_1; inline;
  101673. begin
  101674. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  101675. end;
  101676. procedure TCAN2_C2FIFOCON2.setTXERR; inline;
  101677. begin
  101678. pTDefRegMap(@Self)^.&set := $00000010;
  101679. end;
  101680. procedure TCAN2_C2FIFOCON2.clearTXERR; inline;
  101681. begin
  101682. pTDefRegMap(@Self)^.clr := $00000010;
  101683. end;
  101684. procedure TCAN2_C2FIFOCON2.setTXERR(thebits : TBits_1); inline;
  101685. begin
  101686. if thebits = 0 then
  101687. pTDefRegMap(@Self)^.clr := $00000010
  101688. else
  101689. pTDefRegMap(@Self)^.&set := $00000010;
  101690. end;
  101691. function TCAN2_C2FIFOCON2.getTXERR : TBits_1; inline;
  101692. begin
  101693. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  101694. end;
  101695. procedure TCAN2_C2FIFOCON2.setTXLARB; inline;
  101696. begin
  101697. pTDefRegMap(@Self)^.&set := $00000020;
  101698. end;
  101699. procedure TCAN2_C2FIFOCON2.clearTXLARB; inline;
  101700. begin
  101701. pTDefRegMap(@Self)^.clr := $00000020;
  101702. end;
  101703. procedure TCAN2_C2FIFOCON2.setTXLARB(thebits : TBits_1); inline;
  101704. begin
  101705. if thebits = 0 then
  101706. pTDefRegMap(@Self)^.clr := $00000020
  101707. else
  101708. pTDefRegMap(@Self)^.&set := $00000020;
  101709. end;
  101710. function TCAN2_C2FIFOCON2.getTXLARB : TBits_1; inline;
  101711. begin
  101712. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  101713. end;
  101714. procedure TCAN2_C2FIFOCON2.setTXABAT; inline;
  101715. begin
  101716. pTDefRegMap(@Self)^.&set := $00000040;
  101717. end;
  101718. procedure TCAN2_C2FIFOCON2.clearTXABAT; inline;
  101719. begin
  101720. pTDefRegMap(@Self)^.clr := $00000040;
  101721. end;
  101722. procedure TCAN2_C2FIFOCON2.setTXABAT(thebits : TBits_1); inline;
  101723. begin
  101724. if thebits = 0 then
  101725. pTDefRegMap(@Self)^.clr := $00000040
  101726. else
  101727. pTDefRegMap(@Self)^.&set := $00000040;
  101728. end;
  101729. function TCAN2_C2FIFOCON2.getTXABAT : TBits_1; inline;
  101730. begin
  101731. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  101732. end;
  101733. procedure TCAN2_C2FIFOCON2.setTXEN; inline;
  101734. begin
  101735. pTDefRegMap(@Self)^.&set := $00000080;
  101736. end;
  101737. procedure TCAN2_C2FIFOCON2.clearTXEN; inline;
  101738. begin
  101739. pTDefRegMap(@Self)^.clr := $00000080;
  101740. end;
  101741. procedure TCAN2_C2FIFOCON2.setTXEN(thebits : TBits_1); inline;
  101742. begin
  101743. if thebits = 0 then
  101744. pTDefRegMap(@Self)^.clr := $00000080
  101745. else
  101746. pTDefRegMap(@Self)^.&set := $00000080;
  101747. end;
  101748. function TCAN2_C2FIFOCON2.getTXEN : TBits_1; inline;
  101749. begin
  101750. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  101751. end;
  101752. procedure TCAN2_C2FIFOCON2.setDONLY; inline;
  101753. begin
  101754. pTDefRegMap(@Self)^.&set := $00001000;
  101755. end;
  101756. procedure TCAN2_C2FIFOCON2.clearDONLY; inline;
  101757. begin
  101758. pTDefRegMap(@Self)^.clr := $00001000;
  101759. end;
  101760. procedure TCAN2_C2FIFOCON2.setDONLY(thebits : TBits_1); inline;
  101761. begin
  101762. if thebits = 0 then
  101763. pTDefRegMap(@Self)^.clr := $00001000
  101764. else
  101765. pTDefRegMap(@Self)^.&set := $00001000;
  101766. end;
  101767. function TCAN2_C2FIFOCON2.getDONLY : TBits_1; inline;
  101768. begin
  101769. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  101770. end;
  101771. procedure TCAN2_C2FIFOCON2.setUINC; inline;
  101772. begin
  101773. pTDefRegMap(@Self)^.&set := $00002000;
  101774. end;
  101775. procedure TCAN2_C2FIFOCON2.clearUINC; inline;
  101776. begin
  101777. pTDefRegMap(@Self)^.clr := $00002000;
  101778. end;
  101779. procedure TCAN2_C2FIFOCON2.setUINC(thebits : TBits_1); inline;
  101780. begin
  101781. if thebits = 0 then
  101782. pTDefRegMap(@Self)^.clr := $00002000
  101783. else
  101784. pTDefRegMap(@Self)^.&set := $00002000;
  101785. end;
  101786. function TCAN2_C2FIFOCON2.getUINC : TBits_1; inline;
  101787. begin
  101788. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  101789. end;
  101790. procedure TCAN2_C2FIFOCON2.setFRESET; inline;
  101791. begin
  101792. pTDefRegMap(@Self)^.&set := $00004000;
  101793. end;
  101794. procedure TCAN2_C2FIFOCON2.clearFRESET; inline;
  101795. begin
  101796. pTDefRegMap(@Self)^.clr := $00004000;
  101797. end;
  101798. procedure TCAN2_C2FIFOCON2.setFRESET(thebits : TBits_1); inline;
  101799. begin
  101800. if thebits = 0 then
  101801. pTDefRegMap(@Self)^.clr := $00004000
  101802. else
  101803. pTDefRegMap(@Self)^.&set := $00004000;
  101804. end;
  101805. function TCAN2_C2FIFOCON2.getFRESET : TBits_1; inline;
  101806. begin
  101807. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  101808. end;
  101809. procedure TCAN2_C2FIFOCON2.setFSIZE(thebits : TBits_5); inline;
  101810. begin
  101811. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  101812. end;
  101813. function TCAN2_C2FIFOCON2.getFSIZE : TBits_5; inline;
  101814. begin
  101815. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  101816. end;
  101817. procedure TCAN2_C2FIFOCON2.setw(thebits : TBits_32); inline;
  101818. begin
  101819. pTDefRegMap(@Self)^.val := thebits;
  101820. end;
  101821. function TCAN2_C2FIFOCON2.getw : TBits_32; inline;
  101822. begin
  101823. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  101824. end;
  101825. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIF; inline;
  101826. begin
  101827. pTDefRegMap(@Self)^.&set := $00000001;
  101828. end;
  101829. procedure TCAN2_C2FIFOINT2.clearRXNEMPTYIF; inline;
  101830. begin
  101831. pTDefRegMap(@Self)^.clr := $00000001;
  101832. end;
  101833. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIF(thebits : TBits_1); inline;
  101834. begin
  101835. if thebits = 0 then
  101836. pTDefRegMap(@Self)^.clr := $00000001
  101837. else
  101838. pTDefRegMap(@Self)^.&set := $00000001;
  101839. end;
  101840. function TCAN2_C2FIFOINT2.getRXNEMPTYIF : TBits_1; inline;
  101841. begin
  101842. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  101843. end;
  101844. procedure TCAN2_C2FIFOINT2.setRXHALFIF; inline;
  101845. begin
  101846. pTDefRegMap(@Self)^.&set := $00000002;
  101847. end;
  101848. procedure TCAN2_C2FIFOINT2.clearRXHALFIF; inline;
  101849. begin
  101850. pTDefRegMap(@Self)^.clr := $00000002;
  101851. end;
  101852. procedure TCAN2_C2FIFOINT2.setRXHALFIF(thebits : TBits_1); inline;
  101853. begin
  101854. if thebits = 0 then
  101855. pTDefRegMap(@Self)^.clr := $00000002
  101856. else
  101857. pTDefRegMap(@Self)^.&set := $00000002;
  101858. end;
  101859. function TCAN2_C2FIFOINT2.getRXHALFIF : TBits_1; inline;
  101860. begin
  101861. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  101862. end;
  101863. procedure TCAN2_C2FIFOINT2.setRXFULLIF; inline;
  101864. begin
  101865. pTDefRegMap(@Self)^.&set := $00000004;
  101866. end;
  101867. procedure TCAN2_C2FIFOINT2.clearRXFULLIF; inline;
  101868. begin
  101869. pTDefRegMap(@Self)^.clr := $00000004;
  101870. end;
  101871. procedure TCAN2_C2FIFOINT2.setRXFULLIF(thebits : TBits_1); inline;
  101872. begin
  101873. if thebits = 0 then
  101874. pTDefRegMap(@Self)^.clr := $00000004
  101875. else
  101876. pTDefRegMap(@Self)^.&set := $00000004;
  101877. end;
  101878. function TCAN2_C2FIFOINT2.getRXFULLIF : TBits_1; inline;
  101879. begin
  101880. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  101881. end;
  101882. procedure TCAN2_C2FIFOINT2.setRXOVFLIF; inline;
  101883. begin
  101884. pTDefRegMap(@Self)^.&set := $00000008;
  101885. end;
  101886. procedure TCAN2_C2FIFOINT2.clearRXOVFLIF; inline;
  101887. begin
  101888. pTDefRegMap(@Self)^.clr := $00000008;
  101889. end;
  101890. procedure TCAN2_C2FIFOINT2.setRXOVFLIF(thebits : TBits_1); inline;
  101891. begin
  101892. if thebits = 0 then
  101893. pTDefRegMap(@Self)^.clr := $00000008
  101894. else
  101895. pTDefRegMap(@Self)^.&set := $00000008;
  101896. end;
  101897. function TCAN2_C2FIFOINT2.getRXOVFLIF : TBits_1; inline;
  101898. begin
  101899. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  101900. end;
  101901. procedure TCAN2_C2FIFOINT2.setTXEMPTYIF; inline;
  101902. begin
  101903. pTDefRegMap(@Self)^.&set := $00000100;
  101904. end;
  101905. procedure TCAN2_C2FIFOINT2.clearTXEMPTYIF; inline;
  101906. begin
  101907. pTDefRegMap(@Self)^.clr := $00000100;
  101908. end;
  101909. procedure TCAN2_C2FIFOINT2.setTXEMPTYIF(thebits : TBits_1); inline;
  101910. begin
  101911. if thebits = 0 then
  101912. pTDefRegMap(@Self)^.clr := $00000100
  101913. else
  101914. pTDefRegMap(@Self)^.&set := $00000100;
  101915. end;
  101916. function TCAN2_C2FIFOINT2.getTXEMPTYIF : TBits_1; inline;
  101917. begin
  101918. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  101919. end;
  101920. procedure TCAN2_C2FIFOINT2.setTXHALFIF; inline;
  101921. begin
  101922. pTDefRegMap(@Self)^.&set := $00000200;
  101923. end;
  101924. procedure TCAN2_C2FIFOINT2.clearTXHALFIF; inline;
  101925. begin
  101926. pTDefRegMap(@Self)^.clr := $00000200;
  101927. end;
  101928. procedure TCAN2_C2FIFOINT2.setTXHALFIF(thebits : TBits_1); inline;
  101929. begin
  101930. if thebits = 0 then
  101931. pTDefRegMap(@Self)^.clr := $00000200
  101932. else
  101933. pTDefRegMap(@Self)^.&set := $00000200;
  101934. end;
  101935. function TCAN2_C2FIFOINT2.getTXHALFIF : TBits_1; inline;
  101936. begin
  101937. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  101938. end;
  101939. procedure TCAN2_C2FIFOINT2.setTXNFULLIF; inline;
  101940. begin
  101941. pTDefRegMap(@Self)^.&set := $00000400;
  101942. end;
  101943. procedure TCAN2_C2FIFOINT2.clearTXNFULLIF; inline;
  101944. begin
  101945. pTDefRegMap(@Self)^.clr := $00000400;
  101946. end;
  101947. procedure TCAN2_C2FIFOINT2.setTXNFULLIF(thebits : TBits_1); inline;
  101948. begin
  101949. if thebits = 0 then
  101950. pTDefRegMap(@Self)^.clr := $00000400
  101951. else
  101952. pTDefRegMap(@Self)^.&set := $00000400;
  101953. end;
  101954. function TCAN2_C2FIFOINT2.getTXNFULLIF : TBits_1; inline;
  101955. begin
  101956. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  101957. end;
  101958. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIE; inline;
  101959. begin
  101960. pTDefRegMap(@Self)^.&set := $00010000;
  101961. end;
  101962. procedure TCAN2_C2FIFOINT2.clearRXNEMPTYIE; inline;
  101963. begin
  101964. pTDefRegMap(@Self)^.clr := $00010000;
  101965. end;
  101966. procedure TCAN2_C2FIFOINT2.setRXNEMPTYIE(thebits : TBits_1); inline;
  101967. begin
  101968. if thebits = 0 then
  101969. pTDefRegMap(@Self)^.clr := $00010000
  101970. else
  101971. pTDefRegMap(@Self)^.&set := $00010000;
  101972. end;
  101973. function TCAN2_C2FIFOINT2.getRXNEMPTYIE : TBits_1; inline;
  101974. begin
  101975. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  101976. end;
  101977. procedure TCAN2_C2FIFOINT2.setRXHALFIE; inline;
  101978. begin
  101979. pTDefRegMap(@Self)^.&set := $00020000;
  101980. end;
  101981. procedure TCAN2_C2FIFOINT2.clearRXHALFIE; inline;
  101982. begin
  101983. pTDefRegMap(@Self)^.clr := $00020000;
  101984. end;
  101985. procedure TCAN2_C2FIFOINT2.setRXHALFIE(thebits : TBits_1); inline;
  101986. begin
  101987. if thebits = 0 then
  101988. pTDefRegMap(@Self)^.clr := $00020000
  101989. else
  101990. pTDefRegMap(@Self)^.&set := $00020000;
  101991. end;
  101992. function TCAN2_C2FIFOINT2.getRXHALFIE : TBits_1; inline;
  101993. begin
  101994. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  101995. end;
  101996. procedure TCAN2_C2FIFOINT2.setRXFULLIE; inline;
  101997. begin
  101998. pTDefRegMap(@Self)^.&set := $00040000;
  101999. end;
  102000. procedure TCAN2_C2FIFOINT2.clearRXFULLIE; inline;
  102001. begin
  102002. pTDefRegMap(@Self)^.clr := $00040000;
  102003. end;
  102004. procedure TCAN2_C2FIFOINT2.setRXFULLIE(thebits : TBits_1); inline;
  102005. begin
  102006. if thebits = 0 then
  102007. pTDefRegMap(@Self)^.clr := $00040000
  102008. else
  102009. pTDefRegMap(@Self)^.&set := $00040000;
  102010. end;
  102011. function TCAN2_C2FIFOINT2.getRXFULLIE : TBits_1; inline;
  102012. begin
  102013. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  102014. end;
  102015. procedure TCAN2_C2FIFOINT2.setRXOVFLIE; inline;
  102016. begin
  102017. pTDefRegMap(@Self)^.&set := $00080000;
  102018. end;
  102019. procedure TCAN2_C2FIFOINT2.clearRXOVFLIE; inline;
  102020. begin
  102021. pTDefRegMap(@Self)^.clr := $00080000;
  102022. end;
  102023. procedure TCAN2_C2FIFOINT2.setRXOVFLIE(thebits : TBits_1); inline;
  102024. begin
  102025. if thebits = 0 then
  102026. pTDefRegMap(@Self)^.clr := $00080000
  102027. else
  102028. pTDefRegMap(@Self)^.&set := $00080000;
  102029. end;
  102030. function TCAN2_C2FIFOINT2.getRXOVFLIE : TBits_1; inline;
  102031. begin
  102032. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  102033. end;
  102034. procedure TCAN2_C2FIFOINT2.setTXEMPTYIE; inline;
  102035. begin
  102036. pTDefRegMap(@Self)^.&set := $01000000;
  102037. end;
  102038. procedure TCAN2_C2FIFOINT2.clearTXEMPTYIE; inline;
  102039. begin
  102040. pTDefRegMap(@Self)^.clr := $01000000;
  102041. end;
  102042. procedure TCAN2_C2FIFOINT2.setTXEMPTYIE(thebits : TBits_1); inline;
  102043. begin
  102044. if thebits = 0 then
  102045. pTDefRegMap(@Self)^.clr := $01000000
  102046. else
  102047. pTDefRegMap(@Self)^.&set := $01000000;
  102048. end;
  102049. function TCAN2_C2FIFOINT2.getTXEMPTYIE : TBits_1; inline;
  102050. begin
  102051. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  102052. end;
  102053. procedure TCAN2_C2FIFOINT2.setTXHALFIE; inline;
  102054. begin
  102055. pTDefRegMap(@Self)^.&set := $02000000;
  102056. end;
  102057. procedure TCAN2_C2FIFOINT2.clearTXHALFIE; inline;
  102058. begin
  102059. pTDefRegMap(@Self)^.clr := $02000000;
  102060. end;
  102061. procedure TCAN2_C2FIFOINT2.setTXHALFIE(thebits : TBits_1); inline;
  102062. begin
  102063. if thebits = 0 then
  102064. pTDefRegMap(@Self)^.clr := $02000000
  102065. else
  102066. pTDefRegMap(@Self)^.&set := $02000000;
  102067. end;
  102068. function TCAN2_C2FIFOINT2.getTXHALFIE : TBits_1; inline;
  102069. begin
  102070. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  102071. end;
  102072. procedure TCAN2_C2FIFOINT2.setTXNFULLIE; inline;
  102073. begin
  102074. pTDefRegMap(@Self)^.&set := $04000000;
  102075. end;
  102076. procedure TCAN2_C2FIFOINT2.clearTXNFULLIE; inline;
  102077. begin
  102078. pTDefRegMap(@Self)^.clr := $04000000;
  102079. end;
  102080. procedure TCAN2_C2FIFOINT2.setTXNFULLIE(thebits : TBits_1); inline;
  102081. begin
  102082. if thebits = 0 then
  102083. pTDefRegMap(@Self)^.clr := $04000000
  102084. else
  102085. pTDefRegMap(@Self)^.&set := $04000000;
  102086. end;
  102087. function TCAN2_C2FIFOINT2.getTXNFULLIE : TBits_1; inline;
  102088. begin
  102089. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  102090. end;
  102091. procedure TCAN2_C2FIFOINT2.setw(thebits : TBits_32); inline;
  102092. begin
  102093. pTDefRegMap(@Self)^.val := thebits;
  102094. end;
  102095. function TCAN2_C2FIFOINT2.getw : TBits_32; inline;
  102096. begin
  102097. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102098. end;
  102099. procedure TCAN2_C2FIFOCI2.setCFIFOCI(thebits : TBits_5); inline;
  102100. begin
  102101. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  102102. end;
  102103. function TCAN2_C2FIFOCI2.getCFIFOCI : TBits_5; inline;
  102104. begin
  102105. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  102106. end;
  102107. procedure TCAN2_C2FIFOCI2.setw(thebits : TBits_32); inline;
  102108. begin
  102109. pTDefRegMap(@Self)^.val := thebits;
  102110. end;
  102111. function TCAN2_C2FIFOCI2.getw : TBits_32; inline;
  102112. begin
  102113. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102114. end;
  102115. procedure TCAN2_C2FIFOCON3.setTXPRI(thebits : TBits_2); inline;
  102116. begin
  102117. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  102118. end;
  102119. function TCAN2_C2FIFOCON3.getTXPRI : TBits_2; inline;
  102120. begin
  102121. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  102122. end;
  102123. procedure TCAN2_C2FIFOCON3.setRTREN; inline;
  102124. begin
  102125. pTDefRegMap(@Self)^.&set := $00000004;
  102126. end;
  102127. procedure TCAN2_C2FIFOCON3.clearRTREN; inline;
  102128. begin
  102129. pTDefRegMap(@Self)^.clr := $00000004;
  102130. end;
  102131. procedure TCAN2_C2FIFOCON3.setRTREN(thebits : TBits_1); inline;
  102132. begin
  102133. if thebits = 0 then
  102134. pTDefRegMap(@Self)^.clr := $00000004
  102135. else
  102136. pTDefRegMap(@Self)^.&set := $00000004;
  102137. end;
  102138. function TCAN2_C2FIFOCON3.getRTREN : TBits_1; inline;
  102139. begin
  102140. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  102141. end;
  102142. procedure TCAN2_C2FIFOCON3.setTXREQ; inline;
  102143. begin
  102144. pTDefRegMap(@Self)^.&set := $00000008;
  102145. end;
  102146. procedure TCAN2_C2FIFOCON3.clearTXREQ; inline;
  102147. begin
  102148. pTDefRegMap(@Self)^.clr := $00000008;
  102149. end;
  102150. procedure TCAN2_C2FIFOCON3.setTXREQ(thebits : TBits_1); inline;
  102151. begin
  102152. if thebits = 0 then
  102153. pTDefRegMap(@Self)^.clr := $00000008
  102154. else
  102155. pTDefRegMap(@Self)^.&set := $00000008;
  102156. end;
  102157. function TCAN2_C2FIFOCON3.getTXREQ : TBits_1; inline;
  102158. begin
  102159. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  102160. end;
  102161. procedure TCAN2_C2FIFOCON3.setTXERR; inline;
  102162. begin
  102163. pTDefRegMap(@Self)^.&set := $00000010;
  102164. end;
  102165. procedure TCAN2_C2FIFOCON3.clearTXERR; inline;
  102166. begin
  102167. pTDefRegMap(@Self)^.clr := $00000010;
  102168. end;
  102169. procedure TCAN2_C2FIFOCON3.setTXERR(thebits : TBits_1); inline;
  102170. begin
  102171. if thebits = 0 then
  102172. pTDefRegMap(@Self)^.clr := $00000010
  102173. else
  102174. pTDefRegMap(@Self)^.&set := $00000010;
  102175. end;
  102176. function TCAN2_C2FIFOCON3.getTXERR : TBits_1; inline;
  102177. begin
  102178. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  102179. end;
  102180. procedure TCAN2_C2FIFOCON3.setTXLARB; inline;
  102181. begin
  102182. pTDefRegMap(@Self)^.&set := $00000020;
  102183. end;
  102184. procedure TCAN2_C2FIFOCON3.clearTXLARB; inline;
  102185. begin
  102186. pTDefRegMap(@Self)^.clr := $00000020;
  102187. end;
  102188. procedure TCAN2_C2FIFOCON3.setTXLARB(thebits : TBits_1); inline;
  102189. begin
  102190. if thebits = 0 then
  102191. pTDefRegMap(@Self)^.clr := $00000020
  102192. else
  102193. pTDefRegMap(@Self)^.&set := $00000020;
  102194. end;
  102195. function TCAN2_C2FIFOCON3.getTXLARB : TBits_1; inline;
  102196. begin
  102197. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  102198. end;
  102199. procedure TCAN2_C2FIFOCON3.setTXABAT; inline;
  102200. begin
  102201. pTDefRegMap(@Self)^.&set := $00000040;
  102202. end;
  102203. procedure TCAN2_C2FIFOCON3.clearTXABAT; inline;
  102204. begin
  102205. pTDefRegMap(@Self)^.clr := $00000040;
  102206. end;
  102207. procedure TCAN2_C2FIFOCON3.setTXABAT(thebits : TBits_1); inline;
  102208. begin
  102209. if thebits = 0 then
  102210. pTDefRegMap(@Self)^.clr := $00000040
  102211. else
  102212. pTDefRegMap(@Self)^.&set := $00000040;
  102213. end;
  102214. function TCAN2_C2FIFOCON3.getTXABAT : TBits_1; inline;
  102215. begin
  102216. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  102217. end;
  102218. procedure TCAN2_C2FIFOCON3.setTXEN; inline;
  102219. begin
  102220. pTDefRegMap(@Self)^.&set := $00000080;
  102221. end;
  102222. procedure TCAN2_C2FIFOCON3.clearTXEN; inline;
  102223. begin
  102224. pTDefRegMap(@Self)^.clr := $00000080;
  102225. end;
  102226. procedure TCAN2_C2FIFOCON3.setTXEN(thebits : TBits_1); inline;
  102227. begin
  102228. if thebits = 0 then
  102229. pTDefRegMap(@Self)^.clr := $00000080
  102230. else
  102231. pTDefRegMap(@Self)^.&set := $00000080;
  102232. end;
  102233. function TCAN2_C2FIFOCON3.getTXEN : TBits_1; inline;
  102234. begin
  102235. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  102236. end;
  102237. procedure TCAN2_C2FIFOCON3.setDONLY; inline;
  102238. begin
  102239. pTDefRegMap(@Self)^.&set := $00001000;
  102240. end;
  102241. procedure TCAN2_C2FIFOCON3.clearDONLY; inline;
  102242. begin
  102243. pTDefRegMap(@Self)^.clr := $00001000;
  102244. end;
  102245. procedure TCAN2_C2FIFOCON3.setDONLY(thebits : TBits_1); inline;
  102246. begin
  102247. if thebits = 0 then
  102248. pTDefRegMap(@Self)^.clr := $00001000
  102249. else
  102250. pTDefRegMap(@Self)^.&set := $00001000;
  102251. end;
  102252. function TCAN2_C2FIFOCON3.getDONLY : TBits_1; inline;
  102253. begin
  102254. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  102255. end;
  102256. procedure TCAN2_C2FIFOCON3.setUINC; inline;
  102257. begin
  102258. pTDefRegMap(@Self)^.&set := $00002000;
  102259. end;
  102260. procedure TCAN2_C2FIFOCON3.clearUINC; inline;
  102261. begin
  102262. pTDefRegMap(@Self)^.clr := $00002000;
  102263. end;
  102264. procedure TCAN2_C2FIFOCON3.setUINC(thebits : TBits_1); inline;
  102265. begin
  102266. if thebits = 0 then
  102267. pTDefRegMap(@Self)^.clr := $00002000
  102268. else
  102269. pTDefRegMap(@Self)^.&set := $00002000;
  102270. end;
  102271. function TCAN2_C2FIFOCON3.getUINC : TBits_1; inline;
  102272. begin
  102273. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  102274. end;
  102275. procedure TCAN2_C2FIFOCON3.setFRESET; inline;
  102276. begin
  102277. pTDefRegMap(@Self)^.&set := $00004000;
  102278. end;
  102279. procedure TCAN2_C2FIFOCON3.clearFRESET; inline;
  102280. begin
  102281. pTDefRegMap(@Self)^.clr := $00004000;
  102282. end;
  102283. procedure TCAN2_C2FIFOCON3.setFRESET(thebits : TBits_1); inline;
  102284. begin
  102285. if thebits = 0 then
  102286. pTDefRegMap(@Self)^.clr := $00004000
  102287. else
  102288. pTDefRegMap(@Self)^.&set := $00004000;
  102289. end;
  102290. function TCAN2_C2FIFOCON3.getFRESET : TBits_1; inline;
  102291. begin
  102292. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  102293. end;
  102294. procedure TCAN2_C2FIFOCON3.setFSIZE(thebits : TBits_5); inline;
  102295. begin
  102296. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  102297. end;
  102298. function TCAN2_C2FIFOCON3.getFSIZE : TBits_5; inline;
  102299. begin
  102300. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  102301. end;
  102302. procedure TCAN2_C2FIFOCON3.setw(thebits : TBits_32); inline;
  102303. begin
  102304. pTDefRegMap(@Self)^.val := thebits;
  102305. end;
  102306. function TCAN2_C2FIFOCON3.getw : TBits_32; inline;
  102307. begin
  102308. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102309. end;
  102310. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIF; inline;
  102311. begin
  102312. pTDefRegMap(@Self)^.&set := $00000001;
  102313. end;
  102314. procedure TCAN2_C2FIFOINT3.clearRXNEMPTYIF; inline;
  102315. begin
  102316. pTDefRegMap(@Self)^.clr := $00000001;
  102317. end;
  102318. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIF(thebits : TBits_1); inline;
  102319. begin
  102320. if thebits = 0 then
  102321. pTDefRegMap(@Self)^.clr := $00000001
  102322. else
  102323. pTDefRegMap(@Self)^.&set := $00000001;
  102324. end;
  102325. function TCAN2_C2FIFOINT3.getRXNEMPTYIF : TBits_1; inline;
  102326. begin
  102327. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  102328. end;
  102329. procedure TCAN2_C2FIFOINT3.setRXHALFIF; inline;
  102330. begin
  102331. pTDefRegMap(@Self)^.&set := $00000002;
  102332. end;
  102333. procedure TCAN2_C2FIFOINT3.clearRXHALFIF; inline;
  102334. begin
  102335. pTDefRegMap(@Self)^.clr := $00000002;
  102336. end;
  102337. procedure TCAN2_C2FIFOINT3.setRXHALFIF(thebits : TBits_1); inline;
  102338. begin
  102339. if thebits = 0 then
  102340. pTDefRegMap(@Self)^.clr := $00000002
  102341. else
  102342. pTDefRegMap(@Self)^.&set := $00000002;
  102343. end;
  102344. function TCAN2_C2FIFOINT3.getRXHALFIF : TBits_1; inline;
  102345. begin
  102346. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  102347. end;
  102348. procedure TCAN2_C2FIFOINT3.setRXFULLIF; inline;
  102349. begin
  102350. pTDefRegMap(@Self)^.&set := $00000004;
  102351. end;
  102352. procedure TCAN2_C2FIFOINT3.clearRXFULLIF; inline;
  102353. begin
  102354. pTDefRegMap(@Self)^.clr := $00000004;
  102355. end;
  102356. procedure TCAN2_C2FIFOINT3.setRXFULLIF(thebits : TBits_1); inline;
  102357. begin
  102358. if thebits = 0 then
  102359. pTDefRegMap(@Self)^.clr := $00000004
  102360. else
  102361. pTDefRegMap(@Self)^.&set := $00000004;
  102362. end;
  102363. function TCAN2_C2FIFOINT3.getRXFULLIF : TBits_1; inline;
  102364. begin
  102365. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  102366. end;
  102367. procedure TCAN2_C2FIFOINT3.setRXOVFLIF; inline;
  102368. begin
  102369. pTDefRegMap(@Self)^.&set := $00000008;
  102370. end;
  102371. procedure TCAN2_C2FIFOINT3.clearRXOVFLIF; inline;
  102372. begin
  102373. pTDefRegMap(@Self)^.clr := $00000008;
  102374. end;
  102375. procedure TCAN2_C2FIFOINT3.setRXOVFLIF(thebits : TBits_1); inline;
  102376. begin
  102377. if thebits = 0 then
  102378. pTDefRegMap(@Self)^.clr := $00000008
  102379. else
  102380. pTDefRegMap(@Self)^.&set := $00000008;
  102381. end;
  102382. function TCAN2_C2FIFOINT3.getRXOVFLIF : TBits_1; inline;
  102383. begin
  102384. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  102385. end;
  102386. procedure TCAN2_C2FIFOINT3.setTXEMPTYIF; inline;
  102387. begin
  102388. pTDefRegMap(@Self)^.&set := $00000100;
  102389. end;
  102390. procedure TCAN2_C2FIFOINT3.clearTXEMPTYIF; inline;
  102391. begin
  102392. pTDefRegMap(@Self)^.clr := $00000100;
  102393. end;
  102394. procedure TCAN2_C2FIFOINT3.setTXEMPTYIF(thebits : TBits_1); inline;
  102395. begin
  102396. if thebits = 0 then
  102397. pTDefRegMap(@Self)^.clr := $00000100
  102398. else
  102399. pTDefRegMap(@Self)^.&set := $00000100;
  102400. end;
  102401. function TCAN2_C2FIFOINT3.getTXEMPTYIF : TBits_1; inline;
  102402. begin
  102403. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  102404. end;
  102405. procedure TCAN2_C2FIFOINT3.setTXHALFIF; inline;
  102406. begin
  102407. pTDefRegMap(@Self)^.&set := $00000200;
  102408. end;
  102409. procedure TCAN2_C2FIFOINT3.clearTXHALFIF; inline;
  102410. begin
  102411. pTDefRegMap(@Self)^.clr := $00000200;
  102412. end;
  102413. procedure TCAN2_C2FIFOINT3.setTXHALFIF(thebits : TBits_1); inline;
  102414. begin
  102415. if thebits = 0 then
  102416. pTDefRegMap(@Self)^.clr := $00000200
  102417. else
  102418. pTDefRegMap(@Self)^.&set := $00000200;
  102419. end;
  102420. function TCAN2_C2FIFOINT3.getTXHALFIF : TBits_1; inline;
  102421. begin
  102422. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  102423. end;
  102424. procedure TCAN2_C2FIFOINT3.setTXNFULLIF; inline;
  102425. begin
  102426. pTDefRegMap(@Self)^.&set := $00000400;
  102427. end;
  102428. procedure TCAN2_C2FIFOINT3.clearTXNFULLIF; inline;
  102429. begin
  102430. pTDefRegMap(@Self)^.clr := $00000400;
  102431. end;
  102432. procedure TCAN2_C2FIFOINT3.setTXNFULLIF(thebits : TBits_1); inline;
  102433. begin
  102434. if thebits = 0 then
  102435. pTDefRegMap(@Self)^.clr := $00000400
  102436. else
  102437. pTDefRegMap(@Self)^.&set := $00000400;
  102438. end;
  102439. function TCAN2_C2FIFOINT3.getTXNFULLIF : TBits_1; inline;
  102440. begin
  102441. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  102442. end;
  102443. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIE; inline;
  102444. begin
  102445. pTDefRegMap(@Self)^.&set := $00010000;
  102446. end;
  102447. procedure TCAN2_C2FIFOINT3.clearRXNEMPTYIE; inline;
  102448. begin
  102449. pTDefRegMap(@Self)^.clr := $00010000;
  102450. end;
  102451. procedure TCAN2_C2FIFOINT3.setRXNEMPTYIE(thebits : TBits_1); inline;
  102452. begin
  102453. if thebits = 0 then
  102454. pTDefRegMap(@Self)^.clr := $00010000
  102455. else
  102456. pTDefRegMap(@Self)^.&set := $00010000;
  102457. end;
  102458. function TCAN2_C2FIFOINT3.getRXNEMPTYIE : TBits_1; inline;
  102459. begin
  102460. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  102461. end;
  102462. procedure TCAN2_C2FIFOINT3.setRXHALFIE; inline;
  102463. begin
  102464. pTDefRegMap(@Self)^.&set := $00020000;
  102465. end;
  102466. procedure TCAN2_C2FIFOINT3.clearRXHALFIE; inline;
  102467. begin
  102468. pTDefRegMap(@Self)^.clr := $00020000;
  102469. end;
  102470. procedure TCAN2_C2FIFOINT3.setRXHALFIE(thebits : TBits_1); inline;
  102471. begin
  102472. if thebits = 0 then
  102473. pTDefRegMap(@Self)^.clr := $00020000
  102474. else
  102475. pTDefRegMap(@Self)^.&set := $00020000;
  102476. end;
  102477. function TCAN2_C2FIFOINT3.getRXHALFIE : TBits_1; inline;
  102478. begin
  102479. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  102480. end;
  102481. procedure TCAN2_C2FIFOINT3.setRXFULLIE; inline;
  102482. begin
  102483. pTDefRegMap(@Self)^.&set := $00040000;
  102484. end;
  102485. procedure TCAN2_C2FIFOINT3.clearRXFULLIE; inline;
  102486. begin
  102487. pTDefRegMap(@Self)^.clr := $00040000;
  102488. end;
  102489. procedure TCAN2_C2FIFOINT3.setRXFULLIE(thebits : TBits_1); inline;
  102490. begin
  102491. if thebits = 0 then
  102492. pTDefRegMap(@Self)^.clr := $00040000
  102493. else
  102494. pTDefRegMap(@Self)^.&set := $00040000;
  102495. end;
  102496. function TCAN2_C2FIFOINT3.getRXFULLIE : TBits_1; inline;
  102497. begin
  102498. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  102499. end;
  102500. procedure TCAN2_C2FIFOINT3.setRXOVFLIE; inline;
  102501. begin
  102502. pTDefRegMap(@Self)^.&set := $00080000;
  102503. end;
  102504. procedure TCAN2_C2FIFOINT3.clearRXOVFLIE; inline;
  102505. begin
  102506. pTDefRegMap(@Self)^.clr := $00080000;
  102507. end;
  102508. procedure TCAN2_C2FIFOINT3.setRXOVFLIE(thebits : TBits_1); inline;
  102509. begin
  102510. if thebits = 0 then
  102511. pTDefRegMap(@Self)^.clr := $00080000
  102512. else
  102513. pTDefRegMap(@Self)^.&set := $00080000;
  102514. end;
  102515. function TCAN2_C2FIFOINT3.getRXOVFLIE : TBits_1; inline;
  102516. begin
  102517. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  102518. end;
  102519. procedure TCAN2_C2FIFOINT3.setTXEMPTYIE; inline;
  102520. begin
  102521. pTDefRegMap(@Self)^.&set := $01000000;
  102522. end;
  102523. procedure TCAN2_C2FIFOINT3.clearTXEMPTYIE; inline;
  102524. begin
  102525. pTDefRegMap(@Self)^.clr := $01000000;
  102526. end;
  102527. procedure TCAN2_C2FIFOINT3.setTXEMPTYIE(thebits : TBits_1); inline;
  102528. begin
  102529. if thebits = 0 then
  102530. pTDefRegMap(@Self)^.clr := $01000000
  102531. else
  102532. pTDefRegMap(@Self)^.&set := $01000000;
  102533. end;
  102534. function TCAN2_C2FIFOINT3.getTXEMPTYIE : TBits_1; inline;
  102535. begin
  102536. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  102537. end;
  102538. procedure TCAN2_C2FIFOINT3.setTXHALFIE; inline;
  102539. begin
  102540. pTDefRegMap(@Self)^.&set := $02000000;
  102541. end;
  102542. procedure TCAN2_C2FIFOINT3.clearTXHALFIE; inline;
  102543. begin
  102544. pTDefRegMap(@Self)^.clr := $02000000;
  102545. end;
  102546. procedure TCAN2_C2FIFOINT3.setTXHALFIE(thebits : TBits_1); inline;
  102547. begin
  102548. if thebits = 0 then
  102549. pTDefRegMap(@Self)^.clr := $02000000
  102550. else
  102551. pTDefRegMap(@Self)^.&set := $02000000;
  102552. end;
  102553. function TCAN2_C2FIFOINT3.getTXHALFIE : TBits_1; inline;
  102554. begin
  102555. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  102556. end;
  102557. procedure TCAN2_C2FIFOINT3.setTXNFULLIE; inline;
  102558. begin
  102559. pTDefRegMap(@Self)^.&set := $04000000;
  102560. end;
  102561. procedure TCAN2_C2FIFOINT3.clearTXNFULLIE; inline;
  102562. begin
  102563. pTDefRegMap(@Self)^.clr := $04000000;
  102564. end;
  102565. procedure TCAN2_C2FIFOINT3.setTXNFULLIE(thebits : TBits_1); inline;
  102566. begin
  102567. if thebits = 0 then
  102568. pTDefRegMap(@Self)^.clr := $04000000
  102569. else
  102570. pTDefRegMap(@Self)^.&set := $04000000;
  102571. end;
  102572. function TCAN2_C2FIFOINT3.getTXNFULLIE : TBits_1; inline;
  102573. begin
  102574. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  102575. end;
  102576. procedure TCAN2_C2FIFOINT3.setw(thebits : TBits_32); inline;
  102577. begin
  102578. pTDefRegMap(@Self)^.val := thebits;
  102579. end;
  102580. function TCAN2_C2FIFOINT3.getw : TBits_32; inline;
  102581. begin
  102582. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102583. end;
  102584. procedure TCAN2_C2FIFOCI3.setCFIFOCI(thebits : TBits_5); inline;
  102585. begin
  102586. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  102587. end;
  102588. function TCAN2_C2FIFOCI3.getCFIFOCI : TBits_5; inline;
  102589. begin
  102590. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  102591. end;
  102592. procedure TCAN2_C2FIFOCI3.setw(thebits : TBits_32); inline;
  102593. begin
  102594. pTDefRegMap(@Self)^.val := thebits;
  102595. end;
  102596. function TCAN2_C2FIFOCI3.getw : TBits_32; inline;
  102597. begin
  102598. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102599. end;
  102600. procedure TCAN2_C2FIFOCON4.setTXPRI(thebits : TBits_2); inline;
  102601. begin
  102602. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  102603. end;
  102604. function TCAN2_C2FIFOCON4.getTXPRI : TBits_2; inline;
  102605. begin
  102606. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  102607. end;
  102608. procedure TCAN2_C2FIFOCON4.setRTREN; inline;
  102609. begin
  102610. pTDefRegMap(@Self)^.&set := $00000004;
  102611. end;
  102612. procedure TCAN2_C2FIFOCON4.clearRTREN; inline;
  102613. begin
  102614. pTDefRegMap(@Self)^.clr := $00000004;
  102615. end;
  102616. procedure TCAN2_C2FIFOCON4.setRTREN(thebits : TBits_1); inline;
  102617. begin
  102618. if thebits = 0 then
  102619. pTDefRegMap(@Self)^.clr := $00000004
  102620. else
  102621. pTDefRegMap(@Self)^.&set := $00000004;
  102622. end;
  102623. function TCAN2_C2FIFOCON4.getRTREN : TBits_1; inline;
  102624. begin
  102625. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  102626. end;
  102627. procedure TCAN2_C2FIFOCON4.setTXREQ; inline;
  102628. begin
  102629. pTDefRegMap(@Self)^.&set := $00000008;
  102630. end;
  102631. procedure TCAN2_C2FIFOCON4.clearTXREQ; inline;
  102632. begin
  102633. pTDefRegMap(@Self)^.clr := $00000008;
  102634. end;
  102635. procedure TCAN2_C2FIFOCON4.setTXREQ(thebits : TBits_1); inline;
  102636. begin
  102637. if thebits = 0 then
  102638. pTDefRegMap(@Self)^.clr := $00000008
  102639. else
  102640. pTDefRegMap(@Self)^.&set := $00000008;
  102641. end;
  102642. function TCAN2_C2FIFOCON4.getTXREQ : TBits_1; inline;
  102643. begin
  102644. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  102645. end;
  102646. procedure TCAN2_C2FIFOCON4.setTXERR; inline;
  102647. begin
  102648. pTDefRegMap(@Self)^.&set := $00000010;
  102649. end;
  102650. procedure TCAN2_C2FIFOCON4.clearTXERR; inline;
  102651. begin
  102652. pTDefRegMap(@Self)^.clr := $00000010;
  102653. end;
  102654. procedure TCAN2_C2FIFOCON4.setTXERR(thebits : TBits_1); inline;
  102655. begin
  102656. if thebits = 0 then
  102657. pTDefRegMap(@Self)^.clr := $00000010
  102658. else
  102659. pTDefRegMap(@Self)^.&set := $00000010;
  102660. end;
  102661. function TCAN2_C2FIFOCON4.getTXERR : TBits_1; inline;
  102662. begin
  102663. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  102664. end;
  102665. procedure TCAN2_C2FIFOCON4.setTXLARB; inline;
  102666. begin
  102667. pTDefRegMap(@Self)^.&set := $00000020;
  102668. end;
  102669. procedure TCAN2_C2FIFOCON4.clearTXLARB; inline;
  102670. begin
  102671. pTDefRegMap(@Self)^.clr := $00000020;
  102672. end;
  102673. procedure TCAN2_C2FIFOCON4.setTXLARB(thebits : TBits_1); inline;
  102674. begin
  102675. if thebits = 0 then
  102676. pTDefRegMap(@Self)^.clr := $00000020
  102677. else
  102678. pTDefRegMap(@Self)^.&set := $00000020;
  102679. end;
  102680. function TCAN2_C2FIFOCON4.getTXLARB : TBits_1; inline;
  102681. begin
  102682. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  102683. end;
  102684. procedure TCAN2_C2FIFOCON4.setTXABAT; inline;
  102685. begin
  102686. pTDefRegMap(@Self)^.&set := $00000040;
  102687. end;
  102688. procedure TCAN2_C2FIFOCON4.clearTXABAT; inline;
  102689. begin
  102690. pTDefRegMap(@Self)^.clr := $00000040;
  102691. end;
  102692. procedure TCAN2_C2FIFOCON4.setTXABAT(thebits : TBits_1); inline;
  102693. begin
  102694. if thebits = 0 then
  102695. pTDefRegMap(@Self)^.clr := $00000040
  102696. else
  102697. pTDefRegMap(@Self)^.&set := $00000040;
  102698. end;
  102699. function TCAN2_C2FIFOCON4.getTXABAT : TBits_1; inline;
  102700. begin
  102701. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  102702. end;
  102703. procedure TCAN2_C2FIFOCON4.setTXEN; inline;
  102704. begin
  102705. pTDefRegMap(@Self)^.&set := $00000080;
  102706. end;
  102707. procedure TCAN2_C2FIFOCON4.clearTXEN; inline;
  102708. begin
  102709. pTDefRegMap(@Self)^.clr := $00000080;
  102710. end;
  102711. procedure TCAN2_C2FIFOCON4.setTXEN(thebits : TBits_1); inline;
  102712. begin
  102713. if thebits = 0 then
  102714. pTDefRegMap(@Self)^.clr := $00000080
  102715. else
  102716. pTDefRegMap(@Self)^.&set := $00000080;
  102717. end;
  102718. function TCAN2_C2FIFOCON4.getTXEN : TBits_1; inline;
  102719. begin
  102720. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  102721. end;
  102722. procedure TCAN2_C2FIFOCON4.setDONLY; inline;
  102723. begin
  102724. pTDefRegMap(@Self)^.&set := $00001000;
  102725. end;
  102726. procedure TCAN2_C2FIFOCON4.clearDONLY; inline;
  102727. begin
  102728. pTDefRegMap(@Self)^.clr := $00001000;
  102729. end;
  102730. procedure TCAN2_C2FIFOCON4.setDONLY(thebits : TBits_1); inline;
  102731. begin
  102732. if thebits = 0 then
  102733. pTDefRegMap(@Self)^.clr := $00001000
  102734. else
  102735. pTDefRegMap(@Self)^.&set := $00001000;
  102736. end;
  102737. function TCAN2_C2FIFOCON4.getDONLY : TBits_1; inline;
  102738. begin
  102739. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  102740. end;
  102741. procedure TCAN2_C2FIFOCON4.setUINC; inline;
  102742. begin
  102743. pTDefRegMap(@Self)^.&set := $00002000;
  102744. end;
  102745. procedure TCAN2_C2FIFOCON4.clearUINC; inline;
  102746. begin
  102747. pTDefRegMap(@Self)^.clr := $00002000;
  102748. end;
  102749. procedure TCAN2_C2FIFOCON4.setUINC(thebits : TBits_1); inline;
  102750. begin
  102751. if thebits = 0 then
  102752. pTDefRegMap(@Self)^.clr := $00002000
  102753. else
  102754. pTDefRegMap(@Self)^.&set := $00002000;
  102755. end;
  102756. function TCAN2_C2FIFOCON4.getUINC : TBits_1; inline;
  102757. begin
  102758. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  102759. end;
  102760. procedure TCAN2_C2FIFOCON4.setFRESET; inline;
  102761. begin
  102762. pTDefRegMap(@Self)^.&set := $00004000;
  102763. end;
  102764. procedure TCAN2_C2FIFOCON4.clearFRESET; inline;
  102765. begin
  102766. pTDefRegMap(@Self)^.clr := $00004000;
  102767. end;
  102768. procedure TCAN2_C2FIFOCON4.setFRESET(thebits : TBits_1); inline;
  102769. begin
  102770. if thebits = 0 then
  102771. pTDefRegMap(@Self)^.clr := $00004000
  102772. else
  102773. pTDefRegMap(@Self)^.&set := $00004000;
  102774. end;
  102775. function TCAN2_C2FIFOCON4.getFRESET : TBits_1; inline;
  102776. begin
  102777. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  102778. end;
  102779. procedure TCAN2_C2FIFOCON4.setFSIZE(thebits : TBits_5); inline;
  102780. begin
  102781. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  102782. end;
  102783. function TCAN2_C2FIFOCON4.getFSIZE : TBits_5; inline;
  102784. begin
  102785. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  102786. end;
  102787. procedure TCAN2_C2FIFOCON4.setw(thebits : TBits_32); inline;
  102788. begin
  102789. pTDefRegMap(@Self)^.val := thebits;
  102790. end;
  102791. function TCAN2_C2FIFOCON4.getw : TBits_32; inline;
  102792. begin
  102793. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  102794. end;
  102795. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIF; inline;
  102796. begin
  102797. pTDefRegMap(@Self)^.&set := $00000001;
  102798. end;
  102799. procedure TCAN2_C2FIFOINT4.clearRXNEMPTYIF; inline;
  102800. begin
  102801. pTDefRegMap(@Self)^.clr := $00000001;
  102802. end;
  102803. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIF(thebits : TBits_1); inline;
  102804. begin
  102805. if thebits = 0 then
  102806. pTDefRegMap(@Self)^.clr := $00000001
  102807. else
  102808. pTDefRegMap(@Self)^.&set := $00000001;
  102809. end;
  102810. function TCAN2_C2FIFOINT4.getRXNEMPTYIF : TBits_1; inline;
  102811. begin
  102812. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  102813. end;
  102814. procedure TCAN2_C2FIFOINT4.setRXHALFIF; inline;
  102815. begin
  102816. pTDefRegMap(@Self)^.&set := $00000002;
  102817. end;
  102818. procedure TCAN2_C2FIFOINT4.clearRXHALFIF; inline;
  102819. begin
  102820. pTDefRegMap(@Self)^.clr := $00000002;
  102821. end;
  102822. procedure TCAN2_C2FIFOINT4.setRXHALFIF(thebits : TBits_1); inline;
  102823. begin
  102824. if thebits = 0 then
  102825. pTDefRegMap(@Self)^.clr := $00000002
  102826. else
  102827. pTDefRegMap(@Self)^.&set := $00000002;
  102828. end;
  102829. function TCAN2_C2FIFOINT4.getRXHALFIF : TBits_1; inline;
  102830. begin
  102831. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  102832. end;
  102833. procedure TCAN2_C2FIFOINT4.setRXFULLIF; inline;
  102834. begin
  102835. pTDefRegMap(@Self)^.&set := $00000004;
  102836. end;
  102837. procedure TCAN2_C2FIFOINT4.clearRXFULLIF; inline;
  102838. begin
  102839. pTDefRegMap(@Self)^.clr := $00000004;
  102840. end;
  102841. procedure TCAN2_C2FIFOINT4.setRXFULLIF(thebits : TBits_1); inline;
  102842. begin
  102843. if thebits = 0 then
  102844. pTDefRegMap(@Self)^.clr := $00000004
  102845. else
  102846. pTDefRegMap(@Self)^.&set := $00000004;
  102847. end;
  102848. function TCAN2_C2FIFOINT4.getRXFULLIF : TBits_1; inline;
  102849. begin
  102850. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  102851. end;
  102852. procedure TCAN2_C2FIFOINT4.setRXOVFLIF; inline;
  102853. begin
  102854. pTDefRegMap(@Self)^.&set := $00000008;
  102855. end;
  102856. procedure TCAN2_C2FIFOINT4.clearRXOVFLIF; inline;
  102857. begin
  102858. pTDefRegMap(@Self)^.clr := $00000008;
  102859. end;
  102860. procedure TCAN2_C2FIFOINT4.setRXOVFLIF(thebits : TBits_1); inline;
  102861. begin
  102862. if thebits = 0 then
  102863. pTDefRegMap(@Self)^.clr := $00000008
  102864. else
  102865. pTDefRegMap(@Self)^.&set := $00000008;
  102866. end;
  102867. function TCAN2_C2FIFOINT4.getRXOVFLIF : TBits_1; inline;
  102868. begin
  102869. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  102870. end;
  102871. procedure TCAN2_C2FIFOINT4.setTXEMPTYIF; inline;
  102872. begin
  102873. pTDefRegMap(@Self)^.&set := $00000100;
  102874. end;
  102875. procedure TCAN2_C2FIFOINT4.clearTXEMPTYIF; inline;
  102876. begin
  102877. pTDefRegMap(@Self)^.clr := $00000100;
  102878. end;
  102879. procedure TCAN2_C2FIFOINT4.setTXEMPTYIF(thebits : TBits_1); inline;
  102880. begin
  102881. if thebits = 0 then
  102882. pTDefRegMap(@Self)^.clr := $00000100
  102883. else
  102884. pTDefRegMap(@Self)^.&set := $00000100;
  102885. end;
  102886. function TCAN2_C2FIFOINT4.getTXEMPTYIF : TBits_1; inline;
  102887. begin
  102888. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  102889. end;
  102890. procedure TCAN2_C2FIFOINT4.setTXHALFIF; inline;
  102891. begin
  102892. pTDefRegMap(@Self)^.&set := $00000200;
  102893. end;
  102894. procedure TCAN2_C2FIFOINT4.clearTXHALFIF; inline;
  102895. begin
  102896. pTDefRegMap(@Self)^.clr := $00000200;
  102897. end;
  102898. procedure TCAN2_C2FIFOINT4.setTXHALFIF(thebits : TBits_1); inline;
  102899. begin
  102900. if thebits = 0 then
  102901. pTDefRegMap(@Self)^.clr := $00000200
  102902. else
  102903. pTDefRegMap(@Self)^.&set := $00000200;
  102904. end;
  102905. function TCAN2_C2FIFOINT4.getTXHALFIF : TBits_1; inline;
  102906. begin
  102907. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  102908. end;
  102909. procedure TCAN2_C2FIFOINT4.setTXNFULLIF; inline;
  102910. begin
  102911. pTDefRegMap(@Self)^.&set := $00000400;
  102912. end;
  102913. procedure TCAN2_C2FIFOINT4.clearTXNFULLIF; inline;
  102914. begin
  102915. pTDefRegMap(@Self)^.clr := $00000400;
  102916. end;
  102917. procedure TCAN2_C2FIFOINT4.setTXNFULLIF(thebits : TBits_1); inline;
  102918. begin
  102919. if thebits = 0 then
  102920. pTDefRegMap(@Self)^.clr := $00000400
  102921. else
  102922. pTDefRegMap(@Self)^.&set := $00000400;
  102923. end;
  102924. function TCAN2_C2FIFOINT4.getTXNFULLIF : TBits_1; inline;
  102925. begin
  102926. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  102927. end;
  102928. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIE; inline;
  102929. begin
  102930. pTDefRegMap(@Self)^.&set := $00010000;
  102931. end;
  102932. procedure TCAN2_C2FIFOINT4.clearRXNEMPTYIE; inline;
  102933. begin
  102934. pTDefRegMap(@Self)^.clr := $00010000;
  102935. end;
  102936. procedure TCAN2_C2FIFOINT4.setRXNEMPTYIE(thebits : TBits_1); inline;
  102937. begin
  102938. if thebits = 0 then
  102939. pTDefRegMap(@Self)^.clr := $00010000
  102940. else
  102941. pTDefRegMap(@Self)^.&set := $00010000;
  102942. end;
  102943. function TCAN2_C2FIFOINT4.getRXNEMPTYIE : TBits_1; inline;
  102944. begin
  102945. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  102946. end;
  102947. procedure TCAN2_C2FIFOINT4.setRXHALFIE; inline;
  102948. begin
  102949. pTDefRegMap(@Self)^.&set := $00020000;
  102950. end;
  102951. procedure TCAN2_C2FIFOINT4.clearRXHALFIE; inline;
  102952. begin
  102953. pTDefRegMap(@Self)^.clr := $00020000;
  102954. end;
  102955. procedure TCAN2_C2FIFOINT4.setRXHALFIE(thebits : TBits_1); inline;
  102956. begin
  102957. if thebits = 0 then
  102958. pTDefRegMap(@Self)^.clr := $00020000
  102959. else
  102960. pTDefRegMap(@Self)^.&set := $00020000;
  102961. end;
  102962. function TCAN2_C2FIFOINT4.getRXHALFIE : TBits_1; inline;
  102963. begin
  102964. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  102965. end;
  102966. procedure TCAN2_C2FIFOINT4.setRXFULLIE; inline;
  102967. begin
  102968. pTDefRegMap(@Self)^.&set := $00040000;
  102969. end;
  102970. procedure TCAN2_C2FIFOINT4.clearRXFULLIE; inline;
  102971. begin
  102972. pTDefRegMap(@Self)^.clr := $00040000;
  102973. end;
  102974. procedure TCAN2_C2FIFOINT4.setRXFULLIE(thebits : TBits_1); inline;
  102975. begin
  102976. if thebits = 0 then
  102977. pTDefRegMap(@Self)^.clr := $00040000
  102978. else
  102979. pTDefRegMap(@Self)^.&set := $00040000;
  102980. end;
  102981. function TCAN2_C2FIFOINT4.getRXFULLIE : TBits_1; inline;
  102982. begin
  102983. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  102984. end;
  102985. procedure TCAN2_C2FIFOINT4.setRXOVFLIE; inline;
  102986. begin
  102987. pTDefRegMap(@Self)^.&set := $00080000;
  102988. end;
  102989. procedure TCAN2_C2FIFOINT4.clearRXOVFLIE; inline;
  102990. begin
  102991. pTDefRegMap(@Self)^.clr := $00080000;
  102992. end;
  102993. procedure TCAN2_C2FIFOINT4.setRXOVFLIE(thebits : TBits_1); inline;
  102994. begin
  102995. if thebits = 0 then
  102996. pTDefRegMap(@Self)^.clr := $00080000
  102997. else
  102998. pTDefRegMap(@Self)^.&set := $00080000;
  102999. end;
  103000. function TCAN2_C2FIFOINT4.getRXOVFLIE : TBits_1; inline;
  103001. begin
  103002. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103003. end;
  103004. procedure TCAN2_C2FIFOINT4.setTXEMPTYIE; inline;
  103005. begin
  103006. pTDefRegMap(@Self)^.&set := $01000000;
  103007. end;
  103008. procedure TCAN2_C2FIFOINT4.clearTXEMPTYIE; inline;
  103009. begin
  103010. pTDefRegMap(@Self)^.clr := $01000000;
  103011. end;
  103012. procedure TCAN2_C2FIFOINT4.setTXEMPTYIE(thebits : TBits_1); inline;
  103013. begin
  103014. if thebits = 0 then
  103015. pTDefRegMap(@Self)^.clr := $01000000
  103016. else
  103017. pTDefRegMap(@Self)^.&set := $01000000;
  103018. end;
  103019. function TCAN2_C2FIFOINT4.getTXEMPTYIE : TBits_1; inline;
  103020. begin
  103021. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  103022. end;
  103023. procedure TCAN2_C2FIFOINT4.setTXHALFIE; inline;
  103024. begin
  103025. pTDefRegMap(@Self)^.&set := $02000000;
  103026. end;
  103027. procedure TCAN2_C2FIFOINT4.clearTXHALFIE; inline;
  103028. begin
  103029. pTDefRegMap(@Self)^.clr := $02000000;
  103030. end;
  103031. procedure TCAN2_C2FIFOINT4.setTXHALFIE(thebits : TBits_1); inline;
  103032. begin
  103033. if thebits = 0 then
  103034. pTDefRegMap(@Self)^.clr := $02000000
  103035. else
  103036. pTDefRegMap(@Self)^.&set := $02000000;
  103037. end;
  103038. function TCAN2_C2FIFOINT4.getTXHALFIE : TBits_1; inline;
  103039. begin
  103040. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  103041. end;
  103042. procedure TCAN2_C2FIFOINT4.setTXNFULLIE; inline;
  103043. begin
  103044. pTDefRegMap(@Self)^.&set := $04000000;
  103045. end;
  103046. procedure TCAN2_C2FIFOINT4.clearTXNFULLIE; inline;
  103047. begin
  103048. pTDefRegMap(@Self)^.clr := $04000000;
  103049. end;
  103050. procedure TCAN2_C2FIFOINT4.setTXNFULLIE(thebits : TBits_1); inline;
  103051. begin
  103052. if thebits = 0 then
  103053. pTDefRegMap(@Self)^.clr := $04000000
  103054. else
  103055. pTDefRegMap(@Self)^.&set := $04000000;
  103056. end;
  103057. function TCAN2_C2FIFOINT4.getTXNFULLIE : TBits_1; inline;
  103058. begin
  103059. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  103060. end;
  103061. procedure TCAN2_C2FIFOINT4.setw(thebits : TBits_32); inline;
  103062. begin
  103063. pTDefRegMap(@Self)^.val := thebits;
  103064. end;
  103065. function TCAN2_C2FIFOINT4.getw : TBits_32; inline;
  103066. begin
  103067. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103068. end;
  103069. procedure TCAN2_C2FIFOCI4.setCFIFOCI(thebits : TBits_5); inline;
  103070. begin
  103071. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103072. end;
  103073. function TCAN2_C2FIFOCI4.getCFIFOCI : TBits_5; inline;
  103074. begin
  103075. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103076. end;
  103077. procedure TCAN2_C2FIFOCI4.setw(thebits : TBits_32); inline;
  103078. begin
  103079. pTDefRegMap(@Self)^.val := thebits;
  103080. end;
  103081. function TCAN2_C2FIFOCI4.getw : TBits_32; inline;
  103082. begin
  103083. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103084. end;
  103085. procedure TCAN2_C2FIFOCON5.setTXPRI(thebits : TBits_2); inline;
  103086. begin
  103087. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  103088. end;
  103089. function TCAN2_C2FIFOCON5.getTXPRI : TBits_2; inline;
  103090. begin
  103091. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  103092. end;
  103093. procedure TCAN2_C2FIFOCON5.setRTREN; inline;
  103094. begin
  103095. pTDefRegMap(@Self)^.&set := $00000004;
  103096. end;
  103097. procedure TCAN2_C2FIFOCON5.clearRTREN; inline;
  103098. begin
  103099. pTDefRegMap(@Self)^.clr := $00000004;
  103100. end;
  103101. procedure TCAN2_C2FIFOCON5.setRTREN(thebits : TBits_1); inline;
  103102. begin
  103103. if thebits = 0 then
  103104. pTDefRegMap(@Self)^.clr := $00000004
  103105. else
  103106. pTDefRegMap(@Self)^.&set := $00000004;
  103107. end;
  103108. function TCAN2_C2FIFOCON5.getRTREN : TBits_1; inline;
  103109. begin
  103110. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  103111. end;
  103112. procedure TCAN2_C2FIFOCON5.setTXREQ; inline;
  103113. begin
  103114. pTDefRegMap(@Self)^.&set := $00000008;
  103115. end;
  103116. procedure TCAN2_C2FIFOCON5.clearTXREQ; inline;
  103117. begin
  103118. pTDefRegMap(@Self)^.clr := $00000008;
  103119. end;
  103120. procedure TCAN2_C2FIFOCON5.setTXREQ(thebits : TBits_1); inline;
  103121. begin
  103122. if thebits = 0 then
  103123. pTDefRegMap(@Self)^.clr := $00000008
  103124. else
  103125. pTDefRegMap(@Self)^.&set := $00000008;
  103126. end;
  103127. function TCAN2_C2FIFOCON5.getTXREQ : TBits_1; inline;
  103128. begin
  103129. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  103130. end;
  103131. procedure TCAN2_C2FIFOCON5.setTXERR; inline;
  103132. begin
  103133. pTDefRegMap(@Self)^.&set := $00000010;
  103134. end;
  103135. procedure TCAN2_C2FIFOCON5.clearTXERR; inline;
  103136. begin
  103137. pTDefRegMap(@Self)^.clr := $00000010;
  103138. end;
  103139. procedure TCAN2_C2FIFOCON5.setTXERR(thebits : TBits_1); inline;
  103140. begin
  103141. if thebits = 0 then
  103142. pTDefRegMap(@Self)^.clr := $00000010
  103143. else
  103144. pTDefRegMap(@Self)^.&set := $00000010;
  103145. end;
  103146. function TCAN2_C2FIFOCON5.getTXERR : TBits_1; inline;
  103147. begin
  103148. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  103149. end;
  103150. procedure TCAN2_C2FIFOCON5.setTXLARB; inline;
  103151. begin
  103152. pTDefRegMap(@Self)^.&set := $00000020;
  103153. end;
  103154. procedure TCAN2_C2FIFOCON5.clearTXLARB; inline;
  103155. begin
  103156. pTDefRegMap(@Self)^.clr := $00000020;
  103157. end;
  103158. procedure TCAN2_C2FIFOCON5.setTXLARB(thebits : TBits_1); inline;
  103159. begin
  103160. if thebits = 0 then
  103161. pTDefRegMap(@Self)^.clr := $00000020
  103162. else
  103163. pTDefRegMap(@Self)^.&set := $00000020;
  103164. end;
  103165. function TCAN2_C2FIFOCON5.getTXLARB : TBits_1; inline;
  103166. begin
  103167. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  103168. end;
  103169. procedure TCAN2_C2FIFOCON5.setTXABAT; inline;
  103170. begin
  103171. pTDefRegMap(@Self)^.&set := $00000040;
  103172. end;
  103173. procedure TCAN2_C2FIFOCON5.clearTXABAT; inline;
  103174. begin
  103175. pTDefRegMap(@Self)^.clr := $00000040;
  103176. end;
  103177. procedure TCAN2_C2FIFOCON5.setTXABAT(thebits : TBits_1); inline;
  103178. begin
  103179. if thebits = 0 then
  103180. pTDefRegMap(@Self)^.clr := $00000040
  103181. else
  103182. pTDefRegMap(@Self)^.&set := $00000040;
  103183. end;
  103184. function TCAN2_C2FIFOCON5.getTXABAT : TBits_1; inline;
  103185. begin
  103186. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  103187. end;
  103188. procedure TCAN2_C2FIFOCON5.setTXEN; inline;
  103189. begin
  103190. pTDefRegMap(@Self)^.&set := $00000080;
  103191. end;
  103192. procedure TCAN2_C2FIFOCON5.clearTXEN; inline;
  103193. begin
  103194. pTDefRegMap(@Self)^.clr := $00000080;
  103195. end;
  103196. procedure TCAN2_C2FIFOCON5.setTXEN(thebits : TBits_1); inline;
  103197. begin
  103198. if thebits = 0 then
  103199. pTDefRegMap(@Self)^.clr := $00000080
  103200. else
  103201. pTDefRegMap(@Self)^.&set := $00000080;
  103202. end;
  103203. function TCAN2_C2FIFOCON5.getTXEN : TBits_1; inline;
  103204. begin
  103205. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103206. end;
  103207. procedure TCAN2_C2FIFOCON5.setDONLY; inline;
  103208. begin
  103209. pTDefRegMap(@Self)^.&set := $00001000;
  103210. end;
  103211. procedure TCAN2_C2FIFOCON5.clearDONLY; inline;
  103212. begin
  103213. pTDefRegMap(@Self)^.clr := $00001000;
  103214. end;
  103215. procedure TCAN2_C2FIFOCON5.setDONLY(thebits : TBits_1); inline;
  103216. begin
  103217. if thebits = 0 then
  103218. pTDefRegMap(@Self)^.clr := $00001000
  103219. else
  103220. pTDefRegMap(@Self)^.&set := $00001000;
  103221. end;
  103222. function TCAN2_C2FIFOCON5.getDONLY : TBits_1; inline;
  103223. begin
  103224. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  103225. end;
  103226. procedure TCAN2_C2FIFOCON5.setUINC; inline;
  103227. begin
  103228. pTDefRegMap(@Self)^.&set := $00002000;
  103229. end;
  103230. procedure TCAN2_C2FIFOCON5.clearUINC; inline;
  103231. begin
  103232. pTDefRegMap(@Self)^.clr := $00002000;
  103233. end;
  103234. procedure TCAN2_C2FIFOCON5.setUINC(thebits : TBits_1); inline;
  103235. begin
  103236. if thebits = 0 then
  103237. pTDefRegMap(@Self)^.clr := $00002000
  103238. else
  103239. pTDefRegMap(@Self)^.&set := $00002000;
  103240. end;
  103241. function TCAN2_C2FIFOCON5.getUINC : TBits_1; inline;
  103242. begin
  103243. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  103244. end;
  103245. procedure TCAN2_C2FIFOCON5.setFRESET; inline;
  103246. begin
  103247. pTDefRegMap(@Self)^.&set := $00004000;
  103248. end;
  103249. procedure TCAN2_C2FIFOCON5.clearFRESET; inline;
  103250. begin
  103251. pTDefRegMap(@Self)^.clr := $00004000;
  103252. end;
  103253. procedure TCAN2_C2FIFOCON5.setFRESET(thebits : TBits_1); inline;
  103254. begin
  103255. if thebits = 0 then
  103256. pTDefRegMap(@Self)^.clr := $00004000
  103257. else
  103258. pTDefRegMap(@Self)^.&set := $00004000;
  103259. end;
  103260. function TCAN2_C2FIFOCON5.getFRESET : TBits_1; inline;
  103261. begin
  103262. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  103263. end;
  103264. procedure TCAN2_C2FIFOCON5.setFSIZE(thebits : TBits_5); inline;
  103265. begin
  103266. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103267. end;
  103268. function TCAN2_C2FIFOCON5.getFSIZE : TBits_5; inline;
  103269. begin
  103270. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103271. end;
  103272. procedure TCAN2_C2FIFOCON5.setw(thebits : TBits_32); inline;
  103273. begin
  103274. pTDefRegMap(@Self)^.val := thebits;
  103275. end;
  103276. function TCAN2_C2FIFOCON5.getw : TBits_32; inline;
  103277. begin
  103278. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103279. end;
  103280. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIF; inline;
  103281. begin
  103282. pTDefRegMap(@Self)^.&set := $00000001;
  103283. end;
  103284. procedure TCAN2_C2FIFOINT5.clearRXNEMPTYIF; inline;
  103285. begin
  103286. pTDefRegMap(@Self)^.clr := $00000001;
  103287. end;
  103288. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIF(thebits : TBits_1); inline;
  103289. begin
  103290. if thebits = 0 then
  103291. pTDefRegMap(@Self)^.clr := $00000001
  103292. else
  103293. pTDefRegMap(@Self)^.&set := $00000001;
  103294. end;
  103295. function TCAN2_C2FIFOINT5.getRXNEMPTYIF : TBits_1; inline;
  103296. begin
  103297. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  103298. end;
  103299. procedure TCAN2_C2FIFOINT5.setRXHALFIF; inline;
  103300. begin
  103301. pTDefRegMap(@Self)^.&set := $00000002;
  103302. end;
  103303. procedure TCAN2_C2FIFOINT5.clearRXHALFIF; inline;
  103304. begin
  103305. pTDefRegMap(@Self)^.clr := $00000002;
  103306. end;
  103307. procedure TCAN2_C2FIFOINT5.setRXHALFIF(thebits : TBits_1); inline;
  103308. begin
  103309. if thebits = 0 then
  103310. pTDefRegMap(@Self)^.clr := $00000002
  103311. else
  103312. pTDefRegMap(@Self)^.&set := $00000002;
  103313. end;
  103314. function TCAN2_C2FIFOINT5.getRXHALFIF : TBits_1; inline;
  103315. begin
  103316. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  103317. end;
  103318. procedure TCAN2_C2FIFOINT5.setRXFULLIF; inline;
  103319. begin
  103320. pTDefRegMap(@Self)^.&set := $00000004;
  103321. end;
  103322. procedure TCAN2_C2FIFOINT5.clearRXFULLIF; inline;
  103323. begin
  103324. pTDefRegMap(@Self)^.clr := $00000004;
  103325. end;
  103326. procedure TCAN2_C2FIFOINT5.setRXFULLIF(thebits : TBits_1); inline;
  103327. begin
  103328. if thebits = 0 then
  103329. pTDefRegMap(@Self)^.clr := $00000004
  103330. else
  103331. pTDefRegMap(@Self)^.&set := $00000004;
  103332. end;
  103333. function TCAN2_C2FIFOINT5.getRXFULLIF : TBits_1; inline;
  103334. begin
  103335. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  103336. end;
  103337. procedure TCAN2_C2FIFOINT5.setRXOVFLIF; inline;
  103338. begin
  103339. pTDefRegMap(@Self)^.&set := $00000008;
  103340. end;
  103341. procedure TCAN2_C2FIFOINT5.clearRXOVFLIF; inline;
  103342. begin
  103343. pTDefRegMap(@Self)^.clr := $00000008;
  103344. end;
  103345. procedure TCAN2_C2FIFOINT5.setRXOVFLIF(thebits : TBits_1); inline;
  103346. begin
  103347. if thebits = 0 then
  103348. pTDefRegMap(@Self)^.clr := $00000008
  103349. else
  103350. pTDefRegMap(@Self)^.&set := $00000008;
  103351. end;
  103352. function TCAN2_C2FIFOINT5.getRXOVFLIF : TBits_1; inline;
  103353. begin
  103354. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  103355. end;
  103356. procedure TCAN2_C2FIFOINT5.setTXEMPTYIF; inline;
  103357. begin
  103358. pTDefRegMap(@Self)^.&set := $00000100;
  103359. end;
  103360. procedure TCAN2_C2FIFOINT5.clearTXEMPTYIF; inline;
  103361. begin
  103362. pTDefRegMap(@Self)^.clr := $00000100;
  103363. end;
  103364. procedure TCAN2_C2FIFOINT5.setTXEMPTYIF(thebits : TBits_1); inline;
  103365. begin
  103366. if thebits = 0 then
  103367. pTDefRegMap(@Self)^.clr := $00000100
  103368. else
  103369. pTDefRegMap(@Self)^.&set := $00000100;
  103370. end;
  103371. function TCAN2_C2FIFOINT5.getTXEMPTYIF : TBits_1; inline;
  103372. begin
  103373. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  103374. end;
  103375. procedure TCAN2_C2FIFOINT5.setTXHALFIF; inline;
  103376. begin
  103377. pTDefRegMap(@Self)^.&set := $00000200;
  103378. end;
  103379. procedure TCAN2_C2FIFOINT5.clearTXHALFIF; inline;
  103380. begin
  103381. pTDefRegMap(@Self)^.clr := $00000200;
  103382. end;
  103383. procedure TCAN2_C2FIFOINT5.setTXHALFIF(thebits : TBits_1); inline;
  103384. begin
  103385. if thebits = 0 then
  103386. pTDefRegMap(@Self)^.clr := $00000200
  103387. else
  103388. pTDefRegMap(@Self)^.&set := $00000200;
  103389. end;
  103390. function TCAN2_C2FIFOINT5.getTXHALFIF : TBits_1; inline;
  103391. begin
  103392. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  103393. end;
  103394. procedure TCAN2_C2FIFOINT5.setTXNFULLIF; inline;
  103395. begin
  103396. pTDefRegMap(@Self)^.&set := $00000400;
  103397. end;
  103398. procedure TCAN2_C2FIFOINT5.clearTXNFULLIF; inline;
  103399. begin
  103400. pTDefRegMap(@Self)^.clr := $00000400;
  103401. end;
  103402. procedure TCAN2_C2FIFOINT5.setTXNFULLIF(thebits : TBits_1); inline;
  103403. begin
  103404. if thebits = 0 then
  103405. pTDefRegMap(@Self)^.clr := $00000400
  103406. else
  103407. pTDefRegMap(@Self)^.&set := $00000400;
  103408. end;
  103409. function TCAN2_C2FIFOINT5.getTXNFULLIF : TBits_1; inline;
  103410. begin
  103411. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  103412. end;
  103413. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIE; inline;
  103414. begin
  103415. pTDefRegMap(@Self)^.&set := $00010000;
  103416. end;
  103417. procedure TCAN2_C2FIFOINT5.clearRXNEMPTYIE; inline;
  103418. begin
  103419. pTDefRegMap(@Self)^.clr := $00010000;
  103420. end;
  103421. procedure TCAN2_C2FIFOINT5.setRXNEMPTYIE(thebits : TBits_1); inline;
  103422. begin
  103423. if thebits = 0 then
  103424. pTDefRegMap(@Self)^.clr := $00010000
  103425. else
  103426. pTDefRegMap(@Self)^.&set := $00010000;
  103427. end;
  103428. function TCAN2_C2FIFOINT5.getRXNEMPTYIE : TBits_1; inline;
  103429. begin
  103430. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  103431. end;
  103432. procedure TCAN2_C2FIFOINT5.setRXHALFIE; inline;
  103433. begin
  103434. pTDefRegMap(@Self)^.&set := $00020000;
  103435. end;
  103436. procedure TCAN2_C2FIFOINT5.clearRXHALFIE; inline;
  103437. begin
  103438. pTDefRegMap(@Self)^.clr := $00020000;
  103439. end;
  103440. procedure TCAN2_C2FIFOINT5.setRXHALFIE(thebits : TBits_1); inline;
  103441. begin
  103442. if thebits = 0 then
  103443. pTDefRegMap(@Self)^.clr := $00020000
  103444. else
  103445. pTDefRegMap(@Self)^.&set := $00020000;
  103446. end;
  103447. function TCAN2_C2FIFOINT5.getRXHALFIE : TBits_1; inline;
  103448. begin
  103449. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  103450. end;
  103451. procedure TCAN2_C2FIFOINT5.setRXFULLIE; inline;
  103452. begin
  103453. pTDefRegMap(@Self)^.&set := $00040000;
  103454. end;
  103455. procedure TCAN2_C2FIFOINT5.clearRXFULLIE; inline;
  103456. begin
  103457. pTDefRegMap(@Self)^.clr := $00040000;
  103458. end;
  103459. procedure TCAN2_C2FIFOINT5.setRXFULLIE(thebits : TBits_1); inline;
  103460. begin
  103461. if thebits = 0 then
  103462. pTDefRegMap(@Self)^.clr := $00040000
  103463. else
  103464. pTDefRegMap(@Self)^.&set := $00040000;
  103465. end;
  103466. function TCAN2_C2FIFOINT5.getRXFULLIE : TBits_1; inline;
  103467. begin
  103468. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  103469. end;
  103470. procedure TCAN2_C2FIFOINT5.setRXOVFLIE; inline;
  103471. begin
  103472. pTDefRegMap(@Self)^.&set := $00080000;
  103473. end;
  103474. procedure TCAN2_C2FIFOINT5.clearRXOVFLIE; inline;
  103475. begin
  103476. pTDefRegMap(@Self)^.clr := $00080000;
  103477. end;
  103478. procedure TCAN2_C2FIFOINT5.setRXOVFLIE(thebits : TBits_1); inline;
  103479. begin
  103480. if thebits = 0 then
  103481. pTDefRegMap(@Self)^.clr := $00080000
  103482. else
  103483. pTDefRegMap(@Self)^.&set := $00080000;
  103484. end;
  103485. function TCAN2_C2FIFOINT5.getRXOVFLIE : TBits_1; inline;
  103486. begin
  103487. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103488. end;
  103489. procedure TCAN2_C2FIFOINT5.setTXEMPTYIE; inline;
  103490. begin
  103491. pTDefRegMap(@Self)^.&set := $01000000;
  103492. end;
  103493. procedure TCAN2_C2FIFOINT5.clearTXEMPTYIE; inline;
  103494. begin
  103495. pTDefRegMap(@Self)^.clr := $01000000;
  103496. end;
  103497. procedure TCAN2_C2FIFOINT5.setTXEMPTYIE(thebits : TBits_1); inline;
  103498. begin
  103499. if thebits = 0 then
  103500. pTDefRegMap(@Self)^.clr := $01000000
  103501. else
  103502. pTDefRegMap(@Self)^.&set := $01000000;
  103503. end;
  103504. function TCAN2_C2FIFOINT5.getTXEMPTYIE : TBits_1; inline;
  103505. begin
  103506. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  103507. end;
  103508. procedure TCAN2_C2FIFOINT5.setTXHALFIE; inline;
  103509. begin
  103510. pTDefRegMap(@Self)^.&set := $02000000;
  103511. end;
  103512. procedure TCAN2_C2FIFOINT5.clearTXHALFIE; inline;
  103513. begin
  103514. pTDefRegMap(@Self)^.clr := $02000000;
  103515. end;
  103516. procedure TCAN2_C2FIFOINT5.setTXHALFIE(thebits : TBits_1); inline;
  103517. begin
  103518. if thebits = 0 then
  103519. pTDefRegMap(@Self)^.clr := $02000000
  103520. else
  103521. pTDefRegMap(@Self)^.&set := $02000000;
  103522. end;
  103523. function TCAN2_C2FIFOINT5.getTXHALFIE : TBits_1; inline;
  103524. begin
  103525. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  103526. end;
  103527. procedure TCAN2_C2FIFOINT5.setTXNFULLIE; inline;
  103528. begin
  103529. pTDefRegMap(@Self)^.&set := $04000000;
  103530. end;
  103531. procedure TCAN2_C2FIFOINT5.clearTXNFULLIE; inline;
  103532. begin
  103533. pTDefRegMap(@Self)^.clr := $04000000;
  103534. end;
  103535. procedure TCAN2_C2FIFOINT5.setTXNFULLIE(thebits : TBits_1); inline;
  103536. begin
  103537. if thebits = 0 then
  103538. pTDefRegMap(@Self)^.clr := $04000000
  103539. else
  103540. pTDefRegMap(@Self)^.&set := $04000000;
  103541. end;
  103542. function TCAN2_C2FIFOINT5.getTXNFULLIE : TBits_1; inline;
  103543. begin
  103544. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  103545. end;
  103546. procedure TCAN2_C2FIFOINT5.setw(thebits : TBits_32); inline;
  103547. begin
  103548. pTDefRegMap(@Self)^.val := thebits;
  103549. end;
  103550. function TCAN2_C2FIFOINT5.getw : TBits_32; inline;
  103551. begin
  103552. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103553. end;
  103554. procedure TCAN2_C2FIFOCI5.setCFIFOCI(thebits : TBits_5); inline;
  103555. begin
  103556. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  103557. end;
  103558. function TCAN2_C2FIFOCI5.getCFIFOCI : TBits_5; inline;
  103559. begin
  103560. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  103561. end;
  103562. procedure TCAN2_C2FIFOCI5.setw(thebits : TBits_32); inline;
  103563. begin
  103564. pTDefRegMap(@Self)^.val := thebits;
  103565. end;
  103566. function TCAN2_C2FIFOCI5.getw : TBits_32; inline;
  103567. begin
  103568. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103569. end;
  103570. procedure TCAN2_C2FIFOCON6.setTXPRI(thebits : TBits_2); inline;
  103571. begin
  103572. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  103573. end;
  103574. function TCAN2_C2FIFOCON6.getTXPRI : TBits_2; inline;
  103575. begin
  103576. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  103577. end;
  103578. procedure TCAN2_C2FIFOCON6.setRTREN; inline;
  103579. begin
  103580. pTDefRegMap(@Self)^.&set := $00000004;
  103581. end;
  103582. procedure TCAN2_C2FIFOCON6.clearRTREN; inline;
  103583. begin
  103584. pTDefRegMap(@Self)^.clr := $00000004;
  103585. end;
  103586. procedure TCAN2_C2FIFOCON6.setRTREN(thebits : TBits_1); inline;
  103587. begin
  103588. if thebits = 0 then
  103589. pTDefRegMap(@Self)^.clr := $00000004
  103590. else
  103591. pTDefRegMap(@Self)^.&set := $00000004;
  103592. end;
  103593. function TCAN2_C2FIFOCON6.getRTREN : TBits_1; inline;
  103594. begin
  103595. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  103596. end;
  103597. procedure TCAN2_C2FIFOCON6.setTXREQ; inline;
  103598. begin
  103599. pTDefRegMap(@Self)^.&set := $00000008;
  103600. end;
  103601. procedure TCAN2_C2FIFOCON6.clearTXREQ; inline;
  103602. begin
  103603. pTDefRegMap(@Self)^.clr := $00000008;
  103604. end;
  103605. procedure TCAN2_C2FIFOCON6.setTXREQ(thebits : TBits_1); inline;
  103606. begin
  103607. if thebits = 0 then
  103608. pTDefRegMap(@Self)^.clr := $00000008
  103609. else
  103610. pTDefRegMap(@Self)^.&set := $00000008;
  103611. end;
  103612. function TCAN2_C2FIFOCON6.getTXREQ : TBits_1; inline;
  103613. begin
  103614. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  103615. end;
  103616. procedure TCAN2_C2FIFOCON6.setTXERR; inline;
  103617. begin
  103618. pTDefRegMap(@Self)^.&set := $00000010;
  103619. end;
  103620. procedure TCAN2_C2FIFOCON6.clearTXERR; inline;
  103621. begin
  103622. pTDefRegMap(@Self)^.clr := $00000010;
  103623. end;
  103624. procedure TCAN2_C2FIFOCON6.setTXERR(thebits : TBits_1); inline;
  103625. begin
  103626. if thebits = 0 then
  103627. pTDefRegMap(@Self)^.clr := $00000010
  103628. else
  103629. pTDefRegMap(@Self)^.&set := $00000010;
  103630. end;
  103631. function TCAN2_C2FIFOCON6.getTXERR : TBits_1; inline;
  103632. begin
  103633. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  103634. end;
  103635. procedure TCAN2_C2FIFOCON6.setTXLARB; inline;
  103636. begin
  103637. pTDefRegMap(@Self)^.&set := $00000020;
  103638. end;
  103639. procedure TCAN2_C2FIFOCON6.clearTXLARB; inline;
  103640. begin
  103641. pTDefRegMap(@Self)^.clr := $00000020;
  103642. end;
  103643. procedure TCAN2_C2FIFOCON6.setTXLARB(thebits : TBits_1); inline;
  103644. begin
  103645. if thebits = 0 then
  103646. pTDefRegMap(@Self)^.clr := $00000020
  103647. else
  103648. pTDefRegMap(@Self)^.&set := $00000020;
  103649. end;
  103650. function TCAN2_C2FIFOCON6.getTXLARB : TBits_1; inline;
  103651. begin
  103652. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  103653. end;
  103654. procedure TCAN2_C2FIFOCON6.setTXABAT; inline;
  103655. begin
  103656. pTDefRegMap(@Self)^.&set := $00000040;
  103657. end;
  103658. procedure TCAN2_C2FIFOCON6.clearTXABAT; inline;
  103659. begin
  103660. pTDefRegMap(@Self)^.clr := $00000040;
  103661. end;
  103662. procedure TCAN2_C2FIFOCON6.setTXABAT(thebits : TBits_1); inline;
  103663. begin
  103664. if thebits = 0 then
  103665. pTDefRegMap(@Self)^.clr := $00000040
  103666. else
  103667. pTDefRegMap(@Self)^.&set := $00000040;
  103668. end;
  103669. function TCAN2_C2FIFOCON6.getTXABAT : TBits_1; inline;
  103670. begin
  103671. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  103672. end;
  103673. procedure TCAN2_C2FIFOCON6.setTXEN; inline;
  103674. begin
  103675. pTDefRegMap(@Self)^.&set := $00000080;
  103676. end;
  103677. procedure TCAN2_C2FIFOCON6.clearTXEN; inline;
  103678. begin
  103679. pTDefRegMap(@Self)^.clr := $00000080;
  103680. end;
  103681. procedure TCAN2_C2FIFOCON6.setTXEN(thebits : TBits_1); inline;
  103682. begin
  103683. if thebits = 0 then
  103684. pTDefRegMap(@Self)^.clr := $00000080
  103685. else
  103686. pTDefRegMap(@Self)^.&set := $00000080;
  103687. end;
  103688. function TCAN2_C2FIFOCON6.getTXEN : TBits_1; inline;
  103689. begin
  103690. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  103691. end;
  103692. procedure TCAN2_C2FIFOCON6.setDONLY; inline;
  103693. begin
  103694. pTDefRegMap(@Self)^.&set := $00001000;
  103695. end;
  103696. procedure TCAN2_C2FIFOCON6.clearDONLY; inline;
  103697. begin
  103698. pTDefRegMap(@Self)^.clr := $00001000;
  103699. end;
  103700. procedure TCAN2_C2FIFOCON6.setDONLY(thebits : TBits_1); inline;
  103701. begin
  103702. if thebits = 0 then
  103703. pTDefRegMap(@Self)^.clr := $00001000
  103704. else
  103705. pTDefRegMap(@Self)^.&set := $00001000;
  103706. end;
  103707. function TCAN2_C2FIFOCON6.getDONLY : TBits_1; inline;
  103708. begin
  103709. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  103710. end;
  103711. procedure TCAN2_C2FIFOCON6.setUINC; inline;
  103712. begin
  103713. pTDefRegMap(@Self)^.&set := $00002000;
  103714. end;
  103715. procedure TCAN2_C2FIFOCON6.clearUINC; inline;
  103716. begin
  103717. pTDefRegMap(@Self)^.clr := $00002000;
  103718. end;
  103719. procedure TCAN2_C2FIFOCON6.setUINC(thebits : TBits_1); inline;
  103720. begin
  103721. if thebits = 0 then
  103722. pTDefRegMap(@Self)^.clr := $00002000
  103723. else
  103724. pTDefRegMap(@Self)^.&set := $00002000;
  103725. end;
  103726. function TCAN2_C2FIFOCON6.getUINC : TBits_1; inline;
  103727. begin
  103728. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  103729. end;
  103730. procedure TCAN2_C2FIFOCON6.setFRESET; inline;
  103731. begin
  103732. pTDefRegMap(@Self)^.&set := $00004000;
  103733. end;
  103734. procedure TCAN2_C2FIFOCON6.clearFRESET; inline;
  103735. begin
  103736. pTDefRegMap(@Self)^.clr := $00004000;
  103737. end;
  103738. procedure TCAN2_C2FIFOCON6.setFRESET(thebits : TBits_1); inline;
  103739. begin
  103740. if thebits = 0 then
  103741. pTDefRegMap(@Self)^.clr := $00004000
  103742. else
  103743. pTDefRegMap(@Self)^.&set := $00004000;
  103744. end;
  103745. function TCAN2_C2FIFOCON6.getFRESET : TBits_1; inline;
  103746. begin
  103747. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  103748. end;
  103749. procedure TCAN2_C2FIFOCON6.setFSIZE(thebits : TBits_5); inline;
  103750. begin
  103751. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  103752. end;
  103753. function TCAN2_C2FIFOCON6.getFSIZE : TBits_5; inline;
  103754. begin
  103755. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  103756. end;
  103757. procedure TCAN2_C2FIFOCON6.setw(thebits : TBits_32); inline;
  103758. begin
  103759. pTDefRegMap(@Self)^.val := thebits;
  103760. end;
  103761. function TCAN2_C2FIFOCON6.getw : TBits_32; inline;
  103762. begin
  103763. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  103764. end;
  103765. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIF; inline;
  103766. begin
  103767. pTDefRegMap(@Self)^.&set := $00000001;
  103768. end;
  103769. procedure TCAN2_C2FIFOINT6.clearRXNEMPTYIF; inline;
  103770. begin
  103771. pTDefRegMap(@Self)^.clr := $00000001;
  103772. end;
  103773. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIF(thebits : TBits_1); inline;
  103774. begin
  103775. if thebits = 0 then
  103776. pTDefRegMap(@Self)^.clr := $00000001
  103777. else
  103778. pTDefRegMap(@Self)^.&set := $00000001;
  103779. end;
  103780. function TCAN2_C2FIFOINT6.getRXNEMPTYIF : TBits_1; inline;
  103781. begin
  103782. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  103783. end;
  103784. procedure TCAN2_C2FIFOINT6.setRXHALFIF; inline;
  103785. begin
  103786. pTDefRegMap(@Self)^.&set := $00000002;
  103787. end;
  103788. procedure TCAN2_C2FIFOINT6.clearRXHALFIF; inline;
  103789. begin
  103790. pTDefRegMap(@Self)^.clr := $00000002;
  103791. end;
  103792. procedure TCAN2_C2FIFOINT6.setRXHALFIF(thebits : TBits_1); inline;
  103793. begin
  103794. if thebits = 0 then
  103795. pTDefRegMap(@Self)^.clr := $00000002
  103796. else
  103797. pTDefRegMap(@Self)^.&set := $00000002;
  103798. end;
  103799. function TCAN2_C2FIFOINT6.getRXHALFIF : TBits_1; inline;
  103800. begin
  103801. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  103802. end;
  103803. procedure TCAN2_C2FIFOINT6.setRXFULLIF; inline;
  103804. begin
  103805. pTDefRegMap(@Self)^.&set := $00000004;
  103806. end;
  103807. procedure TCAN2_C2FIFOINT6.clearRXFULLIF; inline;
  103808. begin
  103809. pTDefRegMap(@Self)^.clr := $00000004;
  103810. end;
  103811. procedure TCAN2_C2FIFOINT6.setRXFULLIF(thebits : TBits_1); inline;
  103812. begin
  103813. if thebits = 0 then
  103814. pTDefRegMap(@Self)^.clr := $00000004
  103815. else
  103816. pTDefRegMap(@Self)^.&set := $00000004;
  103817. end;
  103818. function TCAN2_C2FIFOINT6.getRXFULLIF : TBits_1; inline;
  103819. begin
  103820. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  103821. end;
  103822. procedure TCAN2_C2FIFOINT6.setRXOVFLIF; inline;
  103823. begin
  103824. pTDefRegMap(@Self)^.&set := $00000008;
  103825. end;
  103826. procedure TCAN2_C2FIFOINT6.clearRXOVFLIF; inline;
  103827. begin
  103828. pTDefRegMap(@Self)^.clr := $00000008;
  103829. end;
  103830. procedure TCAN2_C2FIFOINT6.setRXOVFLIF(thebits : TBits_1); inline;
  103831. begin
  103832. if thebits = 0 then
  103833. pTDefRegMap(@Self)^.clr := $00000008
  103834. else
  103835. pTDefRegMap(@Self)^.&set := $00000008;
  103836. end;
  103837. function TCAN2_C2FIFOINT6.getRXOVFLIF : TBits_1; inline;
  103838. begin
  103839. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  103840. end;
  103841. procedure TCAN2_C2FIFOINT6.setTXEMPTYIF; inline;
  103842. begin
  103843. pTDefRegMap(@Self)^.&set := $00000100;
  103844. end;
  103845. procedure TCAN2_C2FIFOINT6.clearTXEMPTYIF; inline;
  103846. begin
  103847. pTDefRegMap(@Self)^.clr := $00000100;
  103848. end;
  103849. procedure TCAN2_C2FIFOINT6.setTXEMPTYIF(thebits : TBits_1); inline;
  103850. begin
  103851. if thebits = 0 then
  103852. pTDefRegMap(@Self)^.clr := $00000100
  103853. else
  103854. pTDefRegMap(@Self)^.&set := $00000100;
  103855. end;
  103856. function TCAN2_C2FIFOINT6.getTXEMPTYIF : TBits_1; inline;
  103857. begin
  103858. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  103859. end;
  103860. procedure TCAN2_C2FIFOINT6.setTXHALFIF; inline;
  103861. begin
  103862. pTDefRegMap(@Self)^.&set := $00000200;
  103863. end;
  103864. procedure TCAN2_C2FIFOINT6.clearTXHALFIF; inline;
  103865. begin
  103866. pTDefRegMap(@Self)^.clr := $00000200;
  103867. end;
  103868. procedure TCAN2_C2FIFOINT6.setTXHALFIF(thebits : TBits_1); inline;
  103869. begin
  103870. if thebits = 0 then
  103871. pTDefRegMap(@Self)^.clr := $00000200
  103872. else
  103873. pTDefRegMap(@Self)^.&set := $00000200;
  103874. end;
  103875. function TCAN2_C2FIFOINT6.getTXHALFIF : TBits_1; inline;
  103876. begin
  103877. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  103878. end;
  103879. procedure TCAN2_C2FIFOINT6.setTXNFULLIF; inline;
  103880. begin
  103881. pTDefRegMap(@Self)^.&set := $00000400;
  103882. end;
  103883. procedure TCAN2_C2FIFOINT6.clearTXNFULLIF; inline;
  103884. begin
  103885. pTDefRegMap(@Self)^.clr := $00000400;
  103886. end;
  103887. procedure TCAN2_C2FIFOINT6.setTXNFULLIF(thebits : TBits_1); inline;
  103888. begin
  103889. if thebits = 0 then
  103890. pTDefRegMap(@Self)^.clr := $00000400
  103891. else
  103892. pTDefRegMap(@Self)^.&set := $00000400;
  103893. end;
  103894. function TCAN2_C2FIFOINT6.getTXNFULLIF : TBits_1; inline;
  103895. begin
  103896. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  103897. end;
  103898. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIE; inline;
  103899. begin
  103900. pTDefRegMap(@Self)^.&set := $00010000;
  103901. end;
  103902. procedure TCAN2_C2FIFOINT6.clearRXNEMPTYIE; inline;
  103903. begin
  103904. pTDefRegMap(@Self)^.clr := $00010000;
  103905. end;
  103906. procedure TCAN2_C2FIFOINT6.setRXNEMPTYIE(thebits : TBits_1); inline;
  103907. begin
  103908. if thebits = 0 then
  103909. pTDefRegMap(@Self)^.clr := $00010000
  103910. else
  103911. pTDefRegMap(@Self)^.&set := $00010000;
  103912. end;
  103913. function TCAN2_C2FIFOINT6.getRXNEMPTYIE : TBits_1; inline;
  103914. begin
  103915. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  103916. end;
  103917. procedure TCAN2_C2FIFOINT6.setRXHALFIE; inline;
  103918. begin
  103919. pTDefRegMap(@Self)^.&set := $00020000;
  103920. end;
  103921. procedure TCAN2_C2FIFOINT6.clearRXHALFIE; inline;
  103922. begin
  103923. pTDefRegMap(@Self)^.clr := $00020000;
  103924. end;
  103925. procedure TCAN2_C2FIFOINT6.setRXHALFIE(thebits : TBits_1); inline;
  103926. begin
  103927. if thebits = 0 then
  103928. pTDefRegMap(@Self)^.clr := $00020000
  103929. else
  103930. pTDefRegMap(@Self)^.&set := $00020000;
  103931. end;
  103932. function TCAN2_C2FIFOINT6.getRXHALFIE : TBits_1; inline;
  103933. begin
  103934. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  103935. end;
  103936. procedure TCAN2_C2FIFOINT6.setRXFULLIE; inline;
  103937. begin
  103938. pTDefRegMap(@Self)^.&set := $00040000;
  103939. end;
  103940. procedure TCAN2_C2FIFOINT6.clearRXFULLIE; inline;
  103941. begin
  103942. pTDefRegMap(@Self)^.clr := $00040000;
  103943. end;
  103944. procedure TCAN2_C2FIFOINT6.setRXFULLIE(thebits : TBits_1); inline;
  103945. begin
  103946. if thebits = 0 then
  103947. pTDefRegMap(@Self)^.clr := $00040000
  103948. else
  103949. pTDefRegMap(@Self)^.&set := $00040000;
  103950. end;
  103951. function TCAN2_C2FIFOINT6.getRXFULLIE : TBits_1; inline;
  103952. begin
  103953. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  103954. end;
  103955. procedure TCAN2_C2FIFOINT6.setRXOVFLIE; inline;
  103956. begin
  103957. pTDefRegMap(@Self)^.&set := $00080000;
  103958. end;
  103959. procedure TCAN2_C2FIFOINT6.clearRXOVFLIE; inline;
  103960. begin
  103961. pTDefRegMap(@Self)^.clr := $00080000;
  103962. end;
  103963. procedure TCAN2_C2FIFOINT6.setRXOVFLIE(thebits : TBits_1); inline;
  103964. begin
  103965. if thebits = 0 then
  103966. pTDefRegMap(@Self)^.clr := $00080000
  103967. else
  103968. pTDefRegMap(@Self)^.&set := $00080000;
  103969. end;
  103970. function TCAN2_C2FIFOINT6.getRXOVFLIE : TBits_1; inline;
  103971. begin
  103972. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  103973. end;
  103974. procedure TCAN2_C2FIFOINT6.setTXEMPTYIE; inline;
  103975. begin
  103976. pTDefRegMap(@Self)^.&set := $01000000;
  103977. end;
  103978. procedure TCAN2_C2FIFOINT6.clearTXEMPTYIE; inline;
  103979. begin
  103980. pTDefRegMap(@Self)^.clr := $01000000;
  103981. end;
  103982. procedure TCAN2_C2FIFOINT6.setTXEMPTYIE(thebits : TBits_1); inline;
  103983. begin
  103984. if thebits = 0 then
  103985. pTDefRegMap(@Self)^.clr := $01000000
  103986. else
  103987. pTDefRegMap(@Self)^.&set := $01000000;
  103988. end;
  103989. function TCAN2_C2FIFOINT6.getTXEMPTYIE : TBits_1; inline;
  103990. begin
  103991. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  103992. end;
  103993. procedure TCAN2_C2FIFOINT6.setTXHALFIE; inline;
  103994. begin
  103995. pTDefRegMap(@Self)^.&set := $02000000;
  103996. end;
  103997. procedure TCAN2_C2FIFOINT6.clearTXHALFIE; inline;
  103998. begin
  103999. pTDefRegMap(@Self)^.clr := $02000000;
  104000. end;
  104001. procedure TCAN2_C2FIFOINT6.setTXHALFIE(thebits : TBits_1); inline;
  104002. begin
  104003. if thebits = 0 then
  104004. pTDefRegMap(@Self)^.clr := $02000000
  104005. else
  104006. pTDefRegMap(@Self)^.&set := $02000000;
  104007. end;
  104008. function TCAN2_C2FIFOINT6.getTXHALFIE : TBits_1; inline;
  104009. begin
  104010. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  104011. end;
  104012. procedure TCAN2_C2FIFOINT6.setTXNFULLIE; inline;
  104013. begin
  104014. pTDefRegMap(@Self)^.&set := $04000000;
  104015. end;
  104016. procedure TCAN2_C2FIFOINT6.clearTXNFULLIE; inline;
  104017. begin
  104018. pTDefRegMap(@Self)^.clr := $04000000;
  104019. end;
  104020. procedure TCAN2_C2FIFOINT6.setTXNFULLIE(thebits : TBits_1); inline;
  104021. begin
  104022. if thebits = 0 then
  104023. pTDefRegMap(@Self)^.clr := $04000000
  104024. else
  104025. pTDefRegMap(@Self)^.&set := $04000000;
  104026. end;
  104027. function TCAN2_C2FIFOINT6.getTXNFULLIE : TBits_1; inline;
  104028. begin
  104029. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  104030. end;
  104031. procedure TCAN2_C2FIFOINT6.setw(thebits : TBits_32); inline;
  104032. begin
  104033. pTDefRegMap(@Self)^.val := thebits;
  104034. end;
  104035. function TCAN2_C2FIFOINT6.getw : TBits_32; inline;
  104036. begin
  104037. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104038. end;
  104039. procedure TCAN2_C2FIFOCI6.setCFIFOCI(thebits : TBits_5); inline;
  104040. begin
  104041. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  104042. end;
  104043. function TCAN2_C2FIFOCI6.getCFIFOCI : TBits_5; inline;
  104044. begin
  104045. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  104046. end;
  104047. procedure TCAN2_C2FIFOCI6.setw(thebits : TBits_32); inline;
  104048. begin
  104049. pTDefRegMap(@Self)^.val := thebits;
  104050. end;
  104051. function TCAN2_C2FIFOCI6.getw : TBits_32; inline;
  104052. begin
  104053. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104054. end;
  104055. procedure TCAN2_C2FIFOCON7.setTXPRI(thebits : TBits_2); inline;
  104056. begin
  104057. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  104058. end;
  104059. function TCAN2_C2FIFOCON7.getTXPRI : TBits_2; inline;
  104060. begin
  104061. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  104062. end;
  104063. procedure TCAN2_C2FIFOCON7.setRTREN; inline;
  104064. begin
  104065. pTDefRegMap(@Self)^.&set := $00000004;
  104066. end;
  104067. procedure TCAN2_C2FIFOCON7.clearRTREN; inline;
  104068. begin
  104069. pTDefRegMap(@Self)^.clr := $00000004;
  104070. end;
  104071. procedure TCAN2_C2FIFOCON7.setRTREN(thebits : TBits_1); inline;
  104072. begin
  104073. if thebits = 0 then
  104074. pTDefRegMap(@Self)^.clr := $00000004
  104075. else
  104076. pTDefRegMap(@Self)^.&set := $00000004;
  104077. end;
  104078. function TCAN2_C2FIFOCON7.getRTREN : TBits_1; inline;
  104079. begin
  104080. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  104081. end;
  104082. procedure TCAN2_C2FIFOCON7.setTXREQ; inline;
  104083. begin
  104084. pTDefRegMap(@Self)^.&set := $00000008;
  104085. end;
  104086. procedure TCAN2_C2FIFOCON7.clearTXREQ; inline;
  104087. begin
  104088. pTDefRegMap(@Self)^.clr := $00000008;
  104089. end;
  104090. procedure TCAN2_C2FIFOCON7.setTXREQ(thebits : TBits_1); inline;
  104091. begin
  104092. if thebits = 0 then
  104093. pTDefRegMap(@Self)^.clr := $00000008
  104094. else
  104095. pTDefRegMap(@Self)^.&set := $00000008;
  104096. end;
  104097. function TCAN2_C2FIFOCON7.getTXREQ : TBits_1; inline;
  104098. begin
  104099. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  104100. end;
  104101. procedure TCAN2_C2FIFOCON7.setTXERR; inline;
  104102. begin
  104103. pTDefRegMap(@Self)^.&set := $00000010;
  104104. end;
  104105. procedure TCAN2_C2FIFOCON7.clearTXERR; inline;
  104106. begin
  104107. pTDefRegMap(@Self)^.clr := $00000010;
  104108. end;
  104109. procedure TCAN2_C2FIFOCON7.setTXERR(thebits : TBits_1); inline;
  104110. begin
  104111. if thebits = 0 then
  104112. pTDefRegMap(@Self)^.clr := $00000010
  104113. else
  104114. pTDefRegMap(@Self)^.&set := $00000010;
  104115. end;
  104116. function TCAN2_C2FIFOCON7.getTXERR : TBits_1; inline;
  104117. begin
  104118. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  104119. end;
  104120. procedure TCAN2_C2FIFOCON7.setTXLARB; inline;
  104121. begin
  104122. pTDefRegMap(@Self)^.&set := $00000020;
  104123. end;
  104124. procedure TCAN2_C2FIFOCON7.clearTXLARB; inline;
  104125. begin
  104126. pTDefRegMap(@Self)^.clr := $00000020;
  104127. end;
  104128. procedure TCAN2_C2FIFOCON7.setTXLARB(thebits : TBits_1); inline;
  104129. begin
  104130. if thebits = 0 then
  104131. pTDefRegMap(@Self)^.clr := $00000020
  104132. else
  104133. pTDefRegMap(@Self)^.&set := $00000020;
  104134. end;
  104135. function TCAN2_C2FIFOCON7.getTXLARB : TBits_1; inline;
  104136. begin
  104137. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  104138. end;
  104139. procedure TCAN2_C2FIFOCON7.setTXABAT; inline;
  104140. begin
  104141. pTDefRegMap(@Self)^.&set := $00000040;
  104142. end;
  104143. procedure TCAN2_C2FIFOCON7.clearTXABAT; inline;
  104144. begin
  104145. pTDefRegMap(@Self)^.clr := $00000040;
  104146. end;
  104147. procedure TCAN2_C2FIFOCON7.setTXABAT(thebits : TBits_1); inline;
  104148. begin
  104149. if thebits = 0 then
  104150. pTDefRegMap(@Self)^.clr := $00000040
  104151. else
  104152. pTDefRegMap(@Self)^.&set := $00000040;
  104153. end;
  104154. function TCAN2_C2FIFOCON7.getTXABAT : TBits_1; inline;
  104155. begin
  104156. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  104157. end;
  104158. procedure TCAN2_C2FIFOCON7.setTXEN; inline;
  104159. begin
  104160. pTDefRegMap(@Self)^.&set := $00000080;
  104161. end;
  104162. procedure TCAN2_C2FIFOCON7.clearTXEN; inline;
  104163. begin
  104164. pTDefRegMap(@Self)^.clr := $00000080;
  104165. end;
  104166. procedure TCAN2_C2FIFOCON7.setTXEN(thebits : TBits_1); inline;
  104167. begin
  104168. if thebits = 0 then
  104169. pTDefRegMap(@Self)^.clr := $00000080
  104170. else
  104171. pTDefRegMap(@Self)^.&set := $00000080;
  104172. end;
  104173. function TCAN2_C2FIFOCON7.getTXEN : TBits_1; inline;
  104174. begin
  104175. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  104176. end;
  104177. procedure TCAN2_C2FIFOCON7.setDONLY; inline;
  104178. begin
  104179. pTDefRegMap(@Self)^.&set := $00001000;
  104180. end;
  104181. procedure TCAN2_C2FIFOCON7.clearDONLY; inline;
  104182. begin
  104183. pTDefRegMap(@Self)^.clr := $00001000;
  104184. end;
  104185. procedure TCAN2_C2FIFOCON7.setDONLY(thebits : TBits_1); inline;
  104186. begin
  104187. if thebits = 0 then
  104188. pTDefRegMap(@Self)^.clr := $00001000
  104189. else
  104190. pTDefRegMap(@Self)^.&set := $00001000;
  104191. end;
  104192. function TCAN2_C2FIFOCON7.getDONLY : TBits_1; inline;
  104193. begin
  104194. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  104195. end;
  104196. procedure TCAN2_C2FIFOCON7.setUINC; inline;
  104197. begin
  104198. pTDefRegMap(@Self)^.&set := $00002000;
  104199. end;
  104200. procedure TCAN2_C2FIFOCON7.clearUINC; inline;
  104201. begin
  104202. pTDefRegMap(@Self)^.clr := $00002000;
  104203. end;
  104204. procedure TCAN2_C2FIFOCON7.setUINC(thebits : TBits_1); inline;
  104205. begin
  104206. if thebits = 0 then
  104207. pTDefRegMap(@Self)^.clr := $00002000
  104208. else
  104209. pTDefRegMap(@Self)^.&set := $00002000;
  104210. end;
  104211. function TCAN2_C2FIFOCON7.getUINC : TBits_1; inline;
  104212. begin
  104213. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  104214. end;
  104215. procedure TCAN2_C2FIFOCON7.setFRESET; inline;
  104216. begin
  104217. pTDefRegMap(@Self)^.&set := $00004000;
  104218. end;
  104219. procedure TCAN2_C2FIFOCON7.clearFRESET; inline;
  104220. begin
  104221. pTDefRegMap(@Self)^.clr := $00004000;
  104222. end;
  104223. procedure TCAN2_C2FIFOCON7.setFRESET(thebits : TBits_1); inline;
  104224. begin
  104225. if thebits = 0 then
  104226. pTDefRegMap(@Self)^.clr := $00004000
  104227. else
  104228. pTDefRegMap(@Self)^.&set := $00004000;
  104229. end;
  104230. function TCAN2_C2FIFOCON7.getFRESET : TBits_1; inline;
  104231. begin
  104232. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  104233. end;
  104234. procedure TCAN2_C2FIFOCON7.setFSIZE(thebits : TBits_5); inline;
  104235. begin
  104236. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  104237. end;
  104238. function TCAN2_C2FIFOCON7.getFSIZE : TBits_5; inline;
  104239. begin
  104240. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  104241. end;
  104242. procedure TCAN2_C2FIFOCON7.setw(thebits : TBits_32); inline;
  104243. begin
  104244. pTDefRegMap(@Self)^.val := thebits;
  104245. end;
  104246. function TCAN2_C2FIFOCON7.getw : TBits_32; inline;
  104247. begin
  104248. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104249. end;
  104250. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIF; inline;
  104251. begin
  104252. pTDefRegMap(@Self)^.&set := $00000001;
  104253. end;
  104254. procedure TCAN2_C2FIFOINT7.clearRXNEMPTYIF; inline;
  104255. begin
  104256. pTDefRegMap(@Self)^.clr := $00000001;
  104257. end;
  104258. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIF(thebits : TBits_1); inline;
  104259. begin
  104260. if thebits = 0 then
  104261. pTDefRegMap(@Self)^.clr := $00000001
  104262. else
  104263. pTDefRegMap(@Self)^.&set := $00000001;
  104264. end;
  104265. function TCAN2_C2FIFOINT7.getRXNEMPTYIF : TBits_1; inline;
  104266. begin
  104267. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  104268. end;
  104269. procedure TCAN2_C2FIFOINT7.setRXHALFIF; inline;
  104270. begin
  104271. pTDefRegMap(@Self)^.&set := $00000002;
  104272. end;
  104273. procedure TCAN2_C2FIFOINT7.clearRXHALFIF; inline;
  104274. begin
  104275. pTDefRegMap(@Self)^.clr := $00000002;
  104276. end;
  104277. procedure TCAN2_C2FIFOINT7.setRXHALFIF(thebits : TBits_1); inline;
  104278. begin
  104279. if thebits = 0 then
  104280. pTDefRegMap(@Self)^.clr := $00000002
  104281. else
  104282. pTDefRegMap(@Self)^.&set := $00000002;
  104283. end;
  104284. function TCAN2_C2FIFOINT7.getRXHALFIF : TBits_1; inline;
  104285. begin
  104286. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  104287. end;
  104288. procedure TCAN2_C2FIFOINT7.setRXFULLIF; inline;
  104289. begin
  104290. pTDefRegMap(@Self)^.&set := $00000004;
  104291. end;
  104292. procedure TCAN2_C2FIFOINT7.clearRXFULLIF; inline;
  104293. begin
  104294. pTDefRegMap(@Self)^.clr := $00000004;
  104295. end;
  104296. procedure TCAN2_C2FIFOINT7.setRXFULLIF(thebits : TBits_1); inline;
  104297. begin
  104298. if thebits = 0 then
  104299. pTDefRegMap(@Self)^.clr := $00000004
  104300. else
  104301. pTDefRegMap(@Self)^.&set := $00000004;
  104302. end;
  104303. function TCAN2_C2FIFOINT7.getRXFULLIF : TBits_1; inline;
  104304. begin
  104305. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  104306. end;
  104307. procedure TCAN2_C2FIFOINT7.setRXOVFLIF; inline;
  104308. begin
  104309. pTDefRegMap(@Self)^.&set := $00000008;
  104310. end;
  104311. procedure TCAN2_C2FIFOINT7.clearRXOVFLIF; inline;
  104312. begin
  104313. pTDefRegMap(@Self)^.clr := $00000008;
  104314. end;
  104315. procedure TCAN2_C2FIFOINT7.setRXOVFLIF(thebits : TBits_1); inline;
  104316. begin
  104317. if thebits = 0 then
  104318. pTDefRegMap(@Self)^.clr := $00000008
  104319. else
  104320. pTDefRegMap(@Self)^.&set := $00000008;
  104321. end;
  104322. function TCAN2_C2FIFOINT7.getRXOVFLIF : TBits_1; inline;
  104323. begin
  104324. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  104325. end;
  104326. procedure TCAN2_C2FIFOINT7.setTXEMPTYIF; inline;
  104327. begin
  104328. pTDefRegMap(@Self)^.&set := $00000100;
  104329. end;
  104330. procedure TCAN2_C2FIFOINT7.clearTXEMPTYIF; inline;
  104331. begin
  104332. pTDefRegMap(@Self)^.clr := $00000100;
  104333. end;
  104334. procedure TCAN2_C2FIFOINT7.setTXEMPTYIF(thebits : TBits_1); inline;
  104335. begin
  104336. if thebits = 0 then
  104337. pTDefRegMap(@Self)^.clr := $00000100
  104338. else
  104339. pTDefRegMap(@Self)^.&set := $00000100;
  104340. end;
  104341. function TCAN2_C2FIFOINT7.getTXEMPTYIF : TBits_1; inline;
  104342. begin
  104343. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  104344. end;
  104345. procedure TCAN2_C2FIFOINT7.setTXHALFIF; inline;
  104346. begin
  104347. pTDefRegMap(@Self)^.&set := $00000200;
  104348. end;
  104349. procedure TCAN2_C2FIFOINT7.clearTXHALFIF; inline;
  104350. begin
  104351. pTDefRegMap(@Self)^.clr := $00000200;
  104352. end;
  104353. procedure TCAN2_C2FIFOINT7.setTXHALFIF(thebits : TBits_1); inline;
  104354. begin
  104355. if thebits = 0 then
  104356. pTDefRegMap(@Self)^.clr := $00000200
  104357. else
  104358. pTDefRegMap(@Self)^.&set := $00000200;
  104359. end;
  104360. function TCAN2_C2FIFOINT7.getTXHALFIF : TBits_1; inline;
  104361. begin
  104362. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  104363. end;
  104364. procedure TCAN2_C2FIFOINT7.setTXNFULLIF; inline;
  104365. begin
  104366. pTDefRegMap(@Self)^.&set := $00000400;
  104367. end;
  104368. procedure TCAN2_C2FIFOINT7.clearTXNFULLIF; inline;
  104369. begin
  104370. pTDefRegMap(@Self)^.clr := $00000400;
  104371. end;
  104372. procedure TCAN2_C2FIFOINT7.setTXNFULLIF(thebits : TBits_1); inline;
  104373. begin
  104374. if thebits = 0 then
  104375. pTDefRegMap(@Self)^.clr := $00000400
  104376. else
  104377. pTDefRegMap(@Self)^.&set := $00000400;
  104378. end;
  104379. function TCAN2_C2FIFOINT7.getTXNFULLIF : TBits_1; inline;
  104380. begin
  104381. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  104382. end;
  104383. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIE; inline;
  104384. begin
  104385. pTDefRegMap(@Self)^.&set := $00010000;
  104386. end;
  104387. procedure TCAN2_C2FIFOINT7.clearRXNEMPTYIE; inline;
  104388. begin
  104389. pTDefRegMap(@Self)^.clr := $00010000;
  104390. end;
  104391. procedure TCAN2_C2FIFOINT7.setRXNEMPTYIE(thebits : TBits_1); inline;
  104392. begin
  104393. if thebits = 0 then
  104394. pTDefRegMap(@Self)^.clr := $00010000
  104395. else
  104396. pTDefRegMap(@Self)^.&set := $00010000;
  104397. end;
  104398. function TCAN2_C2FIFOINT7.getRXNEMPTYIE : TBits_1; inline;
  104399. begin
  104400. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  104401. end;
  104402. procedure TCAN2_C2FIFOINT7.setRXHALFIE; inline;
  104403. begin
  104404. pTDefRegMap(@Self)^.&set := $00020000;
  104405. end;
  104406. procedure TCAN2_C2FIFOINT7.clearRXHALFIE; inline;
  104407. begin
  104408. pTDefRegMap(@Self)^.clr := $00020000;
  104409. end;
  104410. procedure TCAN2_C2FIFOINT7.setRXHALFIE(thebits : TBits_1); inline;
  104411. begin
  104412. if thebits = 0 then
  104413. pTDefRegMap(@Self)^.clr := $00020000
  104414. else
  104415. pTDefRegMap(@Self)^.&set := $00020000;
  104416. end;
  104417. function TCAN2_C2FIFOINT7.getRXHALFIE : TBits_1; inline;
  104418. begin
  104419. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  104420. end;
  104421. procedure TCAN2_C2FIFOINT7.setRXFULLIE; inline;
  104422. begin
  104423. pTDefRegMap(@Self)^.&set := $00040000;
  104424. end;
  104425. procedure TCAN2_C2FIFOINT7.clearRXFULLIE; inline;
  104426. begin
  104427. pTDefRegMap(@Self)^.clr := $00040000;
  104428. end;
  104429. procedure TCAN2_C2FIFOINT7.setRXFULLIE(thebits : TBits_1); inline;
  104430. begin
  104431. if thebits = 0 then
  104432. pTDefRegMap(@Self)^.clr := $00040000
  104433. else
  104434. pTDefRegMap(@Self)^.&set := $00040000;
  104435. end;
  104436. function TCAN2_C2FIFOINT7.getRXFULLIE : TBits_1; inline;
  104437. begin
  104438. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  104439. end;
  104440. procedure TCAN2_C2FIFOINT7.setRXOVFLIE; inline;
  104441. begin
  104442. pTDefRegMap(@Self)^.&set := $00080000;
  104443. end;
  104444. procedure TCAN2_C2FIFOINT7.clearRXOVFLIE; inline;
  104445. begin
  104446. pTDefRegMap(@Self)^.clr := $00080000;
  104447. end;
  104448. procedure TCAN2_C2FIFOINT7.setRXOVFLIE(thebits : TBits_1); inline;
  104449. begin
  104450. if thebits = 0 then
  104451. pTDefRegMap(@Self)^.clr := $00080000
  104452. else
  104453. pTDefRegMap(@Self)^.&set := $00080000;
  104454. end;
  104455. function TCAN2_C2FIFOINT7.getRXOVFLIE : TBits_1; inline;
  104456. begin
  104457. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104458. end;
  104459. procedure TCAN2_C2FIFOINT7.setTXEMPTYIE; inline;
  104460. begin
  104461. pTDefRegMap(@Self)^.&set := $01000000;
  104462. end;
  104463. procedure TCAN2_C2FIFOINT7.clearTXEMPTYIE; inline;
  104464. begin
  104465. pTDefRegMap(@Self)^.clr := $01000000;
  104466. end;
  104467. procedure TCAN2_C2FIFOINT7.setTXEMPTYIE(thebits : TBits_1); inline;
  104468. begin
  104469. if thebits = 0 then
  104470. pTDefRegMap(@Self)^.clr := $01000000
  104471. else
  104472. pTDefRegMap(@Self)^.&set := $01000000;
  104473. end;
  104474. function TCAN2_C2FIFOINT7.getTXEMPTYIE : TBits_1; inline;
  104475. begin
  104476. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  104477. end;
  104478. procedure TCAN2_C2FIFOINT7.setTXHALFIE; inline;
  104479. begin
  104480. pTDefRegMap(@Self)^.&set := $02000000;
  104481. end;
  104482. procedure TCAN2_C2FIFOINT7.clearTXHALFIE; inline;
  104483. begin
  104484. pTDefRegMap(@Self)^.clr := $02000000;
  104485. end;
  104486. procedure TCAN2_C2FIFOINT7.setTXHALFIE(thebits : TBits_1); inline;
  104487. begin
  104488. if thebits = 0 then
  104489. pTDefRegMap(@Self)^.clr := $02000000
  104490. else
  104491. pTDefRegMap(@Self)^.&set := $02000000;
  104492. end;
  104493. function TCAN2_C2FIFOINT7.getTXHALFIE : TBits_1; inline;
  104494. begin
  104495. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  104496. end;
  104497. procedure TCAN2_C2FIFOINT7.setTXNFULLIE; inline;
  104498. begin
  104499. pTDefRegMap(@Self)^.&set := $04000000;
  104500. end;
  104501. procedure TCAN2_C2FIFOINT7.clearTXNFULLIE; inline;
  104502. begin
  104503. pTDefRegMap(@Self)^.clr := $04000000;
  104504. end;
  104505. procedure TCAN2_C2FIFOINT7.setTXNFULLIE(thebits : TBits_1); inline;
  104506. begin
  104507. if thebits = 0 then
  104508. pTDefRegMap(@Self)^.clr := $04000000
  104509. else
  104510. pTDefRegMap(@Self)^.&set := $04000000;
  104511. end;
  104512. function TCAN2_C2FIFOINT7.getTXNFULLIE : TBits_1; inline;
  104513. begin
  104514. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  104515. end;
  104516. procedure TCAN2_C2FIFOINT7.setw(thebits : TBits_32); inline;
  104517. begin
  104518. pTDefRegMap(@Self)^.val := thebits;
  104519. end;
  104520. function TCAN2_C2FIFOINT7.getw : TBits_32; inline;
  104521. begin
  104522. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104523. end;
  104524. procedure TCAN2_C2FIFOCI7.setCFIFOCI(thebits : TBits_5); inline;
  104525. begin
  104526. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  104527. end;
  104528. function TCAN2_C2FIFOCI7.getCFIFOCI : TBits_5; inline;
  104529. begin
  104530. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  104531. end;
  104532. procedure TCAN2_C2FIFOCI7.setw(thebits : TBits_32); inline;
  104533. begin
  104534. pTDefRegMap(@Self)^.val := thebits;
  104535. end;
  104536. function TCAN2_C2FIFOCI7.getw : TBits_32; inline;
  104537. begin
  104538. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104539. end;
  104540. procedure TCAN2_C2FIFOCON8.setTXPRI(thebits : TBits_2); inline;
  104541. begin
  104542. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  104543. end;
  104544. function TCAN2_C2FIFOCON8.getTXPRI : TBits_2; inline;
  104545. begin
  104546. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  104547. end;
  104548. procedure TCAN2_C2FIFOCON8.setRTREN; inline;
  104549. begin
  104550. pTDefRegMap(@Self)^.&set := $00000004;
  104551. end;
  104552. procedure TCAN2_C2FIFOCON8.clearRTREN; inline;
  104553. begin
  104554. pTDefRegMap(@Self)^.clr := $00000004;
  104555. end;
  104556. procedure TCAN2_C2FIFOCON8.setRTREN(thebits : TBits_1); inline;
  104557. begin
  104558. if thebits = 0 then
  104559. pTDefRegMap(@Self)^.clr := $00000004
  104560. else
  104561. pTDefRegMap(@Self)^.&set := $00000004;
  104562. end;
  104563. function TCAN2_C2FIFOCON8.getRTREN : TBits_1; inline;
  104564. begin
  104565. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  104566. end;
  104567. procedure TCAN2_C2FIFOCON8.setTXREQ; inline;
  104568. begin
  104569. pTDefRegMap(@Self)^.&set := $00000008;
  104570. end;
  104571. procedure TCAN2_C2FIFOCON8.clearTXREQ; inline;
  104572. begin
  104573. pTDefRegMap(@Self)^.clr := $00000008;
  104574. end;
  104575. procedure TCAN2_C2FIFOCON8.setTXREQ(thebits : TBits_1); inline;
  104576. begin
  104577. if thebits = 0 then
  104578. pTDefRegMap(@Self)^.clr := $00000008
  104579. else
  104580. pTDefRegMap(@Self)^.&set := $00000008;
  104581. end;
  104582. function TCAN2_C2FIFOCON8.getTXREQ : TBits_1; inline;
  104583. begin
  104584. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  104585. end;
  104586. procedure TCAN2_C2FIFOCON8.setTXERR; inline;
  104587. begin
  104588. pTDefRegMap(@Self)^.&set := $00000010;
  104589. end;
  104590. procedure TCAN2_C2FIFOCON8.clearTXERR; inline;
  104591. begin
  104592. pTDefRegMap(@Self)^.clr := $00000010;
  104593. end;
  104594. procedure TCAN2_C2FIFOCON8.setTXERR(thebits : TBits_1); inline;
  104595. begin
  104596. if thebits = 0 then
  104597. pTDefRegMap(@Self)^.clr := $00000010
  104598. else
  104599. pTDefRegMap(@Self)^.&set := $00000010;
  104600. end;
  104601. function TCAN2_C2FIFOCON8.getTXERR : TBits_1; inline;
  104602. begin
  104603. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  104604. end;
  104605. procedure TCAN2_C2FIFOCON8.setTXLARB; inline;
  104606. begin
  104607. pTDefRegMap(@Self)^.&set := $00000020;
  104608. end;
  104609. procedure TCAN2_C2FIFOCON8.clearTXLARB; inline;
  104610. begin
  104611. pTDefRegMap(@Self)^.clr := $00000020;
  104612. end;
  104613. procedure TCAN2_C2FIFOCON8.setTXLARB(thebits : TBits_1); inline;
  104614. begin
  104615. if thebits = 0 then
  104616. pTDefRegMap(@Self)^.clr := $00000020
  104617. else
  104618. pTDefRegMap(@Self)^.&set := $00000020;
  104619. end;
  104620. function TCAN2_C2FIFOCON8.getTXLARB : TBits_1; inline;
  104621. begin
  104622. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  104623. end;
  104624. procedure TCAN2_C2FIFOCON8.setTXABAT; inline;
  104625. begin
  104626. pTDefRegMap(@Self)^.&set := $00000040;
  104627. end;
  104628. procedure TCAN2_C2FIFOCON8.clearTXABAT; inline;
  104629. begin
  104630. pTDefRegMap(@Self)^.clr := $00000040;
  104631. end;
  104632. procedure TCAN2_C2FIFOCON8.setTXABAT(thebits : TBits_1); inline;
  104633. begin
  104634. if thebits = 0 then
  104635. pTDefRegMap(@Self)^.clr := $00000040
  104636. else
  104637. pTDefRegMap(@Self)^.&set := $00000040;
  104638. end;
  104639. function TCAN2_C2FIFOCON8.getTXABAT : TBits_1; inline;
  104640. begin
  104641. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  104642. end;
  104643. procedure TCAN2_C2FIFOCON8.setTXEN; inline;
  104644. begin
  104645. pTDefRegMap(@Self)^.&set := $00000080;
  104646. end;
  104647. procedure TCAN2_C2FIFOCON8.clearTXEN; inline;
  104648. begin
  104649. pTDefRegMap(@Self)^.clr := $00000080;
  104650. end;
  104651. procedure TCAN2_C2FIFOCON8.setTXEN(thebits : TBits_1); inline;
  104652. begin
  104653. if thebits = 0 then
  104654. pTDefRegMap(@Self)^.clr := $00000080
  104655. else
  104656. pTDefRegMap(@Self)^.&set := $00000080;
  104657. end;
  104658. function TCAN2_C2FIFOCON8.getTXEN : TBits_1; inline;
  104659. begin
  104660. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  104661. end;
  104662. procedure TCAN2_C2FIFOCON8.setDONLY; inline;
  104663. begin
  104664. pTDefRegMap(@Self)^.&set := $00001000;
  104665. end;
  104666. procedure TCAN2_C2FIFOCON8.clearDONLY; inline;
  104667. begin
  104668. pTDefRegMap(@Self)^.clr := $00001000;
  104669. end;
  104670. procedure TCAN2_C2FIFOCON8.setDONLY(thebits : TBits_1); inline;
  104671. begin
  104672. if thebits = 0 then
  104673. pTDefRegMap(@Self)^.clr := $00001000
  104674. else
  104675. pTDefRegMap(@Self)^.&set := $00001000;
  104676. end;
  104677. function TCAN2_C2FIFOCON8.getDONLY : TBits_1; inline;
  104678. begin
  104679. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  104680. end;
  104681. procedure TCAN2_C2FIFOCON8.setUINC; inline;
  104682. begin
  104683. pTDefRegMap(@Self)^.&set := $00002000;
  104684. end;
  104685. procedure TCAN2_C2FIFOCON8.clearUINC; inline;
  104686. begin
  104687. pTDefRegMap(@Self)^.clr := $00002000;
  104688. end;
  104689. procedure TCAN2_C2FIFOCON8.setUINC(thebits : TBits_1); inline;
  104690. begin
  104691. if thebits = 0 then
  104692. pTDefRegMap(@Self)^.clr := $00002000
  104693. else
  104694. pTDefRegMap(@Self)^.&set := $00002000;
  104695. end;
  104696. function TCAN2_C2FIFOCON8.getUINC : TBits_1; inline;
  104697. begin
  104698. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  104699. end;
  104700. procedure TCAN2_C2FIFOCON8.setFRESET; inline;
  104701. begin
  104702. pTDefRegMap(@Self)^.&set := $00004000;
  104703. end;
  104704. procedure TCAN2_C2FIFOCON8.clearFRESET; inline;
  104705. begin
  104706. pTDefRegMap(@Self)^.clr := $00004000;
  104707. end;
  104708. procedure TCAN2_C2FIFOCON8.setFRESET(thebits : TBits_1); inline;
  104709. begin
  104710. if thebits = 0 then
  104711. pTDefRegMap(@Self)^.clr := $00004000
  104712. else
  104713. pTDefRegMap(@Self)^.&set := $00004000;
  104714. end;
  104715. function TCAN2_C2FIFOCON8.getFRESET : TBits_1; inline;
  104716. begin
  104717. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  104718. end;
  104719. procedure TCAN2_C2FIFOCON8.setFSIZE(thebits : TBits_5); inline;
  104720. begin
  104721. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  104722. end;
  104723. function TCAN2_C2FIFOCON8.getFSIZE : TBits_5; inline;
  104724. begin
  104725. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  104726. end;
  104727. procedure TCAN2_C2FIFOCON8.setw(thebits : TBits_32); inline;
  104728. begin
  104729. pTDefRegMap(@Self)^.val := thebits;
  104730. end;
  104731. function TCAN2_C2FIFOCON8.getw : TBits_32; inline;
  104732. begin
  104733. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  104734. end;
  104735. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIF; inline;
  104736. begin
  104737. pTDefRegMap(@Self)^.&set := $00000001;
  104738. end;
  104739. procedure TCAN2_C2FIFOINT8.clearRXNEMPTYIF; inline;
  104740. begin
  104741. pTDefRegMap(@Self)^.clr := $00000001;
  104742. end;
  104743. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIF(thebits : TBits_1); inline;
  104744. begin
  104745. if thebits = 0 then
  104746. pTDefRegMap(@Self)^.clr := $00000001
  104747. else
  104748. pTDefRegMap(@Self)^.&set := $00000001;
  104749. end;
  104750. function TCAN2_C2FIFOINT8.getRXNEMPTYIF : TBits_1; inline;
  104751. begin
  104752. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  104753. end;
  104754. procedure TCAN2_C2FIFOINT8.setRXHALFIF; inline;
  104755. begin
  104756. pTDefRegMap(@Self)^.&set := $00000002;
  104757. end;
  104758. procedure TCAN2_C2FIFOINT8.clearRXHALFIF; inline;
  104759. begin
  104760. pTDefRegMap(@Self)^.clr := $00000002;
  104761. end;
  104762. procedure TCAN2_C2FIFOINT8.setRXHALFIF(thebits : TBits_1); inline;
  104763. begin
  104764. if thebits = 0 then
  104765. pTDefRegMap(@Self)^.clr := $00000002
  104766. else
  104767. pTDefRegMap(@Self)^.&set := $00000002;
  104768. end;
  104769. function TCAN2_C2FIFOINT8.getRXHALFIF : TBits_1; inline;
  104770. begin
  104771. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  104772. end;
  104773. procedure TCAN2_C2FIFOINT8.setRXFULLIF; inline;
  104774. begin
  104775. pTDefRegMap(@Self)^.&set := $00000004;
  104776. end;
  104777. procedure TCAN2_C2FIFOINT8.clearRXFULLIF; inline;
  104778. begin
  104779. pTDefRegMap(@Self)^.clr := $00000004;
  104780. end;
  104781. procedure TCAN2_C2FIFOINT8.setRXFULLIF(thebits : TBits_1); inline;
  104782. begin
  104783. if thebits = 0 then
  104784. pTDefRegMap(@Self)^.clr := $00000004
  104785. else
  104786. pTDefRegMap(@Self)^.&set := $00000004;
  104787. end;
  104788. function TCAN2_C2FIFOINT8.getRXFULLIF : TBits_1; inline;
  104789. begin
  104790. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  104791. end;
  104792. procedure TCAN2_C2FIFOINT8.setRXOVFLIF; inline;
  104793. begin
  104794. pTDefRegMap(@Self)^.&set := $00000008;
  104795. end;
  104796. procedure TCAN2_C2FIFOINT8.clearRXOVFLIF; inline;
  104797. begin
  104798. pTDefRegMap(@Self)^.clr := $00000008;
  104799. end;
  104800. procedure TCAN2_C2FIFOINT8.setRXOVFLIF(thebits : TBits_1); inline;
  104801. begin
  104802. if thebits = 0 then
  104803. pTDefRegMap(@Self)^.clr := $00000008
  104804. else
  104805. pTDefRegMap(@Self)^.&set := $00000008;
  104806. end;
  104807. function TCAN2_C2FIFOINT8.getRXOVFLIF : TBits_1; inline;
  104808. begin
  104809. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  104810. end;
  104811. procedure TCAN2_C2FIFOINT8.setTXEMPTYIF; inline;
  104812. begin
  104813. pTDefRegMap(@Self)^.&set := $00000100;
  104814. end;
  104815. procedure TCAN2_C2FIFOINT8.clearTXEMPTYIF; inline;
  104816. begin
  104817. pTDefRegMap(@Self)^.clr := $00000100;
  104818. end;
  104819. procedure TCAN2_C2FIFOINT8.setTXEMPTYIF(thebits : TBits_1); inline;
  104820. begin
  104821. if thebits = 0 then
  104822. pTDefRegMap(@Self)^.clr := $00000100
  104823. else
  104824. pTDefRegMap(@Self)^.&set := $00000100;
  104825. end;
  104826. function TCAN2_C2FIFOINT8.getTXEMPTYIF : TBits_1; inline;
  104827. begin
  104828. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  104829. end;
  104830. procedure TCAN2_C2FIFOINT8.setTXHALFIF; inline;
  104831. begin
  104832. pTDefRegMap(@Self)^.&set := $00000200;
  104833. end;
  104834. procedure TCAN2_C2FIFOINT8.clearTXHALFIF; inline;
  104835. begin
  104836. pTDefRegMap(@Self)^.clr := $00000200;
  104837. end;
  104838. procedure TCAN2_C2FIFOINT8.setTXHALFIF(thebits : TBits_1); inline;
  104839. begin
  104840. if thebits = 0 then
  104841. pTDefRegMap(@Self)^.clr := $00000200
  104842. else
  104843. pTDefRegMap(@Self)^.&set := $00000200;
  104844. end;
  104845. function TCAN2_C2FIFOINT8.getTXHALFIF : TBits_1; inline;
  104846. begin
  104847. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  104848. end;
  104849. procedure TCAN2_C2FIFOINT8.setTXNFULLIF; inline;
  104850. begin
  104851. pTDefRegMap(@Self)^.&set := $00000400;
  104852. end;
  104853. procedure TCAN2_C2FIFOINT8.clearTXNFULLIF; inline;
  104854. begin
  104855. pTDefRegMap(@Self)^.clr := $00000400;
  104856. end;
  104857. procedure TCAN2_C2FIFOINT8.setTXNFULLIF(thebits : TBits_1); inline;
  104858. begin
  104859. if thebits = 0 then
  104860. pTDefRegMap(@Self)^.clr := $00000400
  104861. else
  104862. pTDefRegMap(@Self)^.&set := $00000400;
  104863. end;
  104864. function TCAN2_C2FIFOINT8.getTXNFULLIF : TBits_1; inline;
  104865. begin
  104866. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  104867. end;
  104868. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIE; inline;
  104869. begin
  104870. pTDefRegMap(@Self)^.&set := $00010000;
  104871. end;
  104872. procedure TCAN2_C2FIFOINT8.clearRXNEMPTYIE; inline;
  104873. begin
  104874. pTDefRegMap(@Self)^.clr := $00010000;
  104875. end;
  104876. procedure TCAN2_C2FIFOINT8.setRXNEMPTYIE(thebits : TBits_1); inline;
  104877. begin
  104878. if thebits = 0 then
  104879. pTDefRegMap(@Self)^.clr := $00010000
  104880. else
  104881. pTDefRegMap(@Self)^.&set := $00010000;
  104882. end;
  104883. function TCAN2_C2FIFOINT8.getRXNEMPTYIE : TBits_1; inline;
  104884. begin
  104885. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  104886. end;
  104887. procedure TCAN2_C2FIFOINT8.setRXHALFIE; inline;
  104888. begin
  104889. pTDefRegMap(@Self)^.&set := $00020000;
  104890. end;
  104891. procedure TCAN2_C2FIFOINT8.clearRXHALFIE; inline;
  104892. begin
  104893. pTDefRegMap(@Self)^.clr := $00020000;
  104894. end;
  104895. procedure TCAN2_C2FIFOINT8.setRXHALFIE(thebits : TBits_1); inline;
  104896. begin
  104897. if thebits = 0 then
  104898. pTDefRegMap(@Self)^.clr := $00020000
  104899. else
  104900. pTDefRegMap(@Self)^.&set := $00020000;
  104901. end;
  104902. function TCAN2_C2FIFOINT8.getRXHALFIE : TBits_1; inline;
  104903. begin
  104904. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  104905. end;
  104906. procedure TCAN2_C2FIFOINT8.setRXFULLIE; inline;
  104907. begin
  104908. pTDefRegMap(@Self)^.&set := $00040000;
  104909. end;
  104910. procedure TCAN2_C2FIFOINT8.clearRXFULLIE; inline;
  104911. begin
  104912. pTDefRegMap(@Self)^.clr := $00040000;
  104913. end;
  104914. procedure TCAN2_C2FIFOINT8.setRXFULLIE(thebits : TBits_1); inline;
  104915. begin
  104916. if thebits = 0 then
  104917. pTDefRegMap(@Self)^.clr := $00040000
  104918. else
  104919. pTDefRegMap(@Self)^.&set := $00040000;
  104920. end;
  104921. function TCAN2_C2FIFOINT8.getRXFULLIE : TBits_1; inline;
  104922. begin
  104923. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  104924. end;
  104925. procedure TCAN2_C2FIFOINT8.setRXOVFLIE; inline;
  104926. begin
  104927. pTDefRegMap(@Self)^.&set := $00080000;
  104928. end;
  104929. procedure TCAN2_C2FIFOINT8.clearRXOVFLIE; inline;
  104930. begin
  104931. pTDefRegMap(@Self)^.clr := $00080000;
  104932. end;
  104933. procedure TCAN2_C2FIFOINT8.setRXOVFLIE(thebits : TBits_1); inline;
  104934. begin
  104935. if thebits = 0 then
  104936. pTDefRegMap(@Self)^.clr := $00080000
  104937. else
  104938. pTDefRegMap(@Self)^.&set := $00080000;
  104939. end;
  104940. function TCAN2_C2FIFOINT8.getRXOVFLIE : TBits_1; inline;
  104941. begin
  104942. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  104943. end;
  104944. procedure TCAN2_C2FIFOINT8.setTXEMPTYIE; inline;
  104945. begin
  104946. pTDefRegMap(@Self)^.&set := $01000000;
  104947. end;
  104948. procedure TCAN2_C2FIFOINT8.clearTXEMPTYIE; inline;
  104949. begin
  104950. pTDefRegMap(@Self)^.clr := $01000000;
  104951. end;
  104952. procedure TCAN2_C2FIFOINT8.setTXEMPTYIE(thebits : TBits_1); inline;
  104953. begin
  104954. if thebits = 0 then
  104955. pTDefRegMap(@Self)^.clr := $01000000
  104956. else
  104957. pTDefRegMap(@Self)^.&set := $01000000;
  104958. end;
  104959. function TCAN2_C2FIFOINT8.getTXEMPTYIE : TBits_1; inline;
  104960. begin
  104961. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  104962. end;
  104963. procedure TCAN2_C2FIFOINT8.setTXHALFIE; inline;
  104964. begin
  104965. pTDefRegMap(@Self)^.&set := $02000000;
  104966. end;
  104967. procedure TCAN2_C2FIFOINT8.clearTXHALFIE; inline;
  104968. begin
  104969. pTDefRegMap(@Self)^.clr := $02000000;
  104970. end;
  104971. procedure TCAN2_C2FIFOINT8.setTXHALFIE(thebits : TBits_1); inline;
  104972. begin
  104973. if thebits = 0 then
  104974. pTDefRegMap(@Self)^.clr := $02000000
  104975. else
  104976. pTDefRegMap(@Self)^.&set := $02000000;
  104977. end;
  104978. function TCAN2_C2FIFOINT8.getTXHALFIE : TBits_1; inline;
  104979. begin
  104980. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  104981. end;
  104982. procedure TCAN2_C2FIFOINT8.setTXNFULLIE; inline;
  104983. begin
  104984. pTDefRegMap(@Self)^.&set := $04000000;
  104985. end;
  104986. procedure TCAN2_C2FIFOINT8.clearTXNFULLIE; inline;
  104987. begin
  104988. pTDefRegMap(@Self)^.clr := $04000000;
  104989. end;
  104990. procedure TCAN2_C2FIFOINT8.setTXNFULLIE(thebits : TBits_1); inline;
  104991. begin
  104992. if thebits = 0 then
  104993. pTDefRegMap(@Self)^.clr := $04000000
  104994. else
  104995. pTDefRegMap(@Self)^.&set := $04000000;
  104996. end;
  104997. function TCAN2_C2FIFOINT8.getTXNFULLIE : TBits_1; inline;
  104998. begin
  104999. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  105000. end;
  105001. procedure TCAN2_C2FIFOINT8.setw(thebits : TBits_32); inline;
  105002. begin
  105003. pTDefRegMap(@Self)^.val := thebits;
  105004. end;
  105005. function TCAN2_C2FIFOINT8.getw : TBits_32; inline;
  105006. begin
  105007. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105008. end;
  105009. procedure TCAN2_C2FIFOCI8.setCFIFOCI(thebits : TBits_5); inline;
  105010. begin
  105011. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  105012. end;
  105013. function TCAN2_C2FIFOCI8.getCFIFOCI : TBits_5; inline;
  105014. begin
  105015. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  105016. end;
  105017. procedure TCAN2_C2FIFOCI8.setw(thebits : TBits_32); inline;
  105018. begin
  105019. pTDefRegMap(@Self)^.val := thebits;
  105020. end;
  105021. function TCAN2_C2FIFOCI8.getw : TBits_32; inline;
  105022. begin
  105023. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105024. end;
  105025. procedure TCAN2_C2FIFOCON9.setTXPRI(thebits : TBits_2); inline;
  105026. begin
  105027. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  105028. end;
  105029. function TCAN2_C2FIFOCON9.getTXPRI : TBits_2; inline;
  105030. begin
  105031. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  105032. end;
  105033. procedure TCAN2_C2FIFOCON9.setRTREN; inline;
  105034. begin
  105035. pTDefRegMap(@Self)^.&set := $00000004;
  105036. end;
  105037. procedure TCAN2_C2FIFOCON9.clearRTREN; inline;
  105038. begin
  105039. pTDefRegMap(@Self)^.clr := $00000004;
  105040. end;
  105041. procedure TCAN2_C2FIFOCON9.setRTREN(thebits : TBits_1); inline;
  105042. begin
  105043. if thebits = 0 then
  105044. pTDefRegMap(@Self)^.clr := $00000004
  105045. else
  105046. pTDefRegMap(@Self)^.&set := $00000004;
  105047. end;
  105048. function TCAN2_C2FIFOCON9.getRTREN : TBits_1; inline;
  105049. begin
  105050. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  105051. end;
  105052. procedure TCAN2_C2FIFOCON9.setTXREQ; inline;
  105053. begin
  105054. pTDefRegMap(@Self)^.&set := $00000008;
  105055. end;
  105056. procedure TCAN2_C2FIFOCON9.clearTXREQ; inline;
  105057. begin
  105058. pTDefRegMap(@Self)^.clr := $00000008;
  105059. end;
  105060. procedure TCAN2_C2FIFOCON9.setTXREQ(thebits : TBits_1); inline;
  105061. begin
  105062. if thebits = 0 then
  105063. pTDefRegMap(@Self)^.clr := $00000008
  105064. else
  105065. pTDefRegMap(@Self)^.&set := $00000008;
  105066. end;
  105067. function TCAN2_C2FIFOCON9.getTXREQ : TBits_1; inline;
  105068. begin
  105069. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  105070. end;
  105071. procedure TCAN2_C2FIFOCON9.setTXERR; inline;
  105072. begin
  105073. pTDefRegMap(@Self)^.&set := $00000010;
  105074. end;
  105075. procedure TCAN2_C2FIFOCON9.clearTXERR; inline;
  105076. begin
  105077. pTDefRegMap(@Self)^.clr := $00000010;
  105078. end;
  105079. procedure TCAN2_C2FIFOCON9.setTXERR(thebits : TBits_1); inline;
  105080. begin
  105081. if thebits = 0 then
  105082. pTDefRegMap(@Self)^.clr := $00000010
  105083. else
  105084. pTDefRegMap(@Self)^.&set := $00000010;
  105085. end;
  105086. function TCAN2_C2FIFOCON9.getTXERR : TBits_1; inline;
  105087. begin
  105088. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  105089. end;
  105090. procedure TCAN2_C2FIFOCON9.setTXLARB; inline;
  105091. begin
  105092. pTDefRegMap(@Self)^.&set := $00000020;
  105093. end;
  105094. procedure TCAN2_C2FIFOCON9.clearTXLARB; inline;
  105095. begin
  105096. pTDefRegMap(@Self)^.clr := $00000020;
  105097. end;
  105098. procedure TCAN2_C2FIFOCON9.setTXLARB(thebits : TBits_1); inline;
  105099. begin
  105100. if thebits = 0 then
  105101. pTDefRegMap(@Self)^.clr := $00000020
  105102. else
  105103. pTDefRegMap(@Self)^.&set := $00000020;
  105104. end;
  105105. function TCAN2_C2FIFOCON9.getTXLARB : TBits_1; inline;
  105106. begin
  105107. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  105108. end;
  105109. procedure TCAN2_C2FIFOCON9.setTXABAT; inline;
  105110. begin
  105111. pTDefRegMap(@Self)^.&set := $00000040;
  105112. end;
  105113. procedure TCAN2_C2FIFOCON9.clearTXABAT; inline;
  105114. begin
  105115. pTDefRegMap(@Self)^.clr := $00000040;
  105116. end;
  105117. procedure TCAN2_C2FIFOCON9.setTXABAT(thebits : TBits_1); inline;
  105118. begin
  105119. if thebits = 0 then
  105120. pTDefRegMap(@Self)^.clr := $00000040
  105121. else
  105122. pTDefRegMap(@Self)^.&set := $00000040;
  105123. end;
  105124. function TCAN2_C2FIFOCON9.getTXABAT : TBits_1; inline;
  105125. begin
  105126. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  105127. end;
  105128. procedure TCAN2_C2FIFOCON9.setTXEN; inline;
  105129. begin
  105130. pTDefRegMap(@Self)^.&set := $00000080;
  105131. end;
  105132. procedure TCAN2_C2FIFOCON9.clearTXEN; inline;
  105133. begin
  105134. pTDefRegMap(@Self)^.clr := $00000080;
  105135. end;
  105136. procedure TCAN2_C2FIFOCON9.setTXEN(thebits : TBits_1); inline;
  105137. begin
  105138. if thebits = 0 then
  105139. pTDefRegMap(@Self)^.clr := $00000080
  105140. else
  105141. pTDefRegMap(@Self)^.&set := $00000080;
  105142. end;
  105143. function TCAN2_C2FIFOCON9.getTXEN : TBits_1; inline;
  105144. begin
  105145. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  105146. end;
  105147. procedure TCAN2_C2FIFOCON9.setDONLY; inline;
  105148. begin
  105149. pTDefRegMap(@Self)^.&set := $00001000;
  105150. end;
  105151. procedure TCAN2_C2FIFOCON9.clearDONLY; inline;
  105152. begin
  105153. pTDefRegMap(@Self)^.clr := $00001000;
  105154. end;
  105155. procedure TCAN2_C2FIFOCON9.setDONLY(thebits : TBits_1); inline;
  105156. begin
  105157. if thebits = 0 then
  105158. pTDefRegMap(@Self)^.clr := $00001000
  105159. else
  105160. pTDefRegMap(@Self)^.&set := $00001000;
  105161. end;
  105162. function TCAN2_C2FIFOCON9.getDONLY : TBits_1; inline;
  105163. begin
  105164. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  105165. end;
  105166. procedure TCAN2_C2FIFOCON9.setUINC; inline;
  105167. begin
  105168. pTDefRegMap(@Self)^.&set := $00002000;
  105169. end;
  105170. procedure TCAN2_C2FIFOCON9.clearUINC; inline;
  105171. begin
  105172. pTDefRegMap(@Self)^.clr := $00002000;
  105173. end;
  105174. procedure TCAN2_C2FIFOCON9.setUINC(thebits : TBits_1); inline;
  105175. begin
  105176. if thebits = 0 then
  105177. pTDefRegMap(@Self)^.clr := $00002000
  105178. else
  105179. pTDefRegMap(@Self)^.&set := $00002000;
  105180. end;
  105181. function TCAN2_C2FIFOCON9.getUINC : TBits_1; inline;
  105182. begin
  105183. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  105184. end;
  105185. procedure TCAN2_C2FIFOCON9.setFRESET; inline;
  105186. begin
  105187. pTDefRegMap(@Self)^.&set := $00004000;
  105188. end;
  105189. procedure TCAN2_C2FIFOCON9.clearFRESET; inline;
  105190. begin
  105191. pTDefRegMap(@Self)^.clr := $00004000;
  105192. end;
  105193. procedure TCAN2_C2FIFOCON9.setFRESET(thebits : TBits_1); inline;
  105194. begin
  105195. if thebits = 0 then
  105196. pTDefRegMap(@Self)^.clr := $00004000
  105197. else
  105198. pTDefRegMap(@Self)^.&set := $00004000;
  105199. end;
  105200. function TCAN2_C2FIFOCON9.getFRESET : TBits_1; inline;
  105201. begin
  105202. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  105203. end;
  105204. procedure TCAN2_C2FIFOCON9.setFSIZE(thebits : TBits_5); inline;
  105205. begin
  105206. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  105207. end;
  105208. function TCAN2_C2FIFOCON9.getFSIZE : TBits_5; inline;
  105209. begin
  105210. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  105211. end;
  105212. procedure TCAN2_C2FIFOCON9.setw(thebits : TBits_32); inline;
  105213. begin
  105214. pTDefRegMap(@Self)^.val := thebits;
  105215. end;
  105216. function TCAN2_C2FIFOCON9.getw : TBits_32; inline;
  105217. begin
  105218. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105219. end;
  105220. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIF; inline;
  105221. begin
  105222. pTDefRegMap(@Self)^.&set := $00000001;
  105223. end;
  105224. procedure TCAN2_C2FIFOINT9.clearRXNEMPTYIF; inline;
  105225. begin
  105226. pTDefRegMap(@Self)^.clr := $00000001;
  105227. end;
  105228. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIF(thebits : TBits_1); inline;
  105229. begin
  105230. if thebits = 0 then
  105231. pTDefRegMap(@Self)^.clr := $00000001
  105232. else
  105233. pTDefRegMap(@Self)^.&set := $00000001;
  105234. end;
  105235. function TCAN2_C2FIFOINT9.getRXNEMPTYIF : TBits_1; inline;
  105236. begin
  105237. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  105238. end;
  105239. procedure TCAN2_C2FIFOINT9.setRXHALFIF; inline;
  105240. begin
  105241. pTDefRegMap(@Self)^.&set := $00000002;
  105242. end;
  105243. procedure TCAN2_C2FIFOINT9.clearRXHALFIF; inline;
  105244. begin
  105245. pTDefRegMap(@Self)^.clr := $00000002;
  105246. end;
  105247. procedure TCAN2_C2FIFOINT9.setRXHALFIF(thebits : TBits_1); inline;
  105248. begin
  105249. if thebits = 0 then
  105250. pTDefRegMap(@Self)^.clr := $00000002
  105251. else
  105252. pTDefRegMap(@Self)^.&set := $00000002;
  105253. end;
  105254. function TCAN2_C2FIFOINT9.getRXHALFIF : TBits_1; inline;
  105255. begin
  105256. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  105257. end;
  105258. procedure TCAN2_C2FIFOINT9.setRXFULLIF; inline;
  105259. begin
  105260. pTDefRegMap(@Self)^.&set := $00000004;
  105261. end;
  105262. procedure TCAN2_C2FIFOINT9.clearRXFULLIF; inline;
  105263. begin
  105264. pTDefRegMap(@Self)^.clr := $00000004;
  105265. end;
  105266. procedure TCAN2_C2FIFOINT9.setRXFULLIF(thebits : TBits_1); inline;
  105267. begin
  105268. if thebits = 0 then
  105269. pTDefRegMap(@Self)^.clr := $00000004
  105270. else
  105271. pTDefRegMap(@Self)^.&set := $00000004;
  105272. end;
  105273. function TCAN2_C2FIFOINT9.getRXFULLIF : TBits_1; inline;
  105274. begin
  105275. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  105276. end;
  105277. procedure TCAN2_C2FIFOINT9.setRXOVFLIF; inline;
  105278. begin
  105279. pTDefRegMap(@Self)^.&set := $00000008;
  105280. end;
  105281. procedure TCAN2_C2FIFOINT9.clearRXOVFLIF; inline;
  105282. begin
  105283. pTDefRegMap(@Self)^.clr := $00000008;
  105284. end;
  105285. procedure TCAN2_C2FIFOINT9.setRXOVFLIF(thebits : TBits_1); inline;
  105286. begin
  105287. if thebits = 0 then
  105288. pTDefRegMap(@Self)^.clr := $00000008
  105289. else
  105290. pTDefRegMap(@Self)^.&set := $00000008;
  105291. end;
  105292. function TCAN2_C2FIFOINT9.getRXOVFLIF : TBits_1; inline;
  105293. begin
  105294. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  105295. end;
  105296. procedure TCAN2_C2FIFOINT9.setTXEMPTYIF; inline;
  105297. begin
  105298. pTDefRegMap(@Self)^.&set := $00000100;
  105299. end;
  105300. procedure TCAN2_C2FIFOINT9.clearTXEMPTYIF; inline;
  105301. begin
  105302. pTDefRegMap(@Self)^.clr := $00000100;
  105303. end;
  105304. procedure TCAN2_C2FIFOINT9.setTXEMPTYIF(thebits : TBits_1); inline;
  105305. begin
  105306. if thebits = 0 then
  105307. pTDefRegMap(@Self)^.clr := $00000100
  105308. else
  105309. pTDefRegMap(@Self)^.&set := $00000100;
  105310. end;
  105311. function TCAN2_C2FIFOINT9.getTXEMPTYIF : TBits_1; inline;
  105312. begin
  105313. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  105314. end;
  105315. procedure TCAN2_C2FIFOINT9.setTXHALFIF; inline;
  105316. begin
  105317. pTDefRegMap(@Self)^.&set := $00000200;
  105318. end;
  105319. procedure TCAN2_C2FIFOINT9.clearTXHALFIF; inline;
  105320. begin
  105321. pTDefRegMap(@Self)^.clr := $00000200;
  105322. end;
  105323. procedure TCAN2_C2FIFOINT9.setTXHALFIF(thebits : TBits_1); inline;
  105324. begin
  105325. if thebits = 0 then
  105326. pTDefRegMap(@Self)^.clr := $00000200
  105327. else
  105328. pTDefRegMap(@Self)^.&set := $00000200;
  105329. end;
  105330. function TCAN2_C2FIFOINT9.getTXHALFIF : TBits_1; inline;
  105331. begin
  105332. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  105333. end;
  105334. procedure TCAN2_C2FIFOINT9.setTXNFULLIF; inline;
  105335. begin
  105336. pTDefRegMap(@Self)^.&set := $00000400;
  105337. end;
  105338. procedure TCAN2_C2FIFOINT9.clearTXNFULLIF; inline;
  105339. begin
  105340. pTDefRegMap(@Self)^.clr := $00000400;
  105341. end;
  105342. procedure TCAN2_C2FIFOINT9.setTXNFULLIF(thebits : TBits_1); inline;
  105343. begin
  105344. if thebits = 0 then
  105345. pTDefRegMap(@Self)^.clr := $00000400
  105346. else
  105347. pTDefRegMap(@Self)^.&set := $00000400;
  105348. end;
  105349. function TCAN2_C2FIFOINT9.getTXNFULLIF : TBits_1; inline;
  105350. begin
  105351. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  105352. end;
  105353. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIE; inline;
  105354. begin
  105355. pTDefRegMap(@Self)^.&set := $00010000;
  105356. end;
  105357. procedure TCAN2_C2FIFOINT9.clearRXNEMPTYIE; inline;
  105358. begin
  105359. pTDefRegMap(@Self)^.clr := $00010000;
  105360. end;
  105361. procedure TCAN2_C2FIFOINT9.setRXNEMPTYIE(thebits : TBits_1); inline;
  105362. begin
  105363. if thebits = 0 then
  105364. pTDefRegMap(@Self)^.clr := $00010000
  105365. else
  105366. pTDefRegMap(@Self)^.&set := $00010000;
  105367. end;
  105368. function TCAN2_C2FIFOINT9.getRXNEMPTYIE : TBits_1; inline;
  105369. begin
  105370. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  105371. end;
  105372. procedure TCAN2_C2FIFOINT9.setRXHALFIE; inline;
  105373. begin
  105374. pTDefRegMap(@Self)^.&set := $00020000;
  105375. end;
  105376. procedure TCAN2_C2FIFOINT9.clearRXHALFIE; inline;
  105377. begin
  105378. pTDefRegMap(@Self)^.clr := $00020000;
  105379. end;
  105380. procedure TCAN2_C2FIFOINT9.setRXHALFIE(thebits : TBits_1); inline;
  105381. begin
  105382. if thebits = 0 then
  105383. pTDefRegMap(@Self)^.clr := $00020000
  105384. else
  105385. pTDefRegMap(@Self)^.&set := $00020000;
  105386. end;
  105387. function TCAN2_C2FIFOINT9.getRXHALFIE : TBits_1; inline;
  105388. begin
  105389. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  105390. end;
  105391. procedure TCAN2_C2FIFOINT9.setRXFULLIE; inline;
  105392. begin
  105393. pTDefRegMap(@Self)^.&set := $00040000;
  105394. end;
  105395. procedure TCAN2_C2FIFOINT9.clearRXFULLIE; inline;
  105396. begin
  105397. pTDefRegMap(@Self)^.clr := $00040000;
  105398. end;
  105399. procedure TCAN2_C2FIFOINT9.setRXFULLIE(thebits : TBits_1); inline;
  105400. begin
  105401. if thebits = 0 then
  105402. pTDefRegMap(@Self)^.clr := $00040000
  105403. else
  105404. pTDefRegMap(@Self)^.&set := $00040000;
  105405. end;
  105406. function TCAN2_C2FIFOINT9.getRXFULLIE : TBits_1; inline;
  105407. begin
  105408. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  105409. end;
  105410. procedure TCAN2_C2FIFOINT9.setRXOVFLIE; inline;
  105411. begin
  105412. pTDefRegMap(@Self)^.&set := $00080000;
  105413. end;
  105414. procedure TCAN2_C2FIFOINT9.clearRXOVFLIE; inline;
  105415. begin
  105416. pTDefRegMap(@Self)^.clr := $00080000;
  105417. end;
  105418. procedure TCAN2_C2FIFOINT9.setRXOVFLIE(thebits : TBits_1); inline;
  105419. begin
  105420. if thebits = 0 then
  105421. pTDefRegMap(@Self)^.clr := $00080000
  105422. else
  105423. pTDefRegMap(@Self)^.&set := $00080000;
  105424. end;
  105425. function TCAN2_C2FIFOINT9.getRXOVFLIE : TBits_1; inline;
  105426. begin
  105427. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105428. end;
  105429. procedure TCAN2_C2FIFOINT9.setTXEMPTYIE; inline;
  105430. begin
  105431. pTDefRegMap(@Self)^.&set := $01000000;
  105432. end;
  105433. procedure TCAN2_C2FIFOINT9.clearTXEMPTYIE; inline;
  105434. begin
  105435. pTDefRegMap(@Self)^.clr := $01000000;
  105436. end;
  105437. procedure TCAN2_C2FIFOINT9.setTXEMPTYIE(thebits : TBits_1); inline;
  105438. begin
  105439. if thebits = 0 then
  105440. pTDefRegMap(@Self)^.clr := $01000000
  105441. else
  105442. pTDefRegMap(@Self)^.&set := $01000000;
  105443. end;
  105444. function TCAN2_C2FIFOINT9.getTXEMPTYIE : TBits_1; inline;
  105445. begin
  105446. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  105447. end;
  105448. procedure TCAN2_C2FIFOINT9.setTXHALFIE; inline;
  105449. begin
  105450. pTDefRegMap(@Self)^.&set := $02000000;
  105451. end;
  105452. procedure TCAN2_C2FIFOINT9.clearTXHALFIE; inline;
  105453. begin
  105454. pTDefRegMap(@Self)^.clr := $02000000;
  105455. end;
  105456. procedure TCAN2_C2FIFOINT9.setTXHALFIE(thebits : TBits_1); inline;
  105457. begin
  105458. if thebits = 0 then
  105459. pTDefRegMap(@Self)^.clr := $02000000
  105460. else
  105461. pTDefRegMap(@Self)^.&set := $02000000;
  105462. end;
  105463. function TCAN2_C2FIFOINT9.getTXHALFIE : TBits_1; inline;
  105464. begin
  105465. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  105466. end;
  105467. procedure TCAN2_C2FIFOINT9.setTXNFULLIE; inline;
  105468. begin
  105469. pTDefRegMap(@Self)^.&set := $04000000;
  105470. end;
  105471. procedure TCAN2_C2FIFOINT9.clearTXNFULLIE; inline;
  105472. begin
  105473. pTDefRegMap(@Self)^.clr := $04000000;
  105474. end;
  105475. procedure TCAN2_C2FIFOINT9.setTXNFULLIE(thebits : TBits_1); inline;
  105476. begin
  105477. if thebits = 0 then
  105478. pTDefRegMap(@Self)^.clr := $04000000
  105479. else
  105480. pTDefRegMap(@Self)^.&set := $04000000;
  105481. end;
  105482. function TCAN2_C2FIFOINT9.getTXNFULLIE : TBits_1; inline;
  105483. begin
  105484. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  105485. end;
  105486. procedure TCAN2_C2FIFOINT9.setw(thebits : TBits_32); inline;
  105487. begin
  105488. pTDefRegMap(@Self)^.val := thebits;
  105489. end;
  105490. function TCAN2_C2FIFOINT9.getw : TBits_32; inline;
  105491. begin
  105492. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105493. end;
  105494. procedure TCAN2_C2FIFOCI9.setCFIFOCI(thebits : TBits_5); inline;
  105495. begin
  105496. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  105497. end;
  105498. function TCAN2_C2FIFOCI9.getCFIFOCI : TBits_5; inline;
  105499. begin
  105500. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  105501. end;
  105502. procedure TCAN2_C2FIFOCI9.setw(thebits : TBits_32); inline;
  105503. begin
  105504. pTDefRegMap(@Self)^.val := thebits;
  105505. end;
  105506. function TCAN2_C2FIFOCI9.getw : TBits_32; inline;
  105507. begin
  105508. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105509. end;
  105510. procedure TCAN2_C2FIFOCON10.setTXPRI(thebits : TBits_2); inline;
  105511. begin
  105512. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  105513. end;
  105514. function TCAN2_C2FIFOCON10.getTXPRI : TBits_2; inline;
  105515. begin
  105516. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  105517. end;
  105518. procedure TCAN2_C2FIFOCON10.setRTREN; inline;
  105519. begin
  105520. pTDefRegMap(@Self)^.&set := $00000004;
  105521. end;
  105522. procedure TCAN2_C2FIFOCON10.clearRTREN; inline;
  105523. begin
  105524. pTDefRegMap(@Self)^.clr := $00000004;
  105525. end;
  105526. procedure TCAN2_C2FIFOCON10.setRTREN(thebits : TBits_1); inline;
  105527. begin
  105528. if thebits = 0 then
  105529. pTDefRegMap(@Self)^.clr := $00000004
  105530. else
  105531. pTDefRegMap(@Self)^.&set := $00000004;
  105532. end;
  105533. function TCAN2_C2FIFOCON10.getRTREN : TBits_1; inline;
  105534. begin
  105535. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  105536. end;
  105537. procedure TCAN2_C2FIFOCON10.setTXREQ; inline;
  105538. begin
  105539. pTDefRegMap(@Self)^.&set := $00000008;
  105540. end;
  105541. procedure TCAN2_C2FIFOCON10.clearTXREQ; inline;
  105542. begin
  105543. pTDefRegMap(@Self)^.clr := $00000008;
  105544. end;
  105545. procedure TCAN2_C2FIFOCON10.setTXREQ(thebits : TBits_1); inline;
  105546. begin
  105547. if thebits = 0 then
  105548. pTDefRegMap(@Self)^.clr := $00000008
  105549. else
  105550. pTDefRegMap(@Self)^.&set := $00000008;
  105551. end;
  105552. function TCAN2_C2FIFOCON10.getTXREQ : TBits_1; inline;
  105553. begin
  105554. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  105555. end;
  105556. procedure TCAN2_C2FIFOCON10.setTXERR; inline;
  105557. begin
  105558. pTDefRegMap(@Self)^.&set := $00000010;
  105559. end;
  105560. procedure TCAN2_C2FIFOCON10.clearTXERR; inline;
  105561. begin
  105562. pTDefRegMap(@Self)^.clr := $00000010;
  105563. end;
  105564. procedure TCAN2_C2FIFOCON10.setTXERR(thebits : TBits_1); inline;
  105565. begin
  105566. if thebits = 0 then
  105567. pTDefRegMap(@Self)^.clr := $00000010
  105568. else
  105569. pTDefRegMap(@Self)^.&set := $00000010;
  105570. end;
  105571. function TCAN2_C2FIFOCON10.getTXERR : TBits_1; inline;
  105572. begin
  105573. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  105574. end;
  105575. procedure TCAN2_C2FIFOCON10.setTXLARB; inline;
  105576. begin
  105577. pTDefRegMap(@Self)^.&set := $00000020;
  105578. end;
  105579. procedure TCAN2_C2FIFOCON10.clearTXLARB; inline;
  105580. begin
  105581. pTDefRegMap(@Self)^.clr := $00000020;
  105582. end;
  105583. procedure TCAN2_C2FIFOCON10.setTXLARB(thebits : TBits_1); inline;
  105584. begin
  105585. if thebits = 0 then
  105586. pTDefRegMap(@Self)^.clr := $00000020
  105587. else
  105588. pTDefRegMap(@Self)^.&set := $00000020;
  105589. end;
  105590. function TCAN2_C2FIFOCON10.getTXLARB : TBits_1; inline;
  105591. begin
  105592. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  105593. end;
  105594. procedure TCAN2_C2FIFOCON10.setTXABAT; inline;
  105595. begin
  105596. pTDefRegMap(@Self)^.&set := $00000040;
  105597. end;
  105598. procedure TCAN2_C2FIFOCON10.clearTXABAT; inline;
  105599. begin
  105600. pTDefRegMap(@Self)^.clr := $00000040;
  105601. end;
  105602. procedure TCAN2_C2FIFOCON10.setTXABAT(thebits : TBits_1); inline;
  105603. begin
  105604. if thebits = 0 then
  105605. pTDefRegMap(@Self)^.clr := $00000040
  105606. else
  105607. pTDefRegMap(@Self)^.&set := $00000040;
  105608. end;
  105609. function TCAN2_C2FIFOCON10.getTXABAT : TBits_1; inline;
  105610. begin
  105611. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  105612. end;
  105613. procedure TCAN2_C2FIFOCON10.setTXEN; inline;
  105614. begin
  105615. pTDefRegMap(@Self)^.&set := $00000080;
  105616. end;
  105617. procedure TCAN2_C2FIFOCON10.clearTXEN; inline;
  105618. begin
  105619. pTDefRegMap(@Self)^.clr := $00000080;
  105620. end;
  105621. procedure TCAN2_C2FIFOCON10.setTXEN(thebits : TBits_1); inline;
  105622. begin
  105623. if thebits = 0 then
  105624. pTDefRegMap(@Self)^.clr := $00000080
  105625. else
  105626. pTDefRegMap(@Self)^.&set := $00000080;
  105627. end;
  105628. function TCAN2_C2FIFOCON10.getTXEN : TBits_1; inline;
  105629. begin
  105630. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  105631. end;
  105632. procedure TCAN2_C2FIFOCON10.setDONLY; inline;
  105633. begin
  105634. pTDefRegMap(@Self)^.&set := $00001000;
  105635. end;
  105636. procedure TCAN2_C2FIFOCON10.clearDONLY; inline;
  105637. begin
  105638. pTDefRegMap(@Self)^.clr := $00001000;
  105639. end;
  105640. procedure TCAN2_C2FIFOCON10.setDONLY(thebits : TBits_1); inline;
  105641. begin
  105642. if thebits = 0 then
  105643. pTDefRegMap(@Self)^.clr := $00001000
  105644. else
  105645. pTDefRegMap(@Self)^.&set := $00001000;
  105646. end;
  105647. function TCAN2_C2FIFOCON10.getDONLY : TBits_1; inline;
  105648. begin
  105649. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  105650. end;
  105651. procedure TCAN2_C2FIFOCON10.setUINC; inline;
  105652. begin
  105653. pTDefRegMap(@Self)^.&set := $00002000;
  105654. end;
  105655. procedure TCAN2_C2FIFOCON10.clearUINC; inline;
  105656. begin
  105657. pTDefRegMap(@Self)^.clr := $00002000;
  105658. end;
  105659. procedure TCAN2_C2FIFOCON10.setUINC(thebits : TBits_1); inline;
  105660. begin
  105661. if thebits = 0 then
  105662. pTDefRegMap(@Self)^.clr := $00002000
  105663. else
  105664. pTDefRegMap(@Self)^.&set := $00002000;
  105665. end;
  105666. function TCAN2_C2FIFOCON10.getUINC : TBits_1; inline;
  105667. begin
  105668. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  105669. end;
  105670. procedure TCAN2_C2FIFOCON10.setFRESET; inline;
  105671. begin
  105672. pTDefRegMap(@Self)^.&set := $00004000;
  105673. end;
  105674. procedure TCAN2_C2FIFOCON10.clearFRESET; inline;
  105675. begin
  105676. pTDefRegMap(@Self)^.clr := $00004000;
  105677. end;
  105678. procedure TCAN2_C2FIFOCON10.setFRESET(thebits : TBits_1); inline;
  105679. begin
  105680. if thebits = 0 then
  105681. pTDefRegMap(@Self)^.clr := $00004000
  105682. else
  105683. pTDefRegMap(@Self)^.&set := $00004000;
  105684. end;
  105685. function TCAN2_C2FIFOCON10.getFRESET : TBits_1; inline;
  105686. begin
  105687. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  105688. end;
  105689. procedure TCAN2_C2FIFOCON10.setFSIZE(thebits : TBits_5); inline;
  105690. begin
  105691. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  105692. end;
  105693. function TCAN2_C2FIFOCON10.getFSIZE : TBits_5; inline;
  105694. begin
  105695. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  105696. end;
  105697. procedure TCAN2_C2FIFOCON10.setw(thebits : TBits_32); inline;
  105698. begin
  105699. pTDefRegMap(@Self)^.val := thebits;
  105700. end;
  105701. function TCAN2_C2FIFOCON10.getw : TBits_32; inline;
  105702. begin
  105703. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105704. end;
  105705. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIF; inline;
  105706. begin
  105707. pTDefRegMap(@Self)^.&set := $00000001;
  105708. end;
  105709. procedure TCAN2_C2FIFOINT10.clearRXNEMPTYIF; inline;
  105710. begin
  105711. pTDefRegMap(@Self)^.clr := $00000001;
  105712. end;
  105713. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIF(thebits : TBits_1); inline;
  105714. begin
  105715. if thebits = 0 then
  105716. pTDefRegMap(@Self)^.clr := $00000001
  105717. else
  105718. pTDefRegMap(@Self)^.&set := $00000001;
  105719. end;
  105720. function TCAN2_C2FIFOINT10.getRXNEMPTYIF : TBits_1; inline;
  105721. begin
  105722. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  105723. end;
  105724. procedure TCAN2_C2FIFOINT10.setRXHALFIF; inline;
  105725. begin
  105726. pTDefRegMap(@Self)^.&set := $00000002;
  105727. end;
  105728. procedure TCAN2_C2FIFOINT10.clearRXHALFIF; inline;
  105729. begin
  105730. pTDefRegMap(@Self)^.clr := $00000002;
  105731. end;
  105732. procedure TCAN2_C2FIFOINT10.setRXHALFIF(thebits : TBits_1); inline;
  105733. begin
  105734. if thebits = 0 then
  105735. pTDefRegMap(@Self)^.clr := $00000002
  105736. else
  105737. pTDefRegMap(@Self)^.&set := $00000002;
  105738. end;
  105739. function TCAN2_C2FIFOINT10.getRXHALFIF : TBits_1; inline;
  105740. begin
  105741. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  105742. end;
  105743. procedure TCAN2_C2FIFOINT10.setRXFULLIF; inline;
  105744. begin
  105745. pTDefRegMap(@Self)^.&set := $00000004;
  105746. end;
  105747. procedure TCAN2_C2FIFOINT10.clearRXFULLIF; inline;
  105748. begin
  105749. pTDefRegMap(@Self)^.clr := $00000004;
  105750. end;
  105751. procedure TCAN2_C2FIFOINT10.setRXFULLIF(thebits : TBits_1); inline;
  105752. begin
  105753. if thebits = 0 then
  105754. pTDefRegMap(@Self)^.clr := $00000004
  105755. else
  105756. pTDefRegMap(@Self)^.&set := $00000004;
  105757. end;
  105758. function TCAN2_C2FIFOINT10.getRXFULLIF : TBits_1; inline;
  105759. begin
  105760. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  105761. end;
  105762. procedure TCAN2_C2FIFOINT10.setRXOVFLIF; inline;
  105763. begin
  105764. pTDefRegMap(@Self)^.&set := $00000008;
  105765. end;
  105766. procedure TCAN2_C2FIFOINT10.clearRXOVFLIF; inline;
  105767. begin
  105768. pTDefRegMap(@Self)^.clr := $00000008;
  105769. end;
  105770. procedure TCAN2_C2FIFOINT10.setRXOVFLIF(thebits : TBits_1); inline;
  105771. begin
  105772. if thebits = 0 then
  105773. pTDefRegMap(@Self)^.clr := $00000008
  105774. else
  105775. pTDefRegMap(@Self)^.&set := $00000008;
  105776. end;
  105777. function TCAN2_C2FIFOINT10.getRXOVFLIF : TBits_1; inline;
  105778. begin
  105779. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  105780. end;
  105781. procedure TCAN2_C2FIFOINT10.setTXEMPTYIF; inline;
  105782. begin
  105783. pTDefRegMap(@Self)^.&set := $00000100;
  105784. end;
  105785. procedure TCAN2_C2FIFOINT10.clearTXEMPTYIF; inline;
  105786. begin
  105787. pTDefRegMap(@Self)^.clr := $00000100;
  105788. end;
  105789. procedure TCAN2_C2FIFOINT10.setTXEMPTYIF(thebits : TBits_1); inline;
  105790. begin
  105791. if thebits = 0 then
  105792. pTDefRegMap(@Self)^.clr := $00000100
  105793. else
  105794. pTDefRegMap(@Self)^.&set := $00000100;
  105795. end;
  105796. function TCAN2_C2FIFOINT10.getTXEMPTYIF : TBits_1; inline;
  105797. begin
  105798. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  105799. end;
  105800. procedure TCAN2_C2FIFOINT10.setTXHALFIF; inline;
  105801. begin
  105802. pTDefRegMap(@Self)^.&set := $00000200;
  105803. end;
  105804. procedure TCAN2_C2FIFOINT10.clearTXHALFIF; inline;
  105805. begin
  105806. pTDefRegMap(@Self)^.clr := $00000200;
  105807. end;
  105808. procedure TCAN2_C2FIFOINT10.setTXHALFIF(thebits : TBits_1); inline;
  105809. begin
  105810. if thebits = 0 then
  105811. pTDefRegMap(@Self)^.clr := $00000200
  105812. else
  105813. pTDefRegMap(@Self)^.&set := $00000200;
  105814. end;
  105815. function TCAN2_C2FIFOINT10.getTXHALFIF : TBits_1; inline;
  105816. begin
  105817. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  105818. end;
  105819. procedure TCAN2_C2FIFOINT10.setTXNFULLIF; inline;
  105820. begin
  105821. pTDefRegMap(@Self)^.&set := $00000400;
  105822. end;
  105823. procedure TCAN2_C2FIFOINT10.clearTXNFULLIF; inline;
  105824. begin
  105825. pTDefRegMap(@Self)^.clr := $00000400;
  105826. end;
  105827. procedure TCAN2_C2FIFOINT10.setTXNFULLIF(thebits : TBits_1); inline;
  105828. begin
  105829. if thebits = 0 then
  105830. pTDefRegMap(@Self)^.clr := $00000400
  105831. else
  105832. pTDefRegMap(@Self)^.&set := $00000400;
  105833. end;
  105834. function TCAN2_C2FIFOINT10.getTXNFULLIF : TBits_1; inline;
  105835. begin
  105836. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  105837. end;
  105838. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIE; inline;
  105839. begin
  105840. pTDefRegMap(@Self)^.&set := $00010000;
  105841. end;
  105842. procedure TCAN2_C2FIFOINT10.clearRXNEMPTYIE; inline;
  105843. begin
  105844. pTDefRegMap(@Self)^.clr := $00010000;
  105845. end;
  105846. procedure TCAN2_C2FIFOINT10.setRXNEMPTYIE(thebits : TBits_1); inline;
  105847. begin
  105848. if thebits = 0 then
  105849. pTDefRegMap(@Self)^.clr := $00010000
  105850. else
  105851. pTDefRegMap(@Self)^.&set := $00010000;
  105852. end;
  105853. function TCAN2_C2FIFOINT10.getRXNEMPTYIE : TBits_1; inline;
  105854. begin
  105855. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  105856. end;
  105857. procedure TCAN2_C2FIFOINT10.setRXHALFIE; inline;
  105858. begin
  105859. pTDefRegMap(@Self)^.&set := $00020000;
  105860. end;
  105861. procedure TCAN2_C2FIFOINT10.clearRXHALFIE; inline;
  105862. begin
  105863. pTDefRegMap(@Self)^.clr := $00020000;
  105864. end;
  105865. procedure TCAN2_C2FIFOINT10.setRXHALFIE(thebits : TBits_1); inline;
  105866. begin
  105867. if thebits = 0 then
  105868. pTDefRegMap(@Self)^.clr := $00020000
  105869. else
  105870. pTDefRegMap(@Self)^.&set := $00020000;
  105871. end;
  105872. function TCAN2_C2FIFOINT10.getRXHALFIE : TBits_1; inline;
  105873. begin
  105874. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  105875. end;
  105876. procedure TCAN2_C2FIFOINT10.setRXFULLIE; inline;
  105877. begin
  105878. pTDefRegMap(@Self)^.&set := $00040000;
  105879. end;
  105880. procedure TCAN2_C2FIFOINT10.clearRXFULLIE; inline;
  105881. begin
  105882. pTDefRegMap(@Self)^.clr := $00040000;
  105883. end;
  105884. procedure TCAN2_C2FIFOINT10.setRXFULLIE(thebits : TBits_1); inline;
  105885. begin
  105886. if thebits = 0 then
  105887. pTDefRegMap(@Self)^.clr := $00040000
  105888. else
  105889. pTDefRegMap(@Self)^.&set := $00040000;
  105890. end;
  105891. function TCAN2_C2FIFOINT10.getRXFULLIE : TBits_1; inline;
  105892. begin
  105893. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  105894. end;
  105895. procedure TCAN2_C2FIFOINT10.setRXOVFLIE; inline;
  105896. begin
  105897. pTDefRegMap(@Self)^.&set := $00080000;
  105898. end;
  105899. procedure TCAN2_C2FIFOINT10.clearRXOVFLIE; inline;
  105900. begin
  105901. pTDefRegMap(@Self)^.clr := $00080000;
  105902. end;
  105903. procedure TCAN2_C2FIFOINT10.setRXOVFLIE(thebits : TBits_1); inline;
  105904. begin
  105905. if thebits = 0 then
  105906. pTDefRegMap(@Self)^.clr := $00080000
  105907. else
  105908. pTDefRegMap(@Self)^.&set := $00080000;
  105909. end;
  105910. function TCAN2_C2FIFOINT10.getRXOVFLIE : TBits_1; inline;
  105911. begin
  105912. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  105913. end;
  105914. procedure TCAN2_C2FIFOINT10.setTXEMPTYIE; inline;
  105915. begin
  105916. pTDefRegMap(@Self)^.&set := $01000000;
  105917. end;
  105918. procedure TCAN2_C2FIFOINT10.clearTXEMPTYIE; inline;
  105919. begin
  105920. pTDefRegMap(@Self)^.clr := $01000000;
  105921. end;
  105922. procedure TCAN2_C2FIFOINT10.setTXEMPTYIE(thebits : TBits_1); inline;
  105923. begin
  105924. if thebits = 0 then
  105925. pTDefRegMap(@Self)^.clr := $01000000
  105926. else
  105927. pTDefRegMap(@Self)^.&set := $01000000;
  105928. end;
  105929. function TCAN2_C2FIFOINT10.getTXEMPTYIE : TBits_1; inline;
  105930. begin
  105931. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  105932. end;
  105933. procedure TCAN2_C2FIFOINT10.setTXHALFIE; inline;
  105934. begin
  105935. pTDefRegMap(@Self)^.&set := $02000000;
  105936. end;
  105937. procedure TCAN2_C2FIFOINT10.clearTXHALFIE; inline;
  105938. begin
  105939. pTDefRegMap(@Self)^.clr := $02000000;
  105940. end;
  105941. procedure TCAN2_C2FIFOINT10.setTXHALFIE(thebits : TBits_1); inline;
  105942. begin
  105943. if thebits = 0 then
  105944. pTDefRegMap(@Self)^.clr := $02000000
  105945. else
  105946. pTDefRegMap(@Self)^.&set := $02000000;
  105947. end;
  105948. function TCAN2_C2FIFOINT10.getTXHALFIE : TBits_1; inline;
  105949. begin
  105950. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  105951. end;
  105952. procedure TCAN2_C2FIFOINT10.setTXNFULLIE; inline;
  105953. begin
  105954. pTDefRegMap(@Self)^.&set := $04000000;
  105955. end;
  105956. procedure TCAN2_C2FIFOINT10.clearTXNFULLIE; inline;
  105957. begin
  105958. pTDefRegMap(@Self)^.clr := $04000000;
  105959. end;
  105960. procedure TCAN2_C2FIFOINT10.setTXNFULLIE(thebits : TBits_1); inline;
  105961. begin
  105962. if thebits = 0 then
  105963. pTDefRegMap(@Self)^.clr := $04000000
  105964. else
  105965. pTDefRegMap(@Self)^.&set := $04000000;
  105966. end;
  105967. function TCAN2_C2FIFOINT10.getTXNFULLIE : TBits_1; inline;
  105968. begin
  105969. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  105970. end;
  105971. procedure TCAN2_C2FIFOINT10.setw(thebits : TBits_32); inline;
  105972. begin
  105973. pTDefRegMap(@Self)^.val := thebits;
  105974. end;
  105975. function TCAN2_C2FIFOINT10.getw : TBits_32; inline;
  105976. begin
  105977. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105978. end;
  105979. procedure TCAN2_C2FIFOCI10.setCFIFOCI(thebits : TBits_5); inline;
  105980. begin
  105981. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  105982. end;
  105983. function TCAN2_C2FIFOCI10.getCFIFOCI : TBits_5; inline;
  105984. begin
  105985. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  105986. end;
  105987. procedure TCAN2_C2FIFOCI10.setw(thebits : TBits_32); inline;
  105988. begin
  105989. pTDefRegMap(@Self)^.val := thebits;
  105990. end;
  105991. function TCAN2_C2FIFOCI10.getw : TBits_32; inline;
  105992. begin
  105993. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  105994. end;
  105995. procedure TCAN2_C2FIFOCON11.setTXPRI(thebits : TBits_2); inline;
  105996. begin
  105997. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  105998. end;
  105999. function TCAN2_C2FIFOCON11.getTXPRI : TBits_2; inline;
  106000. begin
  106001. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  106002. end;
  106003. procedure TCAN2_C2FIFOCON11.setRTREN; inline;
  106004. begin
  106005. pTDefRegMap(@Self)^.&set := $00000004;
  106006. end;
  106007. procedure TCAN2_C2FIFOCON11.clearRTREN; inline;
  106008. begin
  106009. pTDefRegMap(@Self)^.clr := $00000004;
  106010. end;
  106011. procedure TCAN2_C2FIFOCON11.setRTREN(thebits : TBits_1); inline;
  106012. begin
  106013. if thebits = 0 then
  106014. pTDefRegMap(@Self)^.clr := $00000004
  106015. else
  106016. pTDefRegMap(@Self)^.&set := $00000004;
  106017. end;
  106018. function TCAN2_C2FIFOCON11.getRTREN : TBits_1; inline;
  106019. begin
  106020. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106021. end;
  106022. procedure TCAN2_C2FIFOCON11.setTXREQ; inline;
  106023. begin
  106024. pTDefRegMap(@Self)^.&set := $00000008;
  106025. end;
  106026. procedure TCAN2_C2FIFOCON11.clearTXREQ; inline;
  106027. begin
  106028. pTDefRegMap(@Self)^.clr := $00000008;
  106029. end;
  106030. procedure TCAN2_C2FIFOCON11.setTXREQ(thebits : TBits_1); inline;
  106031. begin
  106032. if thebits = 0 then
  106033. pTDefRegMap(@Self)^.clr := $00000008
  106034. else
  106035. pTDefRegMap(@Self)^.&set := $00000008;
  106036. end;
  106037. function TCAN2_C2FIFOCON11.getTXREQ : TBits_1; inline;
  106038. begin
  106039. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106040. end;
  106041. procedure TCAN2_C2FIFOCON11.setTXERR; inline;
  106042. begin
  106043. pTDefRegMap(@Self)^.&set := $00000010;
  106044. end;
  106045. procedure TCAN2_C2FIFOCON11.clearTXERR; inline;
  106046. begin
  106047. pTDefRegMap(@Self)^.clr := $00000010;
  106048. end;
  106049. procedure TCAN2_C2FIFOCON11.setTXERR(thebits : TBits_1); inline;
  106050. begin
  106051. if thebits = 0 then
  106052. pTDefRegMap(@Self)^.clr := $00000010
  106053. else
  106054. pTDefRegMap(@Self)^.&set := $00000010;
  106055. end;
  106056. function TCAN2_C2FIFOCON11.getTXERR : TBits_1; inline;
  106057. begin
  106058. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  106059. end;
  106060. procedure TCAN2_C2FIFOCON11.setTXLARB; inline;
  106061. begin
  106062. pTDefRegMap(@Self)^.&set := $00000020;
  106063. end;
  106064. procedure TCAN2_C2FIFOCON11.clearTXLARB; inline;
  106065. begin
  106066. pTDefRegMap(@Self)^.clr := $00000020;
  106067. end;
  106068. procedure TCAN2_C2FIFOCON11.setTXLARB(thebits : TBits_1); inline;
  106069. begin
  106070. if thebits = 0 then
  106071. pTDefRegMap(@Self)^.clr := $00000020
  106072. else
  106073. pTDefRegMap(@Self)^.&set := $00000020;
  106074. end;
  106075. function TCAN2_C2FIFOCON11.getTXLARB : TBits_1; inline;
  106076. begin
  106077. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  106078. end;
  106079. procedure TCAN2_C2FIFOCON11.setTXABAT; inline;
  106080. begin
  106081. pTDefRegMap(@Self)^.&set := $00000040;
  106082. end;
  106083. procedure TCAN2_C2FIFOCON11.clearTXABAT; inline;
  106084. begin
  106085. pTDefRegMap(@Self)^.clr := $00000040;
  106086. end;
  106087. procedure TCAN2_C2FIFOCON11.setTXABAT(thebits : TBits_1); inline;
  106088. begin
  106089. if thebits = 0 then
  106090. pTDefRegMap(@Self)^.clr := $00000040
  106091. else
  106092. pTDefRegMap(@Self)^.&set := $00000040;
  106093. end;
  106094. function TCAN2_C2FIFOCON11.getTXABAT : TBits_1; inline;
  106095. begin
  106096. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  106097. end;
  106098. procedure TCAN2_C2FIFOCON11.setTXEN; inline;
  106099. begin
  106100. pTDefRegMap(@Self)^.&set := $00000080;
  106101. end;
  106102. procedure TCAN2_C2FIFOCON11.clearTXEN; inline;
  106103. begin
  106104. pTDefRegMap(@Self)^.clr := $00000080;
  106105. end;
  106106. procedure TCAN2_C2FIFOCON11.setTXEN(thebits : TBits_1); inline;
  106107. begin
  106108. if thebits = 0 then
  106109. pTDefRegMap(@Self)^.clr := $00000080
  106110. else
  106111. pTDefRegMap(@Self)^.&set := $00000080;
  106112. end;
  106113. function TCAN2_C2FIFOCON11.getTXEN : TBits_1; inline;
  106114. begin
  106115. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  106116. end;
  106117. procedure TCAN2_C2FIFOCON11.setDONLY; inline;
  106118. begin
  106119. pTDefRegMap(@Self)^.&set := $00001000;
  106120. end;
  106121. procedure TCAN2_C2FIFOCON11.clearDONLY; inline;
  106122. begin
  106123. pTDefRegMap(@Self)^.clr := $00001000;
  106124. end;
  106125. procedure TCAN2_C2FIFOCON11.setDONLY(thebits : TBits_1); inline;
  106126. begin
  106127. if thebits = 0 then
  106128. pTDefRegMap(@Self)^.clr := $00001000
  106129. else
  106130. pTDefRegMap(@Self)^.&set := $00001000;
  106131. end;
  106132. function TCAN2_C2FIFOCON11.getDONLY : TBits_1; inline;
  106133. begin
  106134. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  106135. end;
  106136. procedure TCAN2_C2FIFOCON11.setUINC; inline;
  106137. begin
  106138. pTDefRegMap(@Self)^.&set := $00002000;
  106139. end;
  106140. procedure TCAN2_C2FIFOCON11.clearUINC; inline;
  106141. begin
  106142. pTDefRegMap(@Self)^.clr := $00002000;
  106143. end;
  106144. procedure TCAN2_C2FIFOCON11.setUINC(thebits : TBits_1); inline;
  106145. begin
  106146. if thebits = 0 then
  106147. pTDefRegMap(@Self)^.clr := $00002000
  106148. else
  106149. pTDefRegMap(@Self)^.&set := $00002000;
  106150. end;
  106151. function TCAN2_C2FIFOCON11.getUINC : TBits_1; inline;
  106152. begin
  106153. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  106154. end;
  106155. procedure TCAN2_C2FIFOCON11.setFRESET; inline;
  106156. begin
  106157. pTDefRegMap(@Self)^.&set := $00004000;
  106158. end;
  106159. procedure TCAN2_C2FIFOCON11.clearFRESET; inline;
  106160. begin
  106161. pTDefRegMap(@Self)^.clr := $00004000;
  106162. end;
  106163. procedure TCAN2_C2FIFOCON11.setFRESET(thebits : TBits_1); inline;
  106164. begin
  106165. if thebits = 0 then
  106166. pTDefRegMap(@Self)^.clr := $00004000
  106167. else
  106168. pTDefRegMap(@Self)^.&set := $00004000;
  106169. end;
  106170. function TCAN2_C2FIFOCON11.getFRESET : TBits_1; inline;
  106171. begin
  106172. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  106173. end;
  106174. procedure TCAN2_C2FIFOCON11.setFSIZE(thebits : TBits_5); inline;
  106175. begin
  106176. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  106177. end;
  106178. function TCAN2_C2FIFOCON11.getFSIZE : TBits_5; inline;
  106179. begin
  106180. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  106181. end;
  106182. procedure TCAN2_C2FIFOCON11.setw(thebits : TBits_32); inline;
  106183. begin
  106184. pTDefRegMap(@Self)^.val := thebits;
  106185. end;
  106186. function TCAN2_C2FIFOCON11.getw : TBits_32; inline;
  106187. begin
  106188. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106189. end;
  106190. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIF; inline;
  106191. begin
  106192. pTDefRegMap(@Self)^.&set := $00000001;
  106193. end;
  106194. procedure TCAN2_C2FIFOINT11.clearRXNEMPTYIF; inline;
  106195. begin
  106196. pTDefRegMap(@Self)^.clr := $00000001;
  106197. end;
  106198. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIF(thebits : TBits_1); inline;
  106199. begin
  106200. if thebits = 0 then
  106201. pTDefRegMap(@Self)^.clr := $00000001
  106202. else
  106203. pTDefRegMap(@Self)^.&set := $00000001;
  106204. end;
  106205. function TCAN2_C2FIFOINT11.getRXNEMPTYIF : TBits_1; inline;
  106206. begin
  106207. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  106208. end;
  106209. procedure TCAN2_C2FIFOINT11.setRXHALFIF; inline;
  106210. begin
  106211. pTDefRegMap(@Self)^.&set := $00000002;
  106212. end;
  106213. procedure TCAN2_C2FIFOINT11.clearRXHALFIF; inline;
  106214. begin
  106215. pTDefRegMap(@Self)^.clr := $00000002;
  106216. end;
  106217. procedure TCAN2_C2FIFOINT11.setRXHALFIF(thebits : TBits_1); inline;
  106218. begin
  106219. if thebits = 0 then
  106220. pTDefRegMap(@Self)^.clr := $00000002
  106221. else
  106222. pTDefRegMap(@Self)^.&set := $00000002;
  106223. end;
  106224. function TCAN2_C2FIFOINT11.getRXHALFIF : TBits_1; inline;
  106225. begin
  106226. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  106227. end;
  106228. procedure TCAN2_C2FIFOINT11.setRXFULLIF; inline;
  106229. begin
  106230. pTDefRegMap(@Self)^.&set := $00000004;
  106231. end;
  106232. procedure TCAN2_C2FIFOINT11.clearRXFULLIF; inline;
  106233. begin
  106234. pTDefRegMap(@Self)^.clr := $00000004;
  106235. end;
  106236. procedure TCAN2_C2FIFOINT11.setRXFULLIF(thebits : TBits_1); inline;
  106237. begin
  106238. if thebits = 0 then
  106239. pTDefRegMap(@Self)^.clr := $00000004
  106240. else
  106241. pTDefRegMap(@Self)^.&set := $00000004;
  106242. end;
  106243. function TCAN2_C2FIFOINT11.getRXFULLIF : TBits_1; inline;
  106244. begin
  106245. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106246. end;
  106247. procedure TCAN2_C2FIFOINT11.setRXOVFLIF; inline;
  106248. begin
  106249. pTDefRegMap(@Self)^.&set := $00000008;
  106250. end;
  106251. procedure TCAN2_C2FIFOINT11.clearRXOVFLIF; inline;
  106252. begin
  106253. pTDefRegMap(@Self)^.clr := $00000008;
  106254. end;
  106255. procedure TCAN2_C2FIFOINT11.setRXOVFLIF(thebits : TBits_1); inline;
  106256. begin
  106257. if thebits = 0 then
  106258. pTDefRegMap(@Self)^.clr := $00000008
  106259. else
  106260. pTDefRegMap(@Self)^.&set := $00000008;
  106261. end;
  106262. function TCAN2_C2FIFOINT11.getRXOVFLIF : TBits_1; inline;
  106263. begin
  106264. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106265. end;
  106266. procedure TCAN2_C2FIFOINT11.setTXEMPTYIF; inline;
  106267. begin
  106268. pTDefRegMap(@Self)^.&set := $00000100;
  106269. end;
  106270. procedure TCAN2_C2FIFOINT11.clearTXEMPTYIF; inline;
  106271. begin
  106272. pTDefRegMap(@Self)^.clr := $00000100;
  106273. end;
  106274. procedure TCAN2_C2FIFOINT11.setTXEMPTYIF(thebits : TBits_1); inline;
  106275. begin
  106276. if thebits = 0 then
  106277. pTDefRegMap(@Self)^.clr := $00000100
  106278. else
  106279. pTDefRegMap(@Self)^.&set := $00000100;
  106280. end;
  106281. function TCAN2_C2FIFOINT11.getTXEMPTYIF : TBits_1; inline;
  106282. begin
  106283. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  106284. end;
  106285. procedure TCAN2_C2FIFOINT11.setTXHALFIF; inline;
  106286. begin
  106287. pTDefRegMap(@Self)^.&set := $00000200;
  106288. end;
  106289. procedure TCAN2_C2FIFOINT11.clearTXHALFIF; inline;
  106290. begin
  106291. pTDefRegMap(@Self)^.clr := $00000200;
  106292. end;
  106293. procedure TCAN2_C2FIFOINT11.setTXHALFIF(thebits : TBits_1); inline;
  106294. begin
  106295. if thebits = 0 then
  106296. pTDefRegMap(@Self)^.clr := $00000200
  106297. else
  106298. pTDefRegMap(@Self)^.&set := $00000200;
  106299. end;
  106300. function TCAN2_C2FIFOINT11.getTXHALFIF : TBits_1; inline;
  106301. begin
  106302. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  106303. end;
  106304. procedure TCAN2_C2FIFOINT11.setTXNFULLIF; inline;
  106305. begin
  106306. pTDefRegMap(@Self)^.&set := $00000400;
  106307. end;
  106308. procedure TCAN2_C2FIFOINT11.clearTXNFULLIF; inline;
  106309. begin
  106310. pTDefRegMap(@Self)^.clr := $00000400;
  106311. end;
  106312. procedure TCAN2_C2FIFOINT11.setTXNFULLIF(thebits : TBits_1); inline;
  106313. begin
  106314. if thebits = 0 then
  106315. pTDefRegMap(@Self)^.clr := $00000400
  106316. else
  106317. pTDefRegMap(@Self)^.&set := $00000400;
  106318. end;
  106319. function TCAN2_C2FIFOINT11.getTXNFULLIF : TBits_1; inline;
  106320. begin
  106321. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  106322. end;
  106323. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIE; inline;
  106324. begin
  106325. pTDefRegMap(@Self)^.&set := $00010000;
  106326. end;
  106327. procedure TCAN2_C2FIFOINT11.clearRXNEMPTYIE; inline;
  106328. begin
  106329. pTDefRegMap(@Self)^.clr := $00010000;
  106330. end;
  106331. procedure TCAN2_C2FIFOINT11.setRXNEMPTYIE(thebits : TBits_1); inline;
  106332. begin
  106333. if thebits = 0 then
  106334. pTDefRegMap(@Self)^.clr := $00010000
  106335. else
  106336. pTDefRegMap(@Self)^.&set := $00010000;
  106337. end;
  106338. function TCAN2_C2FIFOINT11.getRXNEMPTYIE : TBits_1; inline;
  106339. begin
  106340. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  106341. end;
  106342. procedure TCAN2_C2FIFOINT11.setRXHALFIE; inline;
  106343. begin
  106344. pTDefRegMap(@Self)^.&set := $00020000;
  106345. end;
  106346. procedure TCAN2_C2FIFOINT11.clearRXHALFIE; inline;
  106347. begin
  106348. pTDefRegMap(@Self)^.clr := $00020000;
  106349. end;
  106350. procedure TCAN2_C2FIFOINT11.setRXHALFIE(thebits : TBits_1); inline;
  106351. begin
  106352. if thebits = 0 then
  106353. pTDefRegMap(@Self)^.clr := $00020000
  106354. else
  106355. pTDefRegMap(@Self)^.&set := $00020000;
  106356. end;
  106357. function TCAN2_C2FIFOINT11.getRXHALFIE : TBits_1; inline;
  106358. begin
  106359. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  106360. end;
  106361. procedure TCAN2_C2FIFOINT11.setRXFULLIE; inline;
  106362. begin
  106363. pTDefRegMap(@Self)^.&set := $00040000;
  106364. end;
  106365. procedure TCAN2_C2FIFOINT11.clearRXFULLIE; inline;
  106366. begin
  106367. pTDefRegMap(@Self)^.clr := $00040000;
  106368. end;
  106369. procedure TCAN2_C2FIFOINT11.setRXFULLIE(thebits : TBits_1); inline;
  106370. begin
  106371. if thebits = 0 then
  106372. pTDefRegMap(@Self)^.clr := $00040000
  106373. else
  106374. pTDefRegMap(@Self)^.&set := $00040000;
  106375. end;
  106376. function TCAN2_C2FIFOINT11.getRXFULLIE : TBits_1; inline;
  106377. begin
  106378. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  106379. end;
  106380. procedure TCAN2_C2FIFOINT11.setRXOVFLIE; inline;
  106381. begin
  106382. pTDefRegMap(@Self)^.&set := $00080000;
  106383. end;
  106384. procedure TCAN2_C2FIFOINT11.clearRXOVFLIE; inline;
  106385. begin
  106386. pTDefRegMap(@Self)^.clr := $00080000;
  106387. end;
  106388. procedure TCAN2_C2FIFOINT11.setRXOVFLIE(thebits : TBits_1); inline;
  106389. begin
  106390. if thebits = 0 then
  106391. pTDefRegMap(@Self)^.clr := $00080000
  106392. else
  106393. pTDefRegMap(@Self)^.&set := $00080000;
  106394. end;
  106395. function TCAN2_C2FIFOINT11.getRXOVFLIE : TBits_1; inline;
  106396. begin
  106397. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  106398. end;
  106399. procedure TCAN2_C2FIFOINT11.setTXEMPTYIE; inline;
  106400. begin
  106401. pTDefRegMap(@Self)^.&set := $01000000;
  106402. end;
  106403. procedure TCAN2_C2FIFOINT11.clearTXEMPTYIE; inline;
  106404. begin
  106405. pTDefRegMap(@Self)^.clr := $01000000;
  106406. end;
  106407. procedure TCAN2_C2FIFOINT11.setTXEMPTYIE(thebits : TBits_1); inline;
  106408. begin
  106409. if thebits = 0 then
  106410. pTDefRegMap(@Self)^.clr := $01000000
  106411. else
  106412. pTDefRegMap(@Self)^.&set := $01000000;
  106413. end;
  106414. function TCAN2_C2FIFOINT11.getTXEMPTYIE : TBits_1; inline;
  106415. begin
  106416. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  106417. end;
  106418. procedure TCAN2_C2FIFOINT11.setTXHALFIE; inline;
  106419. begin
  106420. pTDefRegMap(@Self)^.&set := $02000000;
  106421. end;
  106422. procedure TCAN2_C2FIFOINT11.clearTXHALFIE; inline;
  106423. begin
  106424. pTDefRegMap(@Self)^.clr := $02000000;
  106425. end;
  106426. procedure TCAN2_C2FIFOINT11.setTXHALFIE(thebits : TBits_1); inline;
  106427. begin
  106428. if thebits = 0 then
  106429. pTDefRegMap(@Self)^.clr := $02000000
  106430. else
  106431. pTDefRegMap(@Self)^.&set := $02000000;
  106432. end;
  106433. function TCAN2_C2FIFOINT11.getTXHALFIE : TBits_1; inline;
  106434. begin
  106435. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  106436. end;
  106437. procedure TCAN2_C2FIFOINT11.setTXNFULLIE; inline;
  106438. begin
  106439. pTDefRegMap(@Self)^.&set := $04000000;
  106440. end;
  106441. procedure TCAN2_C2FIFOINT11.clearTXNFULLIE; inline;
  106442. begin
  106443. pTDefRegMap(@Self)^.clr := $04000000;
  106444. end;
  106445. procedure TCAN2_C2FIFOINT11.setTXNFULLIE(thebits : TBits_1); inline;
  106446. begin
  106447. if thebits = 0 then
  106448. pTDefRegMap(@Self)^.clr := $04000000
  106449. else
  106450. pTDefRegMap(@Self)^.&set := $04000000;
  106451. end;
  106452. function TCAN2_C2FIFOINT11.getTXNFULLIE : TBits_1; inline;
  106453. begin
  106454. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  106455. end;
  106456. procedure TCAN2_C2FIFOINT11.setw(thebits : TBits_32); inline;
  106457. begin
  106458. pTDefRegMap(@Self)^.val := thebits;
  106459. end;
  106460. function TCAN2_C2FIFOINT11.getw : TBits_32; inline;
  106461. begin
  106462. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106463. end;
  106464. procedure TCAN2_C2FIFOCI11.setCFIFOCI(thebits : TBits_5); inline;
  106465. begin
  106466. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  106467. end;
  106468. function TCAN2_C2FIFOCI11.getCFIFOCI : TBits_5; inline;
  106469. begin
  106470. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  106471. end;
  106472. procedure TCAN2_C2FIFOCI11.setw(thebits : TBits_32); inline;
  106473. begin
  106474. pTDefRegMap(@Self)^.val := thebits;
  106475. end;
  106476. function TCAN2_C2FIFOCI11.getw : TBits_32; inline;
  106477. begin
  106478. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106479. end;
  106480. procedure TCAN2_C2FIFOCON12.setTXPRI(thebits : TBits_2); inline;
  106481. begin
  106482. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  106483. end;
  106484. function TCAN2_C2FIFOCON12.getTXPRI : TBits_2; inline;
  106485. begin
  106486. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  106487. end;
  106488. procedure TCAN2_C2FIFOCON12.setRTREN; inline;
  106489. begin
  106490. pTDefRegMap(@Self)^.&set := $00000004;
  106491. end;
  106492. procedure TCAN2_C2FIFOCON12.clearRTREN; inline;
  106493. begin
  106494. pTDefRegMap(@Self)^.clr := $00000004;
  106495. end;
  106496. procedure TCAN2_C2FIFOCON12.setRTREN(thebits : TBits_1); inline;
  106497. begin
  106498. if thebits = 0 then
  106499. pTDefRegMap(@Self)^.clr := $00000004
  106500. else
  106501. pTDefRegMap(@Self)^.&set := $00000004;
  106502. end;
  106503. function TCAN2_C2FIFOCON12.getRTREN : TBits_1; inline;
  106504. begin
  106505. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106506. end;
  106507. procedure TCAN2_C2FIFOCON12.setTXREQ; inline;
  106508. begin
  106509. pTDefRegMap(@Self)^.&set := $00000008;
  106510. end;
  106511. procedure TCAN2_C2FIFOCON12.clearTXREQ; inline;
  106512. begin
  106513. pTDefRegMap(@Self)^.clr := $00000008;
  106514. end;
  106515. procedure TCAN2_C2FIFOCON12.setTXREQ(thebits : TBits_1); inline;
  106516. begin
  106517. if thebits = 0 then
  106518. pTDefRegMap(@Self)^.clr := $00000008
  106519. else
  106520. pTDefRegMap(@Self)^.&set := $00000008;
  106521. end;
  106522. function TCAN2_C2FIFOCON12.getTXREQ : TBits_1; inline;
  106523. begin
  106524. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106525. end;
  106526. procedure TCAN2_C2FIFOCON12.setTXERR; inline;
  106527. begin
  106528. pTDefRegMap(@Self)^.&set := $00000010;
  106529. end;
  106530. procedure TCAN2_C2FIFOCON12.clearTXERR; inline;
  106531. begin
  106532. pTDefRegMap(@Self)^.clr := $00000010;
  106533. end;
  106534. procedure TCAN2_C2FIFOCON12.setTXERR(thebits : TBits_1); inline;
  106535. begin
  106536. if thebits = 0 then
  106537. pTDefRegMap(@Self)^.clr := $00000010
  106538. else
  106539. pTDefRegMap(@Self)^.&set := $00000010;
  106540. end;
  106541. function TCAN2_C2FIFOCON12.getTXERR : TBits_1; inline;
  106542. begin
  106543. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  106544. end;
  106545. procedure TCAN2_C2FIFOCON12.setTXLARB; inline;
  106546. begin
  106547. pTDefRegMap(@Self)^.&set := $00000020;
  106548. end;
  106549. procedure TCAN2_C2FIFOCON12.clearTXLARB; inline;
  106550. begin
  106551. pTDefRegMap(@Self)^.clr := $00000020;
  106552. end;
  106553. procedure TCAN2_C2FIFOCON12.setTXLARB(thebits : TBits_1); inline;
  106554. begin
  106555. if thebits = 0 then
  106556. pTDefRegMap(@Self)^.clr := $00000020
  106557. else
  106558. pTDefRegMap(@Self)^.&set := $00000020;
  106559. end;
  106560. function TCAN2_C2FIFOCON12.getTXLARB : TBits_1; inline;
  106561. begin
  106562. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  106563. end;
  106564. procedure TCAN2_C2FIFOCON12.setTXABAT; inline;
  106565. begin
  106566. pTDefRegMap(@Self)^.&set := $00000040;
  106567. end;
  106568. procedure TCAN2_C2FIFOCON12.clearTXABAT; inline;
  106569. begin
  106570. pTDefRegMap(@Self)^.clr := $00000040;
  106571. end;
  106572. procedure TCAN2_C2FIFOCON12.setTXABAT(thebits : TBits_1); inline;
  106573. begin
  106574. if thebits = 0 then
  106575. pTDefRegMap(@Self)^.clr := $00000040
  106576. else
  106577. pTDefRegMap(@Self)^.&set := $00000040;
  106578. end;
  106579. function TCAN2_C2FIFOCON12.getTXABAT : TBits_1; inline;
  106580. begin
  106581. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  106582. end;
  106583. procedure TCAN2_C2FIFOCON12.setTXEN; inline;
  106584. begin
  106585. pTDefRegMap(@Self)^.&set := $00000080;
  106586. end;
  106587. procedure TCAN2_C2FIFOCON12.clearTXEN; inline;
  106588. begin
  106589. pTDefRegMap(@Self)^.clr := $00000080;
  106590. end;
  106591. procedure TCAN2_C2FIFOCON12.setTXEN(thebits : TBits_1); inline;
  106592. begin
  106593. if thebits = 0 then
  106594. pTDefRegMap(@Self)^.clr := $00000080
  106595. else
  106596. pTDefRegMap(@Self)^.&set := $00000080;
  106597. end;
  106598. function TCAN2_C2FIFOCON12.getTXEN : TBits_1; inline;
  106599. begin
  106600. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  106601. end;
  106602. procedure TCAN2_C2FIFOCON12.setDONLY; inline;
  106603. begin
  106604. pTDefRegMap(@Self)^.&set := $00001000;
  106605. end;
  106606. procedure TCAN2_C2FIFOCON12.clearDONLY; inline;
  106607. begin
  106608. pTDefRegMap(@Self)^.clr := $00001000;
  106609. end;
  106610. procedure TCAN2_C2FIFOCON12.setDONLY(thebits : TBits_1); inline;
  106611. begin
  106612. if thebits = 0 then
  106613. pTDefRegMap(@Self)^.clr := $00001000
  106614. else
  106615. pTDefRegMap(@Self)^.&set := $00001000;
  106616. end;
  106617. function TCAN2_C2FIFOCON12.getDONLY : TBits_1; inline;
  106618. begin
  106619. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  106620. end;
  106621. procedure TCAN2_C2FIFOCON12.setUINC; inline;
  106622. begin
  106623. pTDefRegMap(@Self)^.&set := $00002000;
  106624. end;
  106625. procedure TCAN2_C2FIFOCON12.clearUINC; inline;
  106626. begin
  106627. pTDefRegMap(@Self)^.clr := $00002000;
  106628. end;
  106629. procedure TCAN2_C2FIFOCON12.setUINC(thebits : TBits_1); inline;
  106630. begin
  106631. if thebits = 0 then
  106632. pTDefRegMap(@Self)^.clr := $00002000
  106633. else
  106634. pTDefRegMap(@Self)^.&set := $00002000;
  106635. end;
  106636. function TCAN2_C2FIFOCON12.getUINC : TBits_1; inline;
  106637. begin
  106638. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  106639. end;
  106640. procedure TCAN2_C2FIFOCON12.setFRESET; inline;
  106641. begin
  106642. pTDefRegMap(@Self)^.&set := $00004000;
  106643. end;
  106644. procedure TCAN2_C2FIFOCON12.clearFRESET; inline;
  106645. begin
  106646. pTDefRegMap(@Self)^.clr := $00004000;
  106647. end;
  106648. procedure TCAN2_C2FIFOCON12.setFRESET(thebits : TBits_1); inline;
  106649. begin
  106650. if thebits = 0 then
  106651. pTDefRegMap(@Self)^.clr := $00004000
  106652. else
  106653. pTDefRegMap(@Self)^.&set := $00004000;
  106654. end;
  106655. function TCAN2_C2FIFOCON12.getFRESET : TBits_1; inline;
  106656. begin
  106657. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  106658. end;
  106659. procedure TCAN2_C2FIFOCON12.setFSIZE(thebits : TBits_5); inline;
  106660. begin
  106661. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  106662. end;
  106663. function TCAN2_C2FIFOCON12.getFSIZE : TBits_5; inline;
  106664. begin
  106665. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  106666. end;
  106667. procedure TCAN2_C2FIFOCON12.setw(thebits : TBits_32); inline;
  106668. begin
  106669. pTDefRegMap(@Self)^.val := thebits;
  106670. end;
  106671. function TCAN2_C2FIFOCON12.getw : TBits_32; inline;
  106672. begin
  106673. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106674. end;
  106675. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIF; inline;
  106676. begin
  106677. pTDefRegMap(@Self)^.&set := $00000001;
  106678. end;
  106679. procedure TCAN2_C2FIFOINT12.clearRXNEMPTYIF; inline;
  106680. begin
  106681. pTDefRegMap(@Self)^.clr := $00000001;
  106682. end;
  106683. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIF(thebits : TBits_1); inline;
  106684. begin
  106685. if thebits = 0 then
  106686. pTDefRegMap(@Self)^.clr := $00000001
  106687. else
  106688. pTDefRegMap(@Self)^.&set := $00000001;
  106689. end;
  106690. function TCAN2_C2FIFOINT12.getRXNEMPTYIF : TBits_1; inline;
  106691. begin
  106692. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  106693. end;
  106694. procedure TCAN2_C2FIFOINT12.setRXHALFIF; inline;
  106695. begin
  106696. pTDefRegMap(@Self)^.&set := $00000002;
  106697. end;
  106698. procedure TCAN2_C2FIFOINT12.clearRXHALFIF; inline;
  106699. begin
  106700. pTDefRegMap(@Self)^.clr := $00000002;
  106701. end;
  106702. procedure TCAN2_C2FIFOINT12.setRXHALFIF(thebits : TBits_1); inline;
  106703. begin
  106704. if thebits = 0 then
  106705. pTDefRegMap(@Self)^.clr := $00000002
  106706. else
  106707. pTDefRegMap(@Self)^.&set := $00000002;
  106708. end;
  106709. function TCAN2_C2FIFOINT12.getRXHALFIF : TBits_1; inline;
  106710. begin
  106711. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  106712. end;
  106713. procedure TCAN2_C2FIFOINT12.setRXFULLIF; inline;
  106714. begin
  106715. pTDefRegMap(@Self)^.&set := $00000004;
  106716. end;
  106717. procedure TCAN2_C2FIFOINT12.clearRXFULLIF; inline;
  106718. begin
  106719. pTDefRegMap(@Self)^.clr := $00000004;
  106720. end;
  106721. procedure TCAN2_C2FIFOINT12.setRXFULLIF(thebits : TBits_1); inline;
  106722. begin
  106723. if thebits = 0 then
  106724. pTDefRegMap(@Self)^.clr := $00000004
  106725. else
  106726. pTDefRegMap(@Self)^.&set := $00000004;
  106727. end;
  106728. function TCAN2_C2FIFOINT12.getRXFULLIF : TBits_1; inline;
  106729. begin
  106730. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106731. end;
  106732. procedure TCAN2_C2FIFOINT12.setRXOVFLIF; inline;
  106733. begin
  106734. pTDefRegMap(@Self)^.&set := $00000008;
  106735. end;
  106736. procedure TCAN2_C2FIFOINT12.clearRXOVFLIF; inline;
  106737. begin
  106738. pTDefRegMap(@Self)^.clr := $00000008;
  106739. end;
  106740. procedure TCAN2_C2FIFOINT12.setRXOVFLIF(thebits : TBits_1); inline;
  106741. begin
  106742. if thebits = 0 then
  106743. pTDefRegMap(@Self)^.clr := $00000008
  106744. else
  106745. pTDefRegMap(@Self)^.&set := $00000008;
  106746. end;
  106747. function TCAN2_C2FIFOINT12.getRXOVFLIF : TBits_1; inline;
  106748. begin
  106749. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  106750. end;
  106751. procedure TCAN2_C2FIFOINT12.setTXEMPTYIF; inline;
  106752. begin
  106753. pTDefRegMap(@Self)^.&set := $00000100;
  106754. end;
  106755. procedure TCAN2_C2FIFOINT12.clearTXEMPTYIF; inline;
  106756. begin
  106757. pTDefRegMap(@Self)^.clr := $00000100;
  106758. end;
  106759. procedure TCAN2_C2FIFOINT12.setTXEMPTYIF(thebits : TBits_1); inline;
  106760. begin
  106761. if thebits = 0 then
  106762. pTDefRegMap(@Self)^.clr := $00000100
  106763. else
  106764. pTDefRegMap(@Self)^.&set := $00000100;
  106765. end;
  106766. function TCAN2_C2FIFOINT12.getTXEMPTYIF : TBits_1; inline;
  106767. begin
  106768. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  106769. end;
  106770. procedure TCAN2_C2FIFOINT12.setTXHALFIF; inline;
  106771. begin
  106772. pTDefRegMap(@Self)^.&set := $00000200;
  106773. end;
  106774. procedure TCAN2_C2FIFOINT12.clearTXHALFIF; inline;
  106775. begin
  106776. pTDefRegMap(@Self)^.clr := $00000200;
  106777. end;
  106778. procedure TCAN2_C2FIFOINT12.setTXHALFIF(thebits : TBits_1); inline;
  106779. begin
  106780. if thebits = 0 then
  106781. pTDefRegMap(@Self)^.clr := $00000200
  106782. else
  106783. pTDefRegMap(@Self)^.&set := $00000200;
  106784. end;
  106785. function TCAN2_C2FIFOINT12.getTXHALFIF : TBits_1; inline;
  106786. begin
  106787. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  106788. end;
  106789. procedure TCAN2_C2FIFOINT12.setTXNFULLIF; inline;
  106790. begin
  106791. pTDefRegMap(@Self)^.&set := $00000400;
  106792. end;
  106793. procedure TCAN2_C2FIFOINT12.clearTXNFULLIF; inline;
  106794. begin
  106795. pTDefRegMap(@Self)^.clr := $00000400;
  106796. end;
  106797. procedure TCAN2_C2FIFOINT12.setTXNFULLIF(thebits : TBits_1); inline;
  106798. begin
  106799. if thebits = 0 then
  106800. pTDefRegMap(@Self)^.clr := $00000400
  106801. else
  106802. pTDefRegMap(@Self)^.&set := $00000400;
  106803. end;
  106804. function TCAN2_C2FIFOINT12.getTXNFULLIF : TBits_1; inline;
  106805. begin
  106806. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  106807. end;
  106808. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIE; inline;
  106809. begin
  106810. pTDefRegMap(@Self)^.&set := $00010000;
  106811. end;
  106812. procedure TCAN2_C2FIFOINT12.clearRXNEMPTYIE; inline;
  106813. begin
  106814. pTDefRegMap(@Self)^.clr := $00010000;
  106815. end;
  106816. procedure TCAN2_C2FIFOINT12.setRXNEMPTYIE(thebits : TBits_1); inline;
  106817. begin
  106818. if thebits = 0 then
  106819. pTDefRegMap(@Self)^.clr := $00010000
  106820. else
  106821. pTDefRegMap(@Self)^.&set := $00010000;
  106822. end;
  106823. function TCAN2_C2FIFOINT12.getRXNEMPTYIE : TBits_1; inline;
  106824. begin
  106825. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  106826. end;
  106827. procedure TCAN2_C2FIFOINT12.setRXHALFIE; inline;
  106828. begin
  106829. pTDefRegMap(@Self)^.&set := $00020000;
  106830. end;
  106831. procedure TCAN2_C2FIFOINT12.clearRXHALFIE; inline;
  106832. begin
  106833. pTDefRegMap(@Self)^.clr := $00020000;
  106834. end;
  106835. procedure TCAN2_C2FIFOINT12.setRXHALFIE(thebits : TBits_1); inline;
  106836. begin
  106837. if thebits = 0 then
  106838. pTDefRegMap(@Self)^.clr := $00020000
  106839. else
  106840. pTDefRegMap(@Self)^.&set := $00020000;
  106841. end;
  106842. function TCAN2_C2FIFOINT12.getRXHALFIE : TBits_1; inline;
  106843. begin
  106844. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  106845. end;
  106846. procedure TCAN2_C2FIFOINT12.setRXFULLIE; inline;
  106847. begin
  106848. pTDefRegMap(@Self)^.&set := $00040000;
  106849. end;
  106850. procedure TCAN2_C2FIFOINT12.clearRXFULLIE; inline;
  106851. begin
  106852. pTDefRegMap(@Self)^.clr := $00040000;
  106853. end;
  106854. procedure TCAN2_C2FIFOINT12.setRXFULLIE(thebits : TBits_1); inline;
  106855. begin
  106856. if thebits = 0 then
  106857. pTDefRegMap(@Self)^.clr := $00040000
  106858. else
  106859. pTDefRegMap(@Self)^.&set := $00040000;
  106860. end;
  106861. function TCAN2_C2FIFOINT12.getRXFULLIE : TBits_1; inline;
  106862. begin
  106863. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  106864. end;
  106865. procedure TCAN2_C2FIFOINT12.setRXOVFLIE; inline;
  106866. begin
  106867. pTDefRegMap(@Self)^.&set := $00080000;
  106868. end;
  106869. procedure TCAN2_C2FIFOINT12.clearRXOVFLIE; inline;
  106870. begin
  106871. pTDefRegMap(@Self)^.clr := $00080000;
  106872. end;
  106873. procedure TCAN2_C2FIFOINT12.setRXOVFLIE(thebits : TBits_1); inline;
  106874. begin
  106875. if thebits = 0 then
  106876. pTDefRegMap(@Self)^.clr := $00080000
  106877. else
  106878. pTDefRegMap(@Self)^.&set := $00080000;
  106879. end;
  106880. function TCAN2_C2FIFOINT12.getRXOVFLIE : TBits_1; inline;
  106881. begin
  106882. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  106883. end;
  106884. procedure TCAN2_C2FIFOINT12.setTXEMPTYIE; inline;
  106885. begin
  106886. pTDefRegMap(@Self)^.&set := $01000000;
  106887. end;
  106888. procedure TCAN2_C2FIFOINT12.clearTXEMPTYIE; inline;
  106889. begin
  106890. pTDefRegMap(@Self)^.clr := $01000000;
  106891. end;
  106892. procedure TCAN2_C2FIFOINT12.setTXEMPTYIE(thebits : TBits_1); inline;
  106893. begin
  106894. if thebits = 0 then
  106895. pTDefRegMap(@Self)^.clr := $01000000
  106896. else
  106897. pTDefRegMap(@Self)^.&set := $01000000;
  106898. end;
  106899. function TCAN2_C2FIFOINT12.getTXEMPTYIE : TBits_1; inline;
  106900. begin
  106901. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  106902. end;
  106903. procedure TCAN2_C2FIFOINT12.setTXHALFIE; inline;
  106904. begin
  106905. pTDefRegMap(@Self)^.&set := $02000000;
  106906. end;
  106907. procedure TCAN2_C2FIFOINT12.clearTXHALFIE; inline;
  106908. begin
  106909. pTDefRegMap(@Self)^.clr := $02000000;
  106910. end;
  106911. procedure TCAN2_C2FIFOINT12.setTXHALFIE(thebits : TBits_1); inline;
  106912. begin
  106913. if thebits = 0 then
  106914. pTDefRegMap(@Self)^.clr := $02000000
  106915. else
  106916. pTDefRegMap(@Self)^.&set := $02000000;
  106917. end;
  106918. function TCAN2_C2FIFOINT12.getTXHALFIE : TBits_1; inline;
  106919. begin
  106920. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  106921. end;
  106922. procedure TCAN2_C2FIFOINT12.setTXNFULLIE; inline;
  106923. begin
  106924. pTDefRegMap(@Self)^.&set := $04000000;
  106925. end;
  106926. procedure TCAN2_C2FIFOINT12.clearTXNFULLIE; inline;
  106927. begin
  106928. pTDefRegMap(@Self)^.clr := $04000000;
  106929. end;
  106930. procedure TCAN2_C2FIFOINT12.setTXNFULLIE(thebits : TBits_1); inline;
  106931. begin
  106932. if thebits = 0 then
  106933. pTDefRegMap(@Self)^.clr := $04000000
  106934. else
  106935. pTDefRegMap(@Self)^.&set := $04000000;
  106936. end;
  106937. function TCAN2_C2FIFOINT12.getTXNFULLIE : TBits_1; inline;
  106938. begin
  106939. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  106940. end;
  106941. procedure TCAN2_C2FIFOINT12.setw(thebits : TBits_32); inline;
  106942. begin
  106943. pTDefRegMap(@Self)^.val := thebits;
  106944. end;
  106945. function TCAN2_C2FIFOINT12.getw : TBits_32; inline;
  106946. begin
  106947. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106948. end;
  106949. procedure TCAN2_C2FIFOCI12.setCFIFOCI(thebits : TBits_5); inline;
  106950. begin
  106951. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  106952. end;
  106953. function TCAN2_C2FIFOCI12.getCFIFOCI : TBits_5; inline;
  106954. begin
  106955. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  106956. end;
  106957. procedure TCAN2_C2FIFOCI12.setw(thebits : TBits_32); inline;
  106958. begin
  106959. pTDefRegMap(@Self)^.val := thebits;
  106960. end;
  106961. function TCAN2_C2FIFOCI12.getw : TBits_32; inline;
  106962. begin
  106963. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  106964. end;
  106965. procedure TCAN2_C2FIFOCON13.setTXPRI(thebits : TBits_2); inline;
  106966. begin
  106967. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  106968. end;
  106969. function TCAN2_C2FIFOCON13.getTXPRI : TBits_2; inline;
  106970. begin
  106971. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  106972. end;
  106973. procedure TCAN2_C2FIFOCON13.setRTREN; inline;
  106974. begin
  106975. pTDefRegMap(@Self)^.&set := $00000004;
  106976. end;
  106977. procedure TCAN2_C2FIFOCON13.clearRTREN; inline;
  106978. begin
  106979. pTDefRegMap(@Self)^.clr := $00000004;
  106980. end;
  106981. procedure TCAN2_C2FIFOCON13.setRTREN(thebits : TBits_1); inline;
  106982. begin
  106983. if thebits = 0 then
  106984. pTDefRegMap(@Self)^.clr := $00000004
  106985. else
  106986. pTDefRegMap(@Self)^.&set := $00000004;
  106987. end;
  106988. function TCAN2_C2FIFOCON13.getRTREN : TBits_1; inline;
  106989. begin
  106990. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  106991. end;
  106992. procedure TCAN2_C2FIFOCON13.setTXREQ; inline;
  106993. begin
  106994. pTDefRegMap(@Self)^.&set := $00000008;
  106995. end;
  106996. procedure TCAN2_C2FIFOCON13.clearTXREQ; inline;
  106997. begin
  106998. pTDefRegMap(@Self)^.clr := $00000008;
  106999. end;
  107000. procedure TCAN2_C2FIFOCON13.setTXREQ(thebits : TBits_1); inline;
  107001. begin
  107002. if thebits = 0 then
  107003. pTDefRegMap(@Self)^.clr := $00000008
  107004. else
  107005. pTDefRegMap(@Self)^.&set := $00000008;
  107006. end;
  107007. function TCAN2_C2FIFOCON13.getTXREQ : TBits_1; inline;
  107008. begin
  107009. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107010. end;
  107011. procedure TCAN2_C2FIFOCON13.setTXERR; inline;
  107012. begin
  107013. pTDefRegMap(@Self)^.&set := $00000010;
  107014. end;
  107015. procedure TCAN2_C2FIFOCON13.clearTXERR; inline;
  107016. begin
  107017. pTDefRegMap(@Self)^.clr := $00000010;
  107018. end;
  107019. procedure TCAN2_C2FIFOCON13.setTXERR(thebits : TBits_1); inline;
  107020. begin
  107021. if thebits = 0 then
  107022. pTDefRegMap(@Self)^.clr := $00000010
  107023. else
  107024. pTDefRegMap(@Self)^.&set := $00000010;
  107025. end;
  107026. function TCAN2_C2FIFOCON13.getTXERR : TBits_1; inline;
  107027. begin
  107028. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  107029. end;
  107030. procedure TCAN2_C2FIFOCON13.setTXLARB; inline;
  107031. begin
  107032. pTDefRegMap(@Self)^.&set := $00000020;
  107033. end;
  107034. procedure TCAN2_C2FIFOCON13.clearTXLARB; inline;
  107035. begin
  107036. pTDefRegMap(@Self)^.clr := $00000020;
  107037. end;
  107038. procedure TCAN2_C2FIFOCON13.setTXLARB(thebits : TBits_1); inline;
  107039. begin
  107040. if thebits = 0 then
  107041. pTDefRegMap(@Self)^.clr := $00000020
  107042. else
  107043. pTDefRegMap(@Self)^.&set := $00000020;
  107044. end;
  107045. function TCAN2_C2FIFOCON13.getTXLARB : TBits_1; inline;
  107046. begin
  107047. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  107048. end;
  107049. procedure TCAN2_C2FIFOCON13.setTXABAT; inline;
  107050. begin
  107051. pTDefRegMap(@Self)^.&set := $00000040;
  107052. end;
  107053. procedure TCAN2_C2FIFOCON13.clearTXABAT; inline;
  107054. begin
  107055. pTDefRegMap(@Self)^.clr := $00000040;
  107056. end;
  107057. procedure TCAN2_C2FIFOCON13.setTXABAT(thebits : TBits_1); inline;
  107058. begin
  107059. if thebits = 0 then
  107060. pTDefRegMap(@Self)^.clr := $00000040
  107061. else
  107062. pTDefRegMap(@Self)^.&set := $00000040;
  107063. end;
  107064. function TCAN2_C2FIFOCON13.getTXABAT : TBits_1; inline;
  107065. begin
  107066. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  107067. end;
  107068. procedure TCAN2_C2FIFOCON13.setTXEN; inline;
  107069. begin
  107070. pTDefRegMap(@Self)^.&set := $00000080;
  107071. end;
  107072. procedure TCAN2_C2FIFOCON13.clearTXEN; inline;
  107073. begin
  107074. pTDefRegMap(@Self)^.clr := $00000080;
  107075. end;
  107076. procedure TCAN2_C2FIFOCON13.setTXEN(thebits : TBits_1); inline;
  107077. begin
  107078. if thebits = 0 then
  107079. pTDefRegMap(@Self)^.clr := $00000080
  107080. else
  107081. pTDefRegMap(@Self)^.&set := $00000080;
  107082. end;
  107083. function TCAN2_C2FIFOCON13.getTXEN : TBits_1; inline;
  107084. begin
  107085. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  107086. end;
  107087. procedure TCAN2_C2FIFOCON13.setDONLY; inline;
  107088. begin
  107089. pTDefRegMap(@Self)^.&set := $00001000;
  107090. end;
  107091. procedure TCAN2_C2FIFOCON13.clearDONLY; inline;
  107092. begin
  107093. pTDefRegMap(@Self)^.clr := $00001000;
  107094. end;
  107095. procedure TCAN2_C2FIFOCON13.setDONLY(thebits : TBits_1); inline;
  107096. begin
  107097. if thebits = 0 then
  107098. pTDefRegMap(@Self)^.clr := $00001000
  107099. else
  107100. pTDefRegMap(@Self)^.&set := $00001000;
  107101. end;
  107102. function TCAN2_C2FIFOCON13.getDONLY : TBits_1; inline;
  107103. begin
  107104. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  107105. end;
  107106. procedure TCAN2_C2FIFOCON13.setUINC; inline;
  107107. begin
  107108. pTDefRegMap(@Self)^.&set := $00002000;
  107109. end;
  107110. procedure TCAN2_C2FIFOCON13.clearUINC; inline;
  107111. begin
  107112. pTDefRegMap(@Self)^.clr := $00002000;
  107113. end;
  107114. procedure TCAN2_C2FIFOCON13.setUINC(thebits : TBits_1); inline;
  107115. begin
  107116. if thebits = 0 then
  107117. pTDefRegMap(@Self)^.clr := $00002000
  107118. else
  107119. pTDefRegMap(@Self)^.&set := $00002000;
  107120. end;
  107121. function TCAN2_C2FIFOCON13.getUINC : TBits_1; inline;
  107122. begin
  107123. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  107124. end;
  107125. procedure TCAN2_C2FIFOCON13.setFRESET; inline;
  107126. begin
  107127. pTDefRegMap(@Self)^.&set := $00004000;
  107128. end;
  107129. procedure TCAN2_C2FIFOCON13.clearFRESET; inline;
  107130. begin
  107131. pTDefRegMap(@Self)^.clr := $00004000;
  107132. end;
  107133. procedure TCAN2_C2FIFOCON13.setFRESET(thebits : TBits_1); inline;
  107134. begin
  107135. if thebits = 0 then
  107136. pTDefRegMap(@Self)^.clr := $00004000
  107137. else
  107138. pTDefRegMap(@Self)^.&set := $00004000;
  107139. end;
  107140. function TCAN2_C2FIFOCON13.getFRESET : TBits_1; inline;
  107141. begin
  107142. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  107143. end;
  107144. procedure TCAN2_C2FIFOCON13.setFSIZE(thebits : TBits_5); inline;
  107145. begin
  107146. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  107147. end;
  107148. function TCAN2_C2FIFOCON13.getFSIZE : TBits_5; inline;
  107149. begin
  107150. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  107151. end;
  107152. procedure TCAN2_C2FIFOCON13.setw(thebits : TBits_32); inline;
  107153. begin
  107154. pTDefRegMap(@Self)^.val := thebits;
  107155. end;
  107156. function TCAN2_C2FIFOCON13.getw : TBits_32; inline;
  107157. begin
  107158. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107159. end;
  107160. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIF; inline;
  107161. begin
  107162. pTDefRegMap(@Self)^.&set := $00000001;
  107163. end;
  107164. procedure TCAN2_C2FIFOINT13.clearRXNEMPTYIF; inline;
  107165. begin
  107166. pTDefRegMap(@Self)^.clr := $00000001;
  107167. end;
  107168. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIF(thebits : TBits_1); inline;
  107169. begin
  107170. if thebits = 0 then
  107171. pTDefRegMap(@Self)^.clr := $00000001
  107172. else
  107173. pTDefRegMap(@Self)^.&set := $00000001;
  107174. end;
  107175. function TCAN2_C2FIFOINT13.getRXNEMPTYIF : TBits_1; inline;
  107176. begin
  107177. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  107178. end;
  107179. procedure TCAN2_C2FIFOINT13.setRXHALFIF; inline;
  107180. begin
  107181. pTDefRegMap(@Self)^.&set := $00000002;
  107182. end;
  107183. procedure TCAN2_C2FIFOINT13.clearRXHALFIF; inline;
  107184. begin
  107185. pTDefRegMap(@Self)^.clr := $00000002;
  107186. end;
  107187. procedure TCAN2_C2FIFOINT13.setRXHALFIF(thebits : TBits_1); inline;
  107188. begin
  107189. if thebits = 0 then
  107190. pTDefRegMap(@Self)^.clr := $00000002
  107191. else
  107192. pTDefRegMap(@Self)^.&set := $00000002;
  107193. end;
  107194. function TCAN2_C2FIFOINT13.getRXHALFIF : TBits_1; inline;
  107195. begin
  107196. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  107197. end;
  107198. procedure TCAN2_C2FIFOINT13.setRXFULLIF; inline;
  107199. begin
  107200. pTDefRegMap(@Self)^.&set := $00000004;
  107201. end;
  107202. procedure TCAN2_C2FIFOINT13.clearRXFULLIF; inline;
  107203. begin
  107204. pTDefRegMap(@Self)^.clr := $00000004;
  107205. end;
  107206. procedure TCAN2_C2FIFOINT13.setRXFULLIF(thebits : TBits_1); inline;
  107207. begin
  107208. if thebits = 0 then
  107209. pTDefRegMap(@Self)^.clr := $00000004
  107210. else
  107211. pTDefRegMap(@Self)^.&set := $00000004;
  107212. end;
  107213. function TCAN2_C2FIFOINT13.getRXFULLIF : TBits_1; inline;
  107214. begin
  107215. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107216. end;
  107217. procedure TCAN2_C2FIFOINT13.setRXOVFLIF; inline;
  107218. begin
  107219. pTDefRegMap(@Self)^.&set := $00000008;
  107220. end;
  107221. procedure TCAN2_C2FIFOINT13.clearRXOVFLIF; inline;
  107222. begin
  107223. pTDefRegMap(@Self)^.clr := $00000008;
  107224. end;
  107225. procedure TCAN2_C2FIFOINT13.setRXOVFLIF(thebits : TBits_1); inline;
  107226. begin
  107227. if thebits = 0 then
  107228. pTDefRegMap(@Self)^.clr := $00000008
  107229. else
  107230. pTDefRegMap(@Self)^.&set := $00000008;
  107231. end;
  107232. function TCAN2_C2FIFOINT13.getRXOVFLIF : TBits_1; inline;
  107233. begin
  107234. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107235. end;
  107236. procedure TCAN2_C2FIFOINT13.setTXEMPTYIF; inline;
  107237. begin
  107238. pTDefRegMap(@Self)^.&set := $00000100;
  107239. end;
  107240. procedure TCAN2_C2FIFOINT13.clearTXEMPTYIF; inline;
  107241. begin
  107242. pTDefRegMap(@Self)^.clr := $00000100;
  107243. end;
  107244. procedure TCAN2_C2FIFOINT13.setTXEMPTYIF(thebits : TBits_1); inline;
  107245. begin
  107246. if thebits = 0 then
  107247. pTDefRegMap(@Self)^.clr := $00000100
  107248. else
  107249. pTDefRegMap(@Self)^.&set := $00000100;
  107250. end;
  107251. function TCAN2_C2FIFOINT13.getTXEMPTYIF : TBits_1; inline;
  107252. begin
  107253. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  107254. end;
  107255. procedure TCAN2_C2FIFOINT13.setTXHALFIF; inline;
  107256. begin
  107257. pTDefRegMap(@Self)^.&set := $00000200;
  107258. end;
  107259. procedure TCAN2_C2FIFOINT13.clearTXHALFIF; inline;
  107260. begin
  107261. pTDefRegMap(@Self)^.clr := $00000200;
  107262. end;
  107263. procedure TCAN2_C2FIFOINT13.setTXHALFIF(thebits : TBits_1); inline;
  107264. begin
  107265. if thebits = 0 then
  107266. pTDefRegMap(@Self)^.clr := $00000200
  107267. else
  107268. pTDefRegMap(@Self)^.&set := $00000200;
  107269. end;
  107270. function TCAN2_C2FIFOINT13.getTXHALFIF : TBits_1; inline;
  107271. begin
  107272. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  107273. end;
  107274. procedure TCAN2_C2FIFOINT13.setTXNFULLIF; inline;
  107275. begin
  107276. pTDefRegMap(@Self)^.&set := $00000400;
  107277. end;
  107278. procedure TCAN2_C2FIFOINT13.clearTXNFULLIF; inline;
  107279. begin
  107280. pTDefRegMap(@Self)^.clr := $00000400;
  107281. end;
  107282. procedure TCAN2_C2FIFOINT13.setTXNFULLIF(thebits : TBits_1); inline;
  107283. begin
  107284. if thebits = 0 then
  107285. pTDefRegMap(@Self)^.clr := $00000400
  107286. else
  107287. pTDefRegMap(@Self)^.&set := $00000400;
  107288. end;
  107289. function TCAN2_C2FIFOINT13.getTXNFULLIF : TBits_1; inline;
  107290. begin
  107291. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  107292. end;
  107293. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIE; inline;
  107294. begin
  107295. pTDefRegMap(@Self)^.&set := $00010000;
  107296. end;
  107297. procedure TCAN2_C2FIFOINT13.clearRXNEMPTYIE; inline;
  107298. begin
  107299. pTDefRegMap(@Self)^.clr := $00010000;
  107300. end;
  107301. procedure TCAN2_C2FIFOINT13.setRXNEMPTYIE(thebits : TBits_1); inline;
  107302. begin
  107303. if thebits = 0 then
  107304. pTDefRegMap(@Self)^.clr := $00010000
  107305. else
  107306. pTDefRegMap(@Self)^.&set := $00010000;
  107307. end;
  107308. function TCAN2_C2FIFOINT13.getRXNEMPTYIE : TBits_1; inline;
  107309. begin
  107310. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  107311. end;
  107312. procedure TCAN2_C2FIFOINT13.setRXHALFIE; inline;
  107313. begin
  107314. pTDefRegMap(@Self)^.&set := $00020000;
  107315. end;
  107316. procedure TCAN2_C2FIFOINT13.clearRXHALFIE; inline;
  107317. begin
  107318. pTDefRegMap(@Self)^.clr := $00020000;
  107319. end;
  107320. procedure TCAN2_C2FIFOINT13.setRXHALFIE(thebits : TBits_1); inline;
  107321. begin
  107322. if thebits = 0 then
  107323. pTDefRegMap(@Self)^.clr := $00020000
  107324. else
  107325. pTDefRegMap(@Self)^.&set := $00020000;
  107326. end;
  107327. function TCAN2_C2FIFOINT13.getRXHALFIE : TBits_1; inline;
  107328. begin
  107329. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  107330. end;
  107331. procedure TCAN2_C2FIFOINT13.setRXFULLIE; inline;
  107332. begin
  107333. pTDefRegMap(@Self)^.&set := $00040000;
  107334. end;
  107335. procedure TCAN2_C2FIFOINT13.clearRXFULLIE; inline;
  107336. begin
  107337. pTDefRegMap(@Self)^.clr := $00040000;
  107338. end;
  107339. procedure TCAN2_C2FIFOINT13.setRXFULLIE(thebits : TBits_1); inline;
  107340. begin
  107341. if thebits = 0 then
  107342. pTDefRegMap(@Self)^.clr := $00040000
  107343. else
  107344. pTDefRegMap(@Self)^.&set := $00040000;
  107345. end;
  107346. function TCAN2_C2FIFOINT13.getRXFULLIE : TBits_1; inline;
  107347. begin
  107348. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  107349. end;
  107350. procedure TCAN2_C2FIFOINT13.setRXOVFLIE; inline;
  107351. begin
  107352. pTDefRegMap(@Self)^.&set := $00080000;
  107353. end;
  107354. procedure TCAN2_C2FIFOINT13.clearRXOVFLIE; inline;
  107355. begin
  107356. pTDefRegMap(@Self)^.clr := $00080000;
  107357. end;
  107358. procedure TCAN2_C2FIFOINT13.setRXOVFLIE(thebits : TBits_1); inline;
  107359. begin
  107360. if thebits = 0 then
  107361. pTDefRegMap(@Self)^.clr := $00080000
  107362. else
  107363. pTDefRegMap(@Self)^.&set := $00080000;
  107364. end;
  107365. function TCAN2_C2FIFOINT13.getRXOVFLIE : TBits_1; inline;
  107366. begin
  107367. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  107368. end;
  107369. procedure TCAN2_C2FIFOINT13.setTXEMPTYIE; inline;
  107370. begin
  107371. pTDefRegMap(@Self)^.&set := $01000000;
  107372. end;
  107373. procedure TCAN2_C2FIFOINT13.clearTXEMPTYIE; inline;
  107374. begin
  107375. pTDefRegMap(@Self)^.clr := $01000000;
  107376. end;
  107377. procedure TCAN2_C2FIFOINT13.setTXEMPTYIE(thebits : TBits_1); inline;
  107378. begin
  107379. if thebits = 0 then
  107380. pTDefRegMap(@Self)^.clr := $01000000
  107381. else
  107382. pTDefRegMap(@Self)^.&set := $01000000;
  107383. end;
  107384. function TCAN2_C2FIFOINT13.getTXEMPTYIE : TBits_1; inline;
  107385. begin
  107386. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  107387. end;
  107388. procedure TCAN2_C2FIFOINT13.setTXHALFIE; inline;
  107389. begin
  107390. pTDefRegMap(@Self)^.&set := $02000000;
  107391. end;
  107392. procedure TCAN2_C2FIFOINT13.clearTXHALFIE; inline;
  107393. begin
  107394. pTDefRegMap(@Self)^.clr := $02000000;
  107395. end;
  107396. procedure TCAN2_C2FIFOINT13.setTXHALFIE(thebits : TBits_1); inline;
  107397. begin
  107398. if thebits = 0 then
  107399. pTDefRegMap(@Self)^.clr := $02000000
  107400. else
  107401. pTDefRegMap(@Self)^.&set := $02000000;
  107402. end;
  107403. function TCAN2_C2FIFOINT13.getTXHALFIE : TBits_1; inline;
  107404. begin
  107405. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  107406. end;
  107407. procedure TCAN2_C2FIFOINT13.setTXNFULLIE; inline;
  107408. begin
  107409. pTDefRegMap(@Self)^.&set := $04000000;
  107410. end;
  107411. procedure TCAN2_C2FIFOINT13.clearTXNFULLIE; inline;
  107412. begin
  107413. pTDefRegMap(@Self)^.clr := $04000000;
  107414. end;
  107415. procedure TCAN2_C2FIFOINT13.setTXNFULLIE(thebits : TBits_1); inline;
  107416. begin
  107417. if thebits = 0 then
  107418. pTDefRegMap(@Self)^.clr := $04000000
  107419. else
  107420. pTDefRegMap(@Self)^.&set := $04000000;
  107421. end;
  107422. function TCAN2_C2FIFOINT13.getTXNFULLIE : TBits_1; inline;
  107423. begin
  107424. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  107425. end;
  107426. procedure TCAN2_C2FIFOINT13.setw(thebits : TBits_32); inline;
  107427. begin
  107428. pTDefRegMap(@Self)^.val := thebits;
  107429. end;
  107430. function TCAN2_C2FIFOINT13.getw : TBits_32; inline;
  107431. begin
  107432. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107433. end;
  107434. procedure TCAN2_C2FIFOCI13.setCFIFOCI(thebits : TBits_5); inline;
  107435. begin
  107436. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  107437. end;
  107438. function TCAN2_C2FIFOCI13.getCFIFOCI : TBits_5; inline;
  107439. begin
  107440. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  107441. end;
  107442. procedure TCAN2_C2FIFOCI13.setw(thebits : TBits_32); inline;
  107443. begin
  107444. pTDefRegMap(@Self)^.val := thebits;
  107445. end;
  107446. function TCAN2_C2FIFOCI13.getw : TBits_32; inline;
  107447. begin
  107448. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107449. end;
  107450. procedure TCAN2_C2FIFOCON14.setTXPRI(thebits : TBits_2); inline;
  107451. begin
  107452. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  107453. end;
  107454. function TCAN2_C2FIFOCON14.getTXPRI : TBits_2; inline;
  107455. begin
  107456. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  107457. end;
  107458. procedure TCAN2_C2FIFOCON14.setRTREN; inline;
  107459. begin
  107460. pTDefRegMap(@Self)^.&set := $00000004;
  107461. end;
  107462. procedure TCAN2_C2FIFOCON14.clearRTREN; inline;
  107463. begin
  107464. pTDefRegMap(@Self)^.clr := $00000004;
  107465. end;
  107466. procedure TCAN2_C2FIFOCON14.setRTREN(thebits : TBits_1); inline;
  107467. begin
  107468. if thebits = 0 then
  107469. pTDefRegMap(@Self)^.clr := $00000004
  107470. else
  107471. pTDefRegMap(@Self)^.&set := $00000004;
  107472. end;
  107473. function TCAN2_C2FIFOCON14.getRTREN : TBits_1; inline;
  107474. begin
  107475. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107476. end;
  107477. procedure TCAN2_C2FIFOCON14.setTXREQ; inline;
  107478. begin
  107479. pTDefRegMap(@Self)^.&set := $00000008;
  107480. end;
  107481. procedure TCAN2_C2FIFOCON14.clearTXREQ; inline;
  107482. begin
  107483. pTDefRegMap(@Self)^.clr := $00000008;
  107484. end;
  107485. procedure TCAN2_C2FIFOCON14.setTXREQ(thebits : TBits_1); inline;
  107486. begin
  107487. if thebits = 0 then
  107488. pTDefRegMap(@Self)^.clr := $00000008
  107489. else
  107490. pTDefRegMap(@Self)^.&set := $00000008;
  107491. end;
  107492. function TCAN2_C2FIFOCON14.getTXREQ : TBits_1; inline;
  107493. begin
  107494. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107495. end;
  107496. procedure TCAN2_C2FIFOCON14.setTXERR; inline;
  107497. begin
  107498. pTDefRegMap(@Self)^.&set := $00000010;
  107499. end;
  107500. procedure TCAN2_C2FIFOCON14.clearTXERR; inline;
  107501. begin
  107502. pTDefRegMap(@Self)^.clr := $00000010;
  107503. end;
  107504. procedure TCAN2_C2FIFOCON14.setTXERR(thebits : TBits_1); inline;
  107505. begin
  107506. if thebits = 0 then
  107507. pTDefRegMap(@Self)^.clr := $00000010
  107508. else
  107509. pTDefRegMap(@Self)^.&set := $00000010;
  107510. end;
  107511. function TCAN2_C2FIFOCON14.getTXERR : TBits_1; inline;
  107512. begin
  107513. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  107514. end;
  107515. procedure TCAN2_C2FIFOCON14.setTXLARB; inline;
  107516. begin
  107517. pTDefRegMap(@Self)^.&set := $00000020;
  107518. end;
  107519. procedure TCAN2_C2FIFOCON14.clearTXLARB; inline;
  107520. begin
  107521. pTDefRegMap(@Self)^.clr := $00000020;
  107522. end;
  107523. procedure TCAN2_C2FIFOCON14.setTXLARB(thebits : TBits_1); inline;
  107524. begin
  107525. if thebits = 0 then
  107526. pTDefRegMap(@Self)^.clr := $00000020
  107527. else
  107528. pTDefRegMap(@Self)^.&set := $00000020;
  107529. end;
  107530. function TCAN2_C2FIFOCON14.getTXLARB : TBits_1; inline;
  107531. begin
  107532. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  107533. end;
  107534. procedure TCAN2_C2FIFOCON14.setTXABAT; inline;
  107535. begin
  107536. pTDefRegMap(@Self)^.&set := $00000040;
  107537. end;
  107538. procedure TCAN2_C2FIFOCON14.clearTXABAT; inline;
  107539. begin
  107540. pTDefRegMap(@Self)^.clr := $00000040;
  107541. end;
  107542. procedure TCAN2_C2FIFOCON14.setTXABAT(thebits : TBits_1); inline;
  107543. begin
  107544. if thebits = 0 then
  107545. pTDefRegMap(@Self)^.clr := $00000040
  107546. else
  107547. pTDefRegMap(@Self)^.&set := $00000040;
  107548. end;
  107549. function TCAN2_C2FIFOCON14.getTXABAT : TBits_1; inline;
  107550. begin
  107551. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  107552. end;
  107553. procedure TCAN2_C2FIFOCON14.setTXEN; inline;
  107554. begin
  107555. pTDefRegMap(@Self)^.&set := $00000080;
  107556. end;
  107557. procedure TCAN2_C2FIFOCON14.clearTXEN; inline;
  107558. begin
  107559. pTDefRegMap(@Self)^.clr := $00000080;
  107560. end;
  107561. procedure TCAN2_C2FIFOCON14.setTXEN(thebits : TBits_1); inline;
  107562. begin
  107563. if thebits = 0 then
  107564. pTDefRegMap(@Self)^.clr := $00000080
  107565. else
  107566. pTDefRegMap(@Self)^.&set := $00000080;
  107567. end;
  107568. function TCAN2_C2FIFOCON14.getTXEN : TBits_1; inline;
  107569. begin
  107570. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  107571. end;
  107572. procedure TCAN2_C2FIFOCON14.setDONLY; inline;
  107573. begin
  107574. pTDefRegMap(@Self)^.&set := $00001000;
  107575. end;
  107576. procedure TCAN2_C2FIFOCON14.clearDONLY; inline;
  107577. begin
  107578. pTDefRegMap(@Self)^.clr := $00001000;
  107579. end;
  107580. procedure TCAN2_C2FIFOCON14.setDONLY(thebits : TBits_1); inline;
  107581. begin
  107582. if thebits = 0 then
  107583. pTDefRegMap(@Self)^.clr := $00001000
  107584. else
  107585. pTDefRegMap(@Self)^.&set := $00001000;
  107586. end;
  107587. function TCAN2_C2FIFOCON14.getDONLY : TBits_1; inline;
  107588. begin
  107589. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  107590. end;
  107591. procedure TCAN2_C2FIFOCON14.setUINC; inline;
  107592. begin
  107593. pTDefRegMap(@Self)^.&set := $00002000;
  107594. end;
  107595. procedure TCAN2_C2FIFOCON14.clearUINC; inline;
  107596. begin
  107597. pTDefRegMap(@Self)^.clr := $00002000;
  107598. end;
  107599. procedure TCAN2_C2FIFOCON14.setUINC(thebits : TBits_1); inline;
  107600. begin
  107601. if thebits = 0 then
  107602. pTDefRegMap(@Self)^.clr := $00002000
  107603. else
  107604. pTDefRegMap(@Self)^.&set := $00002000;
  107605. end;
  107606. function TCAN2_C2FIFOCON14.getUINC : TBits_1; inline;
  107607. begin
  107608. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  107609. end;
  107610. procedure TCAN2_C2FIFOCON14.setFRESET; inline;
  107611. begin
  107612. pTDefRegMap(@Self)^.&set := $00004000;
  107613. end;
  107614. procedure TCAN2_C2FIFOCON14.clearFRESET; inline;
  107615. begin
  107616. pTDefRegMap(@Self)^.clr := $00004000;
  107617. end;
  107618. procedure TCAN2_C2FIFOCON14.setFRESET(thebits : TBits_1); inline;
  107619. begin
  107620. if thebits = 0 then
  107621. pTDefRegMap(@Self)^.clr := $00004000
  107622. else
  107623. pTDefRegMap(@Self)^.&set := $00004000;
  107624. end;
  107625. function TCAN2_C2FIFOCON14.getFRESET : TBits_1; inline;
  107626. begin
  107627. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  107628. end;
  107629. procedure TCAN2_C2FIFOCON14.setFSIZE(thebits : TBits_5); inline;
  107630. begin
  107631. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  107632. end;
  107633. function TCAN2_C2FIFOCON14.getFSIZE : TBits_5; inline;
  107634. begin
  107635. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  107636. end;
  107637. procedure TCAN2_C2FIFOCON14.setw(thebits : TBits_32); inline;
  107638. begin
  107639. pTDefRegMap(@Self)^.val := thebits;
  107640. end;
  107641. function TCAN2_C2FIFOCON14.getw : TBits_32; inline;
  107642. begin
  107643. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107644. end;
  107645. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIF; inline;
  107646. begin
  107647. pTDefRegMap(@Self)^.&set := $00000001;
  107648. end;
  107649. procedure TCAN2_C2FIFOINT14.clearRXNEMPTYIF; inline;
  107650. begin
  107651. pTDefRegMap(@Self)^.clr := $00000001;
  107652. end;
  107653. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIF(thebits : TBits_1); inline;
  107654. begin
  107655. if thebits = 0 then
  107656. pTDefRegMap(@Self)^.clr := $00000001
  107657. else
  107658. pTDefRegMap(@Self)^.&set := $00000001;
  107659. end;
  107660. function TCAN2_C2FIFOINT14.getRXNEMPTYIF : TBits_1; inline;
  107661. begin
  107662. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  107663. end;
  107664. procedure TCAN2_C2FIFOINT14.setRXHALFIF; inline;
  107665. begin
  107666. pTDefRegMap(@Self)^.&set := $00000002;
  107667. end;
  107668. procedure TCAN2_C2FIFOINT14.clearRXHALFIF; inline;
  107669. begin
  107670. pTDefRegMap(@Self)^.clr := $00000002;
  107671. end;
  107672. procedure TCAN2_C2FIFOINT14.setRXHALFIF(thebits : TBits_1); inline;
  107673. begin
  107674. if thebits = 0 then
  107675. pTDefRegMap(@Self)^.clr := $00000002
  107676. else
  107677. pTDefRegMap(@Self)^.&set := $00000002;
  107678. end;
  107679. function TCAN2_C2FIFOINT14.getRXHALFIF : TBits_1; inline;
  107680. begin
  107681. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  107682. end;
  107683. procedure TCAN2_C2FIFOINT14.setRXFULLIF; inline;
  107684. begin
  107685. pTDefRegMap(@Self)^.&set := $00000004;
  107686. end;
  107687. procedure TCAN2_C2FIFOINT14.clearRXFULLIF; inline;
  107688. begin
  107689. pTDefRegMap(@Self)^.clr := $00000004;
  107690. end;
  107691. procedure TCAN2_C2FIFOINT14.setRXFULLIF(thebits : TBits_1); inline;
  107692. begin
  107693. if thebits = 0 then
  107694. pTDefRegMap(@Self)^.clr := $00000004
  107695. else
  107696. pTDefRegMap(@Self)^.&set := $00000004;
  107697. end;
  107698. function TCAN2_C2FIFOINT14.getRXFULLIF : TBits_1; inline;
  107699. begin
  107700. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107701. end;
  107702. procedure TCAN2_C2FIFOINT14.setRXOVFLIF; inline;
  107703. begin
  107704. pTDefRegMap(@Self)^.&set := $00000008;
  107705. end;
  107706. procedure TCAN2_C2FIFOINT14.clearRXOVFLIF; inline;
  107707. begin
  107708. pTDefRegMap(@Self)^.clr := $00000008;
  107709. end;
  107710. procedure TCAN2_C2FIFOINT14.setRXOVFLIF(thebits : TBits_1); inline;
  107711. begin
  107712. if thebits = 0 then
  107713. pTDefRegMap(@Self)^.clr := $00000008
  107714. else
  107715. pTDefRegMap(@Self)^.&set := $00000008;
  107716. end;
  107717. function TCAN2_C2FIFOINT14.getRXOVFLIF : TBits_1; inline;
  107718. begin
  107719. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107720. end;
  107721. procedure TCAN2_C2FIFOINT14.setTXEMPTYIF; inline;
  107722. begin
  107723. pTDefRegMap(@Self)^.&set := $00000100;
  107724. end;
  107725. procedure TCAN2_C2FIFOINT14.clearTXEMPTYIF; inline;
  107726. begin
  107727. pTDefRegMap(@Self)^.clr := $00000100;
  107728. end;
  107729. procedure TCAN2_C2FIFOINT14.setTXEMPTYIF(thebits : TBits_1); inline;
  107730. begin
  107731. if thebits = 0 then
  107732. pTDefRegMap(@Self)^.clr := $00000100
  107733. else
  107734. pTDefRegMap(@Self)^.&set := $00000100;
  107735. end;
  107736. function TCAN2_C2FIFOINT14.getTXEMPTYIF : TBits_1; inline;
  107737. begin
  107738. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  107739. end;
  107740. procedure TCAN2_C2FIFOINT14.setTXHALFIF; inline;
  107741. begin
  107742. pTDefRegMap(@Self)^.&set := $00000200;
  107743. end;
  107744. procedure TCAN2_C2FIFOINT14.clearTXHALFIF; inline;
  107745. begin
  107746. pTDefRegMap(@Self)^.clr := $00000200;
  107747. end;
  107748. procedure TCAN2_C2FIFOINT14.setTXHALFIF(thebits : TBits_1); inline;
  107749. begin
  107750. if thebits = 0 then
  107751. pTDefRegMap(@Self)^.clr := $00000200
  107752. else
  107753. pTDefRegMap(@Self)^.&set := $00000200;
  107754. end;
  107755. function TCAN2_C2FIFOINT14.getTXHALFIF : TBits_1; inline;
  107756. begin
  107757. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  107758. end;
  107759. procedure TCAN2_C2FIFOINT14.setTXNFULLIF; inline;
  107760. begin
  107761. pTDefRegMap(@Self)^.&set := $00000400;
  107762. end;
  107763. procedure TCAN2_C2FIFOINT14.clearTXNFULLIF; inline;
  107764. begin
  107765. pTDefRegMap(@Self)^.clr := $00000400;
  107766. end;
  107767. procedure TCAN2_C2FIFOINT14.setTXNFULLIF(thebits : TBits_1); inline;
  107768. begin
  107769. if thebits = 0 then
  107770. pTDefRegMap(@Self)^.clr := $00000400
  107771. else
  107772. pTDefRegMap(@Self)^.&set := $00000400;
  107773. end;
  107774. function TCAN2_C2FIFOINT14.getTXNFULLIF : TBits_1; inline;
  107775. begin
  107776. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  107777. end;
  107778. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIE; inline;
  107779. begin
  107780. pTDefRegMap(@Self)^.&set := $00010000;
  107781. end;
  107782. procedure TCAN2_C2FIFOINT14.clearRXNEMPTYIE; inline;
  107783. begin
  107784. pTDefRegMap(@Self)^.clr := $00010000;
  107785. end;
  107786. procedure TCAN2_C2FIFOINT14.setRXNEMPTYIE(thebits : TBits_1); inline;
  107787. begin
  107788. if thebits = 0 then
  107789. pTDefRegMap(@Self)^.clr := $00010000
  107790. else
  107791. pTDefRegMap(@Self)^.&set := $00010000;
  107792. end;
  107793. function TCAN2_C2FIFOINT14.getRXNEMPTYIE : TBits_1; inline;
  107794. begin
  107795. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  107796. end;
  107797. procedure TCAN2_C2FIFOINT14.setRXHALFIE; inline;
  107798. begin
  107799. pTDefRegMap(@Self)^.&set := $00020000;
  107800. end;
  107801. procedure TCAN2_C2FIFOINT14.clearRXHALFIE; inline;
  107802. begin
  107803. pTDefRegMap(@Self)^.clr := $00020000;
  107804. end;
  107805. procedure TCAN2_C2FIFOINT14.setRXHALFIE(thebits : TBits_1); inline;
  107806. begin
  107807. if thebits = 0 then
  107808. pTDefRegMap(@Self)^.clr := $00020000
  107809. else
  107810. pTDefRegMap(@Self)^.&set := $00020000;
  107811. end;
  107812. function TCAN2_C2FIFOINT14.getRXHALFIE : TBits_1; inline;
  107813. begin
  107814. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  107815. end;
  107816. procedure TCAN2_C2FIFOINT14.setRXFULLIE; inline;
  107817. begin
  107818. pTDefRegMap(@Self)^.&set := $00040000;
  107819. end;
  107820. procedure TCAN2_C2FIFOINT14.clearRXFULLIE; inline;
  107821. begin
  107822. pTDefRegMap(@Self)^.clr := $00040000;
  107823. end;
  107824. procedure TCAN2_C2FIFOINT14.setRXFULLIE(thebits : TBits_1); inline;
  107825. begin
  107826. if thebits = 0 then
  107827. pTDefRegMap(@Self)^.clr := $00040000
  107828. else
  107829. pTDefRegMap(@Self)^.&set := $00040000;
  107830. end;
  107831. function TCAN2_C2FIFOINT14.getRXFULLIE : TBits_1; inline;
  107832. begin
  107833. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  107834. end;
  107835. procedure TCAN2_C2FIFOINT14.setRXOVFLIE; inline;
  107836. begin
  107837. pTDefRegMap(@Self)^.&set := $00080000;
  107838. end;
  107839. procedure TCAN2_C2FIFOINT14.clearRXOVFLIE; inline;
  107840. begin
  107841. pTDefRegMap(@Self)^.clr := $00080000;
  107842. end;
  107843. procedure TCAN2_C2FIFOINT14.setRXOVFLIE(thebits : TBits_1); inline;
  107844. begin
  107845. if thebits = 0 then
  107846. pTDefRegMap(@Self)^.clr := $00080000
  107847. else
  107848. pTDefRegMap(@Self)^.&set := $00080000;
  107849. end;
  107850. function TCAN2_C2FIFOINT14.getRXOVFLIE : TBits_1; inline;
  107851. begin
  107852. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  107853. end;
  107854. procedure TCAN2_C2FIFOINT14.setTXEMPTYIE; inline;
  107855. begin
  107856. pTDefRegMap(@Self)^.&set := $01000000;
  107857. end;
  107858. procedure TCAN2_C2FIFOINT14.clearTXEMPTYIE; inline;
  107859. begin
  107860. pTDefRegMap(@Self)^.clr := $01000000;
  107861. end;
  107862. procedure TCAN2_C2FIFOINT14.setTXEMPTYIE(thebits : TBits_1); inline;
  107863. begin
  107864. if thebits = 0 then
  107865. pTDefRegMap(@Self)^.clr := $01000000
  107866. else
  107867. pTDefRegMap(@Self)^.&set := $01000000;
  107868. end;
  107869. function TCAN2_C2FIFOINT14.getTXEMPTYIE : TBits_1; inline;
  107870. begin
  107871. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  107872. end;
  107873. procedure TCAN2_C2FIFOINT14.setTXHALFIE; inline;
  107874. begin
  107875. pTDefRegMap(@Self)^.&set := $02000000;
  107876. end;
  107877. procedure TCAN2_C2FIFOINT14.clearTXHALFIE; inline;
  107878. begin
  107879. pTDefRegMap(@Self)^.clr := $02000000;
  107880. end;
  107881. procedure TCAN2_C2FIFOINT14.setTXHALFIE(thebits : TBits_1); inline;
  107882. begin
  107883. if thebits = 0 then
  107884. pTDefRegMap(@Self)^.clr := $02000000
  107885. else
  107886. pTDefRegMap(@Self)^.&set := $02000000;
  107887. end;
  107888. function TCAN2_C2FIFOINT14.getTXHALFIE : TBits_1; inline;
  107889. begin
  107890. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  107891. end;
  107892. procedure TCAN2_C2FIFOINT14.setTXNFULLIE; inline;
  107893. begin
  107894. pTDefRegMap(@Self)^.&set := $04000000;
  107895. end;
  107896. procedure TCAN2_C2FIFOINT14.clearTXNFULLIE; inline;
  107897. begin
  107898. pTDefRegMap(@Self)^.clr := $04000000;
  107899. end;
  107900. procedure TCAN2_C2FIFOINT14.setTXNFULLIE(thebits : TBits_1); inline;
  107901. begin
  107902. if thebits = 0 then
  107903. pTDefRegMap(@Self)^.clr := $04000000
  107904. else
  107905. pTDefRegMap(@Self)^.&set := $04000000;
  107906. end;
  107907. function TCAN2_C2FIFOINT14.getTXNFULLIE : TBits_1; inline;
  107908. begin
  107909. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  107910. end;
  107911. procedure TCAN2_C2FIFOINT14.setw(thebits : TBits_32); inline;
  107912. begin
  107913. pTDefRegMap(@Self)^.val := thebits;
  107914. end;
  107915. function TCAN2_C2FIFOINT14.getw : TBits_32; inline;
  107916. begin
  107917. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107918. end;
  107919. procedure TCAN2_C2FIFOCI14.setCFIFOCI(thebits : TBits_5); inline;
  107920. begin
  107921. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  107922. end;
  107923. function TCAN2_C2FIFOCI14.getCFIFOCI : TBits_5; inline;
  107924. begin
  107925. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  107926. end;
  107927. procedure TCAN2_C2FIFOCI14.setw(thebits : TBits_32); inline;
  107928. begin
  107929. pTDefRegMap(@Self)^.val := thebits;
  107930. end;
  107931. function TCAN2_C2FIFOCI14.getw : TBits_32; inline;
  107932. begin
  107933. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  107934. end;
  107935. procedure TCAN2_C2FIFOCON15.setTXPRI(thebits : TBits_2); inline;
  107936. begin
  107937. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  107938. end;
  107939. function TCAN2_C2FIFOCON15.getTXPRI : TBits_2; inline;
  107940. begin
  107941. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  107942. end;
  107943. procedure TCAN2_C2FIFOCON15.setRTREN; inline;
  107944. begin
  107945. pTDefRegMap(@Self)^.&set := $00000004;
  107946. end;
  107947. procedure TCAN2_C2FIFOCON15.clearRTREN; inline;
  107948. begin
  107949. pTDefRegMap(@Self)^.clr := $00000004;
  107950. end;
  107951. procedure TCAN2_C2FIFOCON15.setRTREN(thebits : TBits_1); inline;
  107952. begin
  107953. if thebits = 0 then
  107954. pTDefRegMap(@Self)^.clr := $00000004
  107955. else
  107956. pTDefRegMap(@Self)^.&set := $00000004;
  107957. end;
  107958. function TCAN2_C2FIFOCON15.getRTREN : TBits_1; inline;
  107959. begin
  107960. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  107961. end;
  107962. procedure TCAN2_C2FIFOCON15.setTXREQ; inline;
  107963. begin
  107964. pTDefRegMap(@Self)^.&set := $00000008;
  107965. end;
  107966. procedure TCAN2_C2FIFOCON15.clearTXREQ; inline;
  107967. begin
  107968. pTDefRegMap(@Self)^.clr := $00000008;
  107969. end;
  107970. procedure TCAN2_C2FIFOCON15.setTXREQ(thebits : TBits_1); inline;
  107971. begin
  107972. if thebits = 0 then
  107973. pTDefRegMap(@Self)^.clr := $00000008
  107974. else
  107975. pTDefRegMap(@Self)^.&set := $00000008;
  107976. end;
  107977. function TCAN2_C2FIFOCON15.getTXREQ : TBits_1; inline;
  107978. begin
  107979. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  107980. end;
  107981. procedure TCAN2_C2FIFOCON15.setTXERR; inline;
  107982. begin
  107983. pTDefRegMap(@Self)^.&set := $00000010;
  107984. end;
  107985. procedure TCAN2_C2FIFOCON15.clearTXERR; inline;
  107986. begin
  107987. pTDefRegMap(@Self)^.clr := $00000010;
  107988. end;
  107989. procedure TCAN2_C2FIFOCON15.setTXERR(thebits : TBits_1); inline;
  107990. begin
  107991. if thebits = 0 then
  107992. pTDefRegMap(@Self)^.clr := $00000010
  107993. else
  107994. pTDefRegMap(@Self)^.&set := $00000010;
  107995. end;
  107996. function TCAN2_C2FIFOCON15.getTXERR : TBits_1; inline;
  107997. begin
  107998. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  107999. end;
  108000. procedure TCAN2_C2FIFOCON15.setTXLARB; inline;
  108001. begin
  108002. pTDefRegMap(@Self)^.&set := $00000020;
  108003. end;
  108004. procedure TCAN2_C2FIFOCON15.clearTXLARB; inline;
  108005. begin
  108006. pTDefRegMap(@Self)^.clr := $00000020;
  108007. end;
  108008. procedure TCAN2_C2FIFOCON15.setTXLARB(thebits : TBits_1); inline;
  108009. begin
  108010. if thebits = 0 then
  108011. pTDefRegMap(@Self)^.clr := $00000020
  108012. else
  108013. pTDefRegMap(@Self)^.&set := $00000020;
  108014. end;
  108015. function TCAN2_C2FIFOCON15.getTXLARB : TBits_1; inline;
  108016. begin
  108017. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  108018. end;
  108019. procedure TCAN2_C2FIFOCON15.setTXABAT; inline;
  108020. begin
  108021. pTDefRegMap(@Self)^.&set := $00000040;
  108022. end;
  108023. procedure TCAN2_C2FIFOCON15.clearTXABAT; inline;
  108024. begin
  108025. pTDefRegMap(@Self)^.clr := $00000040;
  108026. end;
  108027. procedure TCAN2_C2FIFOCON15.setTXABAT(thebits : TBits_1); inline;
  108028. begin
  108029. if thebits = 0 then
  108030. pTDefRegMap(@Self)^.clr := $00000040
  108031. else
  108032. pTDefRegMap(@Self)^.&set := $00000040;
  108033. end;
  108034. function TCAN2_C2FIFOCON15.getTXABAT : TBits_1; inline;
  108035. begin
  108036. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  108037. end;
  108038. procedure TCAN2_C2FIFOCON15.setTXEN; inline;
  108039. begin
  108040. pTDefRegMap(@Self)^.&set := $00000080;
  108041. end;
  108042. procedure TCAN2_C2FIFOCON15.clearTXEN; inline;
  108043. begin
  108044. pTDefRegMap(@Self)^.clr := $00000080;
  108045. end;
  108046. procedure TCAN2_C2FIFOCON15.setTXEN(thebits : TBits_1); inline;
  108047. begin
  108048. if thebits = 0 then
  108049. pTDefRegMap(@Self)^.clr := $00000080
  108050. else
  108051. pTDefRegMap(@Self)^.&set := $00000080;
  108052. end;
  108053. function TCAN2_C2FIFOCON15.getTXEN : TBits_1; inline;
  108054. begin
  108055. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  108056. end;
  108057. procedure TCAN2_C2FIFOCON15.setDONLY; inline;
  108058. begin
  108059. pTDefRegMap(@Self)^.&set := $00001000;
  108060. end;
  108061. procedure TCAN2_C2FIFOCON15.clearDONLY; inline;
  108062. begin
  108063. pTDefRegMap(@Self)^.clr := $00001000;
  108064. end;
  108065. procedure TCAN2_C2FIFOCON15.setDONLY(thebits : TBits_1); inline;
  108066. begin
  108067. if thebits = 0 then
  108068. pTDefRegMap(@Self)^.clr := $00001000
  108069. else
  108070. pTDefRegMap(@Self)^.&set := $00001000;
  108071. end;
  108072. function TCAN2_C2FIFOCON15.getDONLY : TBits_1; inline;
  108073. begin
  108074. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  108075. end;
  108076. procedure TCAN2_C2FIFOCON15.setUINC; inline;
  108077. begin
  108078. pTDefRegMap(@Self)^.&set := $00002000;
  108079. end;
  108080. procedure TCAN2_C2FIFOCON15.clearUINC; inline;
  108081. begin
  108082. pTDefRegMap(@Self)^.clr := $00002000;
  108083. end;
  108084. procedure TCAN2_C2FIFOCON15.setUINC(thebits : TBits_1); inline;
  108085. begin
  108086. if thebits = 0 then
  108087. pTDefRegMap(@Self)^.clr := $00002000
  108088. else
  108089. pTDefRegMap(@Self)^.&set := $00002000;
  108090. end;
  108091. function TCAN2_C2FIFOCON15.getUINC : TBits_1; inline;
  108092. begin
  108093. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  108094. end;
  108095. procedure TCAN2_C2FIFOCON15.setFRESET; inline;
  108096. begin
  108097. pTDefRegMap(@Self)^.&set := $00004000;
  108098. end;
  108099. procedure TCAN2_C2FIFOCON15.clearFRESET; inline;
  108100. begin
  108101. pTDefRegMap(@Self)^.clr := $00004000;
  108102. end;
  108103. procedure TCAN2_C2FIFOCON15.setFRESET(thebits : TBits_1); inline;
  108104. begin
  108105. if thebits = 0 then
  108106. pTDefRegMap(@Self)^.clr := $00004000
  108107. else
  108108. pTDefRegMap(@Self)^.&set := $00004000;
  108109. end;
  108110. function TCAN2_C2FIFOCON15.getFRESET : TBits_1; inline;
  108111. begin
  108112. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  108113. end;
  108114. procedure TCAN2_C2FIFOCON15.setFSIZE(thebits : TBits_5); inline;
  108115. begin
  108116. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  108117. end;
  108118. function TCAN2_C2FIFOCON15.getFSIZE : TBits_5; inline;
  108119. begin
  108120. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  108121. end;
  108122. procedure TCAN2_C2FIFOCON15.setw(thebits : TBits_32); inline;
  108123. begin
  108124. pTDefRegMap(@Self)^.val := thebits;
  108125. end;
  108126. function TCAN2_C2FIFOCON15.getw : TBits_32; inline;
  108127. begin
  108128. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108129. end;
  108130. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIF; inline;
  108131. begin
  108132. pTDefRegMap(@Self)^.&set := $00000001;
  108133. end;
  108134. procedure TCAN2_C2FIFOINT15.clearRXNEMPTYIF; inline;
  108135. begin
  108136. pTDefRegMap(@Self)^.clr := $00000001;
  108137. end;
  108138. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIF(thebits : TBits_1); inline;
  108139. begin
  108140. if thebits = 0 then
  108141. pTDefRegMap(@Self)^.clr := $00000001
  108142. else
  108143. pTDefRegMap(@Self)^.&set := $00000001;
  108144. end;
  108145. function TCAN2_C2FIFOINT15.getRXNEMPTYIF : TBits_1; inline;
  108146. begin
  108147. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  108148. end;
  108149. procedure TCAN2_C2FIFOINT15.setRXHALFIF; inline;
  108150. begin
  108151. pTDefRegMap(@Self)^.&set := $00000002;
  108152. end;
  108153. procedure TCAN2_C2FIFOINT15.clearRXHALFIF; inline;
  108154. begin
  108155. pTDefRegMap(@Self)^.clr := $00000002;
  108156. end;
  108157. procedure TCAN2_C2FIFOINT15.setRXHALFIF(thebits : TBits_1); inline;
  108158. begin
  108159. if thebits = 0 then
  108160. pTDefRegMap(@Self)^.clr := $00000002
  108161. else
  108162. pTDefRegMap(@Self)^.&set := $00000002;
  108163. end;
  108164. function TCAN2_C2FIFOINT15.getRXHALFIF : TBits_1; inline;
  108165. begin
  108166. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  108167. end;
  108168. procedure TCAN2_C2FIFOINT15.setRXFULLIF; inline;
  108169. begin
  108170. pTDefRegMap(@Self)^.&set := $00000004;
  108171. end;
  108172. procedure TCAN2_C2FIFOINT15.clearRXFULLIF; inline;
  108173. begin
  108174. pTDefRegMap(@Self)^.clr := $00000004;
  108175. end;
  108176. procedure TCAN2_C2FIFOINT15.setRXFULLIF(thebits : TBits_1); inline;
  108177. begin
  108178. if thebits = 0 then
  108179. pTDefRegMap(@Self)^.clr := $00000004
  108180. else
  108181. pTDefRegMap(@Self)^.&set := $00000004;
  108182. end;
  108183. function TCAN2_C2FIFOINT15.getRXFULLIF : TBits_1; inline;
  108184. begin
  108185. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108186. end;
  108187. procedure TCAN2_C2FIFOINT15.setRXOVFLIF; inline;
  108188. begin
  108189. pTDefRegMap(@Self)^.&set := $00000008;
  108190. end;
  108191. procedure TCAN2_C2FIFOINT15.clearRXOVFLIF; inline;
  108192. begin
  108193. pTDefRegMap(@Self)^.clr := $00000008;
  108194. end;
  108195. procedure TCAN2_C2FIFOINT15.setRXOVFLIF(thebits : TBits_1); inline;
  108196. begin
  108197. if thebits = 0 then
  108198. pTDefRegMap(@Self)^.clr := $00000008
  108199. else
  108200. pTDefRegMap(@Self)^.&set := $00000008;
  108201. end;
  108202. function TCAN2_C2FIFOINT15.getRXOVFLIF : TBits_1; inline;
  108203. begin
  108204. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108205. end;
  108206. procedure TCAN2_C2FIFOINT15.setTXEMPTYIF; inline;
  108207. begin
  108208. pTDefRegMap(@Self)^.&set := $00000100;
  108209. end;
  108210. procedure TCAN2_C2FIFOINT15.clearTXEMPTYIF; inline;
  108211. begin
  108212. pTDefRegMap(@Self)^.clr := $00000100;
  108213. end;
  108214. procedure TCAN2_C2FIFOINT15.setTXEMPTYIF(thebits : TBits_1); inline;
  108215. begin
  108216. if thebits = 0 then
  108217. pTDefRegMap(@Self)^.clr := $00000100
  108218. else
  108219. pTDefRegMap(@Self)^.&set := $00000100;
  108220. end;
  108221. function TCAN2_C2FIFOINT15.getTXEMPTYIF : TBits_1; inline;
  108222. begin
  108223. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  108224. end;
  108225. procedure TCAN2_C2FIFOINT15.setTXHALFIF; inline;
  108226. begin
  108227. pTDefRegMap(@Self)^.&set := $00000200;
  108228. end;
  108229. procedure TCAN2_C2FIFOINT15.clearTXHALFIF; inline;
  108230. begin
  108231. pTDefRegMap(@Self)^.clr := $00000200;
  108232. end;
  108233. procedure TCAN2_C2FIFOINT15.setTXHALFIF(thebits : TBits_1); inline;
  108234. begin
  108235. if thebits = 0 then
  108236. pTDefRegMap(@Self)^.clr := $00000200
  108237. else
  108238. pTDefRegMap(@Self)^.&set := $00000200;
  108239. end;
  108240. function TCAN2_C2FIFOINT15.getTXHALFIF : TBits_1; inline;
  108241. begin
  108242. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  108243. end;
  108244. procedure TCAN2_C2FIFOINT15.setTXNFULLIF; inline;
  108245. begin
  108246. pTDefRegMap(@Self)^.&set := $00000400;
  108247. end;
  108248. procedure TCAN2_C2FIFOINT15.clearTXNFULLIF; inline;
  108249. begin
  108250. pTDefRegMap(@Self)^.clr := $00000400;
  108251. end;
  108252. procedure TCAN2_C2FIFOINT15.setTXNFULLIF(thebits : TBits_1); inline;
  108253. begin
  108254. if thebits = 0 then
  108255. pTDefRegMap(@Self)^.clr := $00000400
  108256. else
  108257. pTDefRegMap(@Self)^.&set := $00000400;
  108258. end;
  108259. function TCAN2_C2FIFOINT15.getTXNFULLIF : TBits_1; inline;
  108260. begin
  108261. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  108262. end;
  108263. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIE; inline;
  108264. begin
  108265. pTDefRegMap(@Self)^.&set := $00010000;
  108266. end;
  108267. procedure TCAN2_C2FIFOINT15.clearRXNEMPTYIE; inline;
  108268. begin
  108269. pTDefRegMap(@Self)^.clr := $00010000;
  108270. end;
  108271. procedure TCAN2_C2FIFOINT15.setRXNEMPTYIE(thebits : TBits_1); inline;
  108272. begin
  108273. if thebits = 0 then
  108274. pTDefRegMap(@Self)^.clr := $00010000
  108275. else
  108276. pTDefRegMap(@Self)^.&set := $00010000;
  108277. end;
  108278. function TCAN2_C2FIFOINT15.getRXNEMPTYIE : TBits_1; inline;
  108279. begin
  108280. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  108281. end;
  108282. procedure TCAN2_C2FIFOINT15.setRXHALFIE; inline;
  108283. begin
  108284. pTDefRegMap(@Self)^.&set := $00020000;
  108285. end;
  108286. procedure TCAN2_C2FIFOINT15.clearRXHALFIE; inline;
  108287. begin
  108288. pTDefRegMap(@Self)^.clr := $00020000;
  108289. end;
  108290. procedure TCAN2_C2FIFOINT15.setRXHALFIE(thebits : TBits_1); inline;
  108291. begin
  108292. if thebits = 0 then
  108293. pTDefRegMap(@Self)^.clr := $00020000
  108294. else
  108295. pTDefRegMap(@Self)^.&set := $00020000;
  108296. end;
  108297. function TCAN2_C2FIFOINT15.getRXHALFIE : TBits_1; inline;
  108298. begin
  108299. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  108300. end;
  108301. procedure TCAN2_C2FIFOINT15.setRXFULLIE; inline;
  108302. begin
  108303. pTDefRegMap(@Self)^.&set := $00040000;
  108304. end;
  108305. procedure TCAN2_C2FIFOINT15.clearRXFULLIE; inline;
  108306. begin
  108307. pTDefRegMap(@Self)^.clr := $00040000;
  108308. end;
  108309. procedure TCAN2_C2FIFOINT15.setRXFULLIE(thebits : TBits_1); inline;
  108310. begin
  108311. if thebits = 0 then
  108312. pTDefRegMap(@Self)^.clr := $00040000
  108313. else
  108314. pTDefRegMap(@Self)^.&set := $00040000;
  108315. end;
  108316. function TCAN2_C2FIFOINT15.getRXFULLIE : TBits_1; inline;
  108317. begin
  108318. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  108319. end;
  108320. procedure TCAN2_C2FIFOINT15.setRXOVFLIE; inline;
  108321. begin
  108322. pTDefRegMap(@Self)^.&set := $00080000;
  108323. end;
  108324. procedure TCAN2_C2FIFOINT15.clearRXOVFLIE; inline;
  108325. begin
  108326. pTDefRegMap(@Self)^.clr := $00080000;
  108327. end;
  108328. procedure TCAN2_C2FIFOINT15.setRXOVFLIE(thebits : TBits_1); inline;
  108329. begin
  108330. if thebits = 0 then
  108331. pTDefRegMap(@Self)^.clr := $00080000
  108332. else
  108333. pTDefRegMap(@Self)^.&set := $00080000;
  108334. end;
  108335. function TCAN2_C2FIFOINT15.getRXOVFLIE : TBits_1; inline;
  108336. begin
  108337. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  108338. end;
  108339. procedure TCAN2_C2FIFOINT15.setTXEMPTYIE; inline;
  108340. begin
  108341. pTDefRegMap(@Self)^.&set := $01000000;
  108342. end;
  108343. procedure TCAN2_C2FIFOINT15.clearTXEMPTYIE; inline;
  108344. begin
  108345. pTDefRegMap(@Self)^.clr := $01000000;
  108346. end;
  108347. procedure TCAN2_C2FIFOINT15.setTXEMPTYIE(thebits : TBits_1); inline;
  108348. begin
  108349. if thebits = 0 then
  108350. pTDefRegMap(@Self)^.clr := $01000000
  108351. else
  108352. pTDefRegMap(@Self)^.&set := $01000000;
  108353. end;
  108354. function TCAN2_C2FIFOINT15.getTXEMPTYIE : TBits_1; inline;
  108355. begin
  108356. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  108357. end;
  108358. procedure TCAN2_C2FIFOINT15.setTXHALFIE; inline;
  108359. begin
  108360. pTDefRegMap(@Self)^.&set := $02000000;
  108361. end;
  108362. procedure TCAN2_C2FIFOINT15.clearTXHALFIE; inline;
  108363. begin
  108364. pTDefRegMap(@Self)^.clr := $02000000;
  108365. end;
  108366. procedure TCAN2_C2FIFOINT15.setTXHALFIE(thebits : TBits_1); inline;
  108367. begin
  108368. if thebits = 0 then
  108369. pTDefRegMap(@Self)^.clr := $02000000
  108370. else
  108371. pTDefRegMap(@Self)^.&set := $02000000;
  108372. end;
  108373. function TCAN2_C2FIFOINT15.getTXHALFIE : TBits_1; inline;
  108374. begin
  108375. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  108376. end;
  108377. procedure TCAN2_C2FIFOINT15.setTXNFULLIE; inline;
  108378. begin
  108379. pTDefRegMap(@Self)^.&set := $04000000;
  108380. end;
  108381. procedure TCAN2_C2FIFOINT15.clearTXNFULLIE; inline;
  108382. begin
  108383. pTDefRegMap(@Self)^.clr := $04000000;
  108384. end;
  108385. procedure TCAN2_C2FIFOINT15.setTXNFULLIE(thebits : TBits_1); inline;
  108386. begin
  108387. if thebits = 0 then
  108388. pTDefRegMap(@Self)^.clr := $04000000
  108389. else
  108390. pTDefRegMap(@Self)^.&set := $04000000;
  108391. end;
  108392. function TCAN2_C2FIFOINT15.getTXNFULLIE : TBits_1; inline;
  108393. begin
  108394. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  108395. end;
  108396. procedure TCAN2_C2FIFOINT15.setw(thebits : TBits_32); inline;
  108397. begin
  108398. pTDefRegMap(@Self)^.val := thebits;
  108399. end;
  108400. function TCAN2_C2FIFOINT15.getw : TBits_32; inline;
  108401. begin
  108402. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108403. end;
  108404. procedure TCAN2_C2FIFOCI15.setCFIFOCI(thebits : TBits_5); inline;
  108405. begin
  108406. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  108407. end;
  108408. function TCAN2_C2FIFOCI15.getCFIFOCI : TBits_5; inline;
  108409. begin
  108410. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  108411. end;
  108412. procedure TCAN2_C2FIFOCI15.setw(thebits : TBits_32); inline;
  108413. begin
  108414. pTDefRegMap(@Self)^.val := thebits;
  108415. end;
  108416. function TCAN2_C2FIFOCI15.getw : TBits_32; inline;
  108417. begin
  108418. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108419. end;
  108420. procedure TCAN2_C2FIFOCON16.setTXPRI(thebits : TBits_2); inline;
  108421. begin
  108422. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  108423. end;
  108424. function TCAN2_C2FIFOCON16.getTXPRI : TBits_2; inline;
  108425. begin
  108426. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  108427. end;
  108428. procedure TCAN2_C2FIFOCON16.setRTREN; inline;
  108429. begin
  108430. pTDefRegMap(@Self)^.&set := $00000004;
  108431. end;
  108432. procedure TCAN2_C2FIFOCON16.clearRTREN; inline;
  108433. begin
  108434. pTDefRegMap(@Self)^.clr := $00000004;
  108435. end;
  108436. procedure TCAN2_C2FIFOCON16.setRTREN(thebits : TBits_1); inline;
  108437. begin
  108438. if thebits = 0 then
  108439. pTDefRegMap(@Self)^.clr := $00000004
  108440. else
  108441. pTDefRegMap(@Self)^.&set := $00000004;
  108442. end;
  108443. function TCAN2_C2FIFOCON16.getRTREN : TBits_1; inline;
  108444. begin
  108445. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108446. end;
  108447. procedure TCAN2_C2FIFOCON16.setTXREQ; inline;
  108448. begin
  108449. pTDefRegMap(@Self)^.&set := $00000008;
  108450. end;
  108451. procedure TCAN2_C2FIFOCON16.clearTXREQ; inline;
  108452. begin
  108453. pTDefRegMap(@Self)^.clr := $00000008;
  108454. end;
  108455. procedure TCAN2_C2FIFOCON16.setTXREQ(thebits : TBits_1); inline;
  108456. begin
  108457. if thebits = 0 then
  108458. pTDefRegMap(@Self)^.clr := $00000008
  108459. else
  108460. pTDefRegMap(@Self)^.&set := $00000008;
  108461. end;
  108462. function TCAN2_C2FIFOCON16.getTXREQ : TBits_1; inline;
  108463. begin
  108464. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108465. end;
  108466. procedure TCAN2_C2FIFOCON16.setTXERR; inline;
  108467. begin
  108468. pTDefRegMap(@Self)^.&set := $00000010;
  108469. end;
  108470. procedure TCAN2_C2FIFOCON16.clearTXERR; inline;
  108471. begin
  108472. pTDefRegMap(@Self)^.clr := $00000010;
  108473. end;
  108474. procedure TCAN2_C2FIFOCON16.setTXERR(thebits : TBits_1); inline;
  108475. begin
  108476. if thebits = 0 then
  108477. pTDefRegMap(@Self)^.clr := $00000010
  108478. else
  108479. pTDefRegMap(@Self)^.&set := $00000010;
  108480. end;
  108481. function TCAN2_C2FIFOCON16.getTXERR : TBits_1; inline;
  108482. begin
  108483. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  108484. end;
  108485. procedure TCAN2_C2FIFOCON16.setTXLARB; inline;
  108486. begin
  108487. pTDefRegMap(@Self)^.&set := $00000020;
  108488. end;
  108489. procedure TCAN2_C2FIFOCON16.clearTXLARB; inline;
  108490. begin
  108491. pTDefRegMap(@Self)^.clr := $00000020;
  108492. end;
  108493. procedure TCAN2_C2FIFOCON16.setTXLARB(thebits : TBits_1); inline;
  108494. begin
  108495. if thebits = 0 then
  108496. pTDefRegMap(@Self)^.clr := $00000020
  108497. else
  108498. pTDefRegMap(@Self)^.&set := $00000020;
  108499. end;
  108500. function TCAN2_C2FIFOCON16.getTXLARB : TBits_1; inline;
  108501. begin
  108502. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  108503. end;
  108504. procedure TCAN2_C2FIFOCON16.setTXABAT; inline;
  108505. begin
  108506. pTDefRegMap(@Self)^.&set := $00000040;
  108507. end;
  108508. procedure TCAN2_C2FIFOCON16.clearTXABAT; inline;
  108509. begin
  108510. pTDefRegMap(@Self)^.clr := $00000040;
  108511. end;
  108512. procedure TCAN2_C2FIFOCON16.setTXABAT(thebits : TBits_1); inline;
  108513. begin
  108514. if thebits = 0 then
  108515. pTDefRegMap(@Self)^.clr := $00000040
  108516. else
  108517. pTDefRegMap(@Self)^.&set := $00000040;
  108518. end;
  108519. function TCAN2_C2FIFOCON16.getTXABAT : TBits_1; inline;
  108520. begin
  108521. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  108522. end;
  108523. procedure TCAN2_C2FIFOCON16.setTXEN; inline;
  108524. begin
  108525. pTDefRegMap(@Self)^.&set := $00000080;
  108526. end;
  108527. procedure TCAN2_C2FIFOCON16.clearTXEN; inline;
  108528. begin
  108529. pTDefRegMap(@Self)^.clr := $00000080;
  108530. end;
  108531. procedure TCAN2_C2FIFOCON16.setTXEN(thebits : TBits_1); inline;
  108532. begin
  108533. if thebits = 0 then
  108534. pTDefRegMap(@Self)^.clr := $00000080
  108535. else
  108536. pTDefRegMap(@Self)^.&set := $00000080;
  108537. end;
  108538. function TCAN2_C2FIFOCON16.getTXEN : TBits_1; inline;
  108539. begin
  108540. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  108541. end;
  108542. procedure TCAN2_C2FIFOCON16.setDONLY; inline;
  108543. begin
  108544. pTDefRegMap(@Self)^.&set := $00001000;
  108545. end;
  108546. procedure TCAN2_C2FIFOCON16.clearDONLY; inline;
  108547. begin
  108548. pTDefRegMap(@Self)^.clr := $00001000;
  108549. end;
  108550. procedure TCAN2_C2FIFOCON16.setDONLY(thebits : TBits_1); inline;
  108551. begin
  108552. if thebits = 0 then
  108553. pTDefRegMap(@Self)^.clr := $00001000
  108554. else
  108555. pTDefRegMap(@Self)^.&set := $00001000;
  108556. end;
  108557. function TCAN2_C2FIFOCON16.getDONLY : TBits_1; inline;
  108558. begin
  108559. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  108560. end;
  108561. procedure TCAN2_C2FIFOCON16.setUINC; inline;
  108562. begin
  108563. pTDefRegMap(@Self)^.&set := $00002000;
  108564. end;
  108565. procedure TCAN2_C2FIFOCON16.clearUINC; inline;
  108566. begin
  108567. pTDefRegMap(@Self)^.clr := $00002000;
  108568. end;
  108569. procedure TCAN2_C2FIFOCON16.setUINC(thebits : TBits_1); inline;
  108570. begin
  108571. if thebits = 0 then
  108572. pTDefRegMap(@Self)^.clr := $00002000
  108573. else
  108574. pTDefRegMap(@Self)^.&set := $00002000;
  108575. end;
  108576. function TCAN2_C2FIFOCON16.getUINC : TBits_1; inline;
  108577. begin
  108578. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  108579. end;
  108580. procedure TCAN2_C2FIFOCON16.setFRESET; inline;
  108581. begin
  108582. pTDefRegMap(@Self)^.&set := $00004000;
  108583. end;
  108584. procedure TCAN2_C2FIFOCON16.clearFRESET; inline;
  108585. begin
  108586. pTDefRegMap(@Self)^.clr := $00004000;
  108587. end;
  108588. procedure TCAN2_C2FIFOCON16.setFRESET(thebits : TBits_1); inline;
  108589. begin
  108590. if thebits = 0 then
  108591. pTDefRegMap(@Self)^.clr := $00004000
  108592. else
  108593. pTDefRegMap(@Self)^.&set := $00004000;
  108594. end;
  108595. function TCAN2_C2FIFOCON16.getFRESET : TBits_1; inline;
  108596. begin
  108597. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  108598. end;
  108599. procedure TCAN2_C2FIFOCON16.setFSIZE(thebits : TBits_5); inline;
  108600. begin
  108601. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  108602. end;
  108603. function TCAN2_C2FIFOCON16.getFSIZE : TBits_5; inline;
  108604. begin
  108605. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  108606. end;
  108607. procedure TCAN2_C2FIFOCON16.setw(thebits : TBits_32); inline;
  108608. begin
  108609. pTDefRegMap(@Self)^.val := thebits;
  108610. end;
  108611. function TCAN2_C2FIFOCON16.getw : TBits_32; inline;
  108612. begin
  108613. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108614. end;
  108615. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIF; inline;
  108616. begin
  108617. pTDefRegMap(@Self)^.&set := $00000001;
  108618. end;
  108619. procedure TCAN2_C2FIFOINT16.clearRXNEMPTYIF; inline;
  108620. begin
  108621. pTDefRegMap(@Self)^.clr := $00000001;
  108622. end;
  108623. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIF(thebits : TBits_1); inline;
  108624. begin
  108625. if thebits = 0 then
  108626. pTDefRegMap(@Self)^.clr := $00000001
  108627. else
  108628. pTDefRegMap(@Self)^.&set := $00000001;
  108629. end;
  108630. function TCAN2_C2FIFOINT16.getRXNEMPTYIF : TBits_1; inline;
  108631. begin
  108632. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  108633. end;
  108634. procedure TCAN2_C2FIFOINT16.setRXHALFIF; inline;
  108635. begin
  108636. pTDefRegMap(@Self)^.&set := $00000002;
  108637. end;
  108638. procedure TCAN2_C2FIFOINT16.clearRXHALFIF; inline;
  108639. begin
  108640. pTDefRegMap(@Self)^.clr := $00000002;
  108641. end;
  108642. procedure TCAN2_C2FIFOINT16.setRXHALFIF(thebits : TBits_1); inline;
  108643. begin
  108644. if thebits = 0 then
  108645. pTDefRegMap(@Self)^.clr := $00000002
  108646. else
  108647. pTDefRegMap(@Self)^.&set := $00000002;
  108648. end;
  108649. function TCAN2_C2FIFOINT16.getRXHALFIF : TBits_1; inline;
  108650. begin
  108651. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  108652. end;
  108653. procedure TCAN2_C2FIFOINT16.setRXFULLIF; inline;
  108654. begin
  108655. pTDefRegMap(@Self)^.&set := $00000004;
  108656. end;
  108657. procedure TCAN2_C2FIFOINT16.clearRXFULLIF; inline;
  108658. begin
  108659. pTDefRegMap(@Self)^.clr := $00000004;
  108660. end;
  108661. procedure TCAN2_C2FIFOINT16.setRXFULLIF(thebits : TBits_1); inline;
  108662. begin
  108663. if thebits = 0 then
  108664. pTDefRegMap(@Self)^.clr := $00000004
  108665. else
  108666. pTDefRegMap(@Self)^.&set := $00000004;
  108667. end;
  108668. function TCAN2_C2FIFOINT16.getRXFULLIF : TBits_1; inline;
  108669. begin
  108670. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108671. end;
  108672. procedure TCAN2_C2FIFOINT16.setRXOVFLIF; inline;
  108673. begin
  108674. pTDefRegMap(@Self)^.&set := $00000008;
  108675. end;
  108676. procedure TCAN2_C2FIFOINT16.clearRXOVFLIF; inline;
  108677. begin
  108678. pTDefRegMap(@Self)^.clr := $00000008;
  108679. end;
  108680. procedure TCAN2_C2FIFOINT16.setRXOVFLIF(thebits : TBits_1); inline;
  108681. begin
  108682. if thebits = 0 then
  108683. pTDefRegMap(@Self)^.clr := $00000008
  108684. else
  108685. pTDefRegMap(@Self)^.&set := $00000008;
  108686. end;
  108687. function TCAN2_C2FIFOINT16.getRXOVFLIF : TBits_1; inline;
  108688. begin
  108689. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108690. end;
  108691. procedure TCAN2_C2FIFOINT16.setTXEMPTYIF; inline;
  108692. begin
  108693. pTDefRegMap(@Self)^.&set := $00000100;
  108694. end;
  108695. procedure TCAN2_C2FIFOINT16.clearTXEMPTYIF; inline;
  108696. begin
  108697. pTDefRegMap(@Self)^.clr := $00000100;
  108698. end;
  108699. procedure TCAN2_C2FIFOINT16.setTXEMPTYIF(thebits : TBits_1); inline;
  108700. begin
  108701. if thebits = 0 then
  108702. pTDefRegMap(@Self)^.clr := $00000100
  108703. else
  108704. pTDefRegMap(@Self)^.&set := $00000100;
  108705. end;
  108706. function TCAN2_C2FIFOINT16.getTXEMPTYIF : TBits_1; inline;
  108707. begin
  108708. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  108709. end;
  108710. procedure TCAN2_C2FIFOINT16.setTXHALFIF; inline;
  108711. begin
  108712. pTDefRegMap(@Self)^.&set := $00000200;
  108713. end;
  108714. procedure TCAN2_C2FIFOINT16.clearTXHALFIF; inline;
  108715. begin
  108716. pTDefRegMap(@Self)^.clr := $00000200;
  108717. end;
  108718. procedure TCAN2_C2FIFOINT16.setTXHALFIF(thebits : TBits_1); inline;
  108719. begin
  108720. if thebits = 0 then
  108721. pTDefRegMap(@Self)^.clr := $00000200
  108722. else
  108723. pTDefRegMap(@Self)^.&set := $00000200;
  108724. end;
  108725. function TCAN2_C2FIFOINT16.getTXHALFIF : TBits_1; inline;
  108726. begin
  108727. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  108728. end;
  108729. procedure TCAN2_C2FIFOINT16.setTXNFULLIF; inline;
  108730. begin
  108731. pTDefRegMap(@Self)^.&set := $00000400;
  108732. end;
  108733. procedure TCAN2_C2FIFOINT16.clearTXNFULLIF; inline;
  108734. begin
  108735. pTDefRegMap(@Self)^.clr := $00000400;
  108736. end;
  108737. procedure TCAN2_C2FIFOINT16.setTXNFULLIF(thebits : TBits_1); inline;
  108738. begin
  108739. if thebits = 0 then
  108740. pTDefRegMap(@Self)^.clr := $00000400
  108741. else
  108742. pTDefRegMap(@Self)^.&set := $00000400;
  108743. end;
  108744. function TCAN2_C2FIFOINT16.getTXNFULLIF : TBits_1; inline;
  108745. begin
  108746. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  108747. end;
  108748. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIE; inline;
  108749. begin
  108750. pTDefRegMap(@Self)^.&set := $00010000;
  108751. end;
  108752. procedure TCAN2_C2FIFOINT16.clearRXNEMPTYIE; inline;
  108753. begin
  108754. pTDefRegMap(@Self)^.clr := $00010000;
  108755. end;
  108756. procedure TCAN2_C2FIFOINT16.setRXNEMPTYIE(thebits : TBits_1); inline;
  108757. begin
  108758. if thebits = 0 then
  108759. pTDefRegMap(@Self)^.clr := $00010000
  108760. else
  108761. pTDefRegMap(@Self)^.&set := $00010000;
  108762. end;
  108763. function TCAN2_C2FIFOINT16.getRXNEMPTYIE : TBits_1; inline;
  108764. begin
  108765. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  108766. end;
  108767. procedure TCAN2_C2FIFOINT16.setRXHALFIE; inline;
  108768. begin
  108769. pTDefRegMap(@Self)^.&set := $00020000;
  108770. end;
  108771. procedure TCAN2_C2FIFOINT16.clearRXHALFIE; inline;
  108772. begin
  108773. pTDefRegMap(@Self)^.clr := $00020000;
  108774. end;
  108775. procedure TCAN2_C2FIFOINT16.setRXHALFIE(thebits : TBits_1); inline;
  108776. begin
  108777. if thebits = 0 then
  108778. pTDefRegMap(@Self)^.clr := $00020000
  108779. else
  108780. pTDefRegMap(@Self)^.&set := $00020000;
  108781. end;
  108782. function TCAN2_C2FIFOINT16.getRXHALFIE : TBits_1; inline;
  108783. begin
  108784. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  108785. end;
  108786. procedure TCAN2_C2FIFOINT16.setRXFULLIE; inline;
  108787. begin
  108788. pTDefRegMap(@Self)^.&set := $00040000;
  108789. end;
  108790. procedure TCAN2_C2FIFOINT16.clearRXFULLIE; inline;
  108791. begin
  108792. pTDefRegMap(@Self)^.clr := $00040000;
  108793. end;
  108794. procedure TCAN2_C2FIFOINT16.setRXFULLIE(thebits : TBits_1); inline;
  108795. begin
  108796. if thebits = 0 then
  108797. pTDefRegMap(@Self)^.clr := $00040000
  108798. else
  108799. pTDefRegMap(@Self)^.&set := $00040000;
  108800. end;
  108801. function TCAN2_C2FIFOINT16.getRXFULLIE : TBits_1; inline;
  108802. begin
  108803. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  108804. end;
  108805. procedure TCAN2_C2FIFOINT16.setRXOVFLIE; inline;
  108806. begin
  108807. pTDefRegMap(@Self)^.&set := $00080000;
  108808. end;
  108809. procedure TCAN2_C2FIFOINT16.clearRXOVFLIE; inline;
  108810. begin
  108811. pTDefRegMap(@Self)^.clr := $00080000;
  108812. end;
  108813. procedure TCAN2_C2FIFOINT16.setRXOVFLIE(thebits : TBits_1); inline;
  108814. begin
  108815. if thebits = 0 then
  108816. pTDefRegMap(@Self)^.clr := $00080000
  108817. else
  108818. pTDefRegMap(@Self)^.&set := $00080000;
  108819. end;
  108820. function TCAN2_C2FIFOINT16.getRXOVFLIE : TBits_1; inline;
  108821. begin
  108822. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  108823. end;
  108824. procedure TCAN2_C2FIFOINT16.setTXEMPTYIE; inline;
  108825. begin
  108826. pTDefRegMap(@Self)^.&set := $01000000;
  108827. end;
  108828. procedure TCAN2_C2FIFOINT16.clearTXEMPTYIE; inline;
  108829. begin
  108830. pTDefRegMap(@Self)^.clr := $01000000;
  108831. end;
  108832. procedure TCAN2_C2FIFOINT16.setTXEMPTYIE(thebits : TBits_1); inline;
  108833. begin
  108834. if thebits = 0 then
  108835. pTDefRegMap(@Self)^.clr := $01000000
  108836. else
  108837. pTDefRegMap(@Self)^.&set := $01000000;
  108838. end;
  108839. function TCAN2_C2FIFOINT16.getTXEMPTYIE : TBits_1; inline;
  108840. begin
  108841. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  108842. end;
  108843. procedure TCAN2_C2FIFOINT16.setTXHALFIE; inline;
  108844. begin
  108845. pTDefRegMap(@Self)^.&set := $02000000;
  108846. end;
  108847. procedure TCAN2_C2FIFOINT16.clearTXHALFIE; inline;
  108848. begin
  108849. pTDefRegMap(@Self)^.clr := $02000000;
  108850. end;
  108851. procedure TCAN2_C2FIFOINT16.setTXHALFIE(thebits : TBits_1); inline;
  108852. begin
  108853. if thebits = 0 then
  108854. pTDefRegMap(@Self)^.clr := $02000000
  108855. else
  108856. pTDefRegMap(@Self)^.&set := $02000000;
  108857. end;
  108858. function TCAN2_C2FIFOINT16.getTXHALFIE : TBits_1; inline;
  108859. begin
  108860. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  108861. end;
  108862. procedure TCAN2_C2FIFOINT16.setTXNFULLIE; inline;
  108863. begin
  108864. pTDefRegMap(@Self)^.&set := $04000000;
  108865. end;
  108866. procedure TCAN2_C2FIFOINT16.clearTXNFULLIE; inline;
  108867. begin
  108868. pTDefRegMap(@Self)^.clr := $04000000;
  108869. end;
  108870. procedure TCAN2_C2FIFOINT16.setTXNFULLIE(thebits : TBits_1); inline;
  108871. begin
  108872. if thebits = 0 then
  108873. pTDefRegMap(@Self)^.clr := $04000000
  108874. else
  108875. pTDefRegMap(@Self)^.&set := $04000000;
  108876. end;
  108877. function TCAN2_C2FIFOINT16.getTXNFULLIE : TBits_1; inline;
  108878. begin
  108879. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  108880. end;
  108881. procedure TCAN2_C2FIFOINT16.setw(thebits : TBits_32); inline;
  108882. begin
  108883. pTDefRegMap(@Self)^.val := thebits;
  108884. end;
  108885. function TCAN2_C2FIFOINT16.getw : TBits_32; inline;
  108886. begin
  108887. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108888. end;
  108889. procedure TCAN2_C2FIFOCI16.setCFIFOCI(thebits : TBits_5); inline;
  108890. begin
  108891. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  108892. end;
  108893. function TCAN2_C2FIFOCI16.getCFIFOCI : TBits_5; inline;
  108894. begin
  108895. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  108896. end;
  108897. procedure TCAN2_C2FIFOCI16.setw(thebits : TBits_32); inline;
  108898. begin
  108899. pTDefRegMap(@Self)^.val := thebits;
  108900. end;
  108901. function TCAN2_C2FIFOCI16.getw : TBits_32; inline;
  108902. begin
  108903. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  108904. end;
  108905. procedure TCAN2_C2FIFOCON17.setTXPRI(thebits : TBits_2); inline;
  108906. begin
  108907. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  108908. end;
  108909. function TCAN2_C2FIFOCON17.getTXPRI : TBits_2; inline;
  108910. begin
  108911. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  108912. end;
  108913. procedure TCAN2_C2FIFOCON17.setRTREN; inline;
  108914. begin
  108915. pTDefRegMap(@Self)^.&set := $00000004;
  108916. end;
  108917. procedure TCAN2_C2FIFOCON17.clearRTREN; inline;
  108918. begin
  108919. pTDefRegMap(@Self)^.clr := $00000004;
  108920. end;
  108921. procedure TCAN2_C2FIFOCON17.setRTREN(thebits : TBits_1); inline;
  108922. begin
  108923. if thebits = 0 then
  108924. pTDefRegMap(@Self)^.clr := $00000004
  108925. else
  108926. pTDefRegMap(@Self)^.&set := $00000004;
  108927. end;
  108928. function TCAN2_C2FIFOCON17.getRTREN : TBits_1; inline;
  108929. begin
  108930. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  108931. end;
  108932. procedure TCAN2_C2FIFOCON17.setTXREQ; inline;
  108933. begin
  108934. pTDefRegMap(@Self)^.&set := $00000008;
  108935. end;
  108936. procedure TCAN2_C2FIFOCON17.clearTXREQ; inline;
  108937. begin
  108938. pTDefRegMap(@Self)^.clr := $00000008;
  108939. end;
  108940. procedure TCAN2_C2FIFOCON17.setTXREQ(thebits : TBits_1); inline;
  108941. begin
  108942. if thebits = 0 then
  108943. pTDefRegMap(@Self)^.clr := $00000008
  108944. else
  108945. pTDefRegMap(@Self)^.&set := $00000008;
  108946. end;
  108947. function TCAN2_C2FIFOCON17.getTXREQ : TBits_1; inline;
  108948. begin
  108949. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  108950. end;
  108951. procedure TCAN2_C2FIFOCON17.setTXERR; inline;
  108952. begin
  108953. pTDefRegMap(@Self)^.&set := $00000010;
  108954. end;
  108955. procedure TCAN2_C2FIFOCON17.clearTXERR; inline;
  108956. begin
  108957. pTDefRegMap(@Self)^.clr := $00000010;
  108958. end;
  108959. procedure TCAN2_C2FIFOCON17.setTXERR(thebits : TBits_1); inline;
  108960. begin
  108961. if thebits = 0 then
  108962. pTDefRegMap(@Self)^.clr := $00000010
  108963. else
  108964. pTDefRegMap(@Self)^.&set := $00000010;
  108965. end;
  108966. function TCAN2_C2FIFOCON17.getTXERR : TBits_1; inline;
  108967. begin
  108968. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  108969. end;
  108970. procedure TCAN2_C2FIFOCON17.setTXLARB; inline;
  108971. begin
  108972. pTDefRegMap(@Self)^.&set := $00000020;
  108973. end;
  108974. procedure TCAN2_C2FIFOCON17.clearTXLARB; inline;
  108975. begin
  108976. pTDefRegMap(@Self)^.clr := $00000020;
  108977. end;
  108978. procedure TCAN2_C2FIFOCON17.setTXLARB(thebits : TBits_1); inline;
  108979. begin
  108980. if thebits = 0 then
  108981. pTDefRegMap(@Self)^.clr := $00000020
  108982. else
  108983. pTDefRegMap(@Self)^.&set := $00000020;
  108984. end;
  108985. function TCAN2_C2FIFOCON17.getTXLARB : TBits_1; inline;
  108986. begin
  108987. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  108988. end;
  108989. procedure TCAN2_C2FIFOCON17.setTXABAT; inline;
  108990. begin
  108991. pTDefRegMap(@Self)^.&set := $00000040;
  108992. end;
  108993. procedure TCAN2_C2FIFOCON17.clearTXABAT; inline;
  108994. begin
  108995. pTDefRegMap(@Self)^.clr := $00000040;
  108996. end;
  108997. procedure TCAN2_C2FIFOCON17.setTXABAT(thebits : TBits_1); inline;
  108998. begin
  108999. if thebits = 0 then
  109000. pTDefRegMap(@Self)^.clr := $00000040
  109001. else
  109002. pTDefRegMap(@Self)^.&set := $00000040;
  109003. end;
  109004. function TCAN2_C2FIFOCON17.getTXABAT : TBits_1; inline;
  109005. begin
  109006. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  109007. end;
  109008. procedure TCAN2_C2FIFOCON17.setTXEN; inline;
  109009. begin
  109010. pTDefRegMap(@Self)^.&set := $00000080;
  109011. end;
  109012. procedure TCAN2_C2FIFOCON17.clearTXEN; inline;
  109013. begin
  109014. pTDefRegMap(@Self)^.clr := $00000080;
  109015. end;
  109016. procedure TCAN2_C2FIFOCON17.setTXEN(thebits : TBits_1); inline;
  109017. begin
  109018. if thebits = 0 then
  109019. pTDefRegMap(@Self)^.clr := $00000080
  109020. else
  109021. pTDefRegMap(@Self)^.&set := $00000080;
  109022. end;
  109023. function TCAN2_C2FIFOCON17.getTXEN : TBits_1; inline;
  109024. begin
  109025. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  109026. end;
  109027. procedure TCAN2_C2FIFOCON17.setDONLY; inline;
  109028. begin
  109029. pTDefRegMap(@Self)^.&set := $00001000;
  109030. end;
  109031. procedure TCAN2_C2FIFOCON17.clearDONLY; inline;
  109032. begin
  109033. pTDefRegMap(@Self)^.clr := $00001000;
  109034. end;
  109035. procedure TCAN2_C2FIFOCON17.setDONLY(thebits : TBits_1); inline;
  109036. begin
  109037. if thebits = 0 then
  109038. pTDefRegMap(@Self)^.clr := $00001000
  109039. else
  109040. pTDefRegMap(@Self)^.&set := $00001000;
  109041. end;
  109042. function TCAN2_C2FIFOCON17.getDONLY : TBits_1; inline;
  109043. begin
  109044. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  109045. end;
  109046. procedure TCAN2_C2FIFOCON17.setUINC; inline;
  109047. begin
  109048. pTDefRegMap(@Self)^.&set := $00002000;
  109049. end;
  109050. procedure TCAN2_C2FIFOCON17.clearUINC; inline;
  109051. begin
  109052. pTDefRegMap(@Self)^.clr := $00002000;
  109053. end;
  109054. procedure TCAN2_C2FIFOCON17.setUINC(thebits : TBits_1); inline;
  109055. begin
  109056. if thebits = 0 then
  109057. pTDefRegMap(@Self)^.clr := $00002000
  109058. else
  109059. pTDefRegMap(@Self)^.&set := $00002000;
  109060. end;
  109061. function TCAN2_C2FIFOCON17.getUINC : TBits_1; inline;
  109062. begin
  109063. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  109064. end;
  109065. procedure TCAN2_C2FIFOCON17.setFRESET; inline;
  109066. begin
  109067. pTDefRegMap(@Self)^.&set := $00004000;
  109068. end;
  109069. procedure TCAN2_C2FIFOCON17.clearFRESET; inline;
  109070. begin
  109071. pTDefRegMap(@Self)^.clr := $00004000;
  109072. end;
  109073. procedure TCAN2_C2FIFOCON17.setFRESET(thebits : TBits_1); inline;
  109074. begin
  109075. if thebits = 0 then
  109076. pTDefRegMap(@Self)^.clr := $00004000
  109077. else
  109078. pTDefRegMap(@Self)^.&set := $00004000;
  109079. end;
  109080. function TCAN2_C2FIFOCON17.getFRESET : TBits_1; inline;
  109081. begin
  109082. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  109083. end;
  109084. procedure TCAN2_C2FIFOCON17.setFSIZE(thebits : TBits_5); inline;
  109085. begin
  109086. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  109087. end;
  109088. function TCAN2_C2FIFOCON17.getFSIZE : TBits_5; inline;
  109089. begin
  109090. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  109091. end;
  109092. procedure TCAN2_C2FIFOCON17.setw(thebits : TBits_32); inline;
  109093. begin
  109094. pTDefRegMap(@Self)^.val := thebits;
  109095. end;
  109096. function TCAN2_C2FIFOCON17.getw : TBits_32; inline;
  109097. begin
  109098. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109099. end;
  109100. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIF; inline;
  109101. begin
  109102. pTDefRegMap(@Self)^.&set := $00000001;
  109103. end;
  109104. procedure TCAN2_C2FIFOINT17.clearRXNEMPTYIF; inline;
  109105. begin
  109106. pTDefRegMap(@Self)^.clr := $00000001;
  109107. end;
  109108. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIF(thebits : TBits_1); inline;
  109109. begin
  109110. if thebits = 0 then
  109111. pTDefRegMap(@Self)^.clr := $00000001
  109112. else
  109113. pTDefRegMap(@Self)^.&set := $00000001;
  109114. end;
  109115. function TCAN2_C2FIFOINT17.getRXNEMPTYIF : TBits_1; inline;
  109116. begin
  109117. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  109118. end;
  109119. procedure TCAN2_C2FIFOINT17.setRXHALFIF; inline;
  109120. begin
  109121. pTDefRegMap(@Self)^.&set := $00000002;
  109122. end;
  109123. procedure TCAN2_C2FIFOINT17.clearRXHALFIF; inline;
  109124. begin
  109125. pTDefRegMap(@Self)^.clr := $00000002;
  109126. end;
  109127. procedure TCAN2_C2FIFOINT17.setRXHALFIF(thebits : TBits_1); inline;
  109128. begin
  109129. if thebits = 0 then
  109130. pTDefRegMap(@Self)^.clr := $00000002
  109131. else
  109132. pTDefRegMap(@Self)^.&set := $00000002;
  109133. end;
  109134. function TCAN2_C2FIFOINT17.getRXHALFIF : TBits_1; inline;
  109135. begin
  109136. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  109137. end;
  109138. procedure TCAN2_C2FIFOINT17.setRXFULLIF; inline;
  109139. begin
  109140. pTDefRegMap(@Self)^.&set := $00000004;
  109141. end;
  109142. procedure TCAN2_C2FIFOINT17.clearRXFULLIF; inline;
  109143. begin
  109144. pTDefRegMap(@Self)^.clr := $00000004;
  109145. end;
  109146. procedure TCAN2_C2FIFOINT17.setRXFULLIF(thebits : TBits_1); inline;
  109147. begin
  109148. if thebits = 0 then
  109149. pTDefRegMap(@Self)^.clr := $00000004
  109150. else
  109151. pTDefRegMap(@Self)^.&set := $00000004;
  109152. end;
  109153. function TCAN2_C2FIFOINT17.getRXFULLIF : TBits_1; inline;
  109154. begin
  109155. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109156. end;
  109157. procedure TCAN2_C2FIFOINT17.setRXOVFLIF; inline;
  109158. begin
  109159. pTDefRegMap(@Self)^.&set := $00000008;
  109160. end;
  109161. procedure TCAN2_C2FIFOINT17.clearRXOVFLIF; inline;
  109162. begin
  109163. pTDefRegMap(@Self)^.clr := $00000008;
  109164. end;
  109165. procedure TCAN2_C2FIFOINT17.setRXOVFLIF(thebits : TBits_1); inline;
  109166. begin
  109167. if thebits = 0 then
  109168. pTDefRegMap(@Self)^.clr := $00000008
  109169. else
  109170. pTDefRegMap(@Self)^.&set := $00000008;
  109171. end;
  109172. function TCAN2_C2FIFOINT17.getRXOVFLIF : TBits_1; inline;
  109173. begin
  109174. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109175. end;
  109176. procedure TCAN2_C2FIFOINT17.setTXEMPTYIF; inline;
  109177. begin
  109178. pTDefRegMap(@Self)^.&set := $00000100;
  109179. end;
  109180. procedure TCAN2_C2FIFOINT17.clearTXEMPTYIF; inline;
  109181. begin
  109182. pTDefRegMap(@Self)^.clr := $00000100;
  109183. end;
  109184. procedure TCAN2_C2FIFOINT17.setTXEMPTYIF(thebits : TBits_1); inline;
  109185. begin
  109186. if thebits = 0 then
  109187. pTDefRegMap(@Self)^.clr := $00000100
  109188. else
  109189. pTDefRegMap(@Self)^.&set := $00000100;
  109190. end;
  109191. function TCAN2_C2FIFOINT17.getTXEMPTYIF : TBits_1; inline;
  109192. begin
  109193. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  109194. end;
  109195. procedure TCAN2_C2FIFOINT17.setTXHALFIF; inline;
  109196. begin
  109197. pTDefRegMap(@Self)^.&set := $00000200;
  109198. end;
  109199. procedure TCAN2_C2FIFOINT17.clearTXHALFIF; inline;
  109200. begin
  109201. pTDefRegMap(@Self)^.clr := $00000200;
  109202. end;
  109203. procedure TCAN2_C2FIFOINT17.setTXHALFIF(thebits : TBits_1); inline;
  109204. begin
  109205. if thebits = 0 then
  109206. pTDefRegMap(@Self)^.clr := $00000200
  109207. else
  109208. pTDefRegMap(@Self)^.&set := $00000200;
  109209. end;
  109210. function TCAN2_C2FIFOINT17.getTXHALFIF : TBits_1; inline;
  109211. begin
  109212. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  109213. end;
  109214. procedure TCAN2_C2FIFOINT17.setTXNFULLIF; inline;
  109215. begin
  109216. pTDefRegMap(@Self)^.&set := $00000400;
  109217. end;
  109218. procedure TCAN2_C2FIFOINT17.clearTXNFULLIF; inline;
  109219. begin
  109220. pTDefRegMap(@Self)^.clr := $00000400;
  109221. end;
  109222. procedure TCAN2_C2FIFOINT17.setTXNFULLIF(thebits : TBits_1); inline;
  109223. begin
  109224. if thebits = 0 then
  109225. pTDefRegMap(@Self)^.clr := $00000400
  109226. else
  109227. pTDefRegMap(@Self)^.&set := $00000400;
  109228. end;
  109229. function TCAN2_C2FIFOINT17.getTXNFULLIF : TBits_1; inline;
  109230. begin
  109231. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  109232. end;
  109233. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIE; inline;
  109234. begin
  109235. pTDefRegMap(@Self)^.&set := $00010000;
  109236. end;
  109237. procedure TCAN2_C2FIFOINT17.clearRXNEMPTYIE; inline;
  109238. begin
  109239. pTDefRegMap(@Self)^.clr := $00010000;
  109240. end;
  109241. procedure TCAN2_C2FIFOINT17.setRXNEMPTYIE(thebits : TBits_1); inline;
  109242. begin
  109243. if thebits = 0 then
  109244. pTDefRegMap(@Self)^.clr := $00010000
  109245. else
  109246. pTDefRegMap(@Self)^.&set := $00010000;
  109247. end;
  109248. function TCAN2_C2FIFOINT17.getRXNEMPTYIE : TBits_1; inline;
  109249. begin
  109250. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  109251. end;
  109252. procedure TCAN2_C2FIFOINT17.setRXHALFIE; inline;
  109253. begin
  109254. pTDefRegMap(@Self)^.&set := $00020000;
  109255. end;
  109256. procedure TCAN2_C2FIFOINT17.clearRXHALFIE; inline;
  109257. begin
  109258. pTDefRegMap(@Self)^.clr := $00020000;
  109259. end;
  109260. procedure TCAN2_C2FIFOINT17.setRXHALFIE(thebits : TBits_1); inline;
  109261. begin
  109262. if thebits = 0 then
  109263. pTDefRegMap(@Self)^.clr := $00020000
  109264. else
  109265. pTDefRegMap(@Self)^.&set := $00020000;
  109266. end;
  109267. function TCAN2_C2FIFOINT17.getRXHALFIE : TBits_1; inline;
  109268. begin
  109269. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  109270. end;
  109271. procedure TCAN2_C2FIFOINT17.setRXFULLIE; inline;
  109272. begin
  109273. pTDefRegMap(@Self)^.&set := $00040000;
  109274. end;
  109275. procedure TCAN2_C2FIFOINT17.clearRXFULLIE; inline;
  109276. begin
  109277. pTDefRegMap(@Self)^.clr := $00040000;
  109278. end;
  109279. procedure TCAN2_C2FIFOINT17.setRXFULLIE(thebits : TBits_1); inline;
  109280. begin
  109281. if thebits = 0 then
  109282. pTDefRegMap(@Self)^.clr := $00040000
  109283. else
  109284. pTDefRegMap(@Self)^.&set := $00040000;
  109285. end;
  109286. function TCAN2_C2FIFOINT17.getRXFULLIE : TBits_1; inline;
  109287. begin
  109288. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  109289. end;
  109290. procedure TCAN2_C2FIFOINT17.setRXOVFLIE; inline;
  109291. begin
  109292. pTDefRegMap(@Self)^.&set := $00080000;
  109293. end;
  109294. procedure TCAN2_C2FIFOINT17.clearRXOVFLIE; inline;
  109295. begin
  109296. pTDefRegMap(@Self)^.clr := $00080000;
  109297. end;
  109298. procedure TCAN2_C2FIFOINT17.setRXOVFLIE(thebits : TBits_1); inline;
  109299. begin
  109300. if thebits = 0 then
  109301. pTDefRegMap(@Self)^.clr := $00080000
  109302. else
  109303. pTDefRegMap(@Self)^.&set := $00080000;
  109304. end;
  109305. function TCAN2_C2FIFOINT17.getRXOVFLIE : TBits_1; inline;
  109306. begin
  109307. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  109308. end;
  109309. procedure TCAN2_C2FIFOINT17.setTXEMPTYIE; inline;
  109310. begin
  109311. pTDefRegMap(@Self)^.&set := $01000000;
  109312. end;
  109313. procedure TCAN2_C2FIFOINT17.clearTXEMPTYIE; inline;
  109314. begin
  109315. pTDefRegMap(@Self)^.clr := $01000000;
  109316. end;
  109317. procedure TCAN2_C2FIFOINT17.setTXEMPTYIE(thebits : TBits_1); inline;
  109318. begin
  109319. if thebits = 0 then
  109320. pTDefRegMap(@Self)^.clr := $01000000
  109321. else
  109322. pTDefRegMap(@Self)^.&set := $01000000;
  109323. end;
  109324. function TCAN2_C2FIFOINT17.getTXEMPTYIE : TBits_1; inline;
  109325. begin
  109326. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  109327. end;
  109328. procedure TCAN2_C2FIFOINT17.setTXHALFIE; inline;
  109329. begin
  109330. pTDefRegMap(@Self)^.&set := $02000000;
  109331. end;
  109332. procedure TCAN2_C2FIFOINT17.clearTXHALFIE; inline;
  109333. begin
  109334. pTDefRegMap(@Self)^.clr := $02000000;
  109335. end;
  109336. procedure TCAN2_C2FIFOINT17.setTXHALFIE(thebits : TBits_1); inline;
  109337. begin
  109338. if thebits = 0 then
  109339. pTDefRegMap(@Self)^.clr := $02000000
  109340. else
  109341. pTDefRegMap(@Self)^.&set := $02000000;
  109342. end;
  109343. function TCAN2_C2FIFOINT17.getTXHALFIE : TBits_1; inline;
  109344. begin
  109345. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  109346. end;
  109347. procedure TCAN2_C2FIFOINT17.setTXNFULLIE; inline;
  109348. begin
  109349. pTDefRegMap(@Self)^.&set := $04000000;
  109350. end;
  109351. procedure TCAN2_C2FIFOINT17.clearTXNFULLIE; inline;
  109352. begin
  109353. pTDefRegMap(@Self)^.clr := $04000000;
  109354. end;
  109355. procedure TCAN2_C2FIFOINT17.setTXNFULLIE(thebits : TBits_1); inline;
  109356. begin
  109357. if thebits = 0 then
  109358. pTDefRegMap(@Self)^.clr := $04000000
  109359. else
  109360. pTDefRegMap(@Self)^.&set := $04000000;
  109361. end;
  109362. function TCAN2_C2FIFOINT17.getTXNFULLIE : TBits_1; inline;
  109363. begin
  109364. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  109365. end;
  109366. procedure TCAN2_C2FIFOINT17.setw(thebits : TBits_32); inline;
  109367. begin
  109368. pTDefRegMap(@Self)^.val := thebits;
  109369. end;
  109370. function TCAN2_C2FIFOINT17.getw : TBits_32; inline;
  109371. begin
  109372. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109373. end;
  109374. procedure TCAN2_C2FIFOCI17.setCFIFOCI(thebits : TBits_5); inline;
  109375. begin
  109376. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  109377. end;
  109378. function TCAN2_C2FIFOCI17.getCFIFOCI : TBits_5; inline;
  109379. begin
  109380. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  109381. end;
  109382. procedure TCAN2_C2FIFOCI17.setw(thebits : TBits_32); inline;
  109383. begin
  109384. pTDefRegMap(@Self)^.val := thebits;
  109385. end;
  109386. function TCAN2_C2FIFOCI17.getw : TBits_32; inline;
  109387. begin
  109388. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109389. end;
  109390. procedure TCAN2_C2FIFOCON18.setTXPRI(thebits : TBits_2); inline;
  109391. begin
  109392. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  109393. end;
  109394. function TCAN2_C2FIFOCON18.getTXPRI : TBits_2; inline;
  109395. begin
  109396. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  109397. end;
  109398. procedure TCAN2_C2FIFOCON18.setRTREN; inline;
  109399. begin
  109400. pTDefRegMap(@Self)^.&set := $00000004;
  109401. end;
  109402. procedure TCAN2_C2FIFOCON18.clearRTREN; inline;
  109403. begin
  109404. pTDefRegMap(@Self)^.clr := $00000004;
  109405. end;
  109406. procedure TCAN2_C2FIFOCON18.setRTREN(thebits : TBits_1); inline;
  109407. begin
  109408. if thebits = 0 then
  109409. pTDefRegMap(@Self)^.clr := $00000004
  109410. else
  109411. pTDefRegMap(@Self)^.&set := $00000004;
  109412. end;
  109413. function TCAN2_C2FIFOCON18.getRTREN : TBits_1; inline;
  109414. begin
  109415. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109416. end;
  109417. procedure TCAN2_C2FIFOCON18.setTXREQ; inline;
  109418. begin
  109419. pTDefRegMap(@Self)^.&set := $00000008;
  109420. end;
  109421. procedure TCAN2_C2FIFOCON18.clearTXREQ; inline;
  109422. begin
  109423. pTDefRegMap(@Self)^.clr := $00000008;
  109424. end;
  109425. procedure TCAN2_C2FIFOCON18.setTXREQ(thebits : TBits_1); inline;
  109426. begin
  109427. if thebits = 0 then
  109428. pTDefRegMap(@Self)^.clr := $00000008
  109429. else
  109430. pTDefRegMap(@Self)^.&set := $00000008;
  109431. end;
  109432. function TCAN2_C2FIFOCON18.getTXREQ : TBits_1; inline;
  109433. begin
  109434. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109435. end;
  109436. procedure TCAN2_C2FIFOCON18.setTXERR; inline;
  109437. begin
  109438. pTDefRegMap(@Self)^.&set := $00000010;
  109439. end;
  109440. procedure TCAN2_C2FIFOCON18.clearTXERR; inline;
  109441. begin
  109442. pTDefRegMap(@Self)^.clr := $00000010;
  109443. end;
  109444. procedure TCAN2_C2FIFOCON18.setTXERR(thebits : TBits_1); inline;
  109445. begin
  109446. if thebits = 0 then
  109447. pTDefRegMap(@Self)^.clr := $00000010
  109448. else
  109449. pTDefRegMap(@Self)^.&set := $00000010;
  109450. end;
  109451. function TCAN2_C2FIFOCON18.getTXERR : TBits_1; inline;
  109452. begin
  109453. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  109454. end;
  109455. procedure TCAN2_C2FIFOCON18.setTXLARB; inline;
  109456. begin
  109457. pTDefRegMap(@Self)^.&set := $00000020;
  109458. end;
  109459. procedure TCAN2_C2FIFOCON18.clearTXLARB; inline;
  109460. begin
  109461. pTDefRegMap(@Self)^.clr := $00000020;
  109462. end;
  109463. procedure TCAN2_C2FIFOCON18.setTXLARB(thebits : TBits_1); inline;
  109464. begin
  109465. if thebits = 0 then
  109466. pTDefRegMap(@Self)^.clr := $00000020
  109467. else
  109468. pTDefRegMap(@Self)^.&set := $00000020;
  109469. end;
  109470. function TCAN2_C2FIFOCON18.getTXLARB : TBits_1; inline;
  109471. begin
  109472. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  109473. end;
  109474. procedure TCAN2_C2FIFOCON18.setTXABAT; inline;
  109475. begin
  109476. pTDefRegMap(@Self)^.&set := $00000040;
  109477. end;
  109478. procedure TCAN2_C2FIFOCON18.clearTXABAT; inline;
  109479. begin
  109480. pTDefRegMap(@Self)^.clr := $00000040;
  109481. end;
  109482. procedure TCAN2_C2FIFOCON18.setTXABAT(thebits : TBits_1); inline;
  109483. begin
  109484. if thebits = 0 then
  109485. pTDefRegMap(@Self)^.clr := $00000040
  109486. else
  109487. pTDefRegMap(@Self)^.&set := $00000040;
  109488. end;
  109489. function TCAN2_C2FIFOCON18.getTXABAT : TBits_1; inline;
  109490. begin
  109491. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  109492. end;
  109493. procedure TCAN2_C2FIFOCON18.setTXEN; inline;
  109494. begin
  109495. pTDefRegMap(@Self)^.&set := $00000080;
  109496. end;
  109497. procedure TCAN2_C2FIFOCON18.clearTXEN; inline;
  109498. begin
  109499. pTDefRegMap(@Self)^.clr := $00000080;
  109500. end;
  109501. procedure TCAN2_C2FIFOCON18.setTXEN(thebits : TBits_1); inline;
  109502. begin
  109503. if thebits = 0 then
  109504. pTDefRegMap(@Self)^.clr := $00000080
  109505. else
  109506. pTDefRegMap(@Self)^.&set := $00000080;
  109507. end;
  109508. function TCAN2_C2FIFOCON18.getTXEN : TBits_1; inline;
  109509. begin
  109510. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  109511. end;
  109512. procedure TCAN2_C2FIFOCON18.setDONLY; inline;
  109513. begin
  109514. pTDefRegMap(@Self)^.&set := $00001000;
  109515. end;
  109516. procedure TCAN2_C2FIFOCON18.clearDONLY; inline;
  109517. begin
  109518. pTDefRegMap(@Self)^.clr := $00001000;
  109519. end;
  109520. procedure TCAN2_C2FIFOCON18.setDONLY(thebits : TBits_1); inline;
  109521. begin
  109522. if thebits = 0 then
  109523. pTDefRegMap(@Self)^.clr := $00001000
  109524. else
  109525. pTDefRegMap(@Self)^.&set := $00001000;
  109526. end;
  109527. function TCAN2_C2FIFOCON18.getDONLY : TBits_1; inline;
  109528. begin
  109529. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  109530. end;
  109531. procedure TCAN2_C2FIFOCON18.setUINC; inline;
  109532. begin
  109533. pTDefRegMap(@Self)^.&set := $00002000;
  109534. end;
  109535. procedure TCAN2_C2FIFOCON18.clearUINC; inline;
  109536. begin
  109537. pTDefRegMap(@Self)^.clr := $00002000;
  109538. end;
  109539. procedure TCAN2_C2FIFOCON18.setUINC(thebits : TBits_1); inline;
  109540. begin
  109541. if thebits = 0 then
  109542. pTDefRegMap(@Self)^.clr := $00002000
  109543. else
  109544. pTDefRegMap(@Self)^.&set := $00002000;
  109545. end;
  109546. function TCAN2_C2FIFOCON18.getUINC : TBits_1; inline;
  109547. begin
  109548. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  109549. end;
  109550. procedure TCAN2_C2FIFOCON18.setFRESET; inline;
  109551. begin
  109552. pTDefRegMap(@Self)^.&set := $00004000;
  109553. end;
  109554. procedure TCAN2_C2FIFOCON18.clearFRESET; inline;
  109555. begin
  109556. pTDefRegMap(@Self)^.clr := $00004000;
  109557. end;
  109558. procedure TCAN2_C2FIFOCON18.setFRESET(thebits : TBits_1); inline;
  109559. begin
  109560. if thebits = 0 then
  109561. pTDefRegMap(@Self)^.clr := $00004000
  109562. else
  109563. pTDefRegMap(@Self)^.&set := $00004000;
  109564. end;
  109565. function TCAN2_C2FIFOCON18.getFRESET : TBits_1; inline;
  109566. begin
  109567. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  109568. end;
  109569. procedure TCAN2_C2FIFOCON18.setFSIZE(thebits : TBits_5); inline;
  109570. begin
  109571. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  109572. end;
  109573. function TCAN2_C2FIFOCON18.getFSIZE : TBits_5; inline;
  109574. begin
  109575. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  109576. end;
  109577. procedure TCAN2_C2FIFOCON18.setw(thebits : TBits_32); inline;
  109578. begin
  109579. pTDefRegMap(@Self)^.val := thebits;
  109580. end;
  109581. function TCAN2_C2FIFOCON18.getw : TBits_32; inline;
  109582. begin
  109583. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109584. end;
  109585. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIF; inline;
  109586. begin
  109587. pTDefRegMap(@Self)^.&set := $00000001;
  109588. end;
  109589. procedure TCAN2_C2FIFOINT18.clearRXNEMPTYIF; inline;
  109590. begin
  109591. pTDefRegMap(@Self)^.clr := $00000001;
  109592. end;
  109593. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIF(thebits : TBits_1); inline;
  109594. begin
  109595. if thebits = 0 then
  109596. pTDefRegMap(@Self)^.clr := $00000001
  109597. else
  109598. pTDefRegMap(@Self)^.&set := $00000001;
  109599. end;
  109600. function TCAN2_C2FIFOINT18.getRXNEMPTYIF : TBits_1; inline;
  109601. begin
  109602. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  109603. end;
  109604. procedure TCAN2_C2FIFOINT18.setRXHALFIF; inline;
  109605. begin
  109606. pTDefRegMap(@Self)^.&set := $00000002;
  109607. end;
  109608. procedure TCAN2_C2FIFOINT18.clearRXHALFIF; inline;
  109609. begin
  109610. pTDefRegMap(@Self)^.clr := $00000002;
  109611. end;
  109612. procedure TCAN2_C2FIFOINT18.setRXHALFIF(thebits : TBits_1); inline;
  109613. begin
  109614. if thebits = 0 then
  109615. pTDefRegMap(@Self)^.clr := $00000002
  109616. else
  109617. pTDefRegMap(@Self)^.&set := $00000002;
  109618. end;
  109619. function TCAN2_C2FIFOINT18.getRXHALFIF : TBits_1; inline;
  109620. begin
  109621. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  109622. end;
  109623. procedure TCAN2_C2FIFOINT18.setRXFULLIF; inline;
  109624. begin
  109625. pTDefRegMap(@Self)^.&set := $00000004;
  109626. end;
  109627. procedure TCAN2_C2FIFOINT18.clearRXFULLIF; inline;
  109628. begin
  109629. pTDefRegMap(@Self)^.clr := $00000004;
  109630. end;
  109631. procedure TCAN2_C2FIFOINT18.setRXFULLIF(thebits : TBits_1); inline;
  109632. begin
  109633. if thebits = 0 then
  109634. pTDefRegMap(@Self)^.clr := $00000004
  109635. else
  109636. pTDefRegMap(@Self)^.&set := $00000004;
  109637. end;
  109638. function TCAN2_C2FIFOINT18.getRXFULLIF : TBits_1; inline;
  109639. begin
  109640. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109641. end;
  109642. procedure TCAN2_C2FIFOINT18.setRXOVFLIF; inline;
  109643. begin
  109644. pTDefRegMap(@Self)^.&set := $00000008;
  109645. end;
  109646. procedure TCAN2_C2FIFOINT18.clearRXOVFLIF; inline;
  109647. begin
  109648. pTDefRegMap(@Self)^.clr := $00000008;
  109649. end;
  109650. procedure TCAN2_C2FIFOINT18.setRXOVFLIF(thebits : TBits_1); inline;
  109651. begin
  109652. if thebits = 0 then
  109653. pTDefRegMap(@Self)^.clr := $00000008
  109654. else
  109655. pTDefRegMap(@Self)^.&set := $00000008;
  109656. end;
  109657. function TCAN2_C2FIFOINT18.getRXOVFLIF : TBits_1; inline;
  109658. begin
  109659. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109660. end;
  109661. procedure TCAN2_C2FIFOINT18.setTXEMPTYIF; inline;
  109662. begin
  109663. pTDefRegMap(@Self)^.&set := $00000100;
  109664. end;
  109665. procedure TCAN2_C2FIFOINT18.clearTXEMPTYIF; inline;
  109666. begin
  109667. pTDefRegMap(@Self)^.clr := $00000100;
  109668. end;
  109669. procedure TCAN2_C2FIFOINT18.setTXEMPTYIF(thebits : TBits_1); inline;
  109670. begin
  109671. if thebits = 0 then
  109672. pTDefRegMap(@Self)^.clr := $00000100
  109673. else
  109674. pTDefRegMap(@Self)^.&set := $00000100;
  109675. end;
  109676. function TCAN2_C2FIFOINT18.getTXEMPTYIF : TBits_1; inline;
  109677. begin
  109678. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  109679. end;
  109680. procedure TCAN2_C2FIFOINT18.setTXHALFIF; inline;
  109681. begin
  109682. pTDefRegMap(@Self)^.&set := $00000200;
  109683. end;
  109684. procedure TCAN2_C2FIFOINT18.clearTXHALFIF; inline;
  109685. begin
  109686. pTDefRegMap(@Self)^.clr := $00000200;
  109687. end;
  109688. procedure TCAN2_C2FIFOINT18.setTXHALFIF(thebits : TBits_1); inline;
  109689. begin
  109690. if thebits = 0 then
  109691. pTDefRegMap(@Self)^.clr := $00000200
  109692. else
  109693. pTDefRegMap(@Self)^.&set := $00000200;
  109694. end;
  109695. function TCAN2_C2FIFOINT18.getTXHALFIF : TBits_1; inline;
  109696. begin
  109697. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  109698. end;
  109699. procedure TCAN2_C2FIFOINT18.setTXNFULLIF; inline;
  109700. begin
  109701. pTDefRegMap(@Self)^.&set := $00000400;
  109702. end;
  109703. procedure TCAN2_C2FIFOINT18.clearTXNFULLIF; inline;
  109704. begin
  109705. pTDefRegMap(@Self)^.clr := $00000400;
  109706. end;
  109707. procedure TCAN2_C2FIFOINT18.setTXNFULLIF(thebits : TBits_1); inline;
  109708. begin
  109709. if thebits = 0 then
  109710. pTDefRegMap(@Self)^.clr := $00000400
  109711. else
  109712. pTDefRegMap(@Self)^.&set := $00000400;
  109713. end;
  109714. function TCAN2_C2FIFOINT18.getTXNFULLIF : TBits_1; inline;
  109715. begin
  109716. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  109717. end;
  109718. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIE; inline;
  109719. begin
  109720. pTDefRegMap(@Self)^.&set := $00010000;
  109721. end;
  109722. procedure TCAN2_C2FIFOINT18.clearRXNEMPTYIE; inline;
  109723. begin
  109724. pTDefRegMap(@Self)^.clr := $00010000;
  109725. end;
  109726. procedure TCAN2_C2FIFOINT18.setRXNEMPTYIE(thebits : TBits_1); inline;
  109727. begin
  109728. if thebits = 0 then
  109729. pTDefRegMap(@Self)^.clr := $00010000
  109730. else
  109731. pTDefRegMap(@Self)^.&set := $00010000;
  109732. end;
  109733. function TCAN2_C2FIFOINT18.getRXNEMPTYIE : TBits_1; inline;
  109734. begin
  109735. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  109736. end;
  109737. procedure TCAN2_C2FIFOINT18.setRXHALFIE; inline;
  109738. begin
  109739. pTDefRegMap(@Self)^.&set := $00020000;
  109740. end;
  109741. procedure TCAN2_C2FIFOINT18.clearRXHALFIE; inline;
  109742. begin
  109743. pTDefRegMap(@Self)^.clr := $00020000;
  109744. end;
  109745. procedure TCAN2_C2FIFOINT18.setRXHALFIE(thebits : TBits_1); inline;
  109746. begin
  109747. if thebits = 0 then
  109748. pTDefRegMap(@Self)^.clr := $00020000
  109749. else
  109750. pTDefRegMap(@Self)^.&set := $00020000;
  109751. end;
  109752. function TCAN2_C2FIFOINT18.getRXHALFIE : TBits_1; inline;
  109753. begin
  109754. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  109755. end;
  109756. procedure TCAN2_C2FIFOINT18.setRXFULLIE; inline;
  109757. begin
  109758. pTDefRegMap(@Self)^.&set := $00040000;
  109759. end;
  109760. procedure TCAN2_C2FIFOINT18.clearRXFULLIE; inline;
  109761. begin
  109762. pTDefRegMap(@Self)^.clr := $00040000;
  109763. end;
  109764. procedure TCAN2_C2FIFOINT18.setRXFULLIE(thebits : TBits_1); inline;
  109765. begin
  109766. if thebits = 0 then
  109767. pTDefRegMap(@Self)^.clr := $00040000
  109768. else
  109769. pTDefRegMap(@Self)^.&set := $00040000;
  109770. end;
  109771. function TCAN2_C2FIFOINT18.getRXFULLIE : TBits_1; inline;
  109772. begin
  109773. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  109774. end;
  109775. procedure TCAN2_C2FIFOINT18.setRXOVFLIE; inline;
  109776. begin
  109777. pTDefRegMap(@Self)^.&set := $00080000;
  109778. end;
  109779. procedure TCAN2_C2FIFOINT18.clearRXOVFLIE; inline;
  109780. begin
  109781. pTDefRegMap(@Self)^.clr := $00080000;
  109782. end;
  109783. procedure TCAN2_C2FIFOINT18.setRXOVFLIE(thebits : TBits_1); inline;
  109784. begin
  109785. if thebits = 0 then
  109786. pTDefRegMap(@Self)^.clr := $00080000
  109787. else
  109788. pTDefRegMap(@Self)^.&set := $00080000;
  109789. end;
  109790. function TCAN2_C2FIFOINT18.getRXOVFLIE : TBits_1; inline;
  109791. begin
  109792. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  109793. end;
  109794. procedure TCAN2_C2FIFOINT18.setTXEMPTYIE; inline;
  109795. begin
  109796. pTDefRegMap(@Self)^.&set := $01000000;
  109797. end;
  109798. procedure TCAN2_C2FIFOINT18.clearTXEMPTYIE; inline;
  109799. begin
  109800. pTDefRegMap(@Self)^.clr := $01000000;
  109801. end;
  109802. procedure TCAN2_C2FIFOINT18.setTXEMPTYIE(thebits : TBits_1); inline;
  109803. begin
  109804. if thebits = 0 then
  109805. pTDefRegMap(@Self)^.clr := $01000000
  109806. else
  109807. pTDefRegMap(@Self)^.&set := $01000000;
  109808. end;
  109809. function TCAN2_C2FIFOINT18.getTXEMPTYIE : TBits_1; inline;
  109810. begin
  109811. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  109812. end;
  109813. procedure TCAN2_C2FIFOINT18.setTXHALFIE; inline;
  109814. begin
  109815. pTDefRegMap(@Self)^.&set := $02000000;
  109816. end;
  109817. procedure TCAN2_C2FIFOINT18.clearTXHALFIE; inline;
  109818. begin
  109819. pTDefRegMap(@Self)^.clr := $02000000;
  109820. end;
  109821. procedure TCAN2_C2FIFOINT18.setTXHALFIE(thebits : TBits_1); inline;
  109822. begin
  109823. if thebits = 0 then
  109824. pTDefRegMap(@Self)^.clr := $02000000
  109825. else
  109826. pTDefRegMap(@Self)^.&set := $02000000;
  109827. end;
  109828. function TCAN2_C2FIFOINT18.getTXHALFIE : TBits_1; inline;
  109829. begin
  109830. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  109831. end;
  109832. procedure TCAN2_C2FIFOINT18.setTXNFULLIE; inline;
  109833. begin
  109834. pTDefRegMap(@Self)^.&set := $04000000;
  109835. end;
  109836. procedure TCAN2_C2FIFOINT18.clearTXNFULLIE; inline;
  109837. begin
  109838. pTDefRegMap(@Self)^.clr := $04000000;
  109839. end;
  109840. procedure TCAN2_C2FIFOINT18.setTXNFULLIE(thebits : TBits_1); inline;
  109841. begin
  109842. if thebits = 0 then
  109843. pTDefRegMap(@Self)^.clr := $04000000
  109844. else
  109845. pTDefRegMap(@Self)^.&set := $04000000;
  109846. end;
  109847. function TCAN2_C2FIFOINT18.getTXNFULLIE : TBits_1; inline;
  109848. begin
  109849. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  109850. end;
  109851. procedure TCAN2_C2FIFOINT18.setw(thebits : TBits_32); inline;
  109852. begin
  109853. pTDefRegMap(@Self)^.val := thebits;
  109854. end;
  109855. function TCAN2_C2FIFOINT18.getw : TBits_32; inline;
  109856. begin
  109857. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109858. end;
  109859. procedure TCAN2_C2FIFOCI18.setCFIFOCI(thebits : TBits_5); inline;
  109860. begin
  109861. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  109862. end;
  109863. function TCAN2_C2FIFOCI18.getCFIFOCI : TBits_5; inline;
  109864. begin
  109865. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  109866. end;
  109867. procedure TCAN2_C2FIFOCI18.setw(thebits : TBits_32); inline;
  109868. begin
  109869. pTDefRegMap(@Self)^.val := thebits;
  109870. end;
  109871. function TCAN2_C2FIFOCI18.getw : TBits_32; inline;
  109872. begin
  109873. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  109874. end;
  109875. procedure TCAN2_C2FIFOCON19.setTXPRI(thebits : TBits_2); inline;
  109876. begin
  109877. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  109878. end;
  109879. function TCAN2_C2FIFOCON19.getTXPRI : TBits_2; inline;
  109880. begin
  109881. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  109882. end;
  109883. procedure TCAN2_C2FIFOCON19.setRTREN; inline;
  109884. begin
  109885. pTDefRegMap(@Self)^.&set := $00000004;
  109886. end;
  109887. procedure TCAN2_C2FIFOCON19.clearRTREN; inline;
  109888. begin
  109889. pTDefRegMap(@Self)^.clr := $00000004;
  109890. end;
  109891. procedure TCAN2_C2FIFOCON19.setRTREN(thebits : TBits_1); inline;
  109892. begin
  109893. if thebits = 0 then
  109894. pTDefRegMap(@Self)^.clr := $00000004
  109895. else
  109896. pTDefRegMap(@Self)^.&set := $00000004;
  109897. end;
  109898. function TCAN2_C2FIFOCON19.getRTREN : TBits_1; inline;
  109899. begin
  109900. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  109901. end;
  109902. procedure TCAN2_C2FIFOCON19.setTXREQ; inline;
  109903. begin
  109904. pTDefRegMap(@Self)^.&set := $00000008;
  109905. end;
  109906. procedure TCAN2_C2FIFOCON19.clearTXREQ; inline;
  109907. begin
  109908. pTDefRegMap(@Self)^.clr := $00000008;
  109909. end;
  109910. procedure TCAN2_C2FIFOCON19.setTXREQ(thebits : TBits_1); inline;
  109911. begin
  109912. if thebits = 0 then
  109913. pTDefRegMap(@Self)^.clr := $00000008
  109914. else
  109915. pTDefRegMap(@Self)^.&set := $00000008;
  109916. end;
  109917. function TCAN2_C2FIFOCON19.getTXREQ : TBits_1; inline;
  109918. begin
  109919. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  109920. end;
  109921. procedure TCAN2_C2FIFOCON19.setTXERR; inline;
  109922. begin
  109923. pTDefRegMap(@Self)^.&set := $00000010;
  109924. end;
  109925. procedure TCAN2_C2FIFOCON19.clearTXERR; inline;
  109926. begin
  109927. pTDefRegMap(@Self)^.clr := $00000010;
  109928. end;
  109929. procedure TCAN2_C2FIFOCON19.setTXERR(thebits : TBits_1); inline;
  109930. begin
  109931. if thebits = 0 then
  109932. pTDefRegMap(@Self)^.clr := $00000010
  109933. else
  109934. pTDefRegMap(@Self)^.&set := $00000010;
  109935. end;
  109936. function TCAN2_C2FIFOCON19.getTXERR : TBits_1; inline;
  109937. begin
  109938. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  109939. end;
  109940. procedure TCAN2_C2FIFOCON19.setTXLARB; inline;
  109941. begin
  109942. pTDefRegMap(@Self)^.&set := $00000020;
  109943. end;
  109944. procedure TCAN2_C2FIFOCON19.clearTXLARB; inline;
  109945. begin
  109946. pTDefRegMap(@Self)^.clr := $00000020;
  109947. end;
  109948. procedure TCAN2_C2FIFOCON19.setTXLARB(thebits : TBits_1); inline;
  109949. begin
  109950. if thebits = 0 then
  109951. pTDefRegMap(@Self)^.clr := $00000020
  109952. else
  109953. pTDefRegMap(@Self)^.&set := $00000020;
  109954. end;
  109955. function TCAN2_C2FIFOCON19.getTXLARB : TBits_1; inline;
  109956. begin
  109957. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  109958. end;
  109959. procedure TCAN2_C2FIFOCON19.setTXABAT; inline;
  109960. begin
  109961. pTDefRegMap(@Self)^.&set := $00000040;
  109962. end;
  109963. procedure TCAN2_C2FIFOCON19.clearTXABAT; inline;
  109964. begin
  109965. pTDefRegMap(@Self)^.clr := $00000040;
  109966. end;
  109967. procedure TCAN2_C2FIFOCON19.setTXABAT(thebits : TBits_1); inline;
  109968. begin
  109969. if thebits = 0 then
  109970. pTDefRegMap(@Self)^.clr := $00000040
  109971. else
  109972. pTDefRegMap(@Self)^.&set := $00000040;
  109973. end;
  109974. function TCAN2_C2FIFOCON19.getTXABAT : TBits_1; inline;
  109975. begin
  109976. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  109977. end;
  109978. procedure TCAN2_C2FIFOCON19.setTXEN; inline;
  109979. begin
  109980. pTDefRegMap(@Self)^.&set := $00000080;
  109981. end;
  109982. procedure TCAN2_C2FIFOCON19.clearTXEN; inline;
  109983. begin
  109984. pTDefRegMap(@Self)^.clr := $00000080;
  109985. end;
  109986. procedure TCAN2_C2FIFOCON19.setTXEN(thebits : TBits_1); inline;
  109987. begin
  109988. if thebits = 0 then
  109989. pTDefRegMap(@Self)^.clr := $00000080
  109990. else
  109991. pTDefRegMap(@Self)^.&set := $00000080;
  109992. end;
  109993. function TCAN2_C2FIFOCON19.getTXEN : TBits_1; inline;
  109994. begin
  109995. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  109996. end;
  109997. procedure TCAN2_C2FIFOCON19.setDONLY; inline;
  109998. begin
  109999. pTDefRegMap(@Self)^.&set := $00001000;
  110000. end;
  110001. procedure TCAN2_C2FIFOCON19.clearDONLY; inline;
  110002. begin
  110003. pTDefRegMap(@Self)^.clr := $00001000;
  110004. end;
  110005. procedure TCAN2_C2FIFOCON19.setDONLY(thebits : TBits_1); inline;
  110006. begin
  110007. if thebits = 0 then
  110008. pTDefRegMap(@Self)^.clr := $00001000
  110009. else
  110010. pTDefRegMap(@Self)^.&set := $00001000;
  110011. end;
  110012. function TCAN2_C2FIFOCON19.getDONLY : TBits_1; inline;
  110013. begin
  110014. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  110015. end;
  110016. procedure TCAN2_C2FIFOCON19.setUINC; inline;
  110017. begin
  110018. pTDefRegMap(@Self)^.&set := $00002000;
  110019. end;
  110020. procedure TCAN2_C2FIFOCON19.clearUINC; inline;
  110021. begin
  110022. pTDefRegMap(@Self)^.clr := $00002000;
  110023. end;
  110024. procedure TCAN2_C2FIFOCON19.setUINC(thebits : TBits_1); inline;
  110025. begin
  110026. if thebits = 0 then
  110027. pTDefRegMap(@Self)^.clr := $00002000
  110028. else
  110029. pTDefRegMap(@Self)^.&set := $00002000;
  110030. end;
  110031. function TCAN2_C2FIFOCON19.getUINC : TBits_1; inline;
  110032. begin
  110033. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  110034. end;
  110035. procedure TCAN2_C2FIFOCON19.setFRESET; inline;
  110036. begin
  110037. pTDefRegMap(@Self)^.&set := $00004000;
  110038. end;
  110039. procedure TCAN2_C2FIFOCON19.clearFRESET; inline;
  110040. begin
  110041. pTDefRegMap(@Self)^.clr := $00004000;
  110042. end;
  110043. procedure TCAN2_C2FIFOCON19.setFRESET(thebits : TBits_1); inline;
  110044. begin
  110045. if thebits = 0 then
  110046. pTDefRegMap(@Self)^.clr := $00004000
  110047. else
  110048. pTDefRegMap(@Self)^.&set := $00004000;
  110049. end;
  110050. function TCAN2_C2FIFOCON19.getFRESET : TBits_1; inline;
  110051. begin
  110052. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  110053. end;
  110054. procedure TCAN2_C2FIFOCON19.setFSIZE(thebits : TBits_5); inline;
  110055. begin
  110056. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  110057. end;
  110058. function TCAN2_C2FIFOCON19.getFSIZE : TBits_5; inline;
  110059. begin
  110060. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  110061. end;
  110062. procedure TCAN2_C2FIFOCON19.setw(thebits : TBits_32); inline;
  110063. begin
  110064. pTDefRegMap(@Self)^.val := thebits;
  110065. end;
  110066. function TCAN2_C2FIFOCON19.getw : TBits_32; inline;
  110067. begin
  110068. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110069. end;
  110070. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIF; inline;
  110071. begin
  110072. pTDefRegMap(@Self)^.&set := $00000001;
  110073. end;
  110074. procedure TCAN2_C2FIFOINT19.clearRXNEMPTYIF; inline;
  110075. begin
  110076. pTDefRegMap(@Self)^.clr := $00000001;
  110077. end;
  110078. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIF(thebits : TBits_1); inline;
  110079. begin
  110080. if thebits = 0 then
  110081. pTDefRegMap(@Self)^.clr := $00000001
  110082. else
  110083. pTDefRegMap(@Self)^.&set := $00000001;
  110084. end;
  110085. function TCAN2_C2FIFOINT19.getRXNEMPTYIF : TBits_1; inline;
  110086. begin
  110087. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  110088. end;
  110089. procedure TCAN2_C2FIFOINT19.setRXHALFIF; inline;
  110090. begin
  110091. pTDefRegMap(@Self)^.&set := $00000002;
  110092. end;
  110093. procedure TCAN2_C2FIFOINT19.clearRXHALFIF; inline;
  110094. begin
  110095. pTDefRegMap(@Self)^.clr := $00000002;
  110096. end;
  110097. procedure TCAN2_C2FIFOINT19.setRXHALFIF(thebits : TBits_1); inline;
  110098. begin
  110099. if thebits = 0 then
  110100. pTDefRegMap(@Self)^.clr := $00000002
  110101. else
  110102. pTDefRegMap(@Self)^.&set := $00000002;
  110103. end;
  110104. function TCAN2_C2FIFOINT19.getRXHALFIF : TBits_1; inline;
  110105. begin
  110106. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  110107. end;
  110108. procedure TCAN2_C2FIFOINT19.setRXFULLIF; inline;
  110109. begin
  110110. pTDefRegMap(@Self)^.&set := $00000004;
  110111. end;
  110112. procedure TCAN2_C2FIFOINT19.clearRXFULLIF; inline;
  110113. begin
  110114. pTDefRegMap(@Self)^.clr := $00000004;
  110115. end;
  110116. procedure TCAN2_C2FIFOINT19.setRXFULLIF(thebits : TBits_1); inline;
  110117. begin
  110118. if thebits = 0 then
  110119. pTDefRegMap(@Self)^.clr := $00000004
  110120. else
  110121. pTDefRegMap(@Self)^.&set := $00000004;
  110122. end;
  110123. function TCAN2_C2FIFOINT19.getRXFULLIF : TBits_1; inline;
  110124. begin
  110125. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110126. end;
  110127. procedure TCAN2_C2FIFOINT19.setRXOVFLIF; inline;
  110128. begin
  110129. pTDefRegMap(@Self)^.&set := $00000008;
  110130. end;
  110131. procedure TCAN2_C2FIFOINT19.clearRXOVFLIF; inline;
  110132. begin
  110133. pTDefRegMap(@Self)^.clr := $00000008;
  110134. end;
  110135. procedure TCAN2_C2FIFOINT19.setRXOVFLIF(thebits : TBits_1); inline;
  110136. begin
  110137. if thebits = 0 then
  110138. pTDefRegMap(@Self)^.clr := $00000008
  110139. else
  110140. pTDefRegMap(@Self)^.&set := $00000008;
  110141. end;
  110142. function TCAN2_C2FIFOINT19.getRXOVFLIF : TBits_1; inline;
  110143. begin
  110144. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110145. end;
  110146. procedure TCAN2_C2FIFOINT19.setTXEMPTYIF; inline;
  110147. begin
  110148. pTDefRegMap(@Self)^.&set := $00000100;
  110149. end;
  110150. procedure TCAN2_C2FIFOINT19.clearTXEMPTYIF; inline;
  110151. begin
  110152. pTDefRegMap(@Self)^.clr := $00000100;
  110153. end;
  110154. procedure TCAN2_C2FIFOINT19.setTXEMPTYIF(thebits : TBits_1); inline;
  110155. begin
  110156. if thebits = 0 then
  110157. pTDefRegMap(@Self)^.clr := $00000100
  110158. else
  110159. pTDefRegMap(@Self)^.&set := $00000100;
  110160. end;
  110161. function TCAN2_C2FIFOINT19.getTXEMPTYIF : TBits_1; inline;
  110162. begin
  110163. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  110164. end;
  110165. procedure TCAN2_C2FIFOINT19.setTXHALFIF; inline;
  110166. begin
  110167. pTDefRegMap(@Self)^.&set := $00000200;
  110168. end;
  110169. procedure TCAN2_C2FIFOINT19.clearTXHALFIF; inline;
  110170. begin
  110171. pTDefRegMap(@Self)^.clr := $00000200;
  110172. end;
  110173. procedure TCAN2_C2FIFOINT19.setTXHALFIF(thebits : TBits_1); inline;
  110174. begin
  110175. if thebits = 0 then
  110176. pTDefRegMap(@Self)^.clr := $00000200
  110177. else
  110178. pTDefRegMap(@Self)^.&set := $00000200;
  110179. end;
  110180. function TCAN2_C2FIFOINT19.getTXHALFIF : TBits_1; inline;
  110181. begin
  110182. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  110183. end;
  110184. procedure TCAN2_C2FIFOINT19.setTXNFULLIF; inline;
  110185. begin
  110186. pTDefRegMap(@Self)^.&set := $00000400;
  110187. end;
  110188. procedure TCAN2_C2FIFOINT19.clearTXNFULLIF; inline;
  110189. begin
  110190. pTDefRegMap(@Self)^.clr := $00000400;
  110191. end;
  110192. procedure TCAN2_C2FIFOINT19.setTXNFULLIF(thebits : TBits_1); inline;
  110193. begin
  110194. if thebits = 0 then
  110195. pTDefRegMap(@Self)^.clr := $00000400
  110196. else
  110197. pTDefRegMap(@Self)^.&set := $00000400;
  110198. end;
  110199. function TCAN2_C2FIFOINT19.getTXNFULLIF : TBits_1; inline;
  110200. begin
  110201. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  110202. end;
  110203. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIE; inline;
  110204. begin
  110205. pTDefRegMap(@Self)^.&set := $00010000;
  110206. end;
  110207. procedure TCAN2_C2FIFOINT19.clearRXNEMPTYIE; inline;
  110208. begin
  110209. pTDefRegMap(@Self)^.clr := $00010000;
  110210. end;
  110211. procedure TCAN2_C2FIFOINT19.setRXNEMPTYIE(thebits : TBits_1); inline;
  110212. begin
  110213. if thebits = 0 then
  110214. pTDefRegMap(@Self)^.clr := $00010000
  110215. else
  110216. pTDefRegMap(@Self)^.&set := $00010000;
  110217. end;
  110218. function TCAN2_C2FIFOINT19.getRXNEMPTYIE : TBits_1; inline;
  110219. begin
  110220. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  110221. end;
  110222. procedure TCAN2_C2FIFOINT19.setRXHALFIE; inline;
  110223. begin
  110224. pTDefRegMap(@Self)^.&set := $00020000;
  110225. end;
  110226. procedure TCAN2_C2FIFOINT19.clearRXHALFIE; inline;
  110227. begin
  110228. pTDefRegMap(@Self)^.clr := $00020000;
  110229. end;
  110230. procedure TCAN2_C2FIFOINT19.setRXHALFIE(thebits : TBits_1); inline;
  110231. begin
  110232. if thebits = 0 then
  110233. pTDefRegMap(@Self)^.clr := $00020000
  110234. else
  110235. pTDefRegMap(@Self)^.&set := $00020000;
  110236. end;
  110237. function TCAN2_C2FIFOINT19.getRXHALFIE : TBits_1; inline;
  110238. begin
  110239. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  110240. end;
  110241. procedure TCAN2_C2FIFOINT19.setRXFULLIE; inline;
  110242. begin
  110243. pTDefRegMap(@Self)^.&set := $00040000;
  110244. end;
  110245. procedure TCAN2_C2FIFOINT19.clearRXFULLIE; inline;
  110246. begin
  110247. pTDefRegMap(@Self)^.clr := $00040000;
  110248. end;
  110249. procedure TCAN2_C2FIFOINT19.setRXFULLIE(thebits : TBits_1); inline;
  110250. begin
  110251. if thebits = 0 then
  110252. pTDefRegMap(@Self)^.clr := $00040000
  110253. else
  110254. pTDefRegMap(@Self)^.&set := $00040000;
  110255. end;
  110256. function TCAN2_C2FIFOINT19.getRXFULLIE : TBits_1; inline;
  110257. begin
  110258. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  110259. end;
  110260. procedure TCAN2_C2FIFOINT19.setRXOVFLIE; inline;
  110261. begin
  110262. pTDefRegMap(@Self)^.&set := $00080000;
  110263. end;
  110264. procedure TCAN2_C2FIFOINT19.clearRXOVFLIE; inline;
  110265. begin
  110266. pTDefRegMap(@Self)^.clr := $00080000;
  110267. end;
  110268. procedure TCAN2_C2FIFOINT19.setRXOVFLIE(thebits : TBits_1); inline;
  110269. begin
  110270. if thebits = 0 then
  110271. pTDefRegMap(@Self)^.clr := $00080000
  110272. else
  110273. pTDefRegMap(@Self)^.&set := $00080000;
  110274. end;
  110275. function TCAN2_C2FIFOINT19.getRXOVFLIE : TBits_1; inline;
  110276. begin
  110277. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  110278. end;
  110279. procedure TCAN2_C2FIFOINT19.setTXEMPTYIE; inline;
  110280. begin
  110281. pTDefRegMap(@Self)^.&set := $01000000;
  110282. end;
  110283. procedure TCAN2_C2FIFOINT19.clearTXEMPTYIE; inline;
  110284. begin
  110285. pTDefRegMap(@Self)^.clr := $01000000;
  110286. end;
  110287. procedure TCAN2_C2FIFOINT19.setTXEMPTYIE(thebits : TBits_1); inline;
  110288. begin
  110289. if thebits = 0 then
  110290. pTDefRegMap(@Self)^.clr := $01000000
  110291. else
  110292. pTDefRegMap(@Self)^.&set := $01000000;
  110293. end;
  110294. function TCAN2_C2FIFOINT19.getTXEMPTYIE : TBits_1; inline;
  110295. begin
  110296. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  110297. end;
  110298. procedure TCAN2_C2FIFOINT19.setTXHALFIE; inline;
  110299. begin
  110300. pTDefRegMap(@Self)^.&set := $02000000;
  110301. end;
  110302. procedure TCAN2_C2FIFOINT19.clearTXHALFIE; inline;
  110303. begin
  110304. pTDefRegMap(@Self)^.clr := $02000000;
  110305. end;
  110306. procedure TCAN2_C2FIFOINT19.setTXHALFIE(thebits : TBits_1); inline;
  110307. begin
  110308. if thebits = 0 then
  110309. pTDefRegMap(@Self)^.clr := $02000000
  110310. else
  110311. pTDefRegMap(@Self)^.&set := $02000000;
  110312. end;
  110313. function TCAN2_C2FIFOINT19.getTXHALFIE : TBits_1; inline;
  110314. begin
  110315. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  110316. end;
  110317. procedure TCAN2_C2FIFOINT19.setTXNFULLIE; inline;
  110318. begin
  110319. pTDefRegMap(@Self)^.&set := $04000000;
  110320. end;
  110321. procedure TCAN2_C2FIFOINT19.clearTXNFULLIE; inline;
  110322. begin
  110323. pTDefRegMap(@Self)^.clr := $04000000;
  110324. end;
  110325. procedure TCAN2_C2FIFOINT19.setTXNFULLIE(thebits : TBits_1); inline;
  110326. begin
  110327. if thebits = 0 then
  110328. pTDefRegMap(@Self)^.clr := $04000000
  110329. else
  110330. pTDefRegMap(@Self)^.&set := $04000000;
  110331. end;
  110332. function TCAN2_C2FIFOINT19.getTXNFULLIE : TBits_1; inline;
  110333. begin
  110334. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  110335. end;
  110336. procedure TCAN2_C2FIFOINT19.setw(thebits : TBits_32); inline;
  110337. begin
  110338. pTDefRegMap(@Self)^.val := thebits;
  110339. end;
  110340. function TCAN2_C2FIFOINT19.getw : TBits_32; inline;
  110341. begin
  110342. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110343. end;
  110344. procedure TCAN2_C2FIFOCI19.setCFIFOCI(thebits : TBits_5); inline;
  110345. begin
  110346. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  110347. end;
  110348. function TCAN2_C2FIFOCI19.getCFIFOCI : TBits_5; inline;
  110349. begin
  110350. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  110351. end;
  110352. procedure TCAN2_C2FIFOCI19.setw(thebits : TBits_32); inline;
  110353. begin
  110354. pTDefRegMap(@Self)^.val := thebits;
  110355. end;
  110356. function TCAN2_C2FIFOCI19.getw : TBits_32; inline;
  110357. begin
  110358. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110359. end;
  110360. procedure TCAN2_C2FIFOCON20.setTXPRI(thebits : TBits_2); inline;
  110361. begin
  110362. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  110363. end;
  110364. function TCAN2_C2FIFOCON20.getTXPRI : TBits_2; inline;
  110365. begin
  110366. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  110367. end;
  110368. procedure TCAN2_C2FIFOCON20.setRTREN; inline;
  110369. begin
  110370. pTDefRegMap(@Self)^.&set := $00000004;
  110371. end;
  110372. procedure TCAN2_C2FIFOCON20.clearRTREN; inline;
  110373. begin
  110374. pTDefRegMap(@Self)^.clr := $00000004;
  110375. end;
  110376. procedure TCAN2_C2FIFOCON20.setRTREN(thebits : TBits_1); inline;
  110377. begin
  110378. if thebits = 0 then
  110379. pTDefRegMap(@Self)^.clr := $00000004
  110380. else
  110381. pTDefRegMap(@Self)^.&set := $00000004;
  110382. end;
  110383. function TCAN2_C2FIFOCON20.getRTREN : TBits_1; inline;
  110384. begin
  110385. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110386. end;
  110387. procedure TCAN2_C2FIFOCON20.setTXREQ; inline;
  110388. begin
  110389. pTDefRegMap(@Self)^.&set := $00000008;
  110390. end;
  110391. procedure TCAN2_C2FIFOCON20.clearTXREQ; inline;
  110392. begin
  110393. pTDefRegMap(@Self)^.clr := $00000008;
  110394. end;
  110395. procedure TCAN2_C2FIFOCON20.setTXREQ(thebits : TBits_1); inline;
  110396. begin
  110397. if thebits = 0 then
  110398. pTDefRegMap(@Self)^.clr := $00000008
  110399. else
  110400. pTDefRegMap(@Self)^.&set := $00000008;
  110401. end;
  110402. function TCAN2_C2FIFOCON20.getTXREQ : TBits_1; inline;
  110403. begin
  110404. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110405. end;
  110406. procedure TCAN2_C2FIFOCON20.setTXERR; inline;
  110407. begin
  110408. pTDefRegMap(@Self)^.&set := $00000010;
  110409. end;
  110410. procedure TCAN2_C2FIFOCON20.clearTXERR; inline;
  110411. begin
  110412. pTDefRegMap(@Self)^.clr := $00000010;
  110413. end;
  110414. procedure TCAN2_C2FIFOCON20.setTXERR(thebits : TBits_1); inline;
  110415. begin
  110416. if thebits = 0 then
  110417. pTDefRegMap(@Self)^.clr := $00000010
  110418. else
  110419. pTDefRegMap(@Self)^.&set := $00000010;
  110420. end;
  110421. function TCAN2_C2FIFOCON20.getTXERR : TBits_1; inline;
  110422. begin
  110423. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  110424. end;
  110425. procedure TCAN2_C2FIFOCON20.setTXLARB; inline;
  110426. begin
  110427. pTDefRegMap(@Self)^.&set := $00000020;
  110428. end;
  110429. procedure TCAN2_C2FIFOCON20.clearTXLARB; inline;
  110430. begin
  110431. pTDefRegMap(@Self)^.clr := $00000020;
  110432. end;
  110433. procedure TCAN2_C2FIFOCON20.setTXLARB(thebits : TBits_1); inline;
  110434. begin
  110435. if thebits = 0 then
  110436. pTDefRegMap(@Self)^.clr := $00000020
  110437. else
  110438. pTDefRegMap(@Self)^.&set := $00000020;
  110439. end;
  110440. function TCAN2_C2FIFOCON20.getTXLARB : TBits_1; inline;
  110441. begin
  110442. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  110443. end;
  110444. procedure TCAN2_C2FIFOCON20.setTXABAT; inline;
  110445. begin
  110446. pTDefRegMap(@Self)^.&set := $00000040;
  110447. end;
  110448. procedure TCAN2_C2FIFOCON20.clearTXABAT; inline;
  110449. begin
  110450. pTDefRegMap(@Self)^.clr := $00000040;
  110451. end;
  110452. procedure TCAN2_C2FIFOCON20.setTXABAT(thebits : TBits_1); inline;
  110453. begin
  110454. if thebits = 0 then
  110455. pTDefRegMap(@Self)^.clr := $00000040
  110456. else
  110457. pTDefRegMap(@Self)^.&set := $00000040;
  110458. end;
  110459. function TCAN2_C2FIFOCON20.getTXABAT : TBits_1; inline;
  110460. begin
  110461. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  110462. end;
  110463. procedure TCAN2_C2FIFOCON20.setTXEN; inline;
  110464. begin
  110465. pTDefRegMap(@Self)^.&set := $00000080;
  110466. end;
  110467. procedure TCAN2_C2FIFOCON20.clearTXEN; inline;
  110468. begin
  110469. pTDefRegMap(@Self)^.clr := $00000080;
  110470. end;
  110471. procedure TCAN2_C2FIFOCON20.setTXEN(thebits : TBits_1); inline;
  110472. begin
  110473. if thebits = 0 then
  110474. pTDefRegMap(@Self)^.clr := $00000080
  110475. else
  110476. pTDefRegMap(@Self)^.&set := $00000080;
  110477. end;
  110478. function TCAN2_C2FIFOCON20.getTXEN : TBits_1; inline;
  110479. begin
  110480. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  110481. end;
  110482. procedure TCAN2_C2FIFOCON20.setDONLY; inline;
  110483. begin
  110484. pTDefRegMap(@Self)^.&set := $00001000;
  110485. end;
  110486. procedure TCAN2_C2FIFOCON20.clearDONLY; inline;
  110487. begin
  110488. pTDefRegMap(@Self)^.clr := $00001000;
  110489. end;
  110490. procedure TCAN2_C2FIFOCON20.setDONLY(thebits : TBits_1); inline;
  110491. begin
  110492. if thebits = 0 then
  110493. pTDefRegMap(@Self)^.clr := $00001000
  110494. else
  110495. pTDefRegMap(@Self)^.&set := $00001000;
  110496. end;
  110497. function TCAN2_C2FIFOCON20.getDONLY : TBits_1; inline;
  110498. begin
  110499. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  110500. end;
  110501. procedure TCAN2_C2FIFOCON20.setUINC; inline;
  110502. begin
  110503. pTDefRegMap(@Self)^.&set := $00002000;
  110504. end;
  110505. procedure TCAN2_C2FIFOCON20.clearUINC; inline;
  110506. begin
  110507. pTDefRegMap(@Self)^.clr := $00002000;
  110508. end;
  110509. procedure TCAN2_C2FIFOCON20.setUINC(thebits : TBits_1); inline;
  110510. begin
  110511. if thebits = 0 then
  110512. pTDefRegMap(@Self)^.clr := $00002000
  110513. else
  110514. pTDefRegMap(@Self)^.&set := $00002000;
  110515. end;
  110516. function TCAN2_C2FIFOCON20.getUINC : TBits_1; inline;
  110517. begin
  110518. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  110519. end;
  110520. procedure TCAN2_C2FIFOCON20.setFRESET; inline;
  110521. begin
  110522. pTDefRegMap(@Self)^.&set := $00004000;
  110523. end;
  110524. procedure TCAN2_C2FIFOCON20.clearFRESET; inline;
  110525. begin
  110526. pTDefRegMap(@Self)^.clr := $00004000;
  110527. end;
  110528. procedure TCAN2_C2FIFOCON20.setFRESET(thebits : TBits_1); inline;
  110529. begin
  110530. if thebits = 0 then
  110531. pTDefRegMap(@Self)^.clr := $00004000
  110532. else
  110533. pTDefRegMap(@Self)^.&set := $00004000;
  110534. end;
  110535. function TCAN2_C2FIFOCON20.getFRESET : TBits_1; inline;
  110536. begin
  110537. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  110538. end;
  110539. procedure TCAN2_C2FIFOCON20.setFSIZE(thebits : TBits_5); inline;
  110540. begin
  110541. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  110542. end;
  110543. function TCAN2_C2FIFOCON20.getFSIZE : TBits_5; inline;
  110544. begin
  110545. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  110546. end;
  110547. procedure TCAN2_C2FIFOCON20.setw(thebits : TBits_32); inline;
  110548. begin
  110549. pTDefRegMap(@Self)^.val := thebits;
  110550. end;
  110551. function TCAN2_C2FIFOCON20.getw : TBits_32; inline;
  110552. begin
  110553. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110554. end;
  110555. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIF; inline;
  110556. begin
  110557. pTDefRegMap(@Self)^.&set := $00000001;
  110558. end;
  110559. procedure TCAN2_C2FIFOINT20.clearRXNEMPTYIF; inline;
  110560. begin
  110561. pTDefRegMap(@Self)^.clr := $00000001;
  110562. end;
  110563. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIF(thebits : TBits_1); inline;
  110564. begin
  110565. if thebits = 0 then
  110566. pTDefRegMap(@Self)^.clr := $00000001
  110567. else
  110568. pTDefRegMap(@Self)^.&set := $00000001;
  110569. end;
  110570. function TCAN2_C2FIFOINT20.getRXNEMPTYIF : TBits_1; inline;
  110571. begin
  110572. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  110573. end;
  110574. procedure TCAN2_C2FIFOINT20.setRXHALFIF; inline;
  110575. begin
  110576. pTDefRegMap(@Self)^.&set := $00000002;
  110577. end;
  110578. procedure TCAN2_C2FIFOINT20.clearRXHALFIF; inline;
  110579. begin
  110580. pTDefRegMap(@Self)^.clr := $00000002;
  110581. end;
  110582. procedure TCAN2_C2FIFOINT20.setRXHALFIF(thebits : TBits_1); inline;
  110583. begin
  110584. if thebits = 0 then
  110585. pTDefRegMap(@Self)^.clr := $00000002
  110586. else
  110587. pTDefRegMap(@Self)^.&set := $00000002;
  110588. end;
  110589. function TCAN2_C2FIFOINT20.getRXHALFIF : TBits_1; inline;
  110590. begin
  110591. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  110592. end;
  110593. procedure TCAN2_C2FIFOINT20.setRXFULLIF; inline;
  110594. begin
  110595. pTDefRegMap(@Self)^.&set := $00000004;
  110596. end;
  110597. procedure TCAN2_C2FIFOINT20.clearRXFULLIF; inline;
  110598. begin
  110599. pTDefRegMap(@Self)^.clr := $00000004;
  110600. end;
  110601. procedure TCAN2_C2FIFOINT20.setRXFULLIF(thebits : TBits_1); inline;
  110602. begin
  110603. if thebits = 0 then
  110604. pTDefRegMap(@Self)^.clr := $00000004
  110605. else
  110606. pTDefRegMap(@Self)^.&set := $00000004;
  110607. end;
  110608. function TCAN2_C2FIFOINT20.getRXFULLIF : TBits_1; inline;
  110609. begin
  110610. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110611. end;
  110612. procedure TCAN2_C2FIFOINT20.setRXOVFLIF; inline;
  110613. begin
  110614. pTDefRegMap(@Self)^.&set := $00000008;
  110615. end;
  110616. procedure TCAN2_C2FIFOINT20.clearRXOVFLIF; inline;
  110617. begin
  110618. pTDefRegMap(@Self)^.clr := $00000008;
  110619. end;
  110620. procedure TCAN2_C2FIFOINT20.setRXOVFLIF(thebits : TBits_1); inline;
  110621. begin
  110622. if thebits = 0 then
  110623. pTDefRegMap(@Self)^.clr := $00000008
  110624. else
  110625. pTDefRegMap(@Self)^.&set := $00000008;
  110626. end;
  110627. function TCAN2_C2FIFOINT20.getRXOVFLIF : TBits_1; inline;
  110628. begin
  110629. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110630. end;
  110631. procedure TCAN2_C2FIFOINT20.setTXEMPTYIF; inline;
  110632. begin
  110633. pTDefRegMap(@Self)^.&set := $00000100;
  110634. end;
  110635. procedure TCAN2_C2FIFOINT20.clearTXEMPTYIF; inline;
  110636. begin
  110637. pTDefRegMap(@Self)^.clr := $00000100;
  110638. end;
  110639. procedure TCAN2_C2FIFOINT20.setTXEMPTYIF(thebits : TBits_1); inline;
  110640. begin
  110641. if thebits = 0 then
  110642. pTDefRegMap(@Self)^.clr := $00000100
  110643. else
  110644. pTDefRegMap(@Self)^.&set := $00000100;
  110645. end;
  110646. function TCAN2_C2FIFOINT20.getTXEMPTYIF : TBits_1; inline;
  110647. begin
  110648. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  110649. end;
  110650. procedure TCAN2_C2FIFOINT20.setTXHALFIF; inline;
  110651. begin
  110652. pTDefRegMap(@Self)^.&set := $00000200;
  110653. end;
  110654. procedure TCAN2_C2FIFOINT20.clearTXHALFIF; inline;
  110655. begin
  110656. pTDefRegMap(@Self)^.clr := $00000200;
  110657. end;
  110658. procedure TCAN2_C2FIFOINT20.setTXHALFIF(thebits : TBits_1); inline;
  110659. begin
  110660. if thebits = 0 then
  110661. pTDefRegMap(@Self)^.clr := $00000200
  110662. else
  110663. pTDefRegMap(@Self)^.&set := $00000200;
  110664. end;
  110665. function TCAN2_C2FIFOINT20.getTXHALFIF : TBits_1; inline;
  110666. begin
  110667. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  110668. end;
  110669. procedure TCAN2_C2FIFOINT20.setTXNFULLIF; inline;
  110670. begin
  110671. pTDefRegMap(@Self)^.&set := $00000400;
  110672. end;
  110673. procedure TCAN2_C2FIFOINT20.clearTXNFULLIF; inline;
  110674. begin
  110675. pTDefRegMap(@Self)^.clr := $00000400;
  110676. end;
  110677. procedure TCAN2_C2FIFOINT20.setTXNFULLIF(thebits : TBits_1); inline;
  110678. begin
  110679. if thebits = 0 then
  110680. pTDefRegMap(@Self)^.clr := $00000400
  110681. else
  110682. pTDefRegMap(@Self)^.&set := $00000400;
  110683. end;
  110684. function TCAN2_C2FIFOINT20.getTXNFULLIF : TBits_1; inline;
  110685. begin
  110686. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  110687. end;
  110688. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIE; inline;
  110689. begin
  110690. pTDefRegMap(@Self)^.&set := $00010000;
  110691. end;
  110692. procedure TCAN2_C2FIFOINT20.clearRXNEMPTYIE; inline;
  110693. begin
  110694. pTDefRegMap(@Self)^.clr := $00010000;
  110695. end;
  110696. procedure TCAN2_C2FIFOINT20.setRXNEMPTYIE(thebits : TBits_1); inline;
  110697. begin
  110698. if thebits = 0 then
  110699. pTDefRegMap(@Self)^.clr := $00010000
  110700. else
  110701. pTDefRegMap(@Self)^.&set := $00010000;
  110702. end;
  110703. function TCAN2_C2FIFOINT20.getRXNEMPTYIE : TBits_1; inline;
  110704. begin
  110705. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  110706. end;
  110707. procedure TCAN2_C2FIFOINT20.setRXHALFIE; inline;
  110708. begin
  110709. pTDefRegMap(@Self)^.&set := $00020000;
  110710. end;
  110711. procedure TCAN2_C2FIFOINT20.clearRXHALFIE; inline;
  110712. begin
  110713. pTDefRegMap(@Self)^.clr := $00020000;
  110714. end;
  110715. procedure TCAN2_C2FIFOINT20.setRXHALFIE(thebits : TBits_1); inline;
  110716. begin
  110717. if thebits = 0 then
  110718. pTDefRegMap(@Self)^.clr := $00020000
  110719. else
  110720. pTDefRegMap(@Self)^.&set := $00020000;
  110721. end;
  110722. function TCAN2_C2FIFOINT20.getRXHALFIE : TBits_1; inline;
  110723. begin
  110724. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  110725. end;
  110726. procedure TCAN2_C2FIFOINT20.setRXFULLIE; inline;
  110727. begin
  110728. pTDefRegMap(@Self)^.&set := $00040000;
  110729. end;
  110730. procedure TCAN2_C2FIFOINT20.clearRXFULLIE; inline;
  110731. begin
  110732. pTDefRegMap(@Self)^.clr := $00040000;
  110733. end;
  110734. procedure TCAN2_C2FIFOINT20.setRXFULLIE(thebits : TBits_1); inline;
  110735. begin
  110736. if thebits = 0 then
  110737. pTDefRegMap(@Self)^.clr := $00040000
  110738. else
  110739. pTDefRegMap(@Self)^.&set := $00040000;
  110740. end;
  110741. function TCAN2_C2FIFOINT20.getRXFULLIE : TBits_1; inline;
  110742. begin
  110743. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  110744. end;
  110745. procedure TCAN2_C2FIFOINT20.setRXOVFLIE; inline;
  110746. begin
  110747. pTDefRegMap(@Self)^.&set := $00080000;
  110748. end;
  110749. procedure TCAN2_C2FIFOINT20.clearRXOVFLIE; inline;
  110750. begin
  110751. pTDefRegMap(@Self)^.clr := $00080000;
  110752. end;
  110753. procedure TCAN2_C2FIFOINT20.setRXOVFLIE(thebits : TBits_1); inline;
  110754. begin
  110755. if thebits = 0 then
  110756. pTDefRegMap(@Self)^.clr := $00080000
  110757. else
  110758. pTDefRegMap(@Self)^.&set := $00080000;
  110759. end;
  110760. function TCAN2_C2FIFOINT20.getRXOVFLIE : TBits_1; inline;
  110761. begin
  110762. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  110763. end;
  110764. procedure TCAN2_C2FIFOINT20.setTXEMPTYIE; inline;
  110765. begin
  110766. pTDefRegMap(@Self)^.&set := $01000000;
  110767. end;
  110768. procedure TCAN2_C2FIFOINT20.clearTXEMPTYIE; inline;
  110769. begin
  110770. pTDefRegMap(@Self)^.clr := $01000000;
  110771. end;
  110772. procedure TCAN2_C2FIFOINT20.setTXEMPTYIE(thebits : TBits_1); inline;
  110773. begin
  110774. if thebits = 0 then
  110775. pTDefRegMap(@Self)^.clr := $01000000
  110776. else
  110777. pTDefRegMap(@Self)^.&set := $01000000;
  110778. end;
  110779. function TCAN2_C2FIFOINT20.getTXEMPTYIE : TBits_1; inline;
  110780. begin
  110781. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  110782. end;
  110783. procedure TCAN2_C2FIFOINT20.setTXHALFIE; inline;
  110784. begin
  110785. pTDefRegMap(@Self)^.&set := $02000000;
  110786. end;
  110787. procedure TCAN2_C2FIFOINT20.clearTXHALFIE; inline;
  110788. begin
  110789. pTDefRegMap(@Self)^.clr := $02000000;
  110790. end;
  110791. procedure TCAN2_C2FIFOINT20.setTXHALFIE(thebits : TBits_1); inline;
  110792. begin
  110793. if thebits = 0 then
  110794. pTDefRegMap(@Self)^.clr := $02000000
  110795. else
  110796. pTDefRegMap(@Self)^.&set := $02000000;
  110797. end;
  110798. function TCAN2_C2FIFOINT20.getTXHALFIE : TBits_1; inline;
  110799. begin
  110800. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  110801. end;
  110802. procedure TCAN2_C2FIFOINT20.setTXNFULLIE; inline;
  110803. begin
  110804. pTDefRegMap(@Self)^.&set := $04000000;
  110805. end;
  110806. procedure TCAN2_C2FIFOINT20.clearTXNFULLIE; inline;
  110807. begin
  110808. pTDefRegMap(@Self)^.clr := $04000000;
  110809. end;
  110810. procedure TCAN2_C2FIFOINT20.setTXNFULLIE(thebits : TBits_1); inline;
  110811. begin
  110812. if thebits = 0 then
  110813. pTDefRegMap(@Self)^.clr := $04000000
  110814. else
  110815. pTDefRegMap(@Self)^.&set := $04000000;
  110816. end;
  110817. function TCAN2_C2FIFOINT20.getTXNFULLIE : TBits_1; inline;
  110818. begin
  110819. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  110820. end;
  110821. procedure TCAN2_C2FIFOINT20.setw(thebits : TBits_32); inline;
  110822. begin
  110823. pTDefRegMap(@Self)^.val := thebits;
  110824. end;
  110825. function TCAN2_C2FIFOINT20.getw : TBits_32; inline;
  110826. begin
  110827. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110828. end;
  110829. procedure TCAN2_C2FIFOCI20.setCFIFOCI(thebits : TBits_5); inline;
  110830. begin
  110831. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  110832. end;
  110833. function TCAN2_C2FIFOCI20.getCFIFOCI : TBits_5; inline;
  110834. begin
  110835. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  110836. end;
  110837. procedure TCAN2_C2FIFOCI20.setw(thebits : TBits_32); inline;
  110838. begin
  110839. pTDefRegMap(@Self)^.val := thebits;
  110840. end;
  110841. function TCAN2_C2FIFOCI20.getw : TBits_32; inline;
  110842. begin
  110843. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  110844. end;
  110845. procedure TCAN2_C2FIFOCON21.setTXPRI(thebits : TBits_2); inline;
  110846. begin
  110847. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  110848. end;
  110849. function TCAN2_C2FIFOCON21.getTXPRI : TBits_2; inline;
  110850. begin
  110851. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  110852. end;
  110853. procedure TCAN2_C2FIFOCON21.setRTREN; inline;
  110854. begin
  110855. pTDefRegMap(@Self)^.&set := $00000004;
  110856. end;
  110857. procedure TCAN2_C2FIFOCON21.clearRTREN; inline;
  110858. begin
  110859. pTDefRegMap(@Self)^.clr := $00000004;
  110860. end;
  110861. procedure TCAN2_C2FIFOCON21.setRTREN(thebits : TBits_1); inline;
  110862. begin
  110863. if thebits = 0 then
  110864. pTDefRegMap(@Self)^.clr := $00000004
  110865. else
  110866. pTDefRegMap(@Self)^.&set := $00000004;
  110867. end;
  110868. function TCAN2_C2FIFOCON21.getRTREN : TBits_1; inline;
  110869. begin
  110870. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  110871. end;
  110872. procedure TCAN2_C2FIFOCON21.setTXREQ; inline;
  110873. begin
  110874. pTDefRegMap(@Self)^.&set := $00000008;
  110875. end;
  110876. procedure TCAN2_C2FIFOCON21.clearTXREQ; inline;
  110877. begin
  110878. pTDefRegMap(@Self)^.clr := $00000008;
  110879. end;
  110880. procedure TCAN2_C2FIFOCON21.setTXREQ(thebits : TBits_1); inline;
  110881. begin
  110882. if thebits = 0 then
  110883. pTDefRegMap(@Self)^.clr := $00000008
  110884. else
  110885. pTDefRegMap(@Self)^.&set := $00000008;
  110886. end;
  110887. function TCAN2_C2FIFOCON21.getTXREQ : TBits_1; inline;
  110888. begin
  110889. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  110890. end;
  110891. procedure TCAN2_C2FIFOCON21.setTXERR; inline;
  110892. begin
  110893. pTDefRegMap(@Self)^.&set := $00000010;
  110894. end;
  110895. procedure TCAN2_C2FIFOCON21.clearTXERR; inline;
  110896. begin
  110897. pTDefRegMap(@Self)^.clr := $00000010;
  110898. end;
  110899. procedure TCAN2_C2FIFOCON21.setTXERR(thebits : TBits_1); inline;
  110900. begin
  110901. if thebits = 0 then
  110902. pTDefRegMap(@Self)^.clr := $00000010
  110903. else
  110904. pTDefRegMap(@Self)^.&set := $00000010;
  110905. end;
  110906. function TCAN2_C2FIFOCON21.getTXERR : TBits_1; inline;
  110907. begin
  110908. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  110909. end;
  110910. procedure TCAN2_C2FIFOCON21.setTXLARB; inline;
  110911. begin
  110912. pTDefRegMap(@Self)^.&set := $00000020;
  110913. end;
  110914. procedure TCAN2_C2FIFOCON21.clearTXLARB; inline;
  110915. begin
  110916. pTDefRegMap(@Self)^.clr := $00000020;
  110917. end;
  110918. procedure TCAN2_C2FIFOCON21.setTXLARB(thebits : TBits_1); inline;
  110919. begin
  110920. if thebits = 0 then
  110921. pTDefRegMap(@Self)^.clr := $00000020
  110922. else
  110923. pTDefRegMap(@Self)^.&set := $00000020;
  110924. end;
  110925. function TCAN2_C2FIFOCON21.getTXLARB : TBits_1; inline;
  110926. begin
  110927. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  110928. end;
  110929. procedure TCAN2_C2FIFOCON21.setTXABAT; inline;
  110930. begin
  110931. pTDefRegMap(@Self)^.&set := $00000040;
  110932. end;
  110933. procedure TCAN2_C2FIFOCON21.clearTXABAT; inline;
  110934. begin
  110935. pTDefRegMap(@Self)^.clr := $00000040;
  110936. end;
  110937. procedure TCAN2_C2FIFOCON21.setTXABAT(thebits : TBits_1); inline;
  110938. begin
  110939. if thebits = 0 then
  110940. pTDefRegMap(@Self)^.clr := $00000040
  110941. else
  110942. pTDefRegMap(@Self)^.&set := $00000040;
  110943. end;
  110944. function TCAN2_C2FIFOCON21.getTXABAT : TBits_1; inline;
  110945. begin
  110946. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  110947. end;
  110948. procedure TCAN2_C2FIFOCON21.setTXEN; inline;
  110949. begin
  110950. pTDefRegMap(@Self)^.&set := $00000080;
  110951. end;
  110952. procedure TCAN2_C2FIFOCON21.clearTXEN; inline;
  110953. begin
  110954. pTDefRegMap(@Self)^.clr := $00000080;
  110955. end;
  110956. procedure TCAN2_C2FIFOCON21.setTXEN(thebits : TBits_1); inline;
  110957. begin
  110958. if thebits = 0 then
  110959. pTDefRegMap(@Self)^.clr := $00000080
  110960. else
  110961. pTDefRegMap(@Self)^.&set := $00000080;
  110962. end;
  110963. function TCAN2_C2FIFOCON21.getTXEN : TBits_1; inline;
  110964. begin
  110965. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  110966. end;
  110967. procedure TCAN2_C2FIFOCON21.setDONLY; inline;
  110968. begin
  110969. pTDefRegMap(@Self)^.&set := $00001000;
  110970. end;
  110971. procedure TCAN2_C2FIFOCON21.clearDONLY; inline;
  110972. begin
  110973. pTDefRegMap(@Self)^.clr := $00001000;
  110974. end;
  110975. procedure TCAN2_C2FIFOCON21.setDONLY(thebits : TBits_1); inline;
  110976. begin
  110977. if thebits = 0 then
  110978. pTDefRegMap(@Self)^.clr := $00001000
  110979. else
  110980. pTDefRegMap(@Self)^.&set := $00001000;
  110981. end;
  110982. function TCAN2_C2FIFOCON21.getDONLY : TBits_1; inline;
  110983. begin
  110984. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  110985. end;
  110986. procedure TCAN2_C2FIFOCON21.setUINC; inline;
  110987. begin
  110988. pTDefRegMap(@Self)^.&set := $00002000;
  110989. end;
  110990. procedure TCAN2_C2FIFOCON21.clearUINC; inline;
  110991. begin
  110992. pTDefRegMap(@Self)^.clr := $00002000;
  110993. end;
  110994. procedure TCAN2_C2FIFOCON21.setUINC(thebits : TBits_1); inline;
  110995. begin
  110996. if thebits = 0 then
  110997. pTDefRegMap(@Self)^.clr := $00002000
  110998. else
  110999. pTDefRegMap(@Self)^.&set := $00002000;
  111000. end;
  111001. function TCAN2_C2FIFOCON21.getUINC : TBits_1; inline;
  111002. begin
  111003. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  111004. end;
  111005. procedure TCAN2_C2FIFOCON21.setFRESET; inline;
  111006. begin
  111007. pTDefRegMap(@Self)^.&set := $00004000;
  111008. end;
  111009. procedure TCAN2_C2FIFOCON21.clearFRESET; inline;
  111010. begin
  111011. pTDefRegMap(@Self)^.clr := $00004000;
  111012. end;
  111013. procedure TCAN2_C2FIFOCON21.setFRESET(thebits : TBits_1); inline;
  111014. begin
  111015. if thebits = 0 then
  111016. pTDefRegMap(@Self)^.clr := $00004000
  111017. else
  111018. pTDefRegMap(@Self)^.&set := $00004000;
  111019. end;
  111020. function TCAN2_C2FIFOCON21.getFRESET : TBits_1; inline;
  111021. begin
  111022. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  111023. end;
  111024. procedure TCAN2_C2FIFOCON21.setFSIZE(thebits : TBits_5); inline;
  111025. begin
  111026. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  111027. end;
  111028. function TCAN2_C2FIFOCON21.getFSIZE : TBits_5; inline;
  111029. begin
  111030. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  111031. end;
  111032. procedure TCAN2_C2FIFOCON21.setw(thebits : TBits_32); inline;
  111033. begin
  111034. pTDefRegMap(@Self)^.val := thebits;
  111035. end;
  111036. function TCAN2_C2FIFOCON21.getw : TBits_32; inline;
  111037. begin
  111038. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111039. end;
  111040. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIF; inline;
  111041. begin
  111042. pTDefRegMap(@Self)^.&set := $00000001;
  111043. end;
  111044. procedure TCAN2_C2FIFOINT21.clearRXNEMPTYIF; inline;
  111045. begin
  111046. pTDefRegMap(@Self)^.clr := $00000001;
  111047. end;
  111048. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIF(thebits : TBits_1); inline;
  111049. begin
  111050. if thebits = 0 then
  111051. pTDefRegMap(@Self)^.clr := $00000001
  111052. else
  111053. pTDefRegMap(@Self)^.&set := $00000001;
  111054. end;
  111055. function TCAN2_C2FIFOINT21.getRXNEMPTYIF : TBits_1; inline;
  111056. begin
  111057. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  111058. end;
  111059. procedure TCAN2_C2FIFOINT21.setRXHALFIF; inline;
  111060. begin
  111061. pTDefRegMap(@Self)^.&set := $00000002;
  111062. end;
  111063. procedure TCAN2_C2FIFOINT21.clearRXHALFIF; inline;
  111064. begin
  111065. pTDefRegMap(@Self)^.clr := $00000002;
  111066. end;
  111067. procedure TCAN2_C2FIFOINT21.setRXHALFIF(thebits : TBits_1); inline;
  111068. begin
  111069. if thebits = 0 then
  111070. pTDefRegMap(@Self)^.clr := $00000002
  111071. else
  111072. pTDefRegMap(@Self)^.&set := $00000002;
  111073. end;
  111074. function TCAN2_C2FIFOINT21.getRXHALFIF : TBits_1; inline;
  111075. begin
  111076. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  111077. end;
  111078. procedure TCAN2_C2FIFOINT21.setRXFULLIF; inline;
  111079. begin
  111080. pTDefRegMap(@Self)^.&set := $00000004;
  111081. end;
  111082. procedure TCAN2_C2FIFOINT21.clearRXFULLIF; inline;
  111083. begin
  111084. pTDefRegMap(@Self)^.clr := $00000004;
  111085. end;
  111086. procedure TCAN2_C2FIFOINT21.setRXFULLIF(thebits : TBits_1); inline;
  111087. begin
  111088. if thebits = 0 then
  111089. pTDefRegMap(@Self)^.clr := $00000004
  111090. else
  111091. pTDefRegMap(@Self)^.&set := $00000004;
  111092. end;
  111093. function TCAN2_C2FIFOINT21.getRXFULLIF : TBits_1; inline;
  111094. begin
  111095. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111096. end;
  111097. procedure TCAN2_C2FIFOINT21.setRXOVFLIF; inline;
  111098. begin
  111099. pTDefRegMap(@Self)^.&set := $00000008;
  111100. end;
  111101. procedure TCAN2_C2FIFOINT21.clearRXOVFLIF; inline;
  111102. begin
  111103. pTDefRegMap(@Self)^.clr := $00000008;
  111104. end;
  111105. procedure TCAN2_C2FIFOINT21.setRXOVFLIF(thebits : TBits_1); inline;
  111106. begin
  111107. if thebits = 0 then
  111108. pTDefRegMap(@Self)^.clr := $00000008
  111109. else
  111110. pTDefRegMap(@Self)^.&set := $00000008;
  111111. end;
  111112. function TCAN2_C2FIFOINT21.getRXOVFLIF : TBits_1; inline;
  111113. begin
  111114. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111115. end;
  111116. procedure TCAN2_C2FIFOINT21.setTXEMPTYIF; inline;
  111117. begin
  111118. pTDefRegMap(@Self)^.&set := $00000100;
  111119. end;
  111120. procedure TCAN2_C2FIFOINT21.clearTXEMPTYIF; inline;
  111121. begin
  111122. pTDefRegMap(@Self)^.clr := $00000100;
  111123. end;
  111124. procedure TCAN2_C2FIFOINT21.setTXEMPTYIF(thebits : TBits_1); inline;
  111125. begin
  111126. if thebits = 0 then
  111127. pTDefRegMap(@Self)^.clr := $00000100
  111128. else
  111129. pTDefRegMap(@Self)^.&set := $00000100;
  111130. end;
  111131. function TCAN2_C2FIFOINT21.getTXEMPTYIF : TBits_1; inline;
  111132. begin
  111133. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  111134. end;
  111135. procedure TCAN2_C2FIFOINT21.setTXHALFIF; inline;
  111136. begin
  111137. pTDefRegMap(@Self)^.&set := $00000200;
  111138. end;
  111139. procedure TCAN2_C2FIFOINT21.clearTXHALFIF; inline;
  111140. begin
  111141. pTDefRegMap(@Self)^.clr := $00000200;
  111142. end;
  111143. procedure TCAN2_C2FIFOINT21.setTXHALFIF(thebits : TBits_1); inline;
  111144. begin
  111145. if thebits = 0 then
  111146. pTDefRegMap(@Self)^.clr := $00000200
  111147. else
  111148. pTDefRegMap(@Self)^.&set := $00000200;
  111149. end;
  111150. function TCAN2_C2FIFOINT21.getTXHALFIF : TBits_1; inline;
  111151. begin
  111152. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  111153. end;
  111154. procedure TCAN2_C2FIFOINT21.setTXNFULLIF; inline;
  111155. begin
  111156. pTDefRegMap(@Self)^.&set := $00000400;
  111157. end;
  111158. procedure TCAN2_C2FIFOINT21.clearTXNFULLIF; inline;
  111159. begin
  111160. pTDefRegMap(@Self)^.clr := $00000400;
  111161. end;
  111162. procedure TCAN2_C2FIFOINT21.setTXNFULLIF(thebits : TBits_1); inline;
  111163. begin
  111164. if thebits = 0 then
  111165. pTDefRegMap(@Self)^.clr := $00000400
  111166. else
  111167. pTDefRegMap(@Self)^.&set := $00000400;
  111168. end;
  111169. function TCAN2_C2FIFOINT21.getTXNFULLIF : TBits_1; inline;
  111170. begin
  111171. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  111172. end;
  111173. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIE; inline;
  111174. begin
  111175. pTDefRegMap(@Self)^.&set := $00010000;
  111176. end;
  111177. procedure TCAN2_C2FIFOINT21.clearRXNEMPTYIE; inline;
  111178. begin
  111179. pTDefRegMap(@Self)^.clr := $00010000;
  111180. end;
  111181. procedure TCAN2_C2FIFOINT21.setRXNEMPTYIE(thebits : TBits_1); inline;
  111182. begin
  111183. if thebits = 0 then
  111184. pTDefRegMap(@Self)^.clr := $00010000
  111185. else
  111186. pTDefRegMap(@Self)^.&set := $00010000;
  111187. end;
  111188. function TCAN2_C2FIFOINT21.getRXNEMPTYIE : TBits_1; inline;
  111189. begin
  111190. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  111191. end;
  111192. procedure TCAN2_C2FIFOINT21.setRXHALFIE; inline;
  111193. begin
  111194. pTDefRegMap(@Self)^.&set := $00020000;
  111195. end;
  111196. procedure TCAN2_C2FIFOINT21.clearRXHALFIE; inline;
  111197. begin
  111198. pTDefRegMap(@Self)^.clr := $00020000;
  111199. end;
  111200. procedure TCAN2_C2FIFOINT21.setRXHALFIE(thebits : TBits_1); inline;
  111201. begin
  111202. if thebits = 0 then
  111203. pTDefRegMap(@Self)^.clr := $00020000
  111204. else
  111205. pTDefRegMap(@Self)^.&set := $00020000;
  111206. end;
  111207. function TCAN2_C2FIFOINT21.getRXHALFIE : TBits_1; inline;
  111208. begin
  111209. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  111210. end;
  111211. procedure TCAN2_C2FIFOINT21.setRXFULLIE; inline;
  111212. begin
  111213. pTDefRegMap(@Self)^.&set := $00040000;
  111214. end;
  111215. procedure TCAN2_C2FIFOINT21.clearRXFULLIE; inline;
  111216. begin
  111217. pTDefRegMap(@Self)^.clr := $00040000;
  111218. end;
  111219. procedure TCAN2_C2FIFOINT21.setRXFULLIE(thebits : TBits_1); inline;
  111220. begin
  111221. if thebits = 0 then
  111222. pTDefRegMap(@Self)^.clr := $00040000
  111223. else
  111224. pTDefRegMap(@Self)^.&set := $00040000;
  111225. end;
  111226. function TCAN2_C2FIFOINT21.getRXFULLIE : TBits_1; inline;
  111227. begin
  111228. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  111229. end;
  111230. procedure TCAN2_C2FIFOINT21.setRXOVFLIE; inline;
  111231. begin
  111232. pTDefRegMap(@Self)^.&set := $00080000;
  111233. end;
  111234. procedure TCAN2_C2FIFOINT21.clearRXOVFLIE; inline;
  111235. begin
  111236. pTDefRegMap(@Self)^.clr := $00080000;
  111237. end;
  111238. procedure TCAN2_C2FIFOINT21.setRXOVFLIE(thebits : TBits_1); inline;
  111239. begin
  111240. if thebits = 0 then
  111241. pTDefRegMap(@Self)^.clr := $00080000
  111242. else
  111243. pTDefRegMap(@Self)^.&set := $00080000;
  111244. end;
  111245. function TCAN2_C2FIFOINT21.getRXOVFLIE : TBits_1; inline;
  111246. begin
  111247. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  111248. end;
  111249. procedure TCAN2_C2FIFOINT21.setTXEMPTYIE; inline;
  111250. begin
  111251. pTDefRegMap(@Self)^.&set := $01000000;
  111252. end;
  111253. procedure TCAN2_C2FIFOINT21.clearTXEMPTYIE; inline;
  111254. begin
  111255. pTDefRegMap(@Self)^.clr := $01000000;
  111256. end;
  111257. procedure TCAN2_C2FIFOINT21.setTXEMPTYIE(thebits : TBits_1); inline;
  111258. begin
  111259. if thebits = 0 then
  111260. pTDefRegMap(@Self)^.clr := $01000000
  111261. else
  111262. pTDefRegMap(@Self)^.&set := $01000000;
  111263. end;
  111264. function TCAN2_C2FIFOINT21.getTXEMPTYIE : TBits_1; inline;
  111265. begin
  111266. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  111267. end;
  111268. procedure TCAN2_C2FIFOINT21.setTXHALFIE; inline;
  111269. begin
  111270. pTDefRegMap(@Self)^.&set := $02000000;
  111271. end;
  111272. procedure TCAN2_C2FIFOINT21.clearTXHALFIE; inline;
  111273. begin
  111274. pTDefRegMap(@Self)^.clr := $02000000;
  111275. end;
  111276. procedure TCAN2_C2FIFOINT21.setTXHALFIE(thebits : TBits_1); inline;
  111277. begin
  111278. if thebits = 0 then
  111279. pTDefRegMap(@Self)^.clr := $02000000
  111280. else
  111281. pTDefRegMap(@Self)^.&set := $02000000;
  111282. end;
  111283. function TCAN2_C2FIFOINT21.getTXHALFIE : TBits_1; inline;
  111284. begin
  111285. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  111286. end;
  111287. procedure TCAN2_C2FIFOINT21.setTXNFULLIE; inline;
  111288. begin
  111289. pTDefRegMap(@Self)^.&set := $04000000;
  111290. end;
  111291. procedure TCAN2_C2FIFOINT21.clearTXNFULLIE; inline;
  111292. begin
  111293. pTDefRegMap(@Self)^.clr := $04000000;
  111294. end;
  111295. procedure TCAN2_C2FIFOINT21.setTXNFULLIE(thebits : TBits_1); inline;
  111296. begin
  111297. if thebits = 0 then
  111298. pTDefRegMap(@Self)^.clr := $04000000
  111299. else
  111300. pTDefRegMap(@Self)^.&set := $04000000;
  111301. end;
  111302. function TCAN2_C2FIFOINT21.getTXNFULLIE : TBits_1; inline;
  111303. begin
  111304. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  111305. end;
  111306. procedure TCAN2_C2FIFOINT21.setw(thebits : TBits_32); inline;
  111307. begin
  111308. pTDefRegMap(@Self)^.val := thebits;
  111309. end;
  111310. function TCAN2_C2FIFOINT21.getw : TBits_32; inline;
  111311. begin
  111312. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111313. end;
  111314. procedure TCAN2_C2FIFOCI21.setCFIFOCI(thebits : TBits_5); inline;
  111315. begin
  111316. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  111317. end;
  111318. function TCAN2_C2FIFOCI21.getCFIFOCI : TBits_5; inline;
  111319. begin
  111320. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  111321. end;
  111322. procedure TCAN2_C2FIFOCI21.setw(thebits : TBits_32); inline;
  111323. begin
  111324. pTDefRegMap(@Self)^.val := thebits;
  111325. end;
  111326. function TCAN2_C2FIFOCI21.getw : TBits_32; inline;
  111327. begin
  111328. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111329. end;
  111330. procedure TCAN2_C2FIFOCON22.setTXPRI(thebits : TBits_2); inline;
  111331. begin
  111332. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  111333. end;
  111334. function TCAN2_C2FIFOCON22.getTXPRI : TBits_2; inline;
  111335. begin
  111336. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  111337. end;
  111338. procedure TCAN2_C2FIFOCON22.setRTREN; inline;
  111339. begin
  111340. pTDefRegMap(@Self)^.&set := $00000004;
  111341. end;
  111342. procedure TCAN2_C2FIFOCON22.clearRTREN; inline;
  111343. begin
  111344. pTDefRegMap(@Self)^.clr := $00000004;
  111345. end;
  111346. procedure TCAN2_C2FIFOCON22.setRTREN(thebits : TBits_1); inline;
  111347. begin
  111348. if thebits = 0 then
  111349. pTDefRegMap(@Self)^.clr := $00000004
  111350. else
  111351. pTDefRegMap(@Self)^.&set := $00000004;
  111352. end;
  111353. function TCAN2_C2FIFOCON22.getRTREN : TBits_1; inline;
  111354. begin
  111355. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111356. end;
  111357. procedure TCAN2_C2FIFOCON22.setTXREQ; inline;
  111358. begin
  111359. pTDefRegMap(@Self)^.&set := $00000008;
  111360. end;
  111361. procedure TCAN2_C2FIFOCON22.clearTXREQ; inline;
  111362. begin
  111363. pTDefRegMap(@Self)^.clr := $00000008;
  111364. end;
  111365. procedure TCAN2_C2FIFOCON22.setTXREQ(thebits : TBits_1); inline;
  111366. begin
  111367. if thebits = 0 then
  111368. pTDefRegMap(@Self)^.clr := $00000008
  111369. else
  111370. pTDefRegMap(@Self)^.&set := $00000008;
  111371. end;
  111372. function TCAN2_C2FIFOCON22.getTXREQ : TBits_1; inline;
  111373. begin
  111374. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111375. end;
  111376. procedure TCAN2_C2FIFOCON22.setTXERR; inline;
  111377. begin
  111378. pTDefRegMap(@Self)^.&set := $00000010;
  111379. end;
  111380. procedure TCAN2_C2FIFOCON22.clearTXERR; inline;
  111381. begin
  111382. pTDefRegMap(@Self)^.clr := $00000010;
  111383. end;
  111384. procedure TCAN2_C2FIFOCON22.setTXERR(thebits : TBits_1); inline;
  111385. begin
  111386. if thebits = 0 then
  111387. pTDefRegMap(@Self)^.clr := $00000010
  111388. else
  111389. pTDefRegMap(@Self)^.&set := $00000010;
  111390. end;
  111391. function TCAN2_C2FIFOCON22.getTXERR : TBits_1; inline;
  111392. begin
  111393. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  111394. end;
  111395. procedure TCAN2_C2FIFOCON22.setTXLARB; inline;
  111396. begin
  111397. pTDefRegMap(@Self)^.&set := $00000020;
  111398. end;
  111399. procedure TCAN2_C2FIFOCON22.clearTXLARB; inline;
  111400. begin
  111401. pTDefRegMap(@Self)^.clr := $00000020;
  111402. end;
  111403. procedure TCAN2_C2FIFOCON22.setTXLARB(thebits : TBits_1); inline;
  111404. begin
  111405. if thebits = 0 then
  111406. pTDefRegMap(@Self)^.clr := $00000020
  111407. else
  111408. pTDefRegMap(@Self)^.&set := $00000020;
  111409. end;
  111410. function TCAN2_C2FIFOCON22.getTXLARB : TBits_1; inline;
  111411. begin
  111412. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  111413. end;
  111414. procedure TCAN2_C2FIFOCON22.setTXABAT; inline;
  111415. begin
  111416. pTDefRegMap(@Self)^.&set := $00000040;
  111417. end;
  111418. procedure TCAN2_C2FIFOCON22.clearTXABAT; inline;
  111419. begin
  111420. pTDefRegMap(@Self)^.clr := $00000040;
  111421. end;
  111422. procedure TCAN2_C2FIFOCON22.setTXABAT(thebits : TBits_1); inline;
  111423. begin
  111424. if thebits = 0 then
  111425. pTDefRegMap(@Self)^.clr := $00000040
  111426. else
  111427. pTDefRegMap(@Self)^.&set := $00000040;
  111428. end;
  111429. function TCAN2_C2FIFOCON22.getTXABAT : TBits_1; inline;
  111430. begin
  111431. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  111432. end;
  111433. procedure TCAN2_C2FIFOCON22.setTXEN; inline;
  111434. begin
  111435. pTDefRegMap(@Self)^.&set := $00000080;
  111436. end;
  111437. procedure TCAN2_C2FIFOCON22.clearTXEN; inline;
  111438. begin
  111439. pTDefRegMap(@Self)^.clr := $00000080;
  111440. end;
  111441. procedure TCAN2_C2FIFOCON22.setTXEN(thebits : TBits_1); inline;
  111442. begin
  111443. if thebits = 0 then
  111444. pTDefRegMap(@Self)^.clr := $00000080
  111445. else
  111446. pTDefRegMap(@Self)^.&set := $00000080;
  111447. end;
  111448. function TCAN2_C2FIFOCON22.getTXEN : TBits_1; inline;
  111449. begin
  111450. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  111451. end;
  111452. procedure TCAN2_C2FIFOCON22.setDONLY; inline;
  111453. begin
  111454. pTDefRegMap(@Self)^.&set := $00001000;
  111455. end;
  111456. procedure TCAN2_C2FIFOCON22.clearDONLY; inline;
  111457. begin
  111458. pTDefRegMap(@Self)^.clr := $00001000;
  111459. end;
  111460. procedure TCAN2_C2FIFOCON22.setDONLY(thebits : TBits_1); inline;
  111461. begin
  111462. if thebits = 0 then
  111463. pTDefRegMap(@Self)^.clr := $00001000
  111464. else
  111465. pTDefRegMap(@Self)^.&set := $00001000;
  111466. end;
  111467. function TCAN2_C2FIFOCON22.getDONLY : TBits_1; inline;
  111468. begin
  111469. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  111470. end;
  111471. procedure TCAN2_C2FIFOCON22.setUINC; inline;
  111472. begin
  111473. pTDefRegMap(@Self)^.&set := $00002000;
  111474. end;
  111475. procedure TCAN2_C2FIFOCON22.clearUINC; inline;
  111476. begin
  111477. pTDefRegMap(@Self)^.clr := $00002000;
  111478. end;
  111479. procedure TCAN2_C2FIFOCON22.setUINC(thebits : TBits_1); inline;
  111480. begin
  111481. if thebits = 0 then
  111482. pTDefRegMap(@Self)^.clr := $00002000
  111483. else
  111484. pTDefRegMap(@Self)^.&set := $00002000;
  111485. end;
  111486. function TCAN2_C2FIFOCON22.getUINC : TBits_1; inline;
  111487. begin
  111488. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  111489. end;
  111490. procedure TCAN2_C2FIFOCON22.setFRESET; inline;
  111491. begin
  111492. pTDefRegMap(@Self)^.&set := $00004000;
  111493. end;
  111494. procedure TCAN2_C2FIFOCON22.clearFRESET; inline;
  111495. begin
  111496. pTDefRegMap(@Self)^.clr := $00004000;
  111497. end;
  111498. procedure TCAN2_C2FIFOCON22.setFRESET(thebits : TBits_1); inline;
  111499. begin
  111500. if thebits = 0 then
  111501. pTDefRegMap(@Self)^.clr := $00004000
  111502. else
  111503. pTDefRegMap(@Self)^.&set := $00004000;
  111504. end;
  111505. function TCAN2_C2FIFOCON22.getFRESET : TBits_1; inline;
  111506. begin
  111507. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  111508. end;
  111509. procedure TCAN2_C2FIFOCON22.setFSIZE(thebits : TBits_5); inline;
  111510. begin
  111511. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  111512. end;
  111513. function TCAN2_C2FIFOCON22.getFSIZE : TBits_5; inline;
  111514. begin
  111515. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  111516. end;
  111517. procedure TCAN2_C2FIFOCON22.setw(thebits : TBits_32); inline;
  111518. begin
  111519. pTDefRegMap(@Self)^.val := thebits;
  111520. end;
  111521. function TCAN2_C2FIFOCON22.getw : TBits_32; inline;
  111522. begin
  111523. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111524. end;
  111525. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIF; inline;
  111526. begin
  111527. pTDefRegMap(@Self)^.&set := $00000001;
  111528. end;
  111529. procedure TCAN2_C2FIFOINT22.clearRXNEMPTYIF; inline;
  111530. begin
  111531. pTDefRegMap(@Self)^.clr := $00000001;
  111532. end;
  111533. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIF(thebits : TBits_1); inline;
  111534. begin
  111535. if thebits = 0 then
  111536. pTDefRegMap(@Self)^.clr := $00000001
  111537. else
  111538. pTDefRegMap(@Self)^.&set := $00000001;
  111539. end;
  111540. function TCAN2_C2FIFOINT22.getRXNEMPTYIF : TBits_1; inline;
  111541. begin
  111542. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  111543. end;
  111544. procedure TCAN2_C2FIFOINT22.setRXHALFIF; inline;
  111545. begin
  111546. pTDefRegMap(@Self)^.&set := $00000002;
  111547. end;
  111548. procedure TCAN2_C2FIFOINT22.clearRXHALFIF; inline;
  111549. begin
  111550. pTDefRegMap(@Self)^.clr := $00000002;
  111551. end;
  111552. procedure TCAN2_C2FIFOINT22.setRXHALFIF(thebits : TBits_1); inline;
  111553. begin
  111554. if thebits = 0 then
  111555. pTDefRegMap(@Self)^.clr := $00000002
  111556. else
  111557. pTDefRegMap(@Self)^.&set := $00000002;
  111558. end;
  111559. function TCAN2_C2FIFOINT22.getRXHALFIF : TBits_1; inline;
  111560. begin
  111561. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  111562. end;
  111563. procedure TCAN2_C2FIFOINT22.setRXFULLIF; inline;
  111564. begin
  111565. pTDefRegMap(@Self)^.&set := $00000004;
  111566. end;
  111567. procedure TCAN2_C2FIFOINT22.clearRXFULLIF; inline;
  111568. begin
  111569. pTDefRegMap(@Self)^.clr := $00000004;
  111570. end;
  111571. procedure TCAN2_C2FIFOINT22.setRXFULLIF(thebits : TBits_1); inline;
  111572. begin
  111573. if thebits = 0 then
  111574. pTDefRegMap(@Self)^.clr := $00000004
  111575. else
  111576. pTDefRegMap(@Self)^.&set := $00000004;
  111577. end;
  111578. function TCAN2_C2FIFOINT22.getRXFULLIF : TBits_1; inline;
  111579. begin
  111580. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111581. end;
  111582. procedure TCAN2_C2FIFOINT22.setRXOVFLIF; inline;
  111583. begin
  111584. pTDefRegMap(@Self)^.&set := $00000008;
  111585. end;
  111586. procedure TCAN2_C2FIFOINT22.clearRXOVFLIF; inline;
  111587. begin
  111588. pTDefRegMap(@Self)^.clr := $00000008;
  111589. end;
  111590. procedure TCAN2_C2FIFOINT22.setRXOVFLIF(thebits : TBits_1); inline;
  111591. begin
  111592. if thebits = 0 then
  111593. pTDefRegMap(@Self)^.clr := $00000008
  111594. else
  111595. pTDefRegMap(@Self)^.&set := $00000008;
  111596. end;
  111597. function TCAN2_C2FIFOINT22.getRXOVFLIF : TBits_1; inline;
  111598. begin
  111599. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111600. end;
  111601. procedure TCAN2_C2FIFOINT22.setTXEMPTYIF; inline;
  111602. begin
  111603. pTDefRegMap(@Self)^.&set := $00000100;
  111604. end;
  111605. procedure TCAN2_C2FIFOINT22.clearTXEMPTYIF; inline;
  111606. begin
  111607. pTDefRegMap(@Self)^.clr := $00000100;
  111608. end;
  111609. procedure TCAN2_C2FIFOINT22.setTXEMPTYIF(thebits : TBits_1); inline;
  111610. begin
  111611. if thebits = 0 then
  111612. pTDefRegMap(@Self)^.clr := $00000100
  111613. else
  111614. pTDefRegMap(@Self)^.&set := $00000100;
  111615. end;
  111616. function TCAN2_C2FIFOINT22.getTXEMPTYIF : TBits_1; inline;
  111617. begin
  111618. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  111619. end;
  111620. procedure TCAN2_C2FIFOINT22.setTXHALFIF; inline;
  111621. begin
  111622. pTDefRegMap(@Self)^.&set := $00000200;
  111623. end;
  111624. procedure TCAN2_C2FIFOINT22.clearTXHALFIF; inline;
  111625. begin
  111626. pTDefRegMap(@Self)^.clr := $00000200;
  111627. end;
  111628. procedure TCAN2_C2FIFOINT22.setTXHALFIF(thebits : TBits_1); inline;
  111629. begin
  111630. if thebits = 0 then
  111631. pTDefRegMap(@Self)^.clr := $00000200
  111632. else
  111633. pTDefRegMap(@Self)^.&set := $00000200;
  111634. end;
  111635. function TCAN2_C2FIFOINT22.getTXHALFIF : TBits_1; inline;
  111636. begin
  111637. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  111638. end;
  111639. procedure TCAN2_C2FIFOINT22.setTXNFULLIF; inline;
  111640. begin
  111641. pTDefRegMap(@Self)^.&set := $00000400;
  111642. end;
  111643. procedure TCAN2_C2FIFOINT22.clearTXNFULLIF; inline;
  111644. begin
  111645. pTDefRegMap(@Self)^.clr := $00000400;
  111646. end;
  111647. procedure TCAN2_C2FIFOINT22.setTXNFULLIF(thebits : TBits_1); inline;
  111648. begin
  111649. if thebits = 0 then
  111650. pTDefRegMap(@Self)^.clr := $00000400
  111651. else
  111652. pTDefRegMap(@Self)^.&set := $00000400;
  111653. end;
  111654. function TCAN2_C2FIFOINT22.getTXNFULLIF : TBits_1; inline;
  111655. begin
  111656. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  111657. end;
  111658. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIE; inline;
  111659. begin
  111660. pTDefRegMap(@Self)^.&set := $00010000;
  111661. end;
  111662. procedure TCAN2_C2FIFOINT22.clearRXNEMPTYIE; inline;
  111663. begin
  111664. pTDefRegMap(@Self)^.clr := $00010000;
  111665. end;
  111666. procedure TCAN2_C2FIFOINT22.setRXNEMPTYIE(thebits : TBits_1); inline;
  111667. begin
  111668. if thebits = 0 then
  111669. pTDefRegMap(@Self)^.clr := $00010000
  111670. else
  111671. pTDefRegMap(@Self)^.&set := $00010000;
  111672. end;
  111673. function TCAN2_C2FIFOINT22.getRXNEMPTYIE : TBits_1; inline;
  111674. begin
  111675. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  111676. end;
  111677. procedure TCAN2_C2FIFOINT22.setRXHALFIE; inline;
  111678. begin
  111679. pTDefRegMap(@Self)^.&set := $00020000;
  111680. end;
  111681. procedure TCAN2_C2FIFOINT22.clearRXHALFIE; inline;
  111682. begin
  111683. pTDefRegMap(@Self)^.clr := $00020000;
  111684. end;
  111685. procedure TCAN2_C2FIFOINT22.setRXHALFIE(thebits : TBits_1); inline;
  111686. begin
  111687. if thebits = 0 then
  111688. pTDefRegMap(@Self)^.clr := $00020000
  111689. else
  111690. pTDefRegMap(@Self)^.&set := $00020000;
  111691. end;
  111692. function TCAN2_C2FIFOINT22.getRXHALFIE : TBits_1; inline;
  111693. begin
  111694. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  111695. end;
  111696. procedure TCAN2_C2FIFOINT22.setRXFULLIE; inline;
  111697. begin
  111698. pTDefRegMap(@Self)^.&set := $00040000;
  111699. end;
  111700. procedure TCAN2_C2FIFOINT22.clearRXFULLIE; inline;
  111701. begin
  111702. pTDefRegMap(@Self)^.clr := $00040000;
  111703. end;
  111704. procedure TCAN2_C2FIFOINT22.setRXFULLIE(thebits : TBits_1); inline;
  111705. begin
  111706. if thebits = 0 then
  111707. pTDefRegMap(@Self)^.clr := $00040000
  111708. else
  111709. pTDefRegMap(@Self)^.&set := $00040000;
  111710. end;
  111711. function TCAN2_C2FIFOINT22.getRXFULLIE : TBits_1; inline;
  111712. begin
  111713. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  111714. end;
  111715. procedure TCAN2_C2FIFOINT22.setRXOVFLIE; inline;
  111716. begin
  111717. pTDefRegMap(@Self)^.&set := $00080000;
  111718. end;
  111719. procedure TCAN2_C2FIFOINT22.clearRXOVFLIE; inline;
  111720. begin
  111721. pTDefRegMap(@Self)^.clr := $00080000;
  111722. end;
  111723. procedure TCAN2_C2FIFOINT22.setRXOVFLIE(thebits : TBits_1); inline;
  111724. begin
  111725. if thebits = 0 then
  111726. pTDefRegMap(@Self)^.clr := $00080000
  111727. else
  111728. pTDefRegMap(@Self)^.&set := $00080000;
  111729. end;
  111730. function TCAN2_C2FIFOINT22.getRXOVFLIE : TBits_1; inline;
  111731. begin
  111732. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  111733. end;
  111734. procedure TCAN2_C2FIFOINT22.setTXEMPTYIE; inline;
  111735. begin
  111736. pTDefRegMap(@Self)^.&set := $01000000;
  111737. end;
  111738. procedure TCAN2_C2FIFOINT22.clearTXEMPTYIE; inline;
  111739. begin
  111740. pTDefRegMap(@Self)^.clr := $01000000;
  111741. end;
  111742. procedure TCAN2_C2FIFOINT22.setTXEMPTYIE(thebits : TBits_1); inline;
  111743. begin
  111744. if thebits = 0 then
  111745. pTDefRegMap(@Self)^.clr := $01000000
  111746. else
  111747. pTDefRegMap(@Self)^.&set := $01000000;
  111748. end;
  111749. function TCAN2_C2FIFOINT22.getTXEMPTYIE : TBits_1; inline;
  111750. begin
  111751. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  111752. end;
  111753. procedure TCAN2_C2FIFOINT22.setTXHALFIE; inline;
  111754. begin
  111755. pTDefRegMap(@Self)^.&set := $02000000;
  111756. end;
  111757. procedure TCAN2_C2FIFOINT22.clearTXHALFIE; inline;
  111758. begin
  111759. pTDefRegMap(@Self)^.clr := $02000000;
  111760. end;
  111761. procedure TCAN2_C2FIFOINT22.setTXHALFIE(thebits : TBits_1); inline;
  111762. begin
  111763. if thebits = 0 then
  111764. pTDefRegMap(@Self)^.clr := $02000000
  111765. else
  111766. pTDefRegMap(@Self)^.&set := $02000000;
  111767. end;
  111768. function TCAN2_C2FIFOINT22.getTXHALFIE : TBits_1; inline;
  111769. begin
  111770. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  111771. end;
  111772. procedure TCAN2_C2FIFOINT22.setTXNFULLIE; inline;
  111773. begin
  111774. pTDefRegMap(@Self)^.&set := $04000000;
  111775. end;
  111776. procedure TCAN2_C2FIFOINT22.clearTXNFULLIE; inline;
  111777. begin
  111778. pTDefRegMap(@Self)^.clr := $04000000;
  111779. end;
  111780. procedure TCAN2_C2FIFOINT22.setTXNFULLIE(thebits : TBits_1); inline;
  111781. begin
  111782. if thebits = 0 then
  111783. pTDefRegMap(@Self)^.clr := $04000000
  111784. else
  111785. pTDefRegMap(@Self)^.&set := $04000000;
  111786. end;
  111787. function TCAN2_C2FIFOINT22.getTXNFULLIE : TBits_1; inline;
  111788. begin
  111789. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  111790. end;
  111791. procedure TCAN2_C2FIFOINT22.setw(thebits : TBits_32); inline;
  111792. begin
  111793. pTDefRegMap(@Self)^.val := thebits;
  111794. end;
  111795. function TCAN2_C2FIFOINT22.getw : TBits_32; inline;
  111796. begin
  111797. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111798. end;
  111799. procedure TCAN2_C2FIFOCI22.setCFIFOCI(thebits : TBits_5); inline;
  111800. begin
  111801. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  111802. end;
  111803. function TCAN2_C2FIFOCI22.getCFIFOCI : TBits_5; inline;
  111804. begin
  111805. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  111806. end;
  111807. procedure TCAN2_C2FIFOCI22.setw(thebits : TBits_32); inline;
  111808. begin
  111809. pTDefRegMap(@Self)^.val := thebits;
  111810. end;
  111811. function TCAN2_C2FIFOCI22.getw : TBits_32; inline;
  111812. begin
  111813. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  111814. end;
  111815. procedure TCAN2_C2FIFOCON23.setTXPRI(thebits : TBits_2); inline;
  111816. begin
  111817. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  111818. end;
  111819. function TCAN2_C2FIFOCON23.getTXPRI : TBits_2; inline;
  111820. begin
  111821. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  111822. end;
  111823. procedure TCAN2_C2FIFOCON23.setRTREN; inline;
  111824. begin
  111825. pTDefRegMap(@Self)^.&set := $00000004;
  111826. end;
  111827. procedure TCAN2_C2FIFOCON23.clearRTREN; inline;
  111828. begin
  111829. pTDefRegMap(@Self)^.clr := $00000004;
  111830. end;
  111831. procedure TCAN2_C2FIFOCON23.setRTREN(thebits : TBits_1); inline;
  111832. begin
  111833. if thebits = 0 then
  111834. pTDefRegMap(@Self)^.clr := $00000004
  111835. else
  111836. pTDefRegMap(@Self)^.&set := $00000004;
  111837. end;
  111838. function TCAN2_C2FIFOCON23.getRTREN : TBits_1; inline;
  111839. begin
  111840. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  111841. end;
  111842. procedure TCAN2_C2FIFOCON23.setTXREQ; inline;
  111843. begin
  111844. pTDefRegMap(@Self)^.&set := $00000008;
  111845. end;
  111846. procedure TCAN2_C2FIFOCON23.clearTXREQ; inline;
  111847. begin
  111848. pTDefRegMap(@Self)^.clr := $00000008;
  111849. end;
  111850. procedure TCAN2_C2FIFOCON23.setTXREQ(thebits : TBits_1); inline;
  111851. begin
  111852. if thebits = 0 then
  111853. pTDefRegMap(@Self)^.clr := $00000008
  111854. else
  111855. pTDefRegMap(@Self)^.&set := $00000008;
  111856. end;
  111857. function TCAN2_C2FIFOCON23.getTXREQ : TBits_1; inline;
  111858. begin
  111859. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  111860. end;
  111861. procedure TCAN2_C2FIFOCON23.setTXERR; inline;
  111862. begin
  111863. pTDefRegMap(@Self)^.&set := $00000010;
  111864. end;
  111865. procedure TCAN2_C2FIFOCON23.clearTXERR; inline;
  111866. begin
  111867. pTDefRegMap(@Self)^.clr := $00000010;
  111868. end;
  111869. procedure TCAN2_C2FIFOCON23.setTXERR(thebits : TBits_1); inline;
  111870. begin
  111871. if thebits = 0 then
  111872. pTDefRegMap(@Self)^.clr := $00000010
  111873. else
  111874. pTDefRegMap(@Self)^.&set := $00000010;
  111875. end;
  111876. function TCAN2_C2FIFOCON23.getTXERR : TBits_1; inline;
  111877. begin
  111878. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  111879. end;
  111880. procedure TCAN2_C2FIFOCON23.setTXLARB; inline;
  111881. begin
  111882. pTDefRegMap(@Self)^.&set := $00000020;
  111883. end;
  111884. procedure TCAN2_C2FIFOCON23.clearTXLARB; inline;
  111885. begin
  111886. pTDefRegMap(@Self)^.clr := $00000020;
  111887. end;
  111888. procedure TCAN2_C2FIFOCON23.setTXLARB(thebits : TBits_1); inline;
  111889. begin
  111890. if thebits = 0 then
  111891. pTDefRegMap(@Self)^.clr := $00000020
  111892. else
  111893. pTDefRegMap(@Self)^.&set := $00000020;
  111894. end;
  111895. function TCAN2_C2FIFOCON23.getTXLARB : TBits_1; inline;
  111896. begin
  111897. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  111898. end;
  111899. procedure TCAN2_C2FIFOCON23.setTXABAT; inline;
  111900. begin
  111901. pTDefRegMap(@Self)^.&set := $00000040;
  111902. end;
  111903. procedure TCAN2_C2FIFOCON23.clearTXABAT; inline;
  111904. begin
  111905. pTDefRegMap(@Self)^.clr := $00000040;
  111906. end;
  111907. procedure TCAN2_C2FIFOCON23.setTXABAT(thebits : TBits_1); inline;
  111908. begin
  111909. if thebits = 0 then
  111910. pTDefRegMap(@Self)^.clr := $00000040
  111911. else
  111912. pTDefRegMap(@Self)^.&set := $00000040;
  111913. end;
  111914. function TCAN2_C2FIFOCON23.getTXABAT : TBits_1; inline;
  111915. begin
  111916. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  111917. end;
  111918. procedure TCAN2_C2FIFOCON23.setTXEN; inline;
  111919. begin
  111920. pTDefRegMap(@Self)^.&set := $00000080;
  111921. end;
  111922. procedure TCAN2_C2FIFOCON23.clearTXEN; inline;
  111923. begin
  111924. pTDefRegMap(@Self)^.clr := $00000080;
  111925. end;
  111926. procedure TCAN2_C2FIFOCON23.setTXEN(thebits : TBits_1); inline;
  111927. begin
  111928. if thebits = 0 then
  111929. pTDefRegMap(@Self)^.clr := $00000080
  111930. else
  111931. pTDefRegMap(@Self)^.&set := $00000080;
  111932. end;
  111933. function TCAN2_C2FIFOCON23.getTXEN : TBits_1; inline;
  111934. begin
  111935. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  111936. end;
  111937. procedure TCAN2_C2FIFOCON23.setDONLY; inline;
  111938. begin
  111939. pTDefRegMap(@Self)^.&set := $00001000;
  111940. end;
  111941. procedure TCAN2_C2FIFOCON23.clearDONLY; inline;
  111942. begin
  111943. pTDefRegMap(@Self)^.clr := $00001000;
  111944. end;
  111945. procedure TCAN2_C2FIFOCON23.setDONLY(thebits : TBits_1); inline;
  111946. begin
  111947. if thebits = 0 then
  111948. pTDefRegMap(@Self)^.clr := $00001000
  111949. else
  111950. pTDefRegMap(@Self)^.&set := $00001000;
  111951. end;
  111952. function TCAN2_C2FIFOCON23.getDONLY : TBits_1; inline;
  111953. begin
  111954. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  111955. end;
  111956. procedure TCAN2_C2FIFOCON23.setUINC; inline;
  111957. begin
  111958. pTDefRegMap(@Self)^.&set := $00002000;
  111959. end;
  111960. procedure TCAN2_C2FIFOCON23.clearUINC; inline;
  111961. begin
  111962. pTDefRegMap(@Self)^.clr := $00002000;
  111963. end;
  111964. procedure TCAN2_C2FIFOCON23.setUINC(thebits : TBits_1); inline;
  111965. begin
  111966. if thebits = 0 then
  111967. pTDefRegMap(@Self)^.clr := $00002000
  111968. else
  111969. pTDefRegMap(@Self)^.&set := $00002000;
  111970. end;
  111971. function TCAN2_C2FIFOCON23.getUINC : TBits_1; inline;
  111972. begin
  111973. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  111974. end;
  111975. procedure TCAN2_C2FIFOCON23.setFRESET; inline;
  111976. begin
  111977. pTDefRegMap(@Self)^.&set := $00004000;
  111978. end;
  111979. procedure TCAN2_C2FIFOCON23.clearFRESET; inline;
  111980. begin
  111981. pTDefRegMap(@Self)^.clr := $00004000;
  111982. end;
  111983. procedure TCAN2_C2FIFOCON23.setFRESET(thebits : TBits_1); inline;
  111984. begin
  111985. if thebits = 0 then
  111986. pTDefRegMap(@Self)^.clr := $00004000
  111987. else
  111988. pTDefRegMap(@Self)^.&set := $00004000;
  111989. end;
  111990. function TCAN2_C2FIFOCON23.getFRESET : TBits_1; inline;
  111991. begin
  111992. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  111993. end;
  111994. procedure TCAN2_C2FIFOCON23.setFSIZE(thebits : TBits_5); inline;
  111995. begin
  111996. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  111997. end;
  111998. function TCAN2_C2FIFOCON23.getFSIZE : TBits_5; inline;
  111999. begin
  112000. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  112001. end;
  112002. procedure TCAN2_C2FIFOCON23.setw(thebits : TBits_32); inline;
  112003. begin
  112004. pTDefRegMap(@Self)^.val := thebits;
  112005. end;
  112006. function TCAN2_C2FIFOCON23.getw : TBits_32; inline;
  112007. begin
  112008. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112009. end;
  112010. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIF; inline;
  112011. begin
  112012. pTDefRegMap(@Self)^.&set := $00000001;
  112013. end;
  112014. procedure TCAN2_C2FIFOINT23.clearRXNEMPTYIF; inline;
  112015. begin
  112016. pTDefRegMap(@Self)^.clr := $00000001;
  112017. end;
  112018. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIF(thebits : TBits_1); inline;
  112019. begin
  112020. if thebits = 0 then
  112021. pTDefRegMap(@Self)^.clr := $00000001
  112022. else
  112023. pTDefRegMap(@Self)^.&set := $00000001;
  112024. end;
  112025. function TCAN2_C2FIFOINT23.getRXNEMPTYIF : TBits_1; inline;
  112026. begin
  112027. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  112028. end;
  112029. procedure TCAN2_C2FIFOINT23.setRXHALFIF; inline;
  112030. begin
  112031. pTDefRegMap(@Self)^.&set := $00000002;
  112032. end;
  112033. procedure TCAN2_C2FIFOINT23.clearRXHALFIF; inline;
  112034. begin
  112035. pTDefRegMap(@Self)^.clr := $00000002;
  112036. end;
  112037. procedure TCAN2_C2FIFOINT23.setRXHALFIF(thebits : TBits_1); inline;
  112038. begin
  112039. if thebits = 0 then
  112040. pTDefRegMap(@Self)^.clr := $00000002
  112041. else
  112042. pTDefRegMap(@Self)^.&set := $00000002;
  112043. end;
  112044. function TCAN2_C2FIFOINT23.getRXHALFIF : TBits_1; inline;
  112045. begin
  112046. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  112047. end;
  112048. procedure TCAN2_C2FIFOINT23.setRXFULLIF; inline;
  112049. begin
  112050. pTDefRegMap(@Self)^.&set := $00000004;
  112051. end;
  112052. procedure TCAN2_C2FIFOINT23.clearRXFULLIF; inline;
  112053. begin
  112054. pTDefRegMap(@Self)^.clr := $00000004;
  112055. end;
  112056. procedure TCAN2_C2FIFOINT23.setRXFULLIF(thebits : TBits_1); inline;
  112057. begin
  112058. if thebits = 0 then
  112059. pTDefRegMap(@Self)^.clr := $00000004
  112060. else
  112061. pTDefRegMap(@Self)^.&set := $00000004;
  112062. end;
  112063. function TCAN2_C2FIFOINT23.getRXFULLIF : TBits_1; inline;
  112064. begin
  112065. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112066. end;
  112067. procedure TCAN2_C2FIFOINT23.setRXOVFLIF; inline;
  112068. begin
  112069. pTDefRegMap(@Self)^.&set := $00000008;
  112070. end;
  112071. procedure TCAN2_C2FIFOINT23.clearRXOVFLIF; inline;
  112072. begin
  112073. pTDefRegMap(@Self)^.clr := $00000008;
  112074. end;
  112075. procedure TCAN2_C2FIFOINT23.setRXOVFLIF(thebits : TBits_1); inline;
  112076. begin
  112077. if thebits = 0 then
  112078. pTDefRegMap(@Self)^.clr := $00000008
  112079. else
  112080. pTDefRegMap(@Self)^.&set := $00000008;
  112081. end;
  112082. function TCAN2_C2FIFOINT23.getRXOVFLIF : TBits_1; inline;
  112083. begin
  112084. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112085. end;
  112086. procedure TCAN2_C2FIFOINT23.setTXEMPTYIF; inline;
  112087. begin
  112088. pTDefRegMap(@Self)^.&set := $00000100;
  112089. end;
  112090. procedure TCAN2_C2FIFOINT23.clearTXEMPTYIF; inline;
  112091. begin
  112092. pTDefRegMap(@Self)^.clr := $00000100;
  112093. end;
  112094. procedure TCAN2_C2FIFOINT23.setTXEMPTYIF(thebits : TBits_1); inline;
  112095. begin
  112096. if thebits = 0 then
  112097. pTDefRegMap(@Self)^.clr := $00000100
  112098. else
  112099. pTDefRegMap(@Self)^.&set := $00000100;
  112100. end;
  112101. function TCAN2_C2FIFOINT23.getTXEMPTYIF : TBits_1; inline;
  112102. begin
  112103. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  112104. end;
  112105. procedure TCAN2_C2FIFOINT23.setTXHALFIF; inline;
  112106. begin
  112107. pTDefRegMap(@Self)^.&set := $00000200;
  112108. end;
  112109. procedure TCAN2_C2FIFOINT23.clearTXHALFIF; inline;
  112110. begin
  112111. pTDefRegMap(@Self)^.clr := $00000200;
  112112. end;
  112113. procedure TCAN2_C2FIFOINT23.setTXHALFIF(thebits : TBits_1); inline;
  112114. begin
  112115. if thebits = 0 then
  112116. pTDefRegMap(@Self)^.clr := $00000200
  112117. else
  112118. pTDefRegMap(@Self)^.&set := $00000200;
  112119. end;
  112120. function TCAN2_C2FIFOINT23.getTXHALFIF : TBits_1; inline;
  112121. begin
  112122. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  112123. end;
  112124. procedure TCAN2_C2FIFOINT23.setTXNFULLIF; inline;
  112125. begin
  112126. pTDefRegMap(@Self)^.&set := $00000400;
  112127. end;
  112128. procedure TCAN2_C2FIFOINT23.clearTXNFULLIF; inline;
  112129. begin
  112130. pTDefRegMap(@Self)^.clr := $00000400;
  112131. end;
  112132. procedure TCAN2_C2FIFOINT23.setTXNFULLIF(thebits : TBits_1); inline;
  112133. begin
  112134. if thebits = 0 then
  112135. pTDefRegMap(@Self)^.clr := $00000400
  112136. else
  112137. pTDefRegMap(@Self)^.&set := $00000400;
  112138. end;
  112139. function TCAN2_C2FIFOINT23.getTXNFULLIF : TBits_1; inline;
  112140. begin
  112141. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  112142. end;
  112143. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIE; inline;
  112144. begin
  112145. pTDefRegMap(@Self)^.&set := $00010000;
  112146. end;
  112147. procedure TCAN2_C2FIFOINT23.clearRXNEMPTYIE; inline;
  112148. begin
  112149. pTDefRegMap(@Self)^.clr := $00010000;
  112150. end;
  112151. procedure TCAN2_C2FIFOINT23.setRXNEMPTYIE(thebits : TBits_1); inline;
  112152. begin
  112153. if thebits = 0 then
  112154. pTDefRegMap(@Self)^.clr := $00010000
  112155. else
  112156. pTDefRegMap(@Self)^.&set := $00010000;
  112157. end;
  112158. function TCAN2_C2FIFOINT23.getRXNEMPTYIE : TBits_1; inline;
  112159. begin
  112160. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  112161. end;
  112162. procedure TCAN2_C2FIFOINT23.setRXHALFIE; inline;
  112163. begin
  112164. pTDefRegMap(@Self)^.&set := $00020000;
  112165. end;
  112166. procedure TCAN2_C2FIFOINT23.clearRXHALFIE; inline;
  112167. begin
  112168. pTDefRegMap(@Self)^.clr := $00020000;
  112169. end;
  112170. procedure TCAN2_C2FIFOINT23.setRXHALFIE(thebits : TBits_1); inline;
  112171. begin
  112172. if thebits = 0 then
  112173. pTDefRegMap(@Self)^.clr := $00020000
  112174. else
  112175. pTDefRegMap(@Self)^.&set := $00020000;
  112176. end;
  112177. function TCAN2_C2FIFOINT23.getRXHALFIE : TBits_1; inline;
  112178. begin
  112179. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  112180. end;
  112181. procedure TCAN2_C2FIFOINT23.setRXFULLIE; inline;
  112182. begin
  112183. pTDefRegMap(@Self)^.&set := $00040000;
  112184. end;
  112185. procedure TCAN2_C2FIFOINT23.clearRXFULLIE; inline;
  112186. begin
  112187. pTDefRegMap(@Self)^.clr := $00040000;
  112188. end;
  112189. procedure TCAN2_C2FIFOINT23.setRXFULLIE(thebits : TBits_1); inline;
  112190. begin
  112191. if thebits = 0 then
  112192. pTDefRegMap(@Self)^.clr := $00040000
  112193. else
  112194. pTDefRegMap(@Self)^.&set := $00040000;
  112195. end;
  112196. function TCAN2_C2FIFOINT23.getRXFULLIE : TBits_1; inline;
  112197. begin
  112198. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  112199. end;
  112200. procedure TCAN2_C2FIFOINT23.setRXOVFLIE; inline;
  112201. begin
  112202. pTDefRegMap(@Self)^.&set := $00080000;
  112203. end;
  112204. procedure TCAN2_C2FIFOINT23.clearRXOVFLIE; inline;
  112205. begin
  112206. pTDefRegMap(@Self)^.clr := $00080000;
  112207. end;
  112208. procedure TCAN2_C2FIFOINT23.setRXOVFLIE(thebits : TBits_1); inline;
  112209. begin
  112210. if thebits = 0 then
  112211. pTDefRegMap(@Self)^.clr := $00080000
  112212. else
  112213. pTDefRegMap(@Self)^.&set := $00080000;
  112214. end;
  112215. function TCAN2_C2FIFOINT23.getRXOVFLIE : TBits_1; inline;
  112216. begin
  112217. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  112218. end;
  112219. procedure TCAN2_C2FIFOINT23.setTXEMPTYIE; inline;
  112220. begin
  112221. pTDefRegMap(@Self)^.&set := $01000000;
  112222. end;
  112223. procedure TCAN2_C2FIFOINT23.clearTXEMPTYIE; inline;
  112224. begin
  112225. pTDefRegMap(@Self)^.clr := $01000000;
  112226. end;
  112227. procedure TCAN2_C2FIFOINT23.setTXEMPTYIE(thebits : TBits_1); inline;
  112228. begin
  112229. if thebits = 0 then
  112230. pTDefRegMap(@Self)^.clr := $01000000
  112231. else
  112232. pTDefRegMap(@Self)^.&set := $01000000;
  112233. end;
  112234. function TCAN2_C2FIFOINT23.getTXEMPTYIE : TBits_1; inline;
  112235. begin
  112236. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  112237. end;
  112238. procedure TCAN2_C2FIFOINT23.setTXHALFIE; inline;
  112239. begin
  112240. pTDefRegMap(@Self)^.&set := $02000000;
  112241. end;
  112242. procedure TCAN2_C2FIFOINT23.clearTXHALFIE; inline;
  112243. begin
  112244. pTDefRegMap(@Self)^.clr := $02000000;
  112245. end;
  112246. procedure TCAN2_C2FIFOINT23.setTXHALFIE(thebits : TBits_1); inline;
  112247. begin
  112248. if thebits = 0 then
  112249. pTDefRegMap(@Self)^.clr := $02000000
  112250. else
  112251. pTDefRegMap(@Self)^.&set := $02000000;
  112252. end;
  112253. function TCAN2_C2FIFOINT23.getTXHALFIE : TBits_1; inline;
  112254. begin
  112255. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  112256. end;
  112257. procedure TCAN2_C2FIFOINT23.setTXNFULLIE; inline;
  112258. begin
  112259. pTDefRegMap(@Self)^.&set := $04000000;
  112260. end;
  112261. procedure TCAN2_C2FIFOINT23.clearTXNFULLIE; inline;
  112262. begin
  112263. pTDefRegMap(@Self)^.clr := $04000000;
  112264. end;
  112265. procedure TCAN2_C2FIFOINT23.setTXNFULLIE(thebits : TBits_1); inline;
  112266. begin
  112267. if thebits = 0 then
  112268. pTDefRegMap(@Self)^.clr := $04000000
  112269. else
  112270. pTDefRegMap(@Self)^.&set := $04000000;
  112271. end;
  112272. function TCAN2_C2FIFOINT23.getTXNFULLIE : TBits_1; inline;
  112273. begin
  112274. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  112275. end;
  112276. procedure TCAN2_C2FIFOINT23.setw(thebits : TBits_32); inline;
  112277. begin
  112278. pTDefRegMap(@Self)^.val := thebits;
  112279. end;
  112280. function TCAN2_C2FIFOINT23.getw : TBits_32; inline;
  112281. begin
  112282. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112283. end;
  112284. procedure TCAN2_C2FIFOCI23.setCFIFOCI(thebits : TBits_5); inline;
  112285. begin
  112286. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  112287. end;
  112288. function TCAN2_C2FIFOCI23.getCFIFOCI : TBits_5; inline;
  112289. begin
  112290. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  112291. end;
  112292. procedure TCAN2_C2FIFOCI23.setw(thebits : TBits_32); inline;
  112293. begin
  112294. pTDefRegMap(@Self)^.val := thebits;
  112295. end;
  112296. function TCAN2_C2FIFOCI23.getw : TBits_32; inline;
  112297. begin
  112298. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112299. end;
  112300. procedure TCAN2_C2FIFOCON24.setTXPRI(thebits : TBits_2); inline;
  112301. begin
  112302. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  112303. end;
  112304. function TCAN2_C2FIFOCON24.getTXPRI : TBits_2; inline;
  112305. begin
  112306. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  112307. end;
  112308. procedure TCAN2_C2FIFOCON24.setRTREN; inline;
  112309. begin
  112310. pTDefRegMap(@Self)^.&set := $00000004;
  112311. end;
  112312. procedure TCAN2_C2FIFOCON24.clearRTREN; inline;
  112313. begin
  112314. pTDefRegMap(@Self)^.clr := $00000004;
  112315. end;
  112316. procedure TCAN2_C2FIFOCON24.setRTREN(thebits : TBits_1); inline;
  112317. begin
  112318. if thebits = 0 then
  112319. pTDefRegMap(@Self)^.clr := $00000004
  112320. else
  112321. pTDefRegMap(@Self)^.&set := $00000004;
  112322. end;
  112323. function TCAN2_C2FIFOCON24.getRTREN : TBits_1; inline;
  112324. begin
  112325. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112326. end;
  112327. procedure TCAN2_C2FIFOCON24.setTXREQ; inline;
  112328. begin
  112329. pTDefRegMap(@Self)^.&set := $00000008;
  112330. end;
  112331. procedure TCAN2_C2FIFOCON24.clearTXREQ; inline;
  112332. begin
  112333. pTDefRegMap(@Self)^.clr := $00000008;
  112334. end;
  112335. procedure TCAN2_C2FIFOCON24.setTXREQ(thebits : TBits_1); inline;
  112336. begin
  112337. if thebits = 0 then
  112338. pTDefRegMap(@Self)^.clr := $00000008
  112339. else
  112340. pTDefRegMap(@Self)^.&set := $00000008;
  112341. end;
  112342. function TCAN2_C2FIFOCON24.getTXREQ : TBits_1; inline;
  112343. begin
  112344. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112345. end;
  112346. procedure TCAN2_C2FIFOCON24.setTXERR; inline;
  112347. begin
  112348. pTDefRegMap(@Self)^.&set := $00000010;
  112349. end;
  112350. procedure TCAN2_C2FIFOCON24.clearTXERR; inline;
  112351. begin
  112352. pTDefRegMap(@Self)^.clr := $00000010;
  112353. end;
  112354. procedure TCAN2_C2FIFOCON24.setTXERR(thebits : TBits_1); inline;
  112355. begin
  112356. if thebits = 0 then
  112357. pTDefRegMap(@Self)^.clr := $00000010
  112358. else
  112359. pTDefRegMap(@Self)^.&set := $00000010;
  112360. end;
  112361. function TCAN2_C2FIFOCON24.getTXERR : TBits_1; inline;
  112362. begin
  112363. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  112364. end;
  112365. procedure TCAN2_C2FIFOCON24.setTXLARB; inline;
  112366. begin
  112367. pTDefRegMap(@Self)^.&set := $00000020;
  112368. end;
  112369. procedure TCAN2_C2FIFOCON24.clearTXLARB; inline;
  112370. begin
  112371. pTDefRegMap(@Self)^.clr := $00000020;
  112372. end;
  112373. procedure TCAN2_C2FIFOCON24.setTXLARB(thebits : TBits_1); inline;
  112374. begin
  112375. if thebits = 0 then
  112376. pTDefRegMap(@Self)^.clr := $00000020
  112377. else
  112378. pTDefRegMap(@Self)^.&set := $00000020;
  112379. end;
  112380. function TCAN2_C2FIFOCON24.getTXLARB : TBits_1; inline;
  112381. begin
  112382. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  112383. end;
  112384. procedure TCAN2_C2FIFOCON24.setTXABAT; inline;
  112385. begin
  112386. pTDefRegMap(@Self)^.&set := $00000040;
  112387. end;
  112388. procedure TCAN2_C2FIFOCON24.clearTXABAT; inline;
  112389. begin
  112390. pTDefRegMap(@Self)^.clr := $00000040;
  112391. end;
  112392. procedure TCAN2_C2FIFOCON24.setTXABAT(thebits : TBits_1); inline;
  112393. begin
  112394. if thebits = 0 then
  112395. pTDefRegMap(@Self)^.clr := $00000040
  112396. else
  112397. pTDefRegMap(@Self)^.&set := $00000040;
  112398. end;
  112399. function TCAN2_C2FIFOCON24.getTXABAT : TBits_1; inline;
  112400. begin
  112401. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  112402. end;
  112403. procedure TCAN2_C2FIFOCON24.setTXEN; inline;
  112404. begin
  112405. pTDefRegMap(@Self)^.&set := $00000080;
  112406. end;
  112407. procedure TCAN2_C2FIFOCON24.clearTXEN; inline;
  112408. begin
  112409. pTDefRegMap(@Self)^.clr := $00000080;
  112410. end;
  112411. procedure TCAN2_C2FIFOCON24.setTXEN(thebits : TBits_1); inline;
  112412. begin
  112413. if thebits = 0 then
  112414. pTDefRegMap(@Self)^.clr := $00000080
  112415. else
  112416. pTDefRegMap(@Self)^.&set := $00000080;
  112417. end;
  112418. function TCAN2_C2FIFOCON24.getTXEN : TBits_1; inline;
  112419. begin
  112420. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  112421. end;
  112422. procedure TCAN2_C2FIFOCON24.setDONLY; inline;
  112423. begin
  112424. pTDefRegMap(@Self)^.&set := $00001000;
  112425. end;
  112426. procedure TCAN2_C2FIFOCON24.clearDONLY; inline;
  112427. begin
  112428. pTDefRegMap(@Self)^.clr := $00001000;
  112429. end;
  112430. procedure TCAN2_C2FIFOCON24.setDONLY(thebits : TBits_1); inline;
  112431. begin
  112432. if thebits = 0 then
  112433. pTDefRegMap(@Self)^.clr := $00001000
  112434. else
  112435. pTDefRegMap(@Self)^.&set := $00001000;
  112436. end;
  112437. function TCAN2_C2FIFOCON24.getDONLY : TBits_1; inline;
  112438. begin
  112439. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  112440. end;
  112441. procedure TCAN2_C2FIFOCON24.setUINC; inline;
  112442. begin
  112443. pTDefRegMap(@Self)^.&set := $00002000;
  112444. end;
  112445. procedure TCAN2_C2FIFOCON24.clearUINC; inline;
  112446. begin
  112447. pTDefRegMap(@Self)^.clr := $00002000;
  112448. end;
  112449. procedure TCAN2_C2FIFOCON24.setUINC(thebits : TBits_1); inline;
  112450. begin
  112451. if thebits = 0 then
  112452. pTDefRegMap(@Self)^.clr := $00002000
  112453. else
  112454. pTDefRegMap(@Self)^.&set := $00002000;
  112455. end;
  112456. function TCAN2_C2FIFOCON24.getUINC : TBits_1; inline;
  112457. begin
  112458. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  112459. end;
  112460. procedure TCAN2_C2FIFOCON24.setFRESET; inline;
  112461. begin
  112462. pTDefRegMap(@Self)^.&set := $00004000;
  112463. end;
  112464. procedure TCAN2_C2FIFOCON24.clearFRESET; inline;
  112465. begin
  112466. pTDefRegMap(@Self)^.clr := $00004000;
  112467. end;
  112468. procedure TCAN2_C2FIFOCON24.setFRESET(thebits : TBits_1); inline;
  112469. begin
  112470. if thebits = 0 then
  112471. pTDefRegMap(@Self)^.clr := $00004000
  112472. else
  112473. pTDefRegMap(@Self)^.&set := $00004000;
  112474. end;
  112475. function TCAN2_C2FIFOCON24.getFRESET : TBits_1; inline;
  112476. begin
  112477. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  112478. end;
  112479. procedure TCAN2_C2FIFOCON24.setFSIZE(thebits : TBits_5); inline;
  112480. begin
  112481. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  112482. end;
  112483. function TCAN2_C2FIFOCON24.getFSIZE : TBits_5; inline;
  112484. begin
  112485. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  112486. end;
  112487. procedure TCAN2_C2FIFOCON24.setw(thebits : TBits_32); inline;
  112488. begin
  112489. pTDefRegMap(@Self)^.val := thebits;
  112490. end;
  112491. function TCAN2_C2FIFOCON24.getw : TBits_32; inline;
  112492. begin
  112493. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112494. end;
  112495. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIF; inline;
  112496. begin
  112497. pTDefRegMap(@Self)^.&set := $00000001;
  112498. end;
  112499. procedure TCAN2_C2FIFOINT24.clearRXNEMPTYIF; inline;
  112500. begin
  112501. pTDefRegMap(@Self)^.clr := $00000001;
  112502. end;
  112503. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIF(thebits : TBits_1); inline;
  112504. begin
  112505. if thebits = 0 then
  112506. pTDefRegMap(@Self)^.clr := $00000001
  112507. else
  112508. pTDefRegMap(@Self)^.&set := $00000001;
  112509. end;
  112510. function TCAN2_C2FIFOINT24.getRXNEMPTYIF : TBits_1; inline;
  112511. begin
  112512. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  112513. end;
  112514. procedure TCAN2_C2FIFOINT24.setRXHALFIF; inline;
  112515. begin
  112516. pTDefRegMap(@Self)^.&set := $00000002;
  112517. end;
  112518. procedure TCAN2_C2FIFOINT24.clearRXHALFIF; inline;
  112519. begin
  112520. pTDefRegMap(@Self)^.clr := $00000002;
  112521. end;
  112522. procedure TCAN2_C2FIFOINT24.setRXHALFIF(thebits : TBits_1); inline;
  112523. begin
  112524. if thebits = 0 then
  112525. pTDefRegMap(@Self)^.clr := $00000002
  112526. else
  112527. pTDefRegMap(@Self)^.&set := $00000002;
  112528. end;
  112529. function TCAN2_C2FIFOINT24.getRXHALFIF : TBits_1; inline;
  112530. begin
  112531. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  112532. end;
  112533. procedure TCAN2_C2FIFOINT24.setRXFULLIF; inline;
  112534. begin
  112535. pTDefRegMap(@Self)^.&set := $00000004;
  112536. end;
  112537. procedure TCAN2_C2FIFOINT24.clearRXFULLIF; inline;
  112538. begin
  112539. pTDefRegMap(@Self)^.clr := $00000004;
  112540. end;
  112541. procedure TCAN2_C2FIFOINT24.setRXFULLIF(thebits : TBits_1); inline;
  112542. begin
  112543. if thebits = 0 then
  112544. pTDefRegMap(@Self)^.clr := $00000004
  112545. else
  112546. pTDefRegMap(@Self)^.&set := $00000004;
  112547. end;
  112548. function TCAN2_C2FIFOINT24.getRXFULLIF : TBits_1; inline;
  112549. begin
  112550. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112551. end;
  112552. procedure TCAN2_C2FIFOINT24.setRXOVFLIF; inline;
  112553. begin
  112554. pTDefRegMap(@Self)^.&set := $00000008;
  112555. end;
  112556. procedure TCAN2_C2FIFOINT24.clearRXOVFLIF; inline;
  112557. begin
  112558. pTDefRegMap(@Self)^.clr := $00000008;
  112559. end;
  112560. procedure TCAN2_C2FIFOINT24.setRXOVFLIF(thebits : TBits_1); inline;
  112561. begin
  112562. if thebits = 0 then
  112563. pTDefRegMap(@Self)^.clr := $00000008
  112564. else
  112565. pTDefRegMap(@Self)^.&set := $00000008;
  112566. end;
  112567. function TCAN2_C2FIFOINT24.getRXOVFLIF : TBits_1; inline;
  112568. begin
  112569. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112570. end;
  112571. procedure TCAN2_C2FIFOINT24.setTXEMPTYIF; inline;
  112572. begin
  112573. pTDefRegMap(@Self)^.&set := $00000100;
  112574. end;
  112575. procedure TCAN2_C2FIFOINT24.clearTXEMPTYIF; inline;
  112576. begin
  112577. pTDefRegMap(@Self)^.clr := $00000100;
  112578. end;
  112579. procedure TCAN2_C2FIFOINT24.setTXEMPTYIF(thebits : TBits_1); inline;
  112580. begin
  112581. if thebits = 0 then
  112582. pTDefRegMap(@Self)^.clr := $00000100
  112583. else
  112584. pTDefRegMap(@Self)^.&set := $00000100;
  112585. end;
  112586. function TCAN2_C2FIFOINT24.getTXEMPTYIF : TBits_1; inline;
  112587. begin
  112588. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  112589. end;
  112590. procedure TCAN2_C2FIFOINT24.setTXHALFIF; inline;
  112591. begin
  112592. pTDefRegMap(@Self)^.&set := $00000200;
  112593. end;
  112594. procedure TCAN2_C2FIFOINT24.clearTXHALFIF; inline;
  112595. begin
  112596. pTDefRegMap(@Self)^.clr := $00000200;
  112597. end;
  112598. procedure TCAN2_C2FIFOINT24.setTXHALFIF(thebits : TBits_1); inline;
  112599. begin
  112600. if thebits = 0 then
  112601. pTDefRegMap(@Self)^.clr := $00000200
  112602. else
  112603. pTDefRegMap(@Self)^.&set := $00000200;
  112604. end;
  112605. function TCAN2_C2FIFOINT24.getTXHALFIF : TBits_1; inline;
  112606. begin
  112607. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  112608. end;
  112609. procedure TCAN2_C2FIFOINT24.setTXNFULLIF; inline;
  112610. begin
  112611. pTDefRegMap(@Self)^.&set := $00000400;
  112612. end;
  112613. procedure TCAN2_C2FIFOINT24.clearTXNFULLIF; inline;
  112614. begin
  112615. pTDefRegMap(@Self)^.clr := $00000400;
  112616. end;
  112617. procedure TCAN2_C2FIFOINT24.setTXNFULLIF(thebits : TBits_1); inline;
  112618. begin
  112619. if thebits = 0 then
  112620. pTDefRegMap(@Self)^.clr := $00000400
  112621. else
  112622. pTDefRegMap(@Self)^.&set := $00000400;
  112623. end;
  112624. function TCAN2_C2FIFOINT24.getTXNFULLIF : TBits_1; inline;
  112625. begin
  112626. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  112627. end;
  112628. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIE; inline;
  112629. begin
  112630. pTDefRegMap(@Self)^.&set := $00010000;
  112631. end;
  112632. procedure TCAN2_C2FIFOINT24.clearRXNEMPTYIE; inline;
  112633. begin
  112634. pTDefRegMap(@Self)^.clr := $00010000;
  112635. end;
  112636. procedure TCAN2_C2FIFOINT24.setRXNEMPTYIE(thebits : TBits_1); inline;
  112637. begin
  112638. if thebits = 0 then
  112639. pTDefRegMap(@Self)^.clr := $00010000
  112640. else
  112641. pTDefRegMap(@Self)^.&set := $00010000;
  112642. end;
  112643. function TCAN2_C2FIFOINT24.getRXNEMPTYIE : TBits_1; inline;
  112644. begin
  112645. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  112646. end;
  112647. procedure TCAN2_C2FIFOINT24.setRXHALFIE; inline;
  112648. begin
  112649. pTDefRegMap(@Self)^.&set := $00020000;
  112650. end;
  112651. procedure TCAN2_C2FIFOINT24.clearRXHALFIE; inline;
  112652. begin
  112653. pTDefRegMap(@Self)^.clr := $00020000;
  112654. end;
  112655. procedure TCAN2_C2FIFOINT24.setRXHALFIE(thebits : TBits_1); inline;
  112656. begin
  112657. if thebits = 0 then
  112658. pTDefRegMap(@Self)^.clr := $00020000
  112659. else
  112660. pTDefRegMap(@Self)^.&set := $00020000;
  112661. end;
  112662. function TCAN2_C2FIFOINT24.getRXHALFIE : TBits_1; inline;
  112663. begin
  112664. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  112665. end;
  112666. procedure TCAN2_C2FIFOINT24.setRXFULLIE; inline;
  112667. begin
  112668. pTDefRegMap(@Self)^.&set := $00040000;
  112669. end;
  112670. procedure TCAN2_C2FIFOINT24.clearRXFULLIE; inline;
  112671. begin
  112672. pTDefRegMap(@Self)^.clr := $00040000;
  112673. end;
  112674. procedure TCAN2_C2FIFOINT24.setRXFULLIE(thebits : TBits_1); inline;
  112675. begin
  112676. if thebits = 0 then
  112677. pTDefRegMap(@Self)^.clr := $00040000
  112678. else
  112679. pTDefRegMap(@Self)^.&set := $00040000;
  112680. end;
  112681. function TCAN2_C2FIFOINT24.getRXFULLIE : TBits_1; inline;
  112682. begin
  112683. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  112684. end;
  112685. procedure TCAN2_C2FIFOINT24.setRXOVFLIE; inline;
  112686. begin
  112687. pTDefRegMap(@Self)^.&set := $00080000;
  112688. end;
  112689. procedure TCAN2_C2FIFOINT24.clearRXOVFLIE; inline;
  112690. begin
  112691. pTDefRegMap(@Self)^.clr := $00080000;
  112692. end;
  112693. procedure TCAN2_C2FIFOINT24.setRXOVFLIE(thebits : TBits_1); inline;
  112694. begin
  112695. if thebits = 0 then
  112696. pTDefRegMap(@Self)^.clr := $00080000
  112697. else
  112698. pTDefRegMap(@Self)^.&set := $00080000;
  112699. end;
  112700. function TCAN2_C2FIFOINT24.getRXOVFLIE : TBits_1; inline;
  112701. begin
  112702. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  112703. end;
  112704. procedure TCAN2_C2FIFOINT24.setTXEMPTYIE; inline;
  112705. begin
  112706. pTDefRegMap(@Self)^.&set := $01000000;
  112707. end;
  112708. procedure TCAN2_C2FIFOINT24.clearTXEMPTYIE; inline;
  112709. begin
  112710. pTDefRegMap(@Self)^.clr := $01000000;
  112711. end;
  112712. procedure TCAN2_C2FIFOINT24.setTXEMPTYIE(thebits : TBits_1); inline;
  112713. begin
  112714. if thebits = 0 then
  112715. pTDefRegMap(@Self)^.clr := $01000000
  112716. else
  112717. pTDefRegMap(@Self)^.&set := $01000000;
  112718. end;
  112719. function TCAN2_C2FIFOINT24.getTXEMPTYIE : TBits_1; inline;
  112720. begin
  112721. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  112722. end;
  112723. procedure TCAN2_C2FIFOINT24.setTXHALFIE; inline;
  112724. begin
  112725. pTDefRegMap(@Self)^.&set := $02000000;
  112726. end;
  112727. procedure TCAN2_C2FIFOINT24.clearTXHALFIE; inline;
  112728. begin
  112729. pTDefRegMap(@Self)^.clr := $02000000;
  112730. end;
  112731. procedure TCAN2_C2FIFOINT24.setTXHALFIE(thebits : TBits_1); inline;
  112732. begin
  112733. if thebits = 0 then
  112734. pTDefRegMap(@Self)^.clr := $02000000
  112735. else
  112736. pTDefRegMap(@Self)^.&set := $02000000;
  112737. end;
  112738. function TCAN2_C2FIFOINT24.getTXHALFIE : TBits_1; inline;
  112739. begin
  112740. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  112741. end;
  112742. procedure TCAN2_C2FIFOINT24.setTXNFULLIE; inline;
  112743. begin
  112744. pTDefRegMap(@Self)^.&set := $04000000;
  112745. end;
  112746. procedure TCAN2_C2FIFOINT24.clearTXNFULLIE; inline;
  112747. begin
  112748. pTDefRegMap(@Self)^.clr := $04000000;
  112749. end;
  112750. procedure TCAN2_C2FIFOINT24.setTXNFULLIE(thebits : TBits_1); inline;
  112751. begin
  112752. if thebits = 0 then
  112753. pTDefRegMap(@Self)^.clr := $04000000
  112754. else
  112755. pTDefRegMap(@Self)^.&set := $04000000;
  112756. end;
  112757. function TCAN2_C2FIFOINT24.getTXNFULLIE : TBits_1; inline;
  112758. begin
  112759. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  112760. end;
  112761. procedure TCAN2_C2FIFOINT24.setw(thebits : TBits_32); inline;
  112762. begin
  112763. pTDefRegMap(@Self)^.val := thebits;
  112764. end;
  112765. function TCAN2_C2FIFOINT24.getw : TBits_32; inline;
  112766. begin
  112767. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112768. end;
  112769. procedure TCAN2_C2FIFOCI24.setCFIFOCI(thebits : TBits_5); inline;
  112770. begin
  112771. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  112772. end;
  112773. function TCAN2_C2FIFOCI24.getCFIFOCI : TBits_5; inline;
  112774. begin
  112775. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  112776. end;
  112777. procedure TCAN2_C2FIFOCI24.setw(thebits : TBits_32); inline;
  112778. begin
  112779. pTDefRegMap(@Self)^.val := thebits;
  112780. end;
  112781. function TCAN2_C2FIFOCI24.getw : TBits_32; inline;
  112782. begin
  112783. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112784. end;
  112785. procedure TCAN2_C2FIFOCON25.setTXPRI(thebits : TBits_2); inline;
  112786. begin
  112787. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  112788. end;
  112789. function TCAN2_C2FIFOCON25.getTXPRI : TBits_2; inline;
  112790. begin
  112791. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  112792. end;
  112793. procedure TCAN2_C2FIFOCON25.setRTREN; inline;
  112794. begin
  112795. pTDefRegMap(@Self)^.&set := $00000004;
  112796. end;
  112797. procedure TCAN2_C2FIFOCON25.clearRTREN; inline;
  112798. begin
  112799. pTDefRegMap(@Self)^.clr := $00000004;
  112800. end;
  112801. procedure TCAN2_C2FIFOCON25.setRTREN(thebits : TBits_1); inline;
  112802. begin
  112803. if thebits = 0 then
  112804. pTDefRegMap(@Self)^.clr := $00000004
  112805. else
  112806. pTDefRegMap(@Self)^.&set := $00000004;
  112807. end;
  112808. function TCAN2_C2FIFOCON25.getRTREN : TBits_1; inline;
  112809. begin
  112810. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  112811. end;
  112812. procedure TCAN2_C2FIFOCON25.setTXREQ; inline;
  112813. begin
  112814. pTDefRegMap(@Self)^.&set := $00000008;
  112815. end;
  112816. procedure TCAN2_C2FIFOCON25.clearTXREQ; inline;
  112817. begin
  112818. pTDefRegMap(@Self)^.clr := $00000008;
  112819. end;
  112820. procedure TCAN2_C2FIFOCON25.setTXREQ(thebits : TBits_1); inline;
  112821. begin
  112822. if thebits = 0 then
  112823. pTDefRegMap(@Self)^.clr := $00000008
  112824. else
  112825. pTDefRegMap(@Self)^.&set := $00000008;
  112826. end;
  112827. function TCAN2_C2FIFOCON25.getTXREQ : TBits_1; inline;
  112828. begin
  112829. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  112830. end;
  112831. procedure TCAN2_C2FIFOCON25.setTXERR; inline;
  112832. begin
  112833. pTDefRegMap(@Self)^.&set := $00000010;
  112834. end;
  112835. procedure TCAN2_C2FIFOCON25.clearTXERR; inline;
  112836. begin
  112837. pTDefRegMap(@Self)^.clr := $00000010;
  112838. end;
  112839. procedure TCAN2_C2FIFOCON25.setTXERR(thebits : TBits_1); inline;
  112840. begin
  112841. if thebits = 0 then
  112842. pTDefRegMap(@Self)^.clr := $00000010
  112843. else
  112844. pTDefRegMap(@Self)^.&set := $00000010;
  112845. end;
  112846. function TCAN2_C2FIFOCON25.getTXERR : TBits_1; inline;
  112847. begin
  112848. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  112849. end;
  112850. procedure TCAN2_C2FIFOCON25.setTXLARB; inline;
  112851. begin
  112852. pTDefRegMap(@Self)^.&set := $00000020;
  112853. end;
  112854. procedure TCAN2_C2FIFOCON25.clearTXLARB; inline;
  112855. begin
  112856. pTDefRegMap(@Self)^.clr := $00000020;
  112857. end;
  112858. procedure TCAN2_C2FIFOCON25.setTXLARB(thebits : TBits_1); inline;
  112859. begin
  112860. if thebits = 0 then
  112861. pTDefRegMap(@Self)^.clr := $00000020
  112862. else
  112863. pTDefRegMap(@Self)^.&set := $00000020;
  112864. end;
  112865. function TCAN2_C2FIFOCON25.getTXLARB : TBits_1; inline;
  112866. begin
  112867. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  112868. end;
  112869. procedure TCAN2_C2FIFOCON25.setTXABAT; inline;
  112870. begin
  112871. pTDefRegMap(@Self)^.&set := $00000040;
  112872. end;
  112873. procedure TCAN2_C2FIFOCON25.clearTXABAT; inline;
  112874. begin
  112875. pTDefRegMap(@Self)^.clr := $00000040;
  112876. end;
  112877. procedure TCAN2_C2FIFOCON25.setTXABAT(thebits : TBits_1); inline;
  112878. begin
  112879. if thebits = 0 then
  112880. pTDefRegMap(@Self)^.clr := $00000040
  112881. else
  112882. pTDefRegMap(@Self)^.&set := $00000040;
  112883. end;
  112884. function TCAN2_C2FIFOCON25.getTXABAT : TBits_1; inline;
  112885. begin
  112886. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  112887. end;
  112888. procedure TCAN2_C2FIFOCON25.setTXEN; inline;
  112889. begin
  112890. pTDefRegMap(@Self)^.&set := $00000080;
  112891. end;
  112892. procedure TCAN2_C2FIFOCON25.clearTXEN; inline;
  112893. begin
  112894. pTDefRegMap(@Self)^.clr := $00000080;
  112895. end;
  112896. procedure TCAN2_C2FIFOCON25.setTXEN(thebits : TBits_1); inline;
  112897. begin
  112898. if thebits = 0 then
  112899. pTDefRegMap(@Self)^.clr := $00000080
  112900. else
  112901. pTDefRegMap(@Self)^.&set := $00000080;
  112902. end;
  112903. function TCAN2_C2FIFOCON25.getTXEN : TBits_1; inline;
  112904. begin
  112905. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  112906. end;
  112907. procedure TCAN2_C2FIFOCON25.setDONLY; inline;
  112908. begin
  112909. pTDefRegMap(@Self)^.&set := $00001000;
  112910. end;
  112911. procedure TCAN2_C2FIFOCON25.clearDONLY; inline;
  112912. begin
  112913. pTDefRegMap(@Self)^.clr := $00001000;
  112914. end;
  112915. procedure TCAN2_C2FIFOCON25.setDONLY(thebits : TBits_1); inline;
  112916. begin
  112917. if thebits = 0 then
  112918. pTDefRegMap(@Self)^.clr := $00001000
  112919. else
  112920. pTDefRegMap(@Self)^.&set := $00001000;
  112921. end;
  112922. function TCAN2_C2FIFOCON25.getDONLY : TBits_1; inline;
  112923. begin
  112924. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  112925. end;
  112926. procedure TCAN2_C2FIFOCON25.setUINC; inline;
  112927. begin
  112928. pTDefRegMap(@Self)^.&set := $00002000;
  112929. end;
  112930. procedure TCAN2_C2FIFOCON25.clearUINC; inline;
  112931. begin
  112932. pTDefRegMap(@Self)^.clr := $00002000;
  112933. end;
  112934. procedure TCAN2_C2FIFOCON25.setUINC(thebits : TBits_1); inline;
  112935. begin
  112936. if thebits = 0 then
  112937. pTDefRegMap(@Self)^.clr := $00002000
  112938. else
  112939. pTDefRegMap(@Self)^.&set := $00002000;
  112940. end;
  112941. function TCAN2_C2FIFOCON25.getUINC : TBits_1; inline;
  112942. begin
  112943. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  112944. end;
  112945. procedure TCAN2_C2FIFOCON25.setFRESET; inline;
  112946. begin
  112947. pTDefRegMap(@Self)^.&set := $00004000;
  112948. end;
  112949. procedure TCAN2_C2FIFOCON25.clearFRESET; inline;
  112950. begin
  112951. pTDefRegMap(@Self)^.clr := $00004000;
  112952. end;
  112953. procedure TCAN2_C2FIFOCON25.setFRESET(thebits : TBits_1); inline;
  112954. begin
  112955. if thebits = 0 then
  112956. pTDefRegMap(@Self)^.clr := $00004000
  112957. else
  112958. pTDefRegMap(@Self)^.&set := $00004000;
  112959. end;
  112960. function TCAN2_C2FIFOCON25.getFRESET : TBits_1; inline;
  112961. begin
  112962. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  112963. end;
  112964. procedure TCAN2_C2FIFOCON25.setFSIZE(thebits : TBits_5); inline;
  112965. begin
  112966. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  112967. end;
  112968. function TCAN2_C2FIFOCON25.getFSIZE : TBits_5; inline;
  112969. begin
  112970. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  112971. end;
  112972. procedure TCAN2_C2FIFOCON25.setw(thebits : TBits_32); inline;
  112973. begin
  112974. pTDefRegMap(@Self)^.val := thebits;
  112975. end;
  112976. function TCAN2_C2FIFOCON25.getw : TBits_32; inline;
  112977. begin
  112978. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  112979. end;
  112980. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIF; inline;
  112981. begin
  112982. pTDefRegMap(@Self)^.&set := $00000001;
  112983. end;
  112984. procedure TCAN2_C2FIFOINT25.clearRXNEMPTYIF; inline;
  112985. begin
  112986. pTDefRegMap(@Self)^.clr := $00000001;
  112987. end;
  112988. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIF(thebits : TBits_1); inline;
  112989. begin
  112990. if thebits = 0 then
  112991. pTDefRegMap(@Self)^.clr := $00000001
  112992. else
  112993. pTDefRegMap(@Self)^.&set := $00000001;
  112994. end;
  112995. function TCAN2_C2FIFOINT25.getRXNEMPTYIF : TBits_1; inline;
  112996. begin
  112997. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  112998. end;
  112999. procedure TCAN2_C2FIFOINT25.setRXHALFIF; inline;
  113000. begin
  113001. pTDefRegMap(@Self)^.&set := $00000002;
  113002. end;
  113003. procedure TCAN2_C2FIFOINT25.clearRXHALFIF; inline;
  113004. begin
  113005. pTDefRegMap(@Self)^.clr := $00000002;
  113006. end;
  113007. procedure TCAN2_C2FIFOINT25.setRXHALFIF(thebits : TBits_1); inline;
  113008. begin
  113009. if thebits = 0 then
  113010. pTDefRegMap(@Self)^.clr := $00000002
  113011. else
  113012. pTDefRegMap(@Self)^.&set := $00000002;
  113013. end;
  113014. function TCAN2_C2FIFOINT25.getRXHALFIF : TBits_1; inline;
  113015. begin
  113016. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  113017. end;
  113018. procedure TCAN2_C2FIFOINT25.setRXFULLIF; inline;
  113019. begin
  113020. pTDefRegMap(@Self)^.&set := $00000004;
  113021. end;
  113022. procedure TCAN2_C2FIFOINT25.clearRXFULLIF; inline;
  113023. begin
  113024. pTDefRegMap(@Self)^.clr := $00000004;
  113025. end;
  113026. procedure TCAN2_C2FIFOINT25.setRXFULLIF(thebits : TBits_1); inline;
  113027. begin
  113028. if thebits = 0 then
  113029. pTDefRegMap(@Self)^.clr := $00000004
  113030. else
  113031. pTDefRegMap(@Self)^.&set := $00000004;
  113032. end;
  113033. function TCAN2_C2FIFOINT25.getRXFULLIF : TBits_1; inline;
  113034. begin
  113035. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113036. end;
  113037. procedure TCAN2_C2FIFOINT25.setRXOVFLIF; inline;
  113038. begin
  113039. pTDefRegMap(@Self)^.&set := $00000008;
  113040. end;
  113041. procedure TCAN2_C2FIFOINT25.clearRXOVFLIF; inline;
  113042. begin
  113043. pTDefRegMap(@Self)^.clr := $00000008;
  113044. end;
  113045. procedure TCAN2_C2FIFOINT25.setRXOVFLIF(thebits : TBits_1); inline;
  113046. begin
  113047. if thebits = 0 then
  113048. pTDefRegMap(@Self)^.clr := $00000008
  113049. else
  113050. pTDefRegMap(@Self)^.&set := $00000008;
  113051. end;
  113052. function TCAN2_C2FIFOINT25.getRXOVFLIF : TBits_1; inline;
  113053. begin
  113054. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113055. end;
  113056. procedure TCAN2_C2FIFOINT25.setTXEMPTYIF; inline;
  113057. begin
  113058. pTDefRegMap(@Self)^.&set := $00000100;
  113059. end;
  113060. procedure TCAN2_C2FIFOINT25.clearTXEMPTYIF; inline;
  113061. begin
  113062. pTDefRegMap(@Self)^.clr := $00000100;
  113063. end;
  113064. procedure TCAN2_C2FIFOINT25.setTXEMPTYIF(thebits : TBits_1); inline;
  113065. begin
  113066. if thebits = 0 then
  113067. pTDefRegMap(@Self)^.clr := $00000100
  113068. else
  113069. pTDefRegMap(@Self)^.&set := $00000100;
  113070. end;
  113071. function TCAN2_C2FIFOINT25.getTXEMPTYIF : TBits_1; inline;
  113072. begin
  113073. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  113074. end;
  113075. procedure TCAN2_C2FIFOINT25.setTXHALFIF; inline;
  113076. begin
  113077. pTDefRegMap(@Self)^.&set := $00000200;
  113078. end;
  113079. procedure TCAN2_C2FIFOINT25.clearTXHALFIF; inline;
  113080. begin
  113081. pTDefRegMap(@Self)^.clr := $00000200;
  113082. end;
  113083. procedure TCAN2_C2FIFOINT25.setTXHALFIF(thebits : TBits_1); inline;
  113084. begin
  113085. if thebits = 0 then
  113086. pTDefRegMap(@Self)^.clr := $00000200
  113087. else
  113088. pTDefRegMap(@Self)^.&set := $00000200;
  113089. end;
  113090. function TCAN2_C2FIFOINT25.getTXHALFIF : TBits_1; inline;
  113091. begin
  113092. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  113093. end;
  113094. procedure TCAN2_C2FIFOINT25.setTXNFULLIF; inline;
  113095. begin
  113096. pTDefRegMap(@Self)^.&set := $00000400;
  113097. end;
  113098. procedure TCAN2_C2FIFOINT25.clearTXNFULLIF; inline;
  113099. begin
  113100. pTDefRegMap(@Self)^.clr := $00000400;
  113101. end;
  113102. procedure TCAN2_C2FIFOINT25.setTXNFULLIF(thebits : TBits_1); inline;
  113103. begin
  113104. if thebits = 0 then
  113105. pTDefRegMap(@Self)^.clr := $00000400
  113106. else
  113107. pTDefRegMap(@Self)^.&set := $00000400;
  113108. end;
  113109. function TCAN2_C2FIFOINT25.getTXNFULLIF : TBits_1; inline;
  113110. begin
  113111. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  113112. end;
  113113. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIE; inline;
  113114. begin
  113115. pTDefRegMap(@Self)^.&set := $00010000;
  113116. end;
  113117. procedure TCAN2_C2FIFOINT25.clearRXNEMPTYIE; inline;
  113118. begin
  113119. pTDefRegMap(@Self)^.clr := $00010000;
  113120. end;
  113121. procedure TCAN2_C2FIFOINT25.setRXNEMPTYIE(thebits : TBits_1); inline;
  113122. begin
  113123. if thebits = 0 then
  113124. pTDefRegMap(@Self)^.clr := $00010000
  113125. else
  113126. pTDefRegMap(@Self)^.&set := $00010000;
  113127. end;
  113128. function TCAN2_C2FIFOINT25.getRXNEMPTYIE : TBits_1; inline;
  113129. begin
  113130. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  113131. end;
  113132. procedure TCAN2_C2FIFOINT25.setRXHALFIE; inline;
  113133. begin
  113134. pTDefRegMap(@Self)^.&set := $00020000;
  113135. end;
  113136. procedure TCAN2_C2FIFOINT25.clearRXHALFIE; inline;
  113137. begin
  113138. pTDefRegMap(@Self)^.clr := $00020000;
  113139. end;
  113140. procedure TCAN2_C2FIFOINT25.setRXHALFIE(thebits : TBits_1); inline;
  113141. begin
  113142. if thebits = 0 then
  113143. pTDefRegMap(@Self)^.clr := $00020000
  113144. else
  113145. pTDefRegMap(@Self)^.&set := $00020000;
  113146. end;
  113147. function TCAN2_C2FIFOINT25.getRXHALFIE : TBits_1; inline;
  113148. begin
  113149. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  113150. end;
  113151. procedure TCAN2_C2FIFOINT25.setRXFULLIE; inline;
  113152. begin
  113153. pTDefRegMap(@Self)^.&set := $00040000;
  113154. end;
  113155. procedure TCAN2_C2FIFOINT25.clearRXFULLIE; inline;
  113156. begin
  113157. pTDefRegMap(@Self)^.clr := $00040000;
  113158. end;
  113159. procedure TCAN2_C2FIFOINT25.setRXFULLIE(thebits : TBits_1); inline;
  113160. begin
  113161. if thebits = 0 then
  113162. pTDefRegMap(@Self)^.clr := $00040000
  113163. else
  113164. pTDefRegMap(@Self)^.&set := $00040000;
  113165. end;
  113166. function TCAN2_C2FIFOINT25.getRXFULLIE : TBits_1; inline;
  113167. begin
  113168. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  113169. end;
  113170. procedure TCAN2_C2FIFOINT25.setRXOVFLIE; inline;
  113171. begin
  113172. pTDefRegMap(@Self)^.&set := $00080000;
  113173. end;
  113174. procedure TCAN2_C2FIFOINT25.clearRXOVFLIE; inline;
  113175. begin
  113176. pTDefRegMap(@Self)^.clr := $00080000;
  113177. end;
  113178. procedure TCAN2_C2FIFOINT25.setRXOVFLIE(thebits : TBits_1); inline;
  113179. begin
  113180. if thebits = 0 then
  113181. pTDefRegMap(@Self)^.clr := $00080000
  113182. else
  113183. pTDefRegMap(@Self)^.&set := $00080000;
  113184. end;
  113185. function TCAN2_C2FIFOINT25.getRXOVFLIE : TBits_1; inline;
  113186. begin
  113187. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  113188. end;
  113189. procedure TCAN2_C2FIFOINT25.setTXEMPTYIE; inline;
  113190. begin
  113191. pTDefRegMap(@Self)^.&set := $01000000;
  113192. end;
  113193. procedure TCAN2_C2FIFOINT25.clearTXEMPTYIE; inline;
  113194. begin
  113195. pTDefRegMap(@Self)^.clr := $01000000;
  113196. end;
  113197. procedure TCAN2_C2FIFOINT25.setTXEMPTYIE(thebits : TBits_1); inline;
  113198. begin
  113199. if thebits = 0 then
  113200. pTDefRegMap(@Self)^.clr := $01000000
  113201. else
  113202. pTDefRegMap(@Self)^.&set := $01000000;
  113203. end;
  113204. function TCAN2_C2FIFOINT25.getTXEMPTYIE : TBits_1; inline;
  113205. begin
  113206. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  113207. end;
  113208. procedure TCAN2_C2FIFOINT25.setTXHALFIE; inline;
  113209. begin
  113210. pTDefRegMap(@Self)^.&set := $02000000;
  113211. end;
  113212. procedure TCAN2_C2FIFOINT25.clearTXHALFIE; inline;
  113213. begin
  113214. pTDefRegMap(@Self)^.clr := $02000000;
  113215. end;
  113216. procedure TCAN2_C2FIFOINT25.setTXHALFIE(thebits : TBits_1); inline;
  113217. begin
  113218. if thebits = 0 then
  113219. pTDefRegMap(@Self)^.clr := $02000000
  113220. else
  113221. pTDefRegMap(@Self)^.&set := $02000000;
  113222. end;
  113223. function TCAN2_C2FIFOINT25.getTXHALFIE : TBits_1; inline;
  113224. begin
  113225. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  113226. end;
  113227. procedure TCAN2_C2FIFOINT25.setTXNFULLIE; inline;
  113228. begin
  113229. pTDefRegMap(@Self)^.&set := $04000000;
  113230. end;
  113231. procedure TCAN2_C2FIFOINT25.clearTXNFULLIE; inline;
  113232. begin
  113233. pTDefRegMap(@Self)^.clr := $04000000;
  113234. end;
  113235. procedure TCAN2_C2FIFOINT25.setTXNFULLIE(thebits : TBits_1); inline;
  113236. begin
  113237. if thebits = 0 then
  113238. pTDefRegMap(@Self)^.clr := $04000000
  113239. else
  113240. pTDefRegMap(@Self)^.&set := $04000000;
  113241. end;
  113242. function TCAN2_C2FIFOINT25.getTXNFULLIE : TBits_1; inline;
  113243. begin
  113244. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  113245. end;
  113246. procedure TCAN2_C2FIFOINT25.setw(thebits : TBits_32); inline;
  113247. begin
  113248. pTDefRegMap(@Self)^.val := thebits;
  113249. end;
  113250. function TCAN2_C2FIFOINT25.getw : TBits_32; inline;
  113251. begin
  113252. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113253. end;
  113254. procedure TCAN2_C2FIFOCI25.setCFIFOCI(thebits : TBits_5); inline;
  113255. begin
  113256. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  113257. end;
  113258. function TCAN2_C2FIFOCI25.getCFIFOCI : TBits_5; inline;
  113259. begin
  113260. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  113261. end;
  113262. procedure TCAN2_C2FIFOCI25.setw(thebits : TBits_32); inline;
  113263. begin
  113264. pTDefRegMap(@Self)^.val := thebits;
  113265. end;
  113266. function TCAN2_C2FIFOCI25.getw : TBits_32; inline;
  113267. begin
  113268. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113269. end;
  113270. procedure TCAN2_C2FIFOCON26.setTXPRI(thebits : TBits_2); inline;
  113271. begin
  113272. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  113273. end;
  113274. function TCAN2_C2FIFOCON26.getTXPRI : TBits_2; inline;
  113275. begin
  113276. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  113277. end;
  113278. procedure TCAN2_C2FIFOCON26.setRTREN; inline;
  113279. begin
  113280. pTDefRegMap(@Self)^.&set := $00000004;
  113281. end;
  113282. procedure TCAN2_C2FIFOCON26.clearRTREN; inline;
  113283. begin
  113284. pTDefRegMap(@Self)^.clr := $00000004;
  113285. end;
  113286. procedure TCAN2_C2FIFOCON26.setRTREN(thebits : TBits_1); inline;
  113287. begin
  113288. if thebits = 0 then
  113289. pTDefRegMap(@Self)^.clr := $00000004
  113290. else
  113291. pTDefRegMap(@Self)^.&set := $00000004;
  113292. end;
  113293. function TCAN2_C2FIFOCON26.getRTREN : TBits_1; inline;
  113294. begin
  113295. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113296. end;
  113297. procedure TCAN2_C2FIFOCON26.setTXREQ; inline;
  113298. begin
  113299. pTDefRegMap(@Self)^.&set := $00000008;
  113300. end;
  113301. procedure TCAN2_C2FIFOCON26.clearTXREQ; inline;
  113302. begin
  113303. pTDefRegMap(@Self)^.clr := $00000008;
  113304. end;
  113305. procedure TCAN2_C2FIFOCON26.setTXREQ(thebits : TBits_1); inline;
  113306. begin
  113307. if thebits = 0 then
  113308. pTDefRegMap(@Self)^.clr := $00000008
  113309. else
  113310. pTDefRegMap(@Self)^.&set := $00000008;
  113311. end;
  113312. function TCAN2_C2FIFOCON26.getTXREQ : TBits_1; inline;
  113313. begin
  113314. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113315. end;
  113316. procedure TCAN2_C2FIFOCON26.setTXERR; inline;
  113317. begin
  113318. pTDefRegMap(@Self)^.&set := $00000010;
  113319. end;
  113320. procedure TCAN2_C2FIFOCON26.clearTXERR; inline;
  113321. begin
  113322. pTDefRegMap(@Self)^.clr := $00000010;
  113323. end;
  113324. procedure TCAN2_C2FIFOCON26.setTXERR(thebits : TBits_1); inline;
  113325. begin
  113326. if thebits = 0 then
  113327. pTDefRegMap(@Self)^.clr := $00000010
  113328. else
  113329. pTDefRegMap(@Self)^.&set := $00000010;
  113330. end;
  113331. function TCAN2_C2FIFOCON26.getTXERR : TBits_1; inline;
  113332. begin
  113333. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  113334. end;
  113335. procedure TCAN2_C2FIFOCON26.setTXLARB; inline;
  113336. begin
  113337. pTDefRegMap(@Self)^.&set := $00000020;
  113338. end;
  113339. procedure TCAN2_C2FIFOCON26.clearTXLARB; inline;
  113340. begin
  113341. pTDefRegMap(@Self)^.clr := $00000020;
  113342. end;
  113343. procedure TCAN2_C2FIFOCON26.setTXLARB(thebits : TBits_1); inline;
  113344. begin
  113345. if thebits = 0 then
  113346. pTDefRegMap(@Self)^.clr := $00000020
  113347. else
  113348. pTDefRegMap(@Self)^.&set := $00000020;
  113349. end;
  113350. function TCAN2_C2FIFOCON26.getTXLARB : TBits_1; inline;
  113351. begin
  113352. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  113353. end;
  113354. procedure TCAN2_C2FIFOCON26.setTXABAT; inline;
  113355. begin
  113356. pTDefRegMap(@Self)^.&set := $00000040;
  113357. end;
  113358. procedure TCAN2_C2FIFOCON26.clearTXABAT; inline;
  113359. begin
  113360. pTDefRegMap(@Self)^.clr := $00000040;
  113361. end;
  113362. procedure TCAN2_C2FIFOCON26.setTXABAT(thebits : TBits_1); inline;
  113363. begin
  113364. if thebits = 0 then
  113365. pTDefRegMap(@Self)^.clr := $00000040
  113366. else
  113367. pTDefRegMap(@Self)^.&set := $00000040;
  113368. end;
  113369. function TCAN2_C2FIFOCON26.getTXABAT : TBits_1; inline;
  113370. begin
  113371. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  113372. end;
  113373. procedure TCAN2_C2FIFOCON26.setTXEN; inline;
  113374. begin
  113375. pTDefRegMap(@Self)^.&set := $00000080;
  113376. end;
  113377. procedure TCAN2_C2FIFOCON26.clearTXEN; inline;
  113378. begin
  113379. pTDefRegMap(@Self)^.clr := $00000080;
  113380. end;
  113381. procedure TCAN2_C2FIFOCON26.setTXEN(thebits : TBits_1); inline;
  113382. begin
  113383. if thebits = 0 then
  113384. pTDefRegMap(@Self)^.clr := $00000080
  113385. else
  113386. pTDefRegMap(@Self)^.&set := $00000080;
  113387. end;
  113388. function TCAN2_C2FIFOCON26.getTXEN : TBits_1; inline;
  113389. begin
  113390. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  113391. end;
  113392. procedure TCAN2_C2FIFOCON26.setDONLY; inline;
  113393. begin
  113394. pTDefRegMap(@Self)^.&set := $00001000;
  113395. end;
  113396. procedure TCAN2_C2FIFOCON26.clearDONLY; inline;
  113397. begin
  113398. pTDefRegMap(@Self)^.clr := $00001000;
  113399. end;
  113400. procedure TCAN2_C2FIFOCON26.setDONLY(thebits : TBits_1); inline;
  113401. begin
  113402. if thebits = 0 then
  113403. pTDefRegMap(@Self)^.clr := $00001000
  113404. else
  113405. pTDefRegMap(@Self)^.&set := $00001000;
  113406. end;
  113407. function TCAN2_C2FIFOCON26.getDONLY : TBits_1; inline;
  113408. begin
  113409. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  113410. end;
  113411. procedure TCAN2_C2FIFOCON26.setUINC; inline;
  113412. begin
  113413. pTDefRegMap(@Self)^.&set := $00002000;
  113414. end;
  113415. procedure TCAN2_C2FIFOCON26.clearUINC; inline;
  113416. begin
  113417. pTDefRegMap(@Self)^.clr := $00002000;
  113418. end;
  113419. procedure TCAN2_C2FIFOCON26.setUINC(thebits : TBits_1); inline;
  113420. begin
  113421. if thebits = 0 then
  113422. pTDefRegMap(@Self)^.clr := $00002000
  113423. else
  113424. pTDefRegMap(@Self)^.&set := $00002000;
  113425. end;
  113426. function TCAN2_C2FIFOCON26.getUINC : TBits_1; inline;
  113427. begin
  113428. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  113429. end;
  113430. procedure TCAN2_C2FIFOCON26.setFRESET; inline;
  113431. begin
  113432. pTDefRegMap(@Self)^.&set := $00004000;
  113433. end;
  113434. procedure TCAN2_C2FIFOCON26.clearFRESET; inline;
  113435. begin
  113436. pTDefRegMap(@Self)^.clr := $00004000;
  113437. end;
  113438. procedure TCAN2_C2FIFOCON26.setFRESET(thebits : TBits_1); inline;
  113439. begin
  113440. if thebits = 0 then
  113441. pTDefRegMap(@Self)^.clr := $00004000
  113442. else
  113443. pTDefRegMap(@Self)^.&set := $00004000;
  113444. end;
  113445. function TCAN2_C2FIFOCON26.getFRESET : TBits_1; inline;
  113446. begin
  113447. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  113448. end;
  113449. procedure TCAN2_C2FIFOCON26.setFSIZE(thebits : TBits_5); inline;
  113450. begin
  113451. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  113452. end;
  113453. function TCAN2_C2FIFOCON26.getFSIZE : TBits_5; inline;
  113454. begin
  113455. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  113456. end;
  113457. procedure TCAN2_C2FIFOCON26.setw(thebits : TBits_32); inline;
  113458. begin
  113459. pTDefRegMap(@Self)^.val := thebits;
  113460. end;
  113461. function TCAN2_C2FIFOCON26.getw : TBits_32; inline;
  113462. begin
  113463. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113464. end;
  113465. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIF; inline;
  113466. begin
  113467. pTDefRegMap(@Self)^.&set := $00000001;
  113468. end;
  113469. procedure TCAN2_C2FIFOINT26.clearRXNEMPTYIF; inline;
  113470. begin
  113471. pTDefRegMap(@Self)^.clr := $00000001;
  113472. end;
  113473. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIF(thebits : TBits_1); inline;
  113474. begin
  113475. if thebits = 0 then
  113476. pTDefRegMap(@Self)^.clr := $00000001
  113477. else
  113478. pTDefRegMap(@Self)^.&set := $00000001;
  113479. end;
  113480. function TCAN2_C2FIFOINT26.getRXNEMPTYIF : TBits_1; inline;
  113481. begin
  113482. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  113483. end;
  113484. procedure TCAN2_C2FIFOINT26.setRXHALFIF; inline;
  113485. begin
  113486. pTDefRegMap(@Self)^.&set := $00000002;
  113487. end;
  113488. procedure TCAN2_C2FIFOINT26.clearRXHALFIF; inline;
  113489. begin
  113490. pTDefRegMap(@Self)^.clr := $00000002;
  113491. end;
  113492. procedure TCAN2_C2FIFOINT26.setRXHALFIF(thebits : TBits_1); inline;
  113493. begin
  113494. if thebits = 0 then
  113495. pTDefRegMap(@Self)^.clr := $00000002
  113496. else
  113497. pTDefRegMap(@Self)^.&set := $00000002;
  113498. end;
  113499. function TCAN2_C2FIFOINT26.getRXHALFIF : TBits_1; inline;
  113500. begin
  113501. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  113502. end;
  113503. procedure TCAN2_C2FIFOINT26.setRXFULLIF; inline;
  113504. begin
  113505. pTDefRegMap(@Self)^.&set := $00000004;
  113506. end;
  113507. procedure TCAN2_C2FIFOINT26.clearRXFULLIF; inline;
  113508. begin
  113509. pTDefRegMap(@Self)^.clr := $00000004;
  113510. end;
  113511. procedure TCAN2_C2FIFOINT26.setRXFULLIF(thebits : TBits_1); inline;
  113512. begin
  113513. if thebits = 0 then
  113514. pTDefRegMap(@Self)^.clr := $00000004
  113515. else
  113516. pTDefRegMap(@Self)^.&set := $00000004;
  113517. end;
  113518. function TCAN2_C2FIFOINT26.getRXFULLIF : TBits_1; inline;
  113519. begin
  113520. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113521. end;
  113522. procedure TCAN2_C2FIFOINT26.setRXOVFLIF; inline;
  113523. begin
  113524. pTDefRegMap(@Self)^.&set := $00000008;
  113525. end;
  113526. procedure TCAN2_C2FIFOINT26.clearRXOVFLIF; inline;
  113527. begin
  113528. pTDefRegMap(@Self)^.clr := $00000008;
  113529. end;
  113530. procedure TCAN2_C2FIFOINT26.setRXOVFLIF(thebits : TBits_1); inline;
  113531. begin
  113532. if thebits = 0 then
  113533. pTDefRegMap(@Self)^.clr := $00000008
  113534. else
  113535. pTDefRegMap(@Self)^.&set := $00000008;
  113536. end;
  113537. function TCAN2_C2FIFOINT26.getRXOVFLIF : TBits_1; inline;
  113538. begin
  113539. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113540. end;
  113541. procedure TCAN2_C2FIFOINT26.setTXEMPTYIF; inline;
  113542. begin
  113543. pTDefRegMap(@Self)^.&set := $00000100;
  113544. end;
  113545. procedure TCAN2_C2FIFOINT26.clearTXEMPTYIF; inline;
  113546. begin
  113547. pTDefRegMap(@Self)^.clr := $00000100;
  113548. end;
  113549. procedure TCAN2_C2FIFOINT26.setTXEMPTYIF(thebits : TBits_1); inline;
  113550. begin
  113551. if thebits = 0 then
  113552. pTDefRegMap(@Self)^.clr := $00000100
  113553. else
  113554. pTDefRegMap(@Self)^.&set := $00000100;
  113555. end;
  113556. function TCAN2_C2FIFOINT26.getTXEMPTYIF : TBits_1; inline;
  113557. begin
  113558. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  113559. end;
  113560. procedure TCAN2_C2FIFOINT26.setTXHALFIF; inline;
  113561. begin
  113562. pTDefRegMap(@Self)^.&set := $00000200;
  113563. end;
  113564. procedure TCAN2_C2FIFOINT26.clearTXHALFIF; inline;
  113565. begin
  113566. pTDefRegMap(@Self)^.clr := $00000200;
  113567. end;
  113568. procedure TCAN2_C2FIFOINT26.setTXHALFIF(thebits : TBits_1); inline;
  113569. begin
  113570. if thebits = 0 then
  113571. pTDefRegMap(@Self)^.clr := $00000200
  113572. else
  113573. pTDefRegMap(@Self)^.&set := $00000200;
  113574. end;
  113575. function TCAN2_C2FIFOINT26.getTXHALFIF : TBits_1; inline;
  113576. begin
  113577. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  113578. end;
  113579. procedure TCAN2_C2FIFOINT26.setTXNFULLIF; inline;
  113580. begin
  113581. pTDefRegMap(@Self)^.&set := $00000400;
  113582. end;
  113583. procedure TCAN2_C2FIFOINT26.clearTXNFULLIF; inline;
  113584. begin
  113585. pTDefRegMap(@Self)^.clr := $00000400;
  113586. end;
  113587. procedure TCAN2_C2FIFOINT26.setTXNFULLIF(thebits : TBits_1); inline;
  113588. begin
  113589. if thebits = 0 then
  113590. pTDefRegMap(@Self)^.clr := $00000400
  113591. else
  113592. pTDefRegMap(@Self)^.&set := $00000400;
  113593. end;
  113594. function TCAN2_C2FIFOINT26.getTXNFULLIF : TBits_1; inline;
  113595. begin
  113596. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  113597. end;
  113598. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIE; inline;
  113599. begin
  113600. pTDefRegMap(@Self)^.&set := $00010000;
  113601. end;
  113602. procedure TCAN2_C2FIFOINT26.clearRXNEMPTYIE; inline;
  113603. begin
  113604. pTDefRegMap(@Self)^.clr := $00010000;
  113605. end;
  113606. procedure TCAN2_C2FIFOINT26.setRXNEMPTYIE(thebits : TBits_1); inline;
  113607. begin
  113608. if thebits = 0 then
  113609. pTDefRegMap(@Self)^.clr := $00010000
  113610. else
  113611. pTDefRegMap(@Self)^.&set := $00010000;
  113612. end;
  113613. function TCAN2_C2FIFOINT26.getRXNEMPTYIE : TBits_1; inline;
  113614. begin
  113615. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  113616. end;
  113617. procedure TCAN2_C2FIFOINT26.setRXHALFIE; inline;
  113618. begin
  113619. pTDefRegMap(@Self)^.&set := $00020000;
  113620. end;
  113621. procedure TCAN2_C2FIFOINT26.clearRXHALFIE; inline;
  113622. begin
  113623. pTDefRegMap(@Self)^.clr := $00020000;
  113624. end;
  113625. procedure TCAN2_C2FIFOINT26.setRXHALFIE(thebits : TBits_1); inline;
  113626. begin
  113627. if thebits = 0 then
  113628. pTDefRegMap(@Self)^.clr := $00020000
  113629. else
  113630. pTDefRegMap(@Self)^.&set := $00020000;
  113631. end;
  113632. function TCAN2_C2FIFOINT26.getRXHALFIE : TBits_1; inline;
  113633. begin
  113634. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  113635. end;
  113636. procedure TCAN2_C2FIFOINT26.setRXFULLIE; inline;
  113637. begin
  113638. pTDefRegMap(@Self)^.&set := $00040000;
  113639. end;
  113640. procedure TCAN2_C2FIFOINT26.clearRXFULLIE; inline;
  113641. begin
  113642. pTDefRegMap(@Self)^.clr := $00040000;
  113643. end;
  113644. procedure TCAN2_C2FIFOINT26.setRXFULLIE(thebits : TBits_1); inline;
  113645. begin
  113646. if thebits = 0 then
  113647. pTDefRegMap(@Self)^.clr := $00040000
  113648. else
  113649. pTDefRegMap(@Self)^.&set := $00040000;
  113650. end;
  113651. function TCAN2_C2FIFOINT26.getRXFULLIE : TBits_1; inline;
  113652. begin
  113653. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  113654. end;
  113655. procedure TCAN2_C2FIFOINT26.setRXOVFLIE; inline;
  113656. begin
  113657. pTDefRegMap(@Self)^.&set := $00080000;
  113658. end;
  113659. procedure TCAN2_C2FIFOINT26.clearRXOVFLIE; inline;
  113660. begin
  113661. pTDefRegMap(@Self)^.clr := $00080000;
  113662. end;
  113663. procedure TCAN2_C2FIFOINT26.setRXOVFLIE(thebits : TBits_1); inline;
  113664. begin
  113665. if thebits = 0 then
  113666. pTDefRegMap(@Self)^.clr := $00080000
  113667. else
  113668. pTDefRegMap(@Self)^.&set := $00080000;
  113669. end;
  113670. function TCAN2_C2FIFOINT26.getRXOVFLIE : TBits_1; inline;
  113671. begin
  113672. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  113673. end;
  113674. procedure TCAN2_C2FIFOINT26.setTXEMPTYIE; inline;
  113675. begin
  113676. pTDefRegMap(@Self)^.&set := $01000000;
  113677. end;
  113678. procedure TCAN2_C2FIFOINT26.clearTXEMPTYIE; inline;
  113679. begin
  113680. pTDefRegMap(@Self)^.clr := $01000000;
  113681. end;
  113682. procedure TCAN2_C2FIFOINT26.setTXEMPTYIE(thebits : TBits_1); inline;
  113683. begin
  113684. if thebits = 0 then
  113685. pTDefRegMap(@Self)^.clr := $01000000
  113686. else
  113687. pTDefRegMap(@Self)^.&set := $01000000;
  113688. end;
  113689. function TCAN2_C2FIFOINT26.getTXEMPTYIE : TBits_1; inline;
  113690. begin
  113691. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  113692. end;
  113693. procedure TCAN2_C2FIFOINT26.setTXHALFIE; inline;
  113694. begin
  113695. pTDefRegMap(@Self)^.&set := $02000000;
  113696. end;
  113697. procedure TCAN2_C2FIFOINT26.clearTXHALFIE; inline;
  113698. begin
  113699. pTDefRegMap(@Self)^.clr := $02000000;
  113700. end;
  113701. procedure TCAN2_C2FIFOINT26.setTXHALFIE(thebits : TBits_1); inline;
  113702. begin
  113703. if thebits = 0 then
  113704. pTDefRegMap(@Self)^.clr := $02000000
  113705. else
  113706. pTDefRegMap(@Self)^.&set := $02000000;
  113707. end;
  113708. function TCAN2_C2FIFOINT26.getTXHALFIE : TBits_1; inline;
  113709. begin
  113710. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  113711. end;
  113712. procedure TCAN2_C2FIFOINT26.setTXNFULLIE; inline;
  113713. begin
  113714. pTDefRegMap(@Self)^.&set := $04000000;
  113715. end;
  113716. procedure TCAN2_C2FIFOINT26.clearTXNFULLIE; inline;
  113717. begin
  113718. pTDefRegMap(@Self)^.clr := $04000000;
  113719. end;
  113720. procedure TCAN2_C2FIFOINT26.setTXNFULLIE(thebits : TBits_1); inline;
  113721. begin
  113722. if thebits = 0 then
  113723. pTDefRegMap(@Self)^.clr := $04000000
  113724. else
  113725. pTDefRegMap(@Self)^.&set := $04000000;
  113726. end;
  113727. function TCAN2_C2FIFOINT26.getTXNFULLIE : TBits_1; inline;
  113728. begin
  113729. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  113730. end;
  113731. procedure TCAN2_C2FIFOINT26.setw(thebits : TBits_32); inline;
  113732. begin
  113733. pTDefRegMap(@Self)^.val := thebits;
  113734. end;
  113735. function TCAN2_C2FIFOINT26.getw : TBits_32; inline;
  113736. begin
  113737. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113738. end;
  113739. procedure TCAN2_C2FIFOCI26.setCFIFOCI(thebits : TBits_5); inline;
  113740. begin
  113741. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  113742. end;
  113743. function TCAN2_C2FIFOCI26.getCFIFOCI : TBits_5; inline;
  113744. begin
  113745. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  113746. end;
  113747. procedure TCAN2_C2FIFOCI26.setw(thebits : TBits_32); inline;
  113748. begin
  113749. pTDefRegMap(@Self)^.val := thebits;
  113750. end;
  113751. function TCAN2_C2FIFOCI26.getw : TBits_32; inline;
  113752. begin
  113753. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113754. end;
  113755. procedure TCAN2_C2FIFOCON27.setTXPRI(thebits : TBits_2); inline;
  113756. begin
  113757. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  113758. end;
  113759. function TCAN2_C2FIFOCON27.getTXPRI : TBits_2; inline;
  113760. begin
  113761. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  113762. end;
  113763. procedure TCAN2_C2FIFOCON27.setRTREN; inline;
  113764. begin
  113765. pTDefRegMap(@Self)^.&set := $00000004;
  113766. end;
  113767. procedure TCAN2_C2FIFOCON27.clearRTREN; inline;
  113768. begin
  113769. pTDefRegMap(@Self)^.clr := $00000004;
  113770. end;
  113771. procedure TCAN2_C2FIFOCON27.setRTREN(thebits : TBits_1); inline;
  113772. begin
  113773. if thebits = 0 then
  113774. pTDefRegMap(@Self)^.clr := $00000004
  113775. else
  113776. pTDefRegMap(@Self)^.&set := $00000004;
  113777. end;
  113778. function TCAN2_C2FIFOCON27.getRTREN : TBits_1; inline;
  113779. begin
  113780. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  113781. end;
  113782. procedure TCAN2_C2FIFOCON27.setTXREQ; inline;
  113783. begin
  113784. pTDefRegMap(@Self)^.&set := $00000008;
  113785. end;
  113786. procedure TCAN2_C2FIFOCON27.clearTXREQ; inline;
  113787. begin
  113788. pTDefRegMap(@Self)^.clr := $00000008;
  113789. end;
  113790. procedure TCAN2_C2FIFOCON27.setTXREQ(thebits : TBits_1); inline;
  113791. begin
  113792. if thebits = 0 then
  113793. pTDefRegMap(@Self)^.clr := $00000008
  113794. else
  113795. pTDefRegMap(@Self)^.&set := $00000008;
  113796. end;
  113797. function TCAN2_C2FIFOCON27.getTXREQ : TBits_1; inline;
  113798. begin
  113799. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  113800. end;
  113801. procedure TCAN2_C2FIFOCON27.setTXERR; inline;
  113802. begin
  113803. pTDefRegMap(@Self)^.&set := $00000010;
  113804. end;
  113805. procedure TCAN2_C2FIFOCON27.clearTXERR; inline;
  113806. begin
  113807. pTDefRegMap(@Self)^.clr := $00000010;
  113808. end;
  113809. procedure TCAN2_C2FIFOCON27.setTXERR(thebits : TBits_1); inline;
  113810. begin
  113811. if thebits = 0 then
  113812. pTDefRegMap(@Self)^.clr := $00000010
  113813. else
  113814. pTDefRegMap(@Self)^.&set := $00000010;
  113815. end;
  113816. function TCAN2_C2FIFOCON27.getTXERR : TBits_1; inline;
  113817. begin
  113818. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  113819. end;
  113820. procedure TCAN2_C2FIFOCON27.setTXLARB; inline;
  113821. begin
  113822. pTDefRegMap(@Self)^.&set := $00000020;
  113823. end;
  113824. procedure TCAN2_C2FIFOCON27.clearTXLARB; inline;
  113825. begin
  113826. pTDefRegMap(@Self)^.clr := $00000020;
  113827. end;
  113828. procedure TCAN2_C2FIFOCON27.setTXLARB(thebits : TBits_1); inline;
  113829. begin
  113830. if thebits = 0 then
  113831. pTDefRegMap(@Self)^.clr := $00000020
  113832. else
  113833. pTDefRegMap(@Self)^.&set := $00000020;
  113834. end;
  113835. function TCAN2_C2FIFOCON27.getTXLARB : TBits_1; inline;
  113836. begin
  113837. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  113838. end;
  113839. procedure TCAN2_C2FIFOCON27.setTXABAT; inline;
  113840. begin
  113841. pTDefRegMap(@Self)^.&set := $00000040;
  113842. end;
  113843. procedure TCAN2_C2FIFOCON27.clearTXABAT; inline;
  113844. begin
  113845. pTDefRegMap(@Self)^.clr := $00000040;
  113846. end;
  113847. procedure TCAN2_C2FIFOCON27.setTXABAT(thebits : TBits_1); inline;
  113848. begin
  113849. if thebits = 0 then
  113850. pTDefRegMap(@Self)^.clr := $00000040
  113851. else
  113852. pTDefRegMap(@Self)^.&set := $00000040;
  113853. end;
  113854. function TCAN2_C2FIFOCON27.getTXABAT : TBits_1; inline;
  113855. begin
  113856. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  113857. end;
  113858. procedure TCAN2_C2FIFOCON27.setTXEN; inline;
  113859. begin
  113860. pTDefRegMap(@Self)^.&set := $00000080;
  113861. end;
  113862. procedure TCAN2_C2FIFOCON27.clearTXEN; inline;
  113863. begin
  113864. pTDefRegMap(@Self)^.clr := $00000080;
  113865. end;
  113866. procedure TCAN2_C2FIFOCON27.setTXEN(thebits : TBits_1); inline;
  113867. begin
  113868. if thebits = 0 then
  113869. pTDefRegMap(@Self)^.clr := $00000080
  113870. else
  113871. pTDefRegMap(@Self)^.&set := $00000080;
  113872. end;
  113873. function TCAN2_C2FIFOCON27.getTXEN : TBits_1; inline;
  113874. begin
  113875. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  113876. end;
  113877. procedure TCAN2_C2FIFOCON27.setDONLY; inline;
  113878. begin
  113879. pTDefRegMap(@Self)^.&set := $00001000;
  113880. end;
  113881. procedure TCAN2_C2FIFOCON27.clearDONLY; inline;
  113882. begin
  113883. pTDefRegMap(@Self)^.clr := $00001000;
  113884. end;
  113885. procedure TCAN2_C2FIFOCON27.setDONLY(thebits : TBits_1); inline;
  113886. begin
  113887. if thebits = 0 then
  113888. pTDefRegMap(@Self)^.clr := $00001000
  113889. else
  113890. pTDefRegMap(@Self)^.&set := $00001000;
  113891. end;
  113892. function TCAN2_C2FIFOCON27.getDONLY : TBits_1; inline;
  113893. begin
  113894. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  113895. end;
  113896. procedure TCAN2_C2FIFOCON27.setUINC; inline;
  113897. begin
  113898. pTDefRegMap(@Self)^.&set := $00002000;
  113899. end;
  113900. procedure TCAN2_C2FIFOCON27.clearUINC; inline;
  113901. begin
  113902. pTDefRegMap(@Self)^.clr := $00002000;
  113903. end;
  113904. procedure TCAN2_C2FIFOCON27.setUINC(thebits : TBits_1); inline;
  113905. begin
  113906. if thebits = 0 then
  113907. pTDefRegMap(@Self)^.clr := $00002000
  113908. else
  113909. pTDefRegMap(@Self)^.&set := $00002000;
  113910. end;
  113911. function TCAN2_C2FIFOCON27.getUINC : TBits_1; inline;
  113912. begin
  113913. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  113914. end;
  113915. procedure TCAN2_C2FIFOCON27.setFRESET; inline;
  113916. begin
  113917. pTDefRegMap(@Self)^.&set := $00004000;
  113918. end;
  113919. procedure TCAN2_C2FIFOCON27.clearFRESET; inline;
  113920. begin
  113921. pTDefRegMap(@Self)^.clr := $00004000;
  113922. end;
  113923. procedure TCAN2_C2FIFOCON27.setFRESET(thebits : TBits_1); inline;
  113924. begin
  113925. if thebits = 0 then
  113926. pTDefRegMap(@Self)^.clr := $00004000
  113927. else
  113928. pTDefRegMap(@Self)^.&set := $00004000;
  113929. end;
  113930. function TCAN2_C2FIFOCON27.getFRESET : TBits_1; inline;
  113931. begin
  113932. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  113933. end;
  113934. procedure TCAN2_C2FIFOCON27.setFSIZE(thebits : TBits_5); inline;
  113935. begin
  113936. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  113937. end;
  113938. function TCAN2_C2FIFOCON27.getFSIZE : TBits_5; inline;
  113939. begin
  113940. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  113941. end;
  113942. procedure TCAN2_C2FIFOCON27.setw(thebits : TBits_32); inline;
  113943. begin
  113944. pTDefRegMap(@Self)^.val := thebits;
  113945. end;
  113946. function TCAN2_C2FIFOCON27.getw : TBits_32; inline;
  113947. begin
  113948. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  113949. end;
  113950. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIF; inline;
  113951. begin
  113952. pTDefRegMap(@Self)^.&set := $00000001;
  113953. end;
  113954. procedure TCAN2_C2FIFOINT27.clearRXNEMPTYIF; inline;
  113955. begin
  113956. pTDefRegMap(@Self)^.clr := $00000001;
  113957. end;
  113958. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIF(thebits : TBits_1); inline;
  113959. begin
  113960. if thebits = 0 then
  113961. pTDefRegMap(@Self)^.clr := $00000001
  113962. else
  113963. pTDefRegMap(@Self)^.&set := $00000001;
  113964. end;
  113965. function TCAN2_C2FIFOINT27.getRXNEMPTYIF : TBits_1; inline;
  113966. begin
  113967. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  113968. end;
  113969. procedure TCAN2_C2FIFOINT27.setRXHALFIF; inline;
  113970. begin
  113971. pTDefRegMap(@Self)^.&set := $00000002;
  113972. end;
  113973. procedure TCAN2_C2FIFOINT27.clearRXHALFIF; inline;
  113974. begin
  113975. pTDefRegMap(@Self)^.clr := $00000002;
  113976. end;
  113977. procedure TCAN2_C2FIFOINT27.setRXHALFIF(thebits : TBits_1); inline;
  113978. begin
  113979. if thebits = 0 then
  113980. pTDefRegMap(@Self)^.clr := $00000002
  113981. else
  113982. pTDefRegMap(@Self)^.&set := $00000002;
  113983. end;
  113984. function TCAN2_C2FIFOINT27.getRXHALFIF : TBits_1; inline;
  113985. begin
  113986. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  113987. end;
  113988. procedure TCAN2_C2FIFOINT27.setRXFULLIF; inline;
  113989. begin
  113990. pTDefRegMap(@Self)^.&set := $00000004;
  113991. end;
  113992. procedure TCAN2_C2FIFOINT27.clearRXFULLIF; inline;
  113993. begin
  113994. pTDefRegMap(@Self)^.clr := $00000004;
  113995. end;
  113996. procedure TCAN2_C2FIFOINT27.setRXFULLIF(thebits : TBits_1); inline;
  113997. begin
  113998. if thebits = 0 then
  113999. pTDefRegMap(@Self)^.clr := $00000004
  114000. else
  114001. pTDefRegMap(@Self)^.&set := $00000004;
  114002. end;
  114003. function TCAN2_C2FIFOINT27.getRXFULLIF : TBits_1; inline;
  114004. begin
  114005. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114006. end;
  114007. procedure TCAN2_C2FIFOINT27.setRXOVFLIF; inline;
  114008. begin
  114009. pTDefRegMap(@Self)^.&set := $00000008;
  114010. end;
  114011. procedure TCAN2_C2FIFOINT27.clearRXOVFLIF; inline;
  114012. begin
  114013. pTDefRegMap(@Self)^.clr := $00000008;
  114014. end;
  114015. procedure TCAN2_C2FIFOINT27.setRXOVFLIF(thebits : TBits_1); inline;
  114016. begin
  114017. if thebits = 0 then
  114018. pTDefRegMap(@Self)^.clr := $00000008
  114019. else
  114020. pTDefRegMap(@Self)^.&set := $00000008;
  114021. end;
  114022. function TCAN2_C2FIFOINT27.getRXOVFLIF : TBits_1; inline;
  114023. begin
  114024. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114025. end;
  114026. procedure TCAN2_C2FIFOINT27.setTXEMPTYIF; inline;
  114027. begin
  114028. pTDefRegMap(@Self)^.&set := $00000100;
  114029. end;
  114030. procedure TCAN2_C2FIFOINT27.clearTXEMPTYIF; inline;
  114031. begin
  114032. pTDefRegMap(@Self)^.clr := $00000100;
  114033. end;
  114034. procedure TCAN2_C2FIFOINT27.setTXEMPTYIF(thebits : TBits_1); inline;
  114035. begin
  114036. if thebits = 0 then
  114037. pTDefRegMap(@Self)^.clr := $00000100
  114038. else
  114039. pTDefRegMap(@Self)^.&set := $00000100;
  114040. end;
  114041. function TCAN2_C2FIFOINT27.getTXEMPTYIF : TBits_1; inline;
  114042. begin
  114043. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  114044. end;
  114045. procedure TCAN2_C2FIFOINT27.setTXHALFIF; inline;
  114046. begin
  114047. pTDefRegMap(@Self)^.&set := $00000200;
  114048. end;
  114049. procedure TCAN2_C2FIFOINT27.clearTXHALFIF; inline;
  114050. begin
  114051. pTDefRegMap(@Self)^.clr := $00000200;
  114052. end;
  114053. procedure TCAN2_C2FIFOINT27.setTXHALFIF(thebits : TBits_1); inline;
  114054. begin
  114055. if thebits = 0 then
  114056. pTDefRegMap(@Self)^.clr := $00000200
  114057. else
  114058. pTDefRegMap(@Self)^.&set := $00000200;
  114059. end;
  114060. function TCAN2_C2FIFOINT27.getTXHALFIF : TBits_1; inline;
  114061. begin
  114062. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  114063. end;
  114064. procedure TCAN2_C2FIFOINT27.setTXNFULLIF; inline;
  114065. begin
  114066. pTDefRegMap(@Self)^.&set := $00000400;
  114067. end;
  114068. procedure TCAN2_C2FIFOINT27.clearTXNFULLIF; inline;
  114069. begin
  114070. pTDefRegMap(@Self)^.clr := $00000400;
  114071. end;
  114072. procedure TCAN2_C2FIFOINT27.setTXNFULLIF(thebits : TBits_1); inline;
  114073. begin
  114074. if thebits = 0 then
  114075. pTDefRegMap(@Self)^.clr := $00000400
  114076. else
  114077. pTDefRegMap(@Self)^.&set := $00000400;
  114078. end;
  114079. function TCAN2_C2FIFOINT27.getTXNFULLIF : TBits_1; inline;
  114080. begin
  114081. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  114082. end;
  114083. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIE; inline;
  114084. begin
  114085. pTDefRegMap(@Self)^.&set := $00010000;
  114086. end;
  114087. procedure TCAN2_C2FIFOINT27.clearRXNEMPTYIE; inline;
  114088. begin
  114089. pTDefRegMap(@Self)^.clr := $00010000;
  114090. end;
  114091. procedure TCAN2_C2FIFOINT27.setRXNEMPTYIE(thebits : TBits_1); inline;
  114092. begin
  114093. if thebits = 0 then
  114094. pTDefRegMap(@Self)^.clr := $00010000
  114095. else
  114096. pTDefRegMap(@Self)^.&set := $00010000;
  114097. end;
  114098. function TCAN2_C2FIFOINT27.getRXNEMPTYIE : TBits_1; inline;
  114099. begin
  114100. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  114101. end;
  114102. procedure TCAN2_C2FIFOINT27.setRXHALFIE; inline;
  114103. begin
  114104. pTDefRegMap(@Self)^.&set := $00020000;
  114105. end;
  114106. procedure TCAN2_C2FIFOINT27.clearRXHALFIE; inline;
  114107. begin
  114108. pTDefRegMap(@Self)^.clr := $00020000;
  114109. end;
  114110. procedure TCAN2_C2FIFOINT27.setRXHALFIE(thebits : TBits_1); inline;
  114111. begin
  114112. if thebits = 0 then
  114113. pTDefRegMap(@Self)^.clr := $00020000
  114114. else
  114115. pTDefRegMap(@Self)^.&set := $00020000;
  114116. end;
  114117. function TCAN2_C2FIFOINT27.getRXHALFIE : TBits_1; inline;
  114118. begin
  114119. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  114120. end;
  114121. procedure TCAN2_C2FIFOINT27.setRXFULLIE; inline;
  114122. begin
  114123. pTDefRegMap(@Self)^.&set := $00040000;
  114124. end;
  114125. procedure TCAN2_C2FIFOINT27.clearRXFULLIE; inline;
  114126. begin
  114127. pTDefRegMap(@Self)^.clr := $00040000;
  114128. end;
  114129. procedure TCAN2_C2FIFOINT27.setRXFULLIE(thebits : TBits_1); inline;
  114130. begin
  114131. if thebits = 0 then
  114132. pTDefRegMap(@Self)^.clr := $00040000
  114133. else
  114134. pTDefRegMap(@Self)^.&set := $00040000;
  114135. end;
  114136. function TCAN2_C2FIFOINT27.getRXFULLIE : TBits_1; inline;
  114137. begin
  114138. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  114139. end;
  114140. procedure TCAN2_C2FIFOINT27.setRXOVFLIE; inline;
  114141. begin
  114142. pTDefRegMap(@Self)^.&set := $00080000;
  114143. end;
  114144. procedure TCAN2_C2FIFOINT27.clearRXOVFLIE; inline;
  114145. begin
  114146. pTDefRegMap(@Self)^.clr := $00080000;
  114147. end;
  114148. procedure TCAN2_C2FIFOINT27.setRXOVFLIE(thebits : TBits_1); inline;
  114149. begin
  114150. if thebits = 0 then
  114151. pTDefRegMap(@Self)^.clr := $00080000
  114152. else
  114153. pTDefRegMap(@Self)^.&set := $00080000;
  114154. end;
  114155. function TCAN2_C2FIFOINT27.getRXOVFLIE : TBits_1; inline;
  114156. begin
  114157. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  114158. end;
  114159. procedure TCAN2_C2FIFOINT27.setTXEMPTYIE; inline;
  114160. begin
  114161. pTDefRegMap(@Self)^.&set := $01000000;
  114162. end;
  114163. procedure TCAN2_C2FIFOINT27.clearTXEMPTYIE; inline;
  114164. begin
  114165. pTDefRegMap(@Self)^.clr := $01000000;
  114166. end;
  114167. procedure TCAN2_C2FIFOINT27.setTXEMPTYIE(thebits : TBits_1); inline;
  114168. begin
  114169. if thebits = 0 then
  114170. pTDefRegMap(@Self)^.clr := $01000000
  114171. else
  114172. pTDefRegMap(@Self)^.&set := $01000000;
  114173. end;
  114174. function TCAN2_C2FIFOINT27.getTXEMPTYIE : TBits_1; inline;
  114175. begin
  114176. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  114177. end;
  114178. procedure TCAN2_C2FIFOINT27.setTXHALFIE; inline;
  114179. begin
  114180. pTDefRegMap(@Self)^.&set := $02000000;
  114181. end;
  114182. procedure TCAN2_C2FIFOINT27.clearTXHALFIE; inline;
  114183. begin
  114184. pTDefRegMap(@Self)^.clr := $02000000;
  114185. end;
  114186. procedure TCAN2_C2FIFOINT27.setTXHALFIE(thebits : TBits_1); inline;
  114187. begin
  114188. if thebits = 0 then
  114189. pTDefRegMap(@Self)^.clr := $02000000
  114190. else
  114191. pTDefRegMap(@Self)^.&set := $02000000;
  114192. end;
  114193. function TCAN2_C2FIFOINT27.getTXHALFIE : TBits_1; inline;
  114194. begin
  114195. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  114196. end;
  114197. procedure TCAN2_C2FIFOINT27.setTXNFULLIE; inline;
  114198. begin
  114199. pTDefRegMap(@Self)^.&set := $04000000;
  114200. end;
  114201. procedure TCAN2_C2FIFOINT27.clearTXNFULLIE; inline;
  114202. begin
  114203. pTDefRegMap(@Self)^.clr := $04000000;
  114204. end;
  114205. procedure TCAN2_C2FIFOINT27.setTXNFULLIE(thebits : TBits_1); inline;
  114206. begin
  114207. if thebits = 0 then
  114208. pTDefRegMap(@Self)^.clr := $04000000
  114209. else
  114210. pTDefRegMap(@Self)^.&set := $04000000;
  114211. end;
  114212. function TCAN2_C2FIFOINT27.getTXNFULLIE : TBits_1; inline;
  114213. begin
  114214. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  114215. end;
  114216. procedure TCAN2_C2FIFOINT27.setw(thebits : TBits_32); inline;
  114217. begin
  114218. pTDefRegMap(@Self)^.val := thebits;
  114219. end;
  114220. function TCAN2_C2FIFOINT27.getw : TBits_32; inline;
  114221. begin
  114222. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114223. end;
  114224. procedure TCAN2_C2FIFOCI27.setCFIFOCI(thebits : TBits_5); inline;
  114225. begin
  114226. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  114227. end;
  114228. function TCAN2_C2FIFOCI27.getCFIFOCI : TBits_5; inline;
  114229. begin
  114230. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  114231. end;
  114232. procedure TCAN2_C2FIFOCI27.setw(thebits : TBits_32); inline;
  114233. begin
  114234. pTDefRegMap(@Self)^.val := thebits;
  114235. end;
  114236. function TCAN2_C2FIFOCI27.getw : TBits_32; inline;
  114237. begin
  114238. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114239. end;
  114240. procedure TCAN2_C2FIFOCON28.setTXPRI(thebits : TBits_2); inline;
  114241. begin
  114242. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  114243. end;
  114244. function TCAN2_C2FIFOCON28.getTXPRI : TBits_2; inline;
  114245. begin
  114246. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  114247. end;
  114248. procedure TCAN2_C2FIFOCON28.setRTREN; inline;
  114249. begin
  114250. pTDefRegMap(@Self)^.&set := $00000004;
  114251. end;
  114252. procedure TCAN2_C2FIFOCON28.clearRTREN; inline;
  114253. begin
  114254. pTDefRegMap(@Self)^.clr := $00000004;
  114255. end;
  114256. procedure TCAN2_C2FIFOCON28.setRTREN(thebits : TBits_1); inline;
  114257. begin
  114258. if thebits = 0 then
  114259. pTDefRegMap(@Self)^.clr := $00000004
  114260. else
  114261. pTDefRegMap(@Self)^.&set := $00000004;
  114262. end;
  114263. function TCAN2_C2FIFOCON28.getRTREN : TBits_1; inline;
  114264. begin
  114265. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114266. end;
  114267. procedure TCAN2_C2FIFOCON28.setTXREQ; inline;
  114268. begin
  114269. pTDefRegMap(@Self)^.&set := $00000008;
  114270. end;
  114271. procedure TCAN2_C2FIFOCON28.clearTXREQ; inline;
  114272. begin
  114273. pTDefRegMap(@Self)^.clr := $00000008;
  114274. end;
  114275. procedure TCAN2_C2FIFOCON28.setTXREQ(thebits : TBits_1); inline;
  114276. begin
  114277. if thebits = 0 then
  114278. pTDefRegMap(@Self)^.clr := $00000008
  114279. else
  114280. pTDefRegMap(@Self)^.&set := $00000008;
  114281. end;
  114282. function TCAN2_C2FIFOCON28.getTXREQ : TBits_1; inline;
  114283. begin
  114284. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114285. end;
  114286. procedure TCAN2_C2FIFOCON28.setTXERR; inline;
  114287. begin
  114288. pTDefRegMap(@Self)^.&set := $00000010;
  114289. end;
  114290. procedure TCAN2_C2FIFOCON28.clearTXERR; inline;
  114291. begin
  114292. pTDefRegMap(@Self)^.clr := $00000010;
  114293. end;
  114294. procedure TCAN2_C2FIFOCON28.setTXERR(thebits : TBits_1); inline;
  114295. begin
  114296. if thebits = 0 then
  114297. pTDefRegMap(@Self)^.clr := $00000010
  114298. else
  114299. pTDefRegMap(@Self)^.&set := $00000010;
  114300. end;
  114301. function TCAN2_C2FIFOCON28.getTXERR : TBits_1; inline;
  114302. begin
  114303. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  114304. end;
  114305. procedure TCAN2_C2FIFOCON28.setTXLARB; inline;
  114306. begin
  114307. pTDefRegMap(@Self)^.&set := $00000020;
  114308. end;
  114309. procedure TCAN2_C2FIFOCON28.clearTXLARB; inline;
  114310. begin
  114311. pTDefRegMap(@Self)^.clr := $00000020;
  114312. end;
  114313. procedure TCAN2_C2FIFOCON28.setTXLARB(thebits : TBits_1); inline;
  114314. begin
  114315. if thebits = 0 then
  114316. pTDefRegMap(@Self)^.clr := $00000020
  114317. else
  114318. pTDefRegMap(@Self)^.&set := $00000020;
  114319. end;
  114320. function TCAN2_C2FIFOCON28.getTXLARB : TBits_1; inline;
  114321. begin
  114322. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  114323. end;
  114324. procedure TCAN2_C2FIFOCON28.setTXABAT; inline;
  114325. begin
  114326. pTDefRegMap(@Self)^.&set := $00000040;
  114327. end;
  114328. procedure TCAN2_C2FIFOCON28.clearTXABAT; inline;
  114329. begin
  114330. pTDefRegMap(@Self)^.clr := $00000040;
  114331. end;
  114332. procedure TCAN2_C2FIFOCON28.setTXABAT(thebits : TBits_1); inline;
  114333. begin
  114334. if thebits = 0 then
  114335. pTDefRegMap(@Self)^.clr := $00000040
  114336. else
  114337. pTDefRegMap(@Self)^.&set := $00000040;
  114338. end;
  114339. function TCAN2_C2FIFOCON28.getTXABAT : TBits_1; inline;
  114340. begin
  114341. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  114342. end;
  114343. procedure TCAN2_C2FIFOCON28.setTXEN; inline;
  114344. begin
  114345. pTDefRegMap(@Self)^.&set := $00000080;
  114346. end;
  114347. procedure TCAN2_C2FIFOCON28.clearTXEN; inline;
  114348. begin
  114349. pTDefRegMap(@Self)^.clr := $00000080;
  114350. end;
  114351. procedure TCAN2_C2FIFOCON28.setTXEN(thebits : TBits_1); inline;
  114352. begin
  114353. if thebits = 0 then
  114354. pTDefRegMap(@Self)^.clr := $00000080
  114355. else
  114356. pTDefRegMap(@Self)^.&set := $00000080;
  114357. end;
  114358. function TCAN2_C2FIFOCON28.getTXEN : TBits_1; inline;
  114359. begin
  114360. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  114361. end;
  114362. procedure TCAN2_C2FIFOCON28.setDONLY; inline;
  114363. begin
  114364. pTDefRegMap(@Self)^.&set := $00001000;
  114365. end;
  114366. procedure TCAN2_C2FIFOCON28.clearDONLY; inline;
  114367. begin
  114368. pTDefRegMap(@Self)^.clr := $00001000;
  114369. end;
  114370. procedure TCAN2_C2FIFOCON28.setDONLY(thebits : TBits_1); inline;
  114371. begin
  114372. if thebits = 0 then
  114373. pTDefRegMap(@Self)^.clr := $00001000
  114374. else
  114375. pTDefRegMap(@Self)^.&set := $00001000;
  114376. end;
  114377. function TCAN2_C2FIFOCON28.getDONLY : TBits_1; inline;
  114378. begin
  114379. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  114380. end;
  114381. procedure TCAN2_C2FIFOCON28.setUINC; inline;
  114382. begin
  114383. pTDefRegMap(@Self)^.&set := $00002000;
  114384. end;
  114385. procedure TCAN2_C2FIFOCON28.clearUINC; inline;
  114386. begin
  114387. pTDefRegMap(@Self)^.clr := $00002000;
  114388. end;
  114389. procedure TCAN2_C2FIFOCON28.setUINC(thebits : TBits_1); inline;
  114390. begin
  114391. if thebits = 0 then
  114392. pTDefRegMap(@Self)^.clr := $00002000
  114393. else
  114394. pTDefRegMap(@Self)^.&set := $00002000;
  114395. end;
  114396. function TCAN2_C2FIFOCON28.getUINC : TBits_1; inline;
  114397. begin
  114398. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  114399. end;
  114400. procedure TCAN2_C2FIFOCON28.setFRESET; inline;
  114401. begin
  114402. pTDefRegMap(@Self)^.&set := $00004000;
  114403. end;
  114404. procedure TCAN2_C2FIFOCON28.clearFRESET; inline;
  114405. begin
  114406. pTDefRegMap(@Self)^.clr := $00004000;
  114407. end;
  114408. procedure TCAN2_C2FIFOCON28.setFRESET(thebits : TBits_1); inline;
  114409. begin
  114410. if thebits = 0 then
  114411. pTDefRegMap(@Self)^.clr := $00004000
  114412. else
  114413. pTDefRegMap(@Self)^.&set := $00004000;
  114414. end;
  114415. function TCAN2_C2FIFOCON28.getFRESET : TBits_1; inline;
  114416. begin
  114417. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  114418. end;
  114419. procedure TCAN2_C2FIFOCON28.setFSIZE(thebits : TBits_5); inline;
  114420. begin
  114421. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  114422. end;
  114423. function TCAN2_C2FIFOCON28.getFSIZE : TBits_5; inline;
  114424. begin
  114425. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  114426. end;
  114427. procedure TCAN2_C2FIFOCON28.setw(thebits : TBits_32); inline;
  114428. begin
  114429. pTDefRegMap(@Self)^.val := thebits;
  114430. end;
  114431. function TCAN2_C2FIFOCON28.getw : TBits_32; inline;
  114432. begin
  114433. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114434. end;
  114435. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIF; inline;
  114436. begin
  114437. pTDefRegMap(@Self)^.&set := $00000001;
  114438. end;
  114439. procedure TCAN2_C2FIFOINT28.clearRXNEMPTYIF; inline;
  114440. begin
  114441. pTDefRegMap(@Self)^.clr := $00000001;
  114442. end;
  114443. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIF(thebits : TBits_1); inline;
  114444. begin
  114445. if thebits = 0 then
  114446. pTDefRegMap(@Self)^.clr := $00000001
  114447. else
  114448. pTDefRegMap(@Self)^.&set := $00000001;
  114449. end;
  114450. function TCAN2_C2FIFOINT28.getRXNEMPTYIF : TBits_1; inline;
  114451. begin
  114452. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  114453. end;
  114454. procedure TCAN2_C2FIFOINT28.setRXHALFIF; inline;
  114455. begin
  114456. pTDefRegMap(@Self)^.&set := $00000002;
  114457. end;
  114458. procedure TCAN2_C2FIFOINT28.clearRXHALFIF; inline;
  114459. begin
  114460. pTDefRegMap(@Self)^.clr := $00000002;
  114461. end;
  114462. procedure TCAN2_C2FIFOINT28.setRXHALFIF(thebits : TBits_1); inline;
  114463. begin
  114464. if thebits = 0 then
  114465. pTDefRegMap(@Self)^.clr := $00000002
  114466. else
  114467. pTDefRegMap(@Self)^.&set := $00000002;
  114468. end;
  114469. function TCAN2_C2FIFOINT28.getRXHALFIF : TBits_1; inline;
  114470. begin
  114471. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  114472. end;
  114473. procedure TCAN2_C2FIFOINT28.setRXFULLIF; inline;
  114474. begin
  114475. pTDefRegMap(@Self)^.&set := $00000004;
  114476. end;
  114477. procedure TCAN2_C2FIFOINT28.clearRXFULLIF; inline;
  114478. begin
  114479. pTDefRegMap(@Self)^.clr := $00000004;
  114480. end;
  114481. procedure TCAN2_C2FIFOINT28.setRXFULLIF(thebits : TBits_1); inline;
  114482. begin
  114483. if thebits = 0 then
  114484. pTDefRegMap(@Self)^.clr := $00000004
  114485. else
  114486. pTDefRegMap(@Self)^.&set := $00000004;
  114487. end;
  114488. function TCAN2_C2FIFOINT28.getRXFULLIF : TBits_1; inline;
  114489. begin
  114490. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114491. end;
  114492. procedure TCAN2_C2FIFOINT28.setRXOVFLIF; inline;
  114493. begin
  114494. pTDefRegMap(@Self)^.&set := $00000008;
  114495. end;
  114496. procedure TCAN2_C2FIFOINT28.clearRXOVFLIF; inline;
  114497. begin
  114498. pTDefRegMap(@Self)^.clr := $00000008;
  114499. end;
  114500. procedure TCAN2_C2FIFOINT28.setRXOVFLIF(thebits : TBits_1); inline;
  114501. begin
  114502. if thebits = 0 then
  114503. pTDefRegMap(@Self)^.clr := $00000008
  114504. else
  114505. pTDefRegMap(@Self)^.&set := $00000008;
  114506. end;
  114507. function TCAN2_C2FIFOINT28.getRXOVFLIF : TBits_1; inline;
  114508. begin
  114509. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114510. end;
  114511. procedure TCAN2_C2FIFOINT28.setTXEMPTYIF; inline;
  114512. begin
  114513. pTDefRegMap(@Self)^.&set := $00000100;
  114514. end;
  114515. procedure TCAN2_C2FIFOINT28.clearTXEMPTYIF; inline;
  114516. begin
  114517. pTDefRegMap(@Self)^.clr := $00000100;
  114518. end;
  114519. procedure TCAN2_C2FIFOINT28.setTXEMPTYIF(thebits : TBits_1); inline;
  114520. begin
  114521. if thebits = 0 then
  114522. pTDefRegMap(@Self)^.clr := $00000100
  114523. else
  114524. pTDefRegMap(@Self)^.&set := $00000100;
  114525. end;
  114526. function TCAN2_C2FIFOINT28.getTXEMPTYIF : TBits_1; inline;
  114527. begin
  114528. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  114529. end;
  114530. procedure TCAN2_C2FIFOINT28.setTXHALFIF; inline;
  114531. begin
  114532. pTDefRegMap(@Self)^.&set := $00000200;
  114533. end;
  114534. procedure TCAN2_C2FIFOINT28.clearTXHALFIF; inline;
  114535. begin
  114536. pTDefRegMap(@Self)^.clr := $00000200;
  114537. end;
  114538. procedure TCAN2_C2FIFOINT28.setTXHALFIF(thebits : TBits_1); inline;
  114539. begin
  114540. if thebits = 0 then
  114541. pTDefRegMap(@Self)^.clr := $00000200
  114542. else
  114543. pTDefRegMap(@Self)^.&set := $00000200;
  114544. end;
  114545. function TCAN2_C2FIFOINT28.getTXHALFIF : TBits_1; inline;
  114546. begin
  114547. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  114548. end;
  114549. procedure TCAN2_C2FIFOINT28.setTXNFULLIF; inline;
  114550. begin
  114551. pTDefRegMap(@Self)^.&set := $00000400;
  114552. end;
  114553. procedure TCAN2_C2FIFOINT28.clearTXNFULLIF; inline;
  114554. begin
  114555. pTDefRegMap(@Self)^.clr := $00000400;
  114556. end;
  114557. procedure TCAN2_C2FIFOINT28.setTXNFULLIF(thebits : TBits_1); inline;
  114558. begin
  114559. if thebits = 0 then
  114560. pTDefRegMap(@Self)^.clr := $00000400
  114561. else
  114562. pTDefRegMap(@Self)^.&set := $00000400;
  114563. end;
  114564. function TCAN2_C2FIFOINT28.getTXNFULLIF : TBits_1; inline;
  114565. begin
  114566. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  114567. end;
  114568. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIE; inline;
  114569. begin
  114570. pTDefRegMap(@Self)^.&set := $00010000;
  114571. end;
  114572. procedure TCAN2_C2FIFOINT28.clearRXNEMPTYIE; inline;
  114573. begin
  114574. pTDefRegMap(@Self)^.clr := $00010000;
  114575. end;
  114576. procedure TCAN2_C2FIFOINT28.setRXNEMPTYIE(thebits : TBits_1); inline;
  114577. begin
  114578. if thebits = 0 then
  114579. pTDefRegMap(@Self)^.clr := $00010000
  114580. else
  114581. pTDefRegMap(@Self)^.&set := $00010000;
  114582. end;
  114583. function TCAN2_C2FIFOINT28.getRXNEMPTYIE : TBits_1; inline;
  114584. begin
  114585. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  114586. end;
  114587. procedure TCAN2_C2FIFOINT28.setRXHALFIE; inline;
  114588. begin
  114589. pTDefRegMap(@Self)^.&set := $00020000;
  114590. end;
  114591. procedure TCAN2_C2FIFOINT28.clearRXHALFIE; inline;
  114592. begin
  114593. pTDefRegMap(@Self)^.clr := $00020000;
  114594. end;
  114595. procedure TCAN2_C2FIFOINT28.setRXHALFIE(thebits : TBits_1); inline;
  114596. begin
  114597. if thebits = 0 then
  114598. pTDefRegMap(@Self)^.clr := $00020000
  114599. else
  114600. pTDefRegMap(@Self)^.&set := $00020000;
  114601. end;
  114602. function TCAN2_C2FIFOINT28.getRXHALFIE : TBits_1; inline;
  114603. begin
  114604. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  114605. end;
  114606. procedure TCAN2_C2FIFOINT28.setRXFULLIE; inline;
  114607. begin
  114608. pTDefRegMap(@Self)^.&set := $00040000;
  114609. end;
  114610. procedure TCAN2_C2FIFOINT28.clearRXFULLIE; inline;
  114611. begin
  114612. pTDefRegMap(@Self)^.clr := $00040000;
  114613. end;
  114614. procedure TCAN2_C2FIFOINT28.setRXFULLIE(thebits : TBits_1); inline;
  114615. begin
  114616. if thebits = 0 then
  114617. pTDefRegMap(@Self)^.clr := $00040000
  114618. else
  114619. pTDefRegMap(@Self)^.&set := $00040000;
  114620. end;
  114621. function TCAN2_C2FIFOINT28.getRXFULLIE : TBits_1; inline;
  114622. begin
  114623. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  114624. end;
  114625. procedure TCAN2_C2FIFOINT28.setRXOVFLIE; inline;
  114626. begin
  114627. pTDefRegMap(@Self)^.&set := $00080000;
  114628. end;
  114629. procedure TCAN2_C2FIFOINT28.clearRXOVFLIE; inline;
  114630. begin
  114631. pTDefRegMap(@Self)^.clr := $00080000;
  114632. end;
  114633. procedure TCAN2_C2FIFOINT28.setRXOVFLIE(thebits : TBits_1); inline;
  114634. begin
  114635. if thebits = 0 then
  114636. pTDefRegMap(@Self)^.clr := $00080000
  114637. else
  114638. pTDefRegMap(@Self)^.&set := $00080000;
  114639. end;
  114640. function TCAN2_C2FIFOINT28.getRXOVFLIE : TBits_1; inline;
  114641. begin
  114642. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  114643. end;
  114644. procedure TCAN2_C2FIFOINT28.setTXEMPTYIE; inline;
  114645. begin
  114646. pTDefRegMap(@Self)^.&set := $01000000;
  114647. end;
  114648. procedure TCAN2_C2FIFOINT28.clearTXEMPTYIE; inline;
  114649. begin
  114650. pTDefRegMap(@Self)^.clr := $01000000;
  114651. end;
  114652. procedure TCAN2_C2FIFOINT28.setTXEMPTYIE(thebits : TBits_1); inline;
  114653. begin
  114654. if thebits = 0 then
  114655. pTDefRegMap(@Self)^.clr := $01000000
  114656. else
  114657. pTDefRegMap(@Self)^.&set := $01000000;
  114658. end;
  114659. function TCAN2_C2FIFOINT28.getTXEMPTYIE : TBits_1; inline;
  114660. begin
  114661. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  114662. end;
  114663. procedure TCAN2_C2FIFOINT28.setTXHALFIE; inline;
  114664. begin
  114665. pTDefRegMap(@Self)^.&set := $02000000;
  114666. end;
  114667. procedure TCAN2_C2FIFOINT28.clearTXHALFIE; inline;
  114668. begin
  114669. pTDefRegMap(@Self)^.clr := $02000000;
  114670. end;
  114671. procedure TCAN2_C2FIFOINT28.setTXHALFIE(thebits : TBits_1); inline;
  114672. begin
  114673. if thebits = 0 then
  114674. pTDefRegMap(@Self)^.clr := $02000000
  114675. else
  114676. pTDefRegMap(@Self)^.&set := $02000000;
  114677. end;
  114678. function TCAN2_C2FIFOINT28.getTXHALFIE : TBits_1; inline;
  114679. begin
  114680. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  114681. end;
  114682. procedure TCAN2_C2FIFOINT28.setTXNFULLIE; inline;
  114683. begin
  114684. pTDefRegMap(@Self)^.&set := $04000000;
  114685. end;
  114686. procedure TCAN2_C2FIFOINT28.clearTXNFULLIE; inline;
  114687. begin
  114688. pTDefRegMap(@Self)^.clr := $04000000;
  114689. end;
  114690. procedure TCAN2_C2FIFOINT28.setTXNFULLIE(thebits : TBits_1); inline;
  114691. begin
  114692. if thebits = 0 then
  114693. pTDefRegMap(@Self)^.clr := $04000000
  114694. else
  114695. pTDefRegMap(@Self)^.&set := $04000000;
  114696. end;
  114697. function TCAN2_C2FIFOINT28.getTXNFULLIE : TBits_1; inline;
  114698. begin
  114699. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  114700. end;
  114701. procedure TCAN2_C2FIFOINT28.setw(thebits : TBits_32); inline;
  114702. begin
  114703. pTDefRegMap(@Self)^.val := thebits;
  114704. end;
  114705. function TCAN2_C2FIFOINT28.getw : TBits_32; inline;
  114706. begin
  114707. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114708. end;
  114709. procedure TCAN2_C2FIFOCI28.setCFIFOCI(thebits : TBits_5); inline;
  114710. begin
  114711. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  114712. end;
  114713. function TCAN2_C2FIFOCI28.getCFIFOCI : TBits_5; inline;
  114714. begin
  114715. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  114716. end;
  114717. procedure TCAN2_C2FIFOCI28.setw(thebits : TBits_32); inline;
  114718. begin
  114719. pTDefRegMap(@Self)^.val := thebits;
  114720. end;
  114721. function TCAN2_C2FIFOCI28.getw : TBits_32; inline;
  114722. begin
  114723. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114724. end;
  114725. procedure TCAN2_C2FIFOCON29.setTXPRI(thebits : TBits_2); inline;
  114726. begin
  114727. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  114728. end;
  114729. function TCAN2_C2FIFOCON29.getTXPRI : TBits_2; inline;
  114730. begin
  114731. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  114732. end;
  114733. procedure TCAN2_C2FIFOCON29.setRTREN; inline;
  114734. begin
  114735. pTDefRegMap(@Self)^.&set := $00000004;
  114736. end;
  114737. procedure TCAN2_C2FIFOCON29.clearRTREN; inline;
  114738. begin
  114739. pTDefRegMap(@Self)^.clr := $00000004;
  114740. end;
  114741. procedure TCAN2_C2FIFOCON29.setRTREN(thebits : TBits_1); inline;
  114742. begin
  114743. if thebits = 0 then
  114744. pTDefRegMap(@Self)^.clr := $00000004
  114745. else
  114746. pTDefRegMap(@Self)^.&set := $00000004;
  114747. end;
  114748. function TCAN2_C2FIFOCON29.getRTREN : TBits_1; inline;
  114749. begin
  114750. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114751. end;
  114752. procedure TCAN2_C2FIFOCON29.setTXREQ; inline;
  114753. begin
  114754. pTDefRegMap(@Self)^.&set := $00000008;
  114755. end;
  114756. procedure TCAN2_C2FIFOCON29.clearTXREQ; inline;
  114757. begin
  114758. pTDefRegMap(@Self)^.clr := $00000008;
  114759. end;
  114760. procedure TCAN2_C2FIFOCON29.setTXREQ(thebits : TBits_1); inline;
  114761. begin
  114762. if thebits = 0 then
  114763. pTDefRegMap(@Self)^.clr := $00000008
  114764. else
  114765. pTDefRegMap(@Self)^.&set := $00000008;
  114766. end;
  114767. function TCAN2_C2FIFOCON29.getTXREQ : TBits_1; inline;
  114768. begin
  114769. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114770. end;
  114771. procedure TCAN2_C2FIFOCON29.setTXERR; inline;
  114772. begin
  114773. pTDefRegMap(@Self)^.&set := $00000010;
  114774. end;
  114775. procedure TCAN2_C2FIFOCON29.clearTXERR; inline;
  114776. begin
  114777. pTDefRegMap(@Self)^.clr := $00000010;
  114778. end;
  114779. procedure TCAN2_C2FIFOCON29.setTXERR(thebits : TBits_1); inline;
  114780. begin
  114781. if thebits = 0 then
  114782. pTDefRegMap(@Self)^.clr := $00000010
  114783. else
  114784. pTDefRegMap(@Self)^.&set := $00000010;
  114785. end;
  114786. function TCAN2_C2FIFOCON29.getTXERR : TBits_1; inline;
  114787. begin
  114788. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  114789. end;
  114790. procedure TCAN2_C2FIFOCON29.setTXLARB; inline;
  114791. begin
  114792. pTDefRegMap(@Self)^.&set := $00000020;
  114793. end;
  114794. procedure TCAN2_C2FIFOCON29.clearTXLARB; inline;
  114795. begin
  114796. pTDefRegMap(@Self)^.clr := $00000020;
  114797. end;
  114798. procedure TCAN2_C2FIFOCON29.setTXLARB(thebits : TBits_1); inline;
  114799. begin
  114800. if thebits = 0 then
  114801. pTDefRegMap(@Self)^.clr := $00000020
  114802. else
  114803. pTDefRegMap(@Self)^.&set := $00000020;
  114804. end;
  114805. function TCAN2_C2FIFOCON29.getTXLARB : TBits_1; inline;
  114806. begin
  114807. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  114808. end;
  114809. procedure TCAN2_C2FIFOCON29.setTXABAT; inline;
  114810. begin
  114811. pTDefRegMap(@Self)^.&set := $00000040;
  114812. end;
  114813. procedure TCAN2_C2FIFOCON29.clearTXABAT; inline;
  114814. begin
  114815. pTDefRegMap(@Self)^.clr := $00000040;
  114816. end;
  114817. procedure TCAN2_C2FIFOCON29.setTXABAT(thebits : TBits_1); inline;
  114818. begin
  114819. if thebits = 0 then
  114820. pTDefRegMap(@Self)^.clr := $00000040
  114821. else
  114822. pTDefRegMap(@Self)^.&set := $00000040;
  114823. end;
  114824. function TCAN2_C2FIFOCON29.getTXABAT : TBits_1; inline;
  114825. begin
  114826. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  114827. end;
  114828. procedure TCAN2_C2FIFOCON29.setTXEN; inline;
  114829. begin
  114830. pTDefRegMap(@Self)^.&set := $00000080;
  114831. end;
  114832. procedure TCAN2_C2FIFOCON29.clearTXEN; inline;
  114833. begin
  114834. pTDefRegMap(@Self)^.clr := $00000080;
  114835. end;
  114836. procedure TCAN2_C2FIFOCON29.setTXEN(thebits : TBits_1); inline;
  114837. begin
  114838. if thebits = 0 then
  114839. pTDefRegMap(@Self)^.clr := $00000080
  114840. else
  114841. pTDefRegMap(@Self)^.&set := $00000080;
  114842. end;
  114843. function TCAN2_C2FIFOCON29.getTXEN : TBits_1; inline;
  114844. begin
  114845. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  114846. end;
  114847. procedure TCAN2_C2FIFOCON29.setDONLY; inline;
  114848. begin
  114849. pTDefRegMap(@Self)^.&set := $00001000;
  114850. end;
  114851. procedure TCAN2_C2FIFOCON29.clearDONLY; inline;
  114852. begin
  114853. pTDefRegMap(@Self)^.clr := $00001000;
  114854. end;
  114855. procedure TCAN2_C2FIFOCON29.setDONLY(thebits : TBits_1); inline;
  114856. begin
  114857. if thebits = 0 then
  114858. pTDefRegMap(@Self)^.clr := $00001000
  114859. else
  114860. pTDefRegMap(@Self)^.&set := $00001000;
  114861. end;
  114862. function TCAN2_C2FIFOCON29.getDONLY : TBits_1; inline;
  114863. begin
  114864. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  114865. end;
  114866. procedure TCAN2_C2FIFOCON29.setUINC; inline;
  114867. begin
  114868. pTDefRegMap(@Self)^.&set := $00002000;
  114869. end;
  114870. procedure TCAN2_C2FIFOCON29.clearUINC; inline;
  114871. begin
  114872. pTDefRegMap(@Self)^.clr := $00002000;
  114873. end;
  114874. procedure TCAN2_C2FIFOCON29.setUINC(thebits : TBits_1); inline;
  114875. begin
  114876. if thebits = 0 then
  114877. pTDefRegMap(@Self)^.clr := $00002000
  114878. else
  114879. pTDefRegMap(@Self)^.&set := $00002000;
  114880. end;
  114881. function TCAN2_C2FIFOCON29.getUINC : TBits_1; inline;
  114882. begin
  114883. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  114884. end;
  114885. procedure TCAN2_C2FIFOCON29.setFRESET; inline;
  114886. begin
  114887. pTDefRegMap(@Self)^.&set := $00004000;
  114888. end;
  114889. procedure TCAN2_C2FIFOCON29.clearFRESET; inline;
  114890. begin
  114891. pTDefRegMap(@Self)^.clr := $00004000;
  114892. end;
  114893. procedure TCAN2_C2FIFOCON29.setFRESET(thebits : TBits_1); inline;
  114894. begin
  114895. if thebits = 0 then
  114896. pTDefRegMap(@Self)^.clr := $00004000
  114897. else
  114898. pTDefRegMap(@Self)^.&set := $00004000;
  114899. end;
  114900. function TCAN2_C2FIFOCON29.getFRESET : TBits_1; inline;
  114901. begin
  114902. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  114903. end;
  114904. procedure TCAN2_C2FIFOCON29.setFSIZE(thebits : TBits_5); inline;
  114905. begin
  114906. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  114907. end;
  114908. function TCAN2_C2FIFOCON29.getFSIZE : TBits_5; inline;
  114909. begin
  114910. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  114911. end;
  114912. procedure TCAN2_C2FIFOCON29.setw(thebits : TBits_32); inline;
  114913. begin
  114914. pTDefRegMap(@Self)^.val := thebits;
  114915. end;
  114916. function TCAN2_C2FIFOCON29.getw : TBits_32; inline;
  114917. begin
  114918. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  114919. end;
  114920. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIF; inline;
  114921. begin
  114922. pTDefRegMap(@Self)^.&set := $00000001;
  114923. end;
  114924. procedure TCAN2_C2FIFOINT29.clearRXNEMPTYIF; inline;
  114925. begin
  114926. pTDefRegMap(@Self)^.clr := $00000001;
  114927. end;
  114928. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIF(thebits : TBits_1); inline;
  114929. begin
  114930. if thebits = 0 then
  114931. pTDefRegMap(@Self)^.clr := $00000001
  114932. else
  114933. pTDefRegMap(@Self)^.&set := $00000001;
  114934. end;
  114935. function TCAN2_C2FIFOINT29.getRXNEMPTYIF : TBits_1; inline;
  114936. begin
  114937. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  114938. end;
  114939. procedure TCAN2_C2FIFOINT29.setRXHALFIF; inline;
  114940. begin
  114941. pTDefRegMap(@Self)^.&set := $00000002;
  114942. end;
  114943. procedure TCAN2_C2FIFOINT29.clearRXHALFIF; inline;
  114944. begin
  114945. pTDefRegMap(@Self)^.clr := $00000002;
  114946. end;
  114947. procedure TCAN2_C2FIFOINT29.setRXHALFIF(thebits : TBits_1); inline;
  114948. begin
  114949. if thebits = 0 then
  114950. pTDefRegMap(@Self)^.clr := $00000002
  114951. else
  114952. pTDefRegMap(@Self)^.&set := $00000002;
  114953. end;
  114954. function TCAN2_C2FIFOINT29.getRXHALFIF : TBits_1; inline;
  114955. begin
  114956. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  114957. end;
  114958. procedure TCAN2_C2FIFOINT29.setRXFULLIF; inline;
  114959. begin
  114960. pTDefRegMap(@Self)^.&set := $00000004;
  114961. end;
  114962. procedure TCAN2_C2FIFOINT29.clearRXFULLIF; inline;
  114963. begin
  114964. pTDefRegMap(@Self)^.clr := $00000004;
  114965. end;
  114966. procedure TCAN2_C2FIFOINT29.setRXFULLIF(thebits : TBits_1); inline;
  114967. begin
  114968. if thebits = 0 then
  114969. pTDefRegMap(@Self)^.clr := $00000004
  114970. else
  114971. pTDefRegMap(@Self)^.&set := $00000004;
  114972. end;
  114973. function TCAN2_C2FIFOINT29.getRXFULLIF : TBits_1; inline;
  114974. begin
  114975. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  114976. end;
  114977. procedure TCAN2_C2FIFOINT29.setRXOVFLIF; inline;
  114978. begin
  114979. pTDefRegMap(@Self)^.&set := $00000008;
  114980. end;
  114981. procedure TCAN2_C2FIFOINT29.clearRXOVFLIF; inline;
  114982. begin
  114983. pTDefRegMap(@Self)^.clr := $00000008;
  114984. end;
  114985. procedure TCAN2_C2FIFOINT29.setRXOVFLIF(thebits : TBits_1); inline;
  114986. begin
  114987. if thebits = 0 then
  114988. pTDefRegMap(@Self)^.clr := $00000008
  114989. else
  114990. pTDefRegMap(@Self)^.&set := $00000008;
  114991. end;
  114992. function TCAN2_C2FIFOINT29.getRXOVFLIF : TBits_1; inline;
  114993. begin
  114994. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  114995. end;
  114996. procedure TCAN2_C2FIFOINT29.setTXEMPTYIF; inline;
  114997. begin
  114998. pTDefRegMap(@Self)^.&set := $00000100;
  114999. end;
  115000. procedure TCAN2_C2FIFOINT29.clearTXEMPTYIF; inline;
  115001. begin
  115002. pTDefRegMap(@Self)^.clr := $00000100;
  115003. end;
  115004. procedure TCAN2_C2FIFOINT29.setTXEMPTYIF(thebits : TBits_1); inline;
  115005. begin
  115006. if thebits = 0 then
  115007. pTDefRegMap(@Self)^.clr := $00000100
  115008. else
  115009. pTDefRegMap(@Self)^.&set := $00000100;
  115010. end;
  115011. function TCAN2_C2FIFOINT29.getTXEMPTYIF : TBits_1; inline;
  115012. begin
  115013. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  115014. end;
  115015. procedure TCAN2_C2FIFOINT29.setTXHALFIF; inline;
  115016. begin
  115017. pTDefRegMap(@Self)^.&set := $00000200;
  115018. end;
  115019. procedure TCAN2_C2FIFOINT29.clearTXHALFIF; inline;
  115020. begin
  115021. pTDefRegMap(@Self)^.clr := $00000200;
  115022. end;
  115023. procedure TCAN2_C2FIFOINT29.setTXHALFIF(thebits : TBits_1); inline;
  115024. begin
  115025. if thebits = 0 then
  115026. pTDefRegMap(@Self)^.clr := $00000200
  115027. else
  115028. pTDefRegMap(@Self)^.&set := $00000200;
  115029. end;
  115030. function TCAN2_C2FIFOINT29.getTXHALFIF : TBits_1; inline;
  115031. begin
  115032. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  115033. end;
  115034. procedure TCAN2_C2FIFOINT29.setTXNFULLIF; inline;
  115035. begin
  115036. pTDefRegMap(@Self)^.&set := $00000400;
  115037. end;
  115038. procedure TCAN2_C2FIFOINT29.clearTXNFULLIF; inline;
  115039. begin
  115040. pTDefRegMap(@Self)^.clr := $00000400;
  115041. end;
  115042. procedure TCAN2_C2FIFOINT29.setTXNFULLIF(thebits : TBits_1); inline;
  115043. begin
  115044. if thebits = 0 then
  115045. pTDefRegMap(@Self)^.clr := $00000400
  115046. else
  115047. pTDefRegMap(@Self)^.&set := $00000400;
  115048. end;
  115049. function TCAN2_C2FIFOINT29.getTXNFULLIF : TBits_1; inline;
  115050. begin
  115051. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  115052. end;
  115053. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIE; inline;
  115054. begin
  115055. pTDefRegMap(@Self)^.&set := $00010000;
  115056. end;
  115057. procedure TCAN2_C2FIFOINT29.clearRXNEMPTYIE; inline;
  115058. begin
  115059. pTDefRegMap(@Self)^.clr := $00010000;
  115060. end;
  115061. procedure TCAN2_C2FIFOINT29.setRXNEMPTYIE(thebits : TBits_1); inline;
  115062. begin
  115063. if thebits = 0 then
  115064. pTDefRegMap(@Self)^.clr := $00010000
  115065. else
  115066. pTDefRegMap(@Self)^.&set := $00010000;
  115067. end;
  115068. function TCAN2_C2FIFOINT29.getRXNEMPTYIE : TBits_1; inline;
  115069. begin
  115070. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  115071. end;
  115072. procedure TCAN2_C2FIFOINT29.setRXHALFIE; inline;
  115073. begin
  115074. pTDefRegMap(@Self)^.&set := $00020000;
  115075. end;
  115076. procedure TCAN2_C2FIFOINT29.clearRXHALFIE; inline;
  115077. begin
  115078. pTDefRegMap(@Self)^.clr := $00020000;
  115079. end;
  115080. procedure TCAN2_C2FIFOINT29.setRXHALFIE(thebits : TBits_1); inline;
  115081. begin
  115082. if thebits = 0 then
  115083. pTDefRegMap(@Self)^.clr := $00020000
  115084. else
  115085. pTDefRegMap(@Self)^.&set := $00020000;
  115086. end;
  115087. function TCAN2_C2FIFOINT29.getRXHALFIE : TBits_1; inline;
  115088. begin
  115089. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  115090. end;
  115091. procedure TCAN2_C2FIFOINT29.setRXFULLIE; inline;
  115092. begin
  115093. pTDefRegMap(@Self)^.&set := $00040000;
  115094. end;
  115095. procedure TCAN2_C2FIFOINT29.clearRXFULLIE; inline;
  115096. begin
  115097. pTDefRegMap(@Self)^.clr := $00040000;
  115098. end;
  115099. procedure TCAN2_C2FIFOINT29.setRXFULLIE(thebits : TBits_1); inline;
  115100. begin
  115101. if thebits = 0 then
  115102. pTDefRegMap(@Self)^.clr := $00040000
  115103. else
  115104. pTDefRegMap(@Self)^.&set := $00040000;
  115105. end;
  115106. function TCAN2_C2FIFOINT29.getRXFULLIE : TBits_1; inline;
  115107. begin
  115108. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  115109. end;
  115110. procedure TCAN2_C2FIFOINT29.setRXOVFLIE; inline;
  115111. begin
  115112. pTDefRegMap(@Self)^.&set := $00080000;
  115113. end;
  115114. procedure TCAN2_C2FIFOINT29.clearRXOVFLIE; inline;
  115115. begin
  115116. pTDefRegMap(@Self)^.clr := $00080000;
  115117. end;
  115118. procedure TCAN2_C2FIFOINT29.setRXOVFLIE(thebits : TBits_1); inline;
  115119. begin
  115120. if thebits = 0 then
  115121. pTDefRegMap(@Self)^.clr := $00080000
  115122. else
  115123. pTDefRegMap(@Self)^.&set := $00080000;
  115124. end;
  115125. function TCAN2_C2FIFOINT29.getRXOVFLIE : TBits_1; inline;
  115126. begin
  115127. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  115128. end;
  115129. procedure TCAN2_C2FIFOINT29.setTXEMPTYIE; inline;
  115130. begin
  115131. pTDefRegMap(@Self)^.&set := $01000000;
  115132. end;
  115133. procedure TCAN2_C2FIFOINT29.clearTXEMPTYIE; inline;
  115134. begin
  115135. pTDefRegMap(@Self)^.clr := $01000000;
  115136. end;
  115137. procedure TCAN2_C2FIFOINT29.setTXEMPTYIE(thebits : TBits_1); inline;
  115138. begin
  115139. if thebits = 0 then
  115140. pTDefRegMap(@Self)^.clr := $01000000
  115141. else
  115142. pTDefRegMap(@Self)^.&set := $01000000;
  115143. end;
  115144. function TCAN2_C2FIFOINT29.getTXEMPTYIE : TBits_1; inline;
  115145. begin
  115146. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  115147. end;
  115148. procedure TCAN2_C2FIFOINT29.setTXHALFIE; inline;
  115149. begin
  115150. pTDefRegMap(@Self)^.&set := $02000000;
  115151. end;
  115152. procedure TCAN2_C2FIFOINT29.clearTXHALFIE; inline;
  115153. begin
  115154. pTDefRegMap(@Self)^.clr := $02000000;
  115155. end;
  115156. procedure TCAN2_C2FIFOINT29.setTXHALFIE(thebits : TBits_1); inline;
  115157. begin
  115158. if thebits = 0 then
  115159. pTDefRegMap(@Self)^.clr := $02000000
  115160. else
  115161. pTDefRegMap(@Self)^.&set := $02000000;
  115162. end;
  115163. function TCAN2_C2FIFOINT29.getTXHALFIE : TBits_1; inline;
  115164. begin
  115165. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  115166. end;
  115167. procedure TCAN2_C2FIFOINT29.setTXNFULLIE; inline;
  115168. begin
  115169. pTDefRegMap(@Self)^.&set := $04000000;
  115170. end;
  115171. procedure TCAN2_C2FIFOINT29.clearTXNFULLIE; inline;
  115172. begin
  115173. pTDefRegMap(@Self)^.clr := $04000000;
  115174. end;
  115175. procedure TCAN2_C2FIFOINT29.setTXNFULLIE(thebits : TBits_1); inline;
  115176. begin
  115177. if thebits = 0 then
  115178. pTDefRegMap(@Self)^.clr := $04000000
  115179. else
  115180. pTDefRegMap(@Self)^.&set := $04000000;
  115181. end;
  115182. function TCAN2_C2FIFOINT29.getTXNFULLIE : TBits_1; inline;
  115183. begin
  115184. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  115185. end;
  115186. procedure TCAN2_C2FIFOINT29.setw(thebits : TBits_32); inline;
  115187. begin
  115188. pTDefRegMap(@Self)^.val := thebits;
  115189. end;
  115190. function TCAN2_C2FIFOINT29.getw : TBits_32; inline;
  115191. begin
  115192. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115193. end;
  115194. procedure TCAN2_C2FIFOCI29.setCFIFOCI(thebits : TBits_5); inline;
  115195. begin
  115196. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  115197. end;
  115198. function TCAN2_C2FIFOCI29.getCFIFOCI : TBits_5; inline;
  115199. begin
  115200. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  115201. end;
  115202. procedure TCAN2_C2FIFOCI29.setw(thebits : TBits_32); inline;
  115203. begin
  115204. pTDefRegMap(@Self)^.val := thebits;
  115205. end;
  115206. function TCAN2_C2FIFOCI29.getw : TBits_32; inline;
  115207. begin
  115208. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115209. end;
  115210. procedure TCAN2_C2FIFOCON30.setTXPRI(thebits : TBits_2); inline;
  115211. begin
  115212. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  115213. end;
  115214. function TCAN2_C2FIFOCON30.getTXPRI : TBits_2; inline;
  115215. begin
  115216. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  115217. end;
  115218. procedure TCAN2_C2FIFOCON30.setRTREN; inline;
  115219. begin
  115220. pTDefRegMap(@Self)^.&set := $00000004;
  115221. end;
  115222. procedure TCAN2_C2FIFOCON30.clearRTREN; inline;
  115223. begin
  115224. pTDefRegMap(@Self)^.clr := $00000004;
  115225. end;
  115226. procedure TCAN2_C2FIFOCON30.setRTREN(thebits : TBits_1); inline;
  115227. begin
  115228. if thebits = 0 then
  115229. pTDefRegMap(@Self)^.clr := $00000004
  115230. else
  115231. pTDefRegMap(@Self)^.&set := $00000004;
  115232. end;
  115233. function TCAN2_C2FIFOCON30.getRTREN : TBits_1; inline;
  115234. begin
  115235. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115236. end;
  115237. procedure TCAN2_C2FIFOCON30.setTXREQ; inline;
  115238. begin
  115239. pTDefRegMap(@Self)^.&set := $00000008;
  115240. end;
  115241. procedure TCAN2_C2FIFOCON30.clearTXREQ; inline;
  115242. begin
  115243. pTDefRegMap(@Self)^.clr := $00000008;
  115244. end;
  115245. procedure TCAN2_C2FIFOCON30.setTXREQ(thebits : TBits_1); inline;
  115246. begin
  115247. if thebits = 0 then
  115248. pTDefRegMap(@Self)^.clr := $00000008
  115249. else
  115250. pTDefRegMap(@Self)^.&set := $00000008;
  115251. end;
  115252. function TCAN2_C2FIFOCON30.getTXREQ : TBits_1; inline;
  115253. begin
  115254. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115255. end;
  115256. procedure TCAN2_C2FIFOCON30.setTXERR; inline;
  115257. begin
  115258. pTDefRegMap(@Self)^.&set := $00000010;
  115259. end;
  115260. procedure TCAN2_C2FIFOCON30.clearTXERR; inline;
  115261. begin
  115262. pTDefRegMap(@Self)^.clr := $00000010;
  115263. end;
  115264. procedure TCAN2_C2FIFOCON30.setTXERR(thebits : TBits_1); inline;
  115265. begin
  115266. if thebits = 0 then
  115267. pTDefRegMap(@Self)^.clr := $00000010
  115268. else
  115269. pTDefRegMap(@Self)^.&set := $00000010;
  115270. end;
  115271. function TCAN2_C2FIFOCON30.getTXERR : TBits_1; inline;
  115272. begin
  115273. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  115274. end;
  115275. procedure TCAN2_C2FIFOCON30.setTXLARB; inline;
  115276. begin
  115277. pTDefRegMap(@Self)^.&set := $00000020;
  115278. end;
  115279. procedure TCAN2_C2FIFOCON30.clearTXLARB; inline;
  115280. begin
  115281. pTDefRegMap(@Self)^.clr := $00000020;
  115282. end;
  115283. procedure TCAN2_C2FIFOCON30.setTXLARB(thebits : TBits_1); inline;
  115284. begin
  115285. if thebits = 0 then
  115286. pTDefRegMap(@Self)^.clr := $00000020
  115287. else
  115288. pTDefRegMap(@Self)^.&set := $00000020;
  115289. end;
  115290. function TCAN2_C2FIFOCON30.getTXLARB : TBits_1; inline;
  115291. begin
  115292. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  115293. end;
  115294. procedure TCAN2_C2FIFOCON30.setTXABAT; inline;
  115295. begin
  115296. pTDefRegMap(@Self)^.&set := $00000040;
  115297. end;
  115298. procedure TCAN2_C2FIFOCON30.clearTXABAT; inline;
  115299. begin
  115300. pTDefRegMap(@Self)^.clr := $00000040;
  115301. end;
  115302. procedure TCAN2_C2FIFOCON30.setTXABAT(thebits : TBits_1); inline;
  115303. begin
  115304. if thebits = 0 then
  115305. pTDefRegMap(@Self)^.clr := $00000040
  115306. else
  115307. pTDefRegMap(@Self)^.&set := $00000040;
  115308. end;
  115309. function TCAN2_C2FIFOCON30.getTXABAT : TBits_1; inline;
  115310. begin
  115311. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  115312. end;
  115313. procedure TCAN2_C2FIFOCON30.setTXEN; inline;
  115314. begin
  115315. pTDefRegMap(@Self)^.&set := $00000080;
  115316. end;
  115317. procedure TCAN2_C2FIFOCON30.clearTXEN; inline;
  115318. begin
  115319. pTDefRegMap(@Self)^.clr := $00000080;
  115320. end;
  115321. procedure TCAN2_C2FIFOCON30.setTXEN(thebits : TBits_1); inline;
  115322. begin
  115323. if thebits = 0 then
  115324. pTDefRegMap(@Self)^.clr := $00000080
  115325. else
  115326. pTDefRegMap(@Self)^.&set := $00000080;
  115327. end;
  115328. function TCAN2_C2FIFOCON30.getTXEN : TBits_1; inline;
  115329. begin
  115330. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  115331. end;
  115332. procedure TCAN2_C2FIFOCON30.setDONLY; inline;
  115333. begin
  115334. pTDefRegMap(@Self)^.&set := $00001000;
  115335. end;
  115336. procedure TCAN2_C2FIFOCON30.clearDONLY; inline;
  115337. begin
  115338. pTDefRegMap(@Self)^.clr := $00001000;
  115339. end;
  115340. procedure TCAN2_C2FIFOCON30.setDONLY(thebits : TBits_1); inline;
  115341. begin
  115342. if thebits = 0 then
  115343. pTDefRegMap(@Self)^.clr := $00001000
  115344. else
  115345. pTDefRegMap(@Self)^.&set := $00001000;
  115346. end;
  115347. function TCAN2_C2FIFOCON30.getDONLY : TBits_1; inline;
  115348. begin
  115349. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  115350. end;
  115351. procedure TCAN2_C2FIFOCON30.setUINC; inline;
  115352. begin
  115353. pTDefRegMap(@Self)^.&set := $00002000;
  115354. end;
  115355. procedure TCAN2_C2FIFOCON30.clearUINC; inline;
  115356. begin
  115357. pTDefRegMap(@Self)^.clr := $00002000;
  115358. end;
  115359. procedure TCAN2_C2FIFOCON30.setUINC(thebits : TBits_1); inline;
  115360. begin
  115361. if thebits = 0 then
  115362. pTDefRegMap(@Self)^.clr := $00002000
  115363. else
  115364. pTDefRegMap(@Self)^.&set := $00002000;
  115365. end;
  115366. function TCAN2_C2FIFOCON30.getUINC : TBits_1; inline;
  115367. begin
  115368. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  115369. end;
  115370. procedure TCAN2_C2FIFOCON30.setFRESET; inline;
  115371. begin
  115372. pTDefRegMap(@Self)^.&set := $00004000;
  115373. end;
  115374. procedure TCAN2_C2FIFOCON30.clearFRESET; inline;
  115375. begin
  115376. pTDefRegMap(@Self)^.clr := $00004000;
  115377. end;
  115378. procedure TCAN2_C2FIFOCON30.setFRESET(thebits : TBits_1); inline;
  115379. begin
  115380. if thebits = 0 then
  115381. pTDefRegMap(@Self)^.clr := $00004000
  115382. else
  115383. pTDefRegMap(@Self)^.&set := $00004000;
  115384. end;
  115385. function TCAN2_C2FIFOCON30.getFRESET : TBits_1; inline;
  115386. begin
  115387. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  115388. end;
  115389. procedure TCAN2_C2FIFOCON30.setFSIZE(thebits : TBits_5); inline;
  115390. begin
  115391. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  115392. end;
  115393. function TCAN2_C2FIFOCON30.getFSIZE : TBits_5; inline;
  115394. begin
  115395. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  115396. end;
  115397. procedure TCAN2_C2FIFOCON30.setw(thebits : TBits_32); inline;
  115398. begin
  115399. pTDefRegMap(@Self)^.val := thebits;
  115400. end;
  115401. function TCAN2_C2FIFOCON30.getw : TBits_32; inline;
  115402. begin
  115403. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115404. end;
  115405. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIF; inline;
  115406. begin
  115407. pTDefRegMap(@Self)^.&set := $00000001;
  115408. end;
  115409. procedure TCAN2_C2FIFOINT30.clearRXNEMPTYIF; inline;
  115410. begin
  115411. pTDefRegMap(@Self)^.clr := $00000001;
  115412. end;
  115413. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIF(thebits : TBits_1); inline;
  115414. begin
  115415. if thebits = 0 then
  115416. pTDefRegMap(@Self)^.clr := $00000001
  115417. else
  115418. pTDefRegMap(@Self)^.&set := $00000001;
  115419. end;
  115420. function TCAN2_C2FIFOINT30.getRXNEMPTYIF : TBits_1; inline;
  115421. begin
  115422. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  115423. end;
  115424. procedure TCAN2_C2FIFOINT30.setRXHALFIF; inline;
  115425. begin
  115426. pTDefRegMap(@Self)^.&set := $00000002;
  115427. end;
  115428. procedure TCAN2_C2FIFOINT30.clearRXHALFIF; inline;
  115429. begin
  115430. pTDefRegMap(@Self)^.clr := $00000002;
  115431. end;
  115432. procedure TCAN2_C2FIFOINT30.setRXHALFIF(thebits : TBits_1); inline;
  115433. begin
  115434. if thebits = 0 then
  115435. pTDefRegMap(@Self)^.clr := $00000002
  115436. else
  115437. pTDefRegMap(@Self)^.&set := $00000002;
  115438. end;
  115439. function TCAN2_C2FIFOINT30.getRXHALFIF : TBits_1; inline;
  115440. begin
  115441. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  115442. end;
  115443. procedure TCAN2_C2FIFOINT30.setRXFULLIF; inline;
  115444. begin
  115445. pTDefRegMap(@Self)^.&set := $00000004;
  115446. end;
  115447. procedure TCAN2_C2FIFOINT30.clearRXFULLIF; inline;
  115448. begin
  115449. pTDefRegMap(@Self)^.clr := $00000004;
  115450. end;
  115451. procedure TCAN2_C2FIFOINT30.setRXFULLIF(thebits : TBits_1); inline;
  115452. begin
  115453. if thebits = 0 then
  115454. pTDefRegMap(@Self)^.clr := $00000004
  115455. else
  115456. pTDefRegMap(@Self)^.&set := $00000004;
  115457. end;
  115458. function TCAN2_C2FIFOINT30.getRXFULLIF : TBits_1; inline;
  115459. begin
  115460. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115461. end;
  115462. procedure TCAN2_C2FIFOINT30.setRXOVFLIF; inline;
  115463. begin
  115464. pTDefRegMap(@Self)^.&set := $00000008;
  115465. end;
  115466. procedure TCAN2_C2FIFOINT30.clearRXOVFLIF; inline;
  115467. begin
  115468. pTDefRegMap(@Self)^.clr := $00000008;
  115469. end;
  115470. procedure TCAN2_C2FIFOINT30.setRXOVFLIF(thebits : TBits_1); inline;
  115471. begin
  115472. if thebits = 0 then
  115473. pTDefRegMap(@Self)^.clr := $00000008
  115474. else
  115475. pTDefRegMap(@Self)^.&set := $00000008;
  115476. end;
  115477. function TCAN2_C2FIFOINT30.getRXOVFLIF : TBits_1; inline;
  115478. begin
  115479. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115480. end;
  115481. procedure TCAN2_C2FIFOINT30.setTXEMPTYIF; inline;
  115482. begin
  115483. pTDefRegMap(@Self)^.&set := $00000100;
  115484. end;
  115485. procedure TCAN2_C2FIFOINT30.clearTXEMPTYIF; inline;
  115486. begin
  115487. pTDefRegMap(@Self)^.clr := $00000100;
  115488. end;
  115489. procedure TCAN2_C2FIFOINT30.setTXEMPTYIF(thebits : TBits_1); inline;
  115490. begin
  115491. if thebits = 0 then
  115492. pTDefRegMap(@Self)^.clr := $00000100
  115493. else
  115494. pTDefRegMap(@Self)^.&set := $00000100;
  115495. end;
  115496. function TCAN2_C2FIFOINT30.getTXEMPTYIF : TBits_1; inline;
  115497. begin
  115498. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  115499. end;
  115500. procedure TCAN2_C2FIFOINT30.setTXHALFIF; inline;
  115501. begin
  115502. pTDefRegMap(@Self)^.&set := $00000200;
  115503. end;
  115504. procedure TCAN2_C2FIFOINT30.clearTXHALFIF; inline;
  115505. begin
  115506. pTDefRegMap(@Self)^.clr := $00000200;
  115507. end;
  115508. procedure TCAN2_C2FIFOINT30.setTXHALFIF(thebits : TBits_1); inline;
  115509. begin
  115510. if thebits = 0 then
  115511. pTDefRegMap(@Self)^.clr := $00000200
  115512. else
  115513. pTDefRegMap(@Self)^.&set := $00000200;
  115514. end;
  115515. function TCAN2_C2FIFOINT30.getTXHALFIF : TBits_1; inline;
  115516. begin
  115517. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  115518. end;
  115519. procedure TCAN2_C2FIFOINT30.setTXNFULLIF; inline;
  115520. begin
  115521. pTDefRegMap(@Self)^.&set := $00000400;
  115522. end;
  115523. procedure TCAN2_C2FIFOINT30.clearTXNFULLIF; inline;
  115524. begin
  115525. pTDefRegMap(@Self)^.clr := $00000400;
  115526. end;
  115527. procedure TCAN2_C2FIFOINT30.setTXNFULLIF(thebits : TBits_1); inline;
  115528. begin
  115529. if thebits = 0 then
  115530. pTDefRegMap(@Self)^.clr := $00000400
  115531. else
  115532. pTDefRegMap(@Self)^.&set := $00000400;
  115533. end;
  115534. function TCAN2_C2FIFOINT30.getTXNFULLIF : TBits_1; inline;
  115535. begin
  115536. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  115537. end;
  115538. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIE; inline;
  115539. begin
  115540. pTDefRegMap(@Self)^.&set := $00010000;
  115541. end;
  115542. procedure TCAN2_C2FIFOINT30.clearRXNEMPTYIE; inline;
  115543. begin
  115544. pTDefRegMap(@Self)^.clr := $00010000;
  115545. end;
  115546. procedure TCAN2_C2FIFOINT30.setRXNEMPTYIE(thebits : TBits_1); inline;
  115547. begin
  115548. if thebits = 0 then
  115549. pTDefRegMap(@Self)^.clr := $00010000
  115550. else
  115551. pTDefRegMap(@Self)^.&set := $00010000;
  115552. end;
  115553. function TCAN2_C2FIFOINT30.getRXNEMPTYIE : TBits_1; inline;
  115554. begin
  115555. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  115556. end;
  115557. procedure TCAN2_C2FIFOINT30.setRXHALFIE; inline;
  115558. begin
  115559. pTDefRegMap(@Self)^.&set := $00020000;
  115560. end;
  115561. procedure TCAN2_C2FIFOINT30.clearRXHALFIE; inline;
  115562. begin
  115563. pTDefRegMap(@Self)^.clr := $00020000;
  115564. end;
  115565. procedure TCAN2_C2FIFOINT30.setRXHALFIE(thebits : TBits_1); inline;
  115566. begin
  115567. if thebits = 0 then
  115568. pTDefRegMap(@Self)^.clr := $00020000
  115569. else
  115570. pTDefRegMap(@Self)^.&set := $00020000;
  115571. end;
  115572. function TCAN2_C2FIFOINT30.getRXHALFIE : TBits_1; inline;
  115573. begin
  115574. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  115575. end;
  115576. procedure TCAN2_C2FIFOINT30.setRXFULLIE; inline;
  115577. begin
  115578. pTDefRegMap(@Self)^.&set := $00040000;
  115579. end;
  115580. procedure TCAN2_C2FIFOINT30.clearRXFULLIE; inline;
  115581. begin
  115582. pTDefRegMap(@Self)^.clr := $00040000;
  115583. end;
  115584. procedure TCAN2_C2FIFOINT30.setRXFULLIE(thebits : TBits_1); inline;
  115585. begin
  115586. if thebits = 0 then
  115587. pTDefRegMap(@Self)^.clr := $00040000
  115588. else
  115589. pTDefRegMap(@Self)^.&set := $00040000;
  115590. end;
  115591. function TCAN2_C2FIFOINT30.getRXFULLIE : TBits_1; inline;
  115592. begin
  115593. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  115594. end;
  115595. procedure TCAN2_C2FIFOINT30.setRXOVFLIE; inline;
  115596. begin
  115597. pTDefRegMap(@Self)^.&set := $00080000;
  115598. end;
  115599. procedure TCAN2_C2FIFOINT30.clearRXOVFLIE; inline;
  115600. begin
  115601. pTDefRegMap(@Self)^.clr := $00080000;
  115602. end;
  115603. procedure TCAN2_C2FIFOINT30.setRXOVFLIE(thebits : TBits_1); inline;
  115604. begin
  115605. if thebits = 0 then
  115606. pTDefRegMap(@Self)^.clr := $00080000
  115607. else
  115608. pTDefRegMap(@Self)^.&set := $00080000;
  115609. end;
  115610. function TCAN2_C2FIFOINT30.getRXOVFLIE : TBits_1; inline;
  115611. begin
  115612. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  115613. end;
  115614. procedure TCAN2_C2FIFOINT30.setTXEMPTYIE; inline;
  115615. begin
  115616. pTDefRegMap(@Self)^.&set := $01000000;
  115617. end;
  115618. procedure TCAN2_C2FIFOINT30.clearTXEMPTYIE; inline;
  115619. begin
  115620. pTDefRegMap(@Self)^.clr := $01000000;
  115621. end;
  115622. procedure TCAN2_C2FIFOINT30.setTXEMPTYIE(thebits : TBits_1); inline;
  115623. begin
  115624. if thebits = 0 then
  115625. pTDefRegMap(@Self)^.clr := $01000000
  115626. else
  115627. pTDefRegMap(@Self)^.&set := $01000000;
  115628. end;
  115629. function TCAN2_C2FIFOINT30.getTXEMPTYIE : TBits_1; inline;
  115630. begin
  115631. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  115632. end;
  115633. procedure TCAN2_C2FIFOINT30.setTXHALFIE; inline;
  115634. begin
  115635. pTDefRegMap(@Self)^.&set := $02000000;
  115636. end;
  115637. procedure TCAN2_C2FIFOINT30.clearTXHALFIE; inline;
  115638. begin
  115639. pTDefRegMap(@Self)^.clr := $02000000;
  115640. end;
  115641. procedure TCAN2_C2FIFOINT30.setTXHALFIE(thebits : TBits_1); inline;
  115642. begin
  115643. if thebits = 0 then
  115644. pTDefRegMap(@Self)^.clr := $02000000
  115645. else
  115646. pTDefRegMap(@Self)^.&set := $02000000;
  115647. end;
  115648. function TCAN2_C2FIFOINT30.getTXHALFIE : TBits_1; inline;
  115649. begin
  115650. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  115651. end;
  115652. procedure TCAN2_C2FIFOINT30.setTXNFULLIE; inline;
  115653. begin
  115654. pTDefRegMap(@Self)^.&set := $04000000;
  115655. end;
  115656. procedure TCAN2_C2FIFOINT30.clearTXNFULLIE; inline;
  115657. begin
  115658. pTDefRegMap(@Self)^.clr := $04000000;
  115659. end;
  115660. procedure TCAN2_C2FIFOINT30.setTXNFULLIE(thebits : TBits_1); inline;
  115661. begin
  115662. if thebits = 0 then
  115663. pTDefRegMap(@Self)^.clr := $04000000
  115664. else
  115665. pTDefRegMap(@Self)^.&set := $04000000;
  115666. end;
  115667. function TCAN2_C2FIFOINT30.getTXNFULLIE : TBits_1; inline;
  115668. begin
  115669. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  115670. end;
  115671. procedure TCAN2_C2FIFOINT30.setw(thebits : TBits_32); inline;
  115672. begin
  115673. pTDefRegMap(@Self)^.val := thebits;
  115674. end;
  115675. function TCAN2_C2FIFOINT30.getw : TBits_32; inline;
  115676. begin
  115677. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115678. end;
  115679. procedure TCAN2_C2FIFOCI30.setCFIFOCI(thebits : TBits_5); inline;
  115680. begin
  115681. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  115682. end;
  115683. function TCAN2_C2FIFOCI30.getCFIFOCI : TBits_5; inline;
  115684. begin
  115685. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  115686. end;
  115687. procedure TCAN2_C2FIFOCI30.setw(thebits : TBits_32); inline;
  115688. begin
  115689. pTDefRegMap(@Self)^.val := thebits;
  115690. end;
  115691. function TCAN2_C2FIFOCI30.getw : TBits_32; inline;
  115692. begin
  115693. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115694. end;
  115695. procedure TCAN2_C2FIFOCON31.setTXPRI(thebits : TBits_2); inline;
  115696. begin
  115697. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  115698. end;
  115699. function TCAN2_C2FIFOCON31.getTXPRI : TBits_2; inline;
  115700. begin
  115701. getTXPRI := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  115702. end;
  115703. procedure TCAN2_C2FIFOCON31.setRTREN; inline;
  115704. begin
  115705. pTDefRegMap(@Self)^.&set := $00000004;
  115706. end;
  115707. procedure TCAN2_C2FIFOCON31.clearRTREN; inline;
  115708. begin
  115709. pTDefRegMap(@Self)^.clr := $00000004;
  115710. end;
  115711. procedure TCAN2_C2FIFOCON31.setRTREN(thebits : TBits_1); inline;
  115712. begin
  115713. if thebits = 0 then
  115714. pTDefRegMap(@Self)^.clr := $00000004
  115715. else
  115716. pTDefRegMap(@Self)^.&set := $00000004;
  115717. end;
  115718. function TCAN2_C2FIFOCON31.getRTREN : TBits_1; inline;
  115719. begin
  115720. getRTREN := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115721. end;
  115722. procedure TCAN2_C2FIFOCON31.setTXREQ; inline;
  115723. begin
  115724. pTDefRegMap(@Self)^.&set := $00000008;
  115725. end;
  115726. procedure TCAN2_C2FIFOCON31.clearTXREQ; inline;
  115727. begin
  115728. pTDefRegMap(@Self)^.clr := $00000008;
  115729. end;
  115730. procedure TCAN2_C2FIFOCON31.setTXREQ(thebits : TBits_1); inline;
  115731. begin
  115732. if thebits = 0 then
  115733. pTDefRegMap(@Self)^.clr := $00000008
  115734. else
  115735. pTDefRegMap(@Self)^.&set := $00000008;
  115736. end;
  115737. function TCAN2_C2FIFOCON31.getTXREQ : TBits_1; inline;
  115738. begin
  115739. getTXREQ := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115740. end;
  115741. procedure TCAN2_C2FIFOCON31.setTXERR; inline;
  115742. begin
  115743. pTDefRegMap(@Self)^.&set := $00000010;
  115744. end;
  115745. procedure TCAN2_C2FIFOCON31.clearTXERR; inline;
  115746. begin
  115747. pTDefRegMap(@Self)^.clr := $00000010;
  115748. end;
  115749. procedure TCAN2_C2FIFOCON31.setTXERR(thebits : TBits_1); inline;
  115750. begin
  115751. if thebits = 0 then
  115752. pTDefRegMap(@Self)^.clr := $00000010
  115753. else
  115754. pTDefRegMap(@Self)^.&set := $00000010;
  115755. end;
  115756. function TCAN2_C2FIFOCON31.getTXERR : TBits_1; inline;
  115757. begin
  115758. getTXERR := (pTDefRegMap(@Self)^.val and $00000010) shr 4;
  115759. end;
  115760. procedure TCAN2_C2FIFOCON31.setTXLARB; inline;
  115761. begin
  115762. pTDefRegMap(@Self)^.&set := $00000020;
  115763. end;
  115764. procedure TCAN2_C2FIFOCON31.clearTXLARB; inline;
  115765. begin
  115766. pTDefRegMap(@Self)^.clr := $00000020;
  115767. end;
  115768. procedure TCAN2_C2FIFOCON31.setTXLARB(thebits : TBits_1); inline;
  115769. begin
  115770. if thebits = 0 then
  115771. pTDefRegMap(@Self)^.clr := $00000020
  115772. else
  115773. pTDefRegMap(@Self)^.&set := $00000020;
  115774. end;
  115775. function TCAN2_C2FIFOCON31.getTXLARB : TBits_1; inline;
  115776. begin
  115777. getTXLARB := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  115778. end;
  115779. procedure TCAN2_C2FIFOCON31.setTXABAT; inline;
  115780. begin
  115781. pTDefRegMap(@Self)^.&set := $00000040;
  115782. end;
  115783. procedure TCAN2_C2FIFOCON31.clearTXABAT; inline;
  115784. begin
  115785. pTDefRegMap(@Self)^.clr := $00000040;
  115786. end;
  115787. procedure TCAN2_C2FIFOCON31.setTXABAT(thebits : TBits_1); inline;
  115788. begin
  115789. if thebits = 0 then
  115790. pTDefRegMap(@Self)^.clr := $00000040
  115791. else
  115792. pTDefRegMap(@Self)^.&set := $00000040;
  115793. end;
  115794. function TCAN2_C2FIFOCON31.getTXABAT : TBits_1; inline;
  115795. begin
  115796. getTXABAT := (pTDefRegMap(@Self)^.val and $00000040) shr 6;
  115797. end;
  115798. procedure TCAN2_C2FIFOCON31.setTXEN; inline;
  115799. begin
  115800. pTDefRegMap(@Self)^.&set := $00000080;
  115801. end;
  115802. procedure TCAN2_C2FIFOCON31.clearTXEN; inline;
  115803. begin
  115804. pTDefRegMap(@Self)^.clr := $00000080;
  115805. end;
  115806. procedure TCAN2_C2FIFOCON31.setTXEN(thebits : TBits_1); inline;
  115807. begin
  115808. if thebits = 0 then
  115809. pTDefRegMap(@Self)^.clr := $00000080
  115810. else
  115811. pTDefRegMap(@Self)^.&set := $00000080;
  115812. end;
  115813. function TCAN2_C2FIFOCON31.getTXEN : TBits_1; inline;
  115814. begin
  115815. getTXEN := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  115816. end;
  115817. procedure TCAN2_C2FIFOCON31.setDONLY; inline;
  115818. begin
  115819. pTDefRegMap(@Self)^.&set := $00001000;
  115820. end;
  115821. procedure TCAN2_C2FIFOCON31.clearDONLY; inline;
  115822. begin
  115823. pTDefRegMap(@Self)^.clr := $00001000;
  115824. end;
  115825. procedure TCAN2_C2FIFOCON31.setDONLY(thebits : TBits_1); inline;
  115826. begin
  115827. if thebits = 0 then
  115828. pTDefRegMap(@Self)^.clr := $00001000
  115829. else
  115830. pTDefRegMap(@Self)^.&set := $00001000;
  115831. end;
  115832. function TCAN2_C2FIFOCON31.getDONLY : TBits_1; inline;
  115833. begin
  115834. getDONLY := (pTDefRegMap(@Self)^.val and $00001000) shr 12;
  115835. end;
  115836. procedure TCAN2_C2FIFOCON31.setUINC; inline;
  115837. begin
  115838. pTDefRegMap(@Self)^.&set := $00002000;
  115839. end;
  115840. procedure TCAN2_C2FIFOCON31.clearUINC; inline;
  115841. begin
  115842. pTDefRegMap(@Self)^.clr := $00002000;
  115843. end;
  115844. procedure TCAN2_C2FIFOCON31.setUINC(thebits : TBits_1); inline;
  115845. begin
  115846. if thebits = 0 then
  115847. pTDefRegMap(@Self)^.clr := $00002000
  115848. else
  115849. pTDefRegMap(@Self)^.&set := $00002000;
  115850. end;
  115851. function TCAN2_C2FIFOCON31.getUINC : TBits_1; inline;
  115852. begin
  115853. getUINC := (pTDefRegMap(@Self)^.val and $00002000) shr 13;
  115854. end;
  115855. procedure TCAN2_C2FIFOCON31.setFRESET; inline;
  115856. begin
  115857. pTDefRegMap(@Self)^.&set := $00004000;
  115858. end;
  115859. procedure TCAN2_C2FIFOCON31.clearFRESET; inline;
  115860. begin
  115861. pTDefRegMap(@Self)^.clr := $00004000;
  115862. end;
  115863. procedure TCAN2_C2FIFOCON31.setFRESET(thebits : TBits_1); inline;
  115864. begin
  115865. if thebits = 0 then
  115866. pTDefRegMap(@Self)^.clr := $00004000
  115867. else
  115868. pTDefRegMap(@Self)^.&set := $00004000;
  115869. end;
  115870. function TCAN2_C2FIFOCON31.getFRESET : TBits_1; inline;
  115871. begin
  115872. getFRESET := (pTDefRegMap(@Self)^.val and $00004000) shr 14;
  115873. end;
  115874. procedure TCAN2_C2FIFOCON31.setFSIZE(thebits : TBits_5); inline;
  115875. begin
  115876. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  115877. end;
  115878. function TCAN2_C2FIFOCON31.getFSIZE : TBits_5; inline;
  115879. begin
  115880. getFSIZE := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  115881. end;
  115882. procedure TCAN2_C2FIFOCON31.setw(thebits : TBits_32); inline;
  115883. begin
  115884. pTDefRegMap(@Self)^.val := thebits;
  115885. end;
  115886. function TCAN2_C2FIFOCON31.getw : TBits_32; inline;
  115887. begin
  115888. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  115889. end;
  115890. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIF; inline;
  115891. begin
  115892. pTDefRegMap(@Self)^.&set := $00000001;
  115893. end;
  115894. procedure TCAN2_C2FIFOINT31.clearRXNEMPTYIF; inline;
  115895. begin
  115896. pTDefRegMap(@Self)^.clr := $00000001;
  115897. end;
  115898. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIF(thebits : TBits_1); inline;
  115899. begin
  115900. if thebits = 0 then
  115901. pTDefRegMap(@Self)^.clr := $00000001
  115902. else
  115903. pTDefRegMap(@Self)^.&set := $00000001;
  115904. end;
  115905. function TCAN2_C2FIFOINT31.getRXNEMPTYIF : TBits_1; inline;
  115906. begin
  115907. getRXNEMPTYIF := (pTDefRegMap(@Self)^.val and $00000001) shr 0;
  115908. end;
  115909. procedure TCAN2_C2FIFOINT31.setRXHALFIF; inline;
  115910. begin
  115911. pTDefRegMap(@Self)^.&set := $00000002;
  115912. end;
  115913. procedure TCAN2_C2FIFOINT31.clearRXHALFIF; inline;
  115914. begin
  115915. pTDefRegMap(@Self)^.clr := $00000002;
  115916. end;
  115917. procedure TCAN2_C2FIFOINT31.setRXHALFIF(thebits : TBits_1); inline;
  115918. begin
  115919. if thebits = 0 then
  115920. pTDefRegMap(@Self)^.clr := $00000002
  115921. else
  115922. pTDefRegMap(@Self)^.&set := $00000002;
  115923. end;
  115924. function TCAN2_C2FIFOINT31.getRXHALFIF : TBits_1; inline;
  115925. begin
  115926. getRXHALFIF := (pTDefRegMap(@Self)^.val and $00000002) shr 1;
  115927. end;
  115928. procedure TCAN2_C2FIFOINT31.setRXFULLIF; inline;
  115929. begin
  115930. pTDefRegMap(@Self)^.&set := $00000004;
  115931. end;
  115932. procedure TCAN2_C2FIFOINT31.clearRXFULLIF; inline;
  115933. begin
  115934. pTDefRegMap(@Self)^.clr := $00000004;
  115935. end;
  115936. procedure TCAN2_C2FIFOINT31.setRXFULLIF(thebits : TBits_1); inline;
  115937. begin
  115938. if thebits = 0 then
  115939. pTDefRegMap(@Self)^.clr := $00000004
  115940. else
  115941. pTDefRegMap(@Self)^.&set := $00000004;
  115942. end;
  115943. function TCAN2_C2FIFOINT31.getRXFULLIF : TBits_1; inline;
  115944. begin
  115945. getRXFULLIF := (pTDefRegMap(@Self)^.val and $00000004) shr 2;
  115946. end;
  115947. procedure TCAN2_C2FIFOINT31.setRXOVFLIF; inline;
  115948. begin
  115949. pTDefRegMap(@Self)^.&set := $00000008;
  115950. end;
  115951. procedure TCAN2_C2FIFOINT31.clearRXOVFLIF; inline;
  115952. begin
  115953. pTDefRegMap(@Self)^.clr := $00000008;
  115954. end;
  115955. procedure TCAN2_C2FIFOINT31.setRXOVFLIF(thebits : TBits_1); inline;
  115956. begin
  115957. if thebits = 0 then
  115958. pTDefRegMap(@Self)^.clr := $00000008
  115959. else
  115960. pTDefRegMap(@Self)^.&set := $00000008;
  115961. end;
  115962. function TCAN2_C2FIFOINT31.getRXOVFLIF : TBits_1; inline;
  115963. begin
  115964. getRXOVFLIF := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  115965. end;
  115966. procedure TCAN2_C2FIFOINT31.setTXEMPTYIF; inline;
  115967. begin
  115968. pTDefRegMap(@Self)^.&set := $00000100;
  115969. end;
  115970. procedure TCAN2_C2FIFOINT31.clearTXEMPTYIF; inline;
  115971. begin
  115972. pTDefRegMap(@Self)^.clr := $00000100;
  115973. end;
  115974. procedure TCAN2_C2FIFOINT31.setTXEMPTYIF(thebits : TBits_1); inline;
  115975. begin
  115976. if thebits = 0 then
  115977. pTDefRegMap(@Self)^.clr := $00000100
  115978. else
  115979. pTDefRegMap(@Self)^.&set := $00000100;
  115980. end;
  115981. function TCAN2_C2FIFOINT31.getTXEMPTYIF : TBits_1; inline;
  115982. begin
  115983. getTXEMPTYIF := (pTDefRegMap(@Self)^.val and $00000100) shr 8;
  115984. end;
  115985. procedure TCAN2_C2FIFOINT31.setTXHALFIF; inline;
  115986. begin
  115987. pTDefRegMap(@Self)^.&set := $00000200;
  115988. end;
  115989. procedure TCAN2_C2FIFOINT31.clearTXHALFIF; inline;
  115990. begin
  115991. pTDefRegMap(@Self)^.clr := $00000200;
  115992. end;
  115993. procedure TCAN2_C2FIFOINT31.setTXHALFIF(thebits : TBits_1); inline;
  115994. begin
  115995. if thebits = 0 then
  115996. pTDefRegMap(@Self)^.clr := $00000200
  115997. else
  115998. pTDefRegMap(@Self)^.&set := $00000200;
  115999. end;
  116000. function TCAN2_C2FIFOINT31.getTXHALFIF : TBits_1; inline;
  116001. begin
  116002. getTXHALFIF := (pTDefRegMap(@Self)^.val and $00000200) shr 9;
  116003. end;
  116004. procedure TCAN2_C2FIFOINT31.setTXNFULLIF; inline;
  116005. begin
  116006. pTDefRegMap(@Self)^.&set := $00000400;
  116007. end;
  116008. procedure TCAN2_C2FIFOINT31.clearTXNFULLIF; inline;
  116009. begin
  116010. pTDefRegMap(@Self)^.clr := $00000400;
  116011. end;
  116012. procedure TCAN2_C2FIFOINT31.setTXNFULLIF(thebits : TBits_1); inline;
  116013. begin
  116014. if thebits = 0 then
  116015. pTDefRegMap(@Self)^.clr := $00000400
  116016. else
  116017. pTDefRegMap(@Self)^.&set := $00000400;
  116018. end;
  116019. function TCAN2_C2FIFOINT31.getTXNFULLIF : TBits_1; inline;
  116020. begin
  116021. getTXNFULLIF := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  116022. end;
  116023. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIE; inline;
  116024. begin
  116025. pTDefRegMap(@Self)^.&set := $00010000;
  116026. end;
  116027. procedure TCAN2_C2FIFOINT31.clearRXNEMPTYIE; inline;
  116028. begin
  116029. pTDefRegMap(@Self)^.clr := $00010000;
  116030. end;
  116031. procedure TCAN2_C2FIFOINT31.setRXNEMPTYIE(thebits : TBits_1); inline;
  116032. begin
  116033. if thebits = 0 then
  116034. pTDefRegMap(@Self)^.clr := $00010000
  116035. else
  116036. pTDefRegMap(@Self)^.&set := $00010000;
  116037. end;
  116038. function TCAN2_C2FIFOINT31.getRXNEMPTYIE : TBits_1; inline;
  116039. begin
  116040. getRXNEMPTYIE := (pTDefRegMap(@Self)^.val and $00010000) shr 16;
  116041. end;
  116042. procedure TCAN2_C2FIFOINT31.setRXHALFIE; inline;
  116043. begin
  116044. pTDefRegMap(@Self)^.&set := $00020000;
  116045. end;
  116046. procedure TCAN2_C2FIFOINT31.clearRXHALFIE; inline;
  116047. begin
  116048. pTDefRegMap(@Self)^.clr := $00020000;
  116049. end;
  116050. procedure TCAN2_C2FIFOINT31.setRXHALFIE(thebits : TBits_1); inline;
  116051. begin
  116052. if thebits = 0 then
  116053. pTDefRegMap(@Self)^.clr := $00020000
  116054. else
  116055. pTDefRegMap(@Self)^.&set := $00020000;
  116056. end;
  116057. function TCAN2_C2FIFOINT31.getRXHALFIE : TBits_1; inline;
  116058. begin
  116059. getRXHALFIE := (pTDefRegMap(@Self)^.val and $00020000) shr 17;
  116060. end;
  116061. procedure TCAN2_C2FIFOINT31.setRXFULLIE; inline;
  116062. begin
  116063. pTDefRegMap(@Self)^.&set := $00040000;
  116064. end;
  116065. procedure TCAN2_C2FIFOINT31.clearRXFULLIE; inline;
  116066. begin
  116067. pTDefRegMap(@Self)^.clr := $00040000;
  116068. end;
  116069. procedure TCAN2_C2FIFOINT31.setRXFULLIE(thebits : TBits_1); inline;
  116070. begin
  116071. if thebits = 0 then
  116072. pTDefRegMap(@Self)^.clr := $00040000
  116073. else
  116074. pTDefRegMap(@Self)^.&set := $00040000;
  116075. end;
  116076. function TCAN2_C2FIFOINT31.getRXFULLIE : TBits_1; inline;
  116077. begin
  116078. getRXFULLIE := (pTDefRegMap(@Self)^.val and $00040000) shr 18;
  116079. end;
  116080. procedure TCAN2_C2FIFOINT31.setRXOVFLIE; inline;
  116081. begin
  116082. pTDefRegMap(@Self)^.&set := $00080000;
  116083. end;
  116084. procedure TCAN2_C2FIFOINT31.clearRXOVFLIE; inline;
  116085. begin
  116086. pTDefRegMap(@Self)^.clr := $00080000;
  116087. end;
  116088. procedure TCAN2_C2FIFOINT31.setRXOVFLIE(thebits : TBits_1); inline;
  116089. begin
  116090. if thebits = 0 then
  116091. pTDefRegMap(@Self)^.clr := $00080000
  116092. else
  116093. pTDefRegMap(@Self)^.&set := $00080000;
  116094. end;
  116095. function TCAN2_C2FIFOINT31.getRXOVFLIE : TBits_1; inline;
  116096. begin
  116097. getRXOVFLIE := (pTDefRegMap(@Self)^.val and $00080000) shr 19;
  116098. end;
  116099. procedure TCAN2_C2FIFOINT31.setTXEMPTYIE; inline;
  116100. begin
  116101. pTDefRegMap(@Self)^.&set := $01000000;
  116102. end;
  116103. procedure TCAN2_C2FIFOINT31.clearTXEMPTYIE; inline;
  116104. begin
  116105. pTDefRegMap(@Self)^.clr := $01000000;
  116106. end;
  116107. procedure TCAN2_C2FIFOINT31.setTXEMPTYIE(thebits : TBits_1); inline;
  116108. begin
  116109. if thebits = 0 then
  116110. pTDefRegMap(@Self)^.clr := $01000000
  116111. else
  116112. pTDefRegMap(@Self)^.&set := $01000000;
  116113. end;
  116114. function TCAN2_C2FIFOINT31.getTXEMPTYIE : TBits_1; inline;
  116115. begin
  116116. getTXEMPTYIE := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  116117. end;
  116118. procedure TCAN2_C2FIFOINT31.setTXHALFIE; inline;
  116119. begin
  116120. pTDefRegMap(@Self)^.&set := $02000000;
  116121. end;
  116122. procedure TCAN2_C2FIFOINT31.clearTXHALFIE; inline;
  116123. begin
  116124. pTDefRegMap(@Self)^.clr := $02000000;
  116125. end;
  116126. procedure TCAN2_C2FIFOINT31.setTXHALFIE(thebits : TBits_1); inline;
  116127. begin
  116128. if thebits = 0 then
  116129. pTDefRegMap(@Self)^.clr := $02000000
  116130. else
  116131. pTDefRegMap(@Self)^.&set := $02000000;
  116132. end;
  116133. function TCAN2_C2FIFOINT31.getTXHALFIE : TBits_1; inline;
  116134. begin
  116135. getTXHALFIE := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  116136. end;
  116137. procedure TCAN2_C2FIFOINT31.setTXNFULLIE; inline;
  116138. begin
  116139. pTDefRegMap(@Self)^.&set := $04000000;
  116140. end;
  116141. procedure TCAN2_C2FIFOINT31.clearTXNFULLIE; inline;
  116142. begin
  116143. pTDefRegMap(@Self)^.clr := $04000000;
  116144. end;
  116145. procedure TCAN2_C2FIFOINT31.setTXNFULLIE(thebits : TBits_1); inline;
  116146. begin
  116147. if thebits = 0 then
  116148. pTDefRegMap(@Self)^.clr := $04000000
  116149. else
  116150. pTDefRegMap(@Self)^.&set := $04000000;
  116151. end;
  116152. function TCAN2_C2FIFOINT31.getTXNFULLIE : TBits_1; inline;
  116153. begin
  116154. getTXNFULLIE := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  116155. end;
  116156. procedure TCAN2_C2FIFOINT31.setw(thebits : TBits_32); inline;
  116157. begin
  116158. pTDefRegMap(@Self)^.val := thebits;
  116159. end;
  116160. function TCAN2_C2FIFOINT31.getw : TBits_32; inline;
  116161. begin
  116162. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116163. end;
  116164. procedure TCAN2_C2FIFOCI31.setCFIFOCI(thebits : TBits_5); inline;
  116165. begin
  116166. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFE0 or ( thebits shl 0 );
  116167. end;
  116168. function TCAN2_C2FIFOCI31.getCFIFOCI : TBits_5; inline;
  116169. begin
  116170. getCFIFOCI := (pTDefRegMap(@Self)^.val and $0000001F) shr 0;
  116171. end;
  116172. procedure TCAN2_C2FIFOCI31.setw(thebits : TBits_32); inline;
  116173. begin
  116174. pTDefRegMap(@Self)^.val := thebits;
  116175. end;
  116176. function TCAN2_C2FIFOCI31.getw : TBits_32; inline;
  116177. begin
  116178. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116179. end;
  116180. procedure TDEVCFG_DEVCFG3.setUSERID(thebits : TBits_16); inline;
  116181. begin
  116182. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF0000 or ( thebits shl 0 );
  116183. end;
  116184. function TDEVCFG_DEVCFG3.getUSERID : TBits_16; inline;
  116185. begin
  116186. getUSERID := (pTDefRegMap(@Self)^.val and $0000FFFF) shr 0;
  116187. end;
  116188. procedure TDEVCFG_DEVCFG3.setFSRSSEL(thebits : TBits_3); inline;
  116189. begin
  116190. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  116191. end;
  116192. function TDEVCFG_DEVCFG3.getFSRSSEL : TBits_3; inline;
  116193. begin
  116194. getFSRSSEL := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  116195. end;
  116196. procedure TDEVCFG_DEVCFG3.setFMIIEN; inline;
  116197. begin
  116198. pTDefRegMap(@Self)^.&set := $01000000;
  116199. end;
  116200. procedure TDEVCFG_DEVCFG3.clearFMIIEN; inline;
  116201. begin
  116202. pTDefRegMap(@Self)^.clr := $01000000;
  116203. end;
  116204. procedure TDEVCFG_DEVCFG3.setFMIIEN(thebits : TBits_1); inline;
  116205. begin
  116206. if thebits = 0 then
  116207. pTDefRegMap(@Self)^.clr := $01000000
  116208. else
  116209. pTDefRegMap(@Self)^.&set := $01000000;
  116210. end;
  116211. function TDEVCFG_DEVCFG3.getFMIIEN : TBits_1; inline;
  116212. begin
  116213. getFMIIEN := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  116214. end;
  116215. procedure TDEVCFG_DEVCFG3.setFETHIO; inline;
  116216. begin
  116217. pTDefRegMap(@Self)^.&set := $02000000;
  116218. end;
  116219. procedure TDEVCFG_DEVCFG3.clearFETHIO; inline;
  116220. begin
  116221. pTDefRegMap(@Self)^.clr := $02000000;
  116222. end;
  116223. procedure TDEVCFG_DEVCFG3.setFETHIO(thebits : TBits_1); inline;
  116224. begin
  116225. if thebits = 0 then
  116226. pTDefRegMap(@Self)^.clr := $02000000
  116227. else
  116228. pTDefRegMap(@Self)^.&set := $02000000;
  116229. end;
  116230. function TDEVCFG_DEVCFG3.getFETHIO : TBits_1; inline;
  116231. begin
  116232. getFETHIO := (pTDefRegMap(@Self)^.val and $02000000) shr 25;
  116233. end;
  116234. procedure TDEVCFG_DEVCFG3.setFCANIO; inline;
  116235. begin
  116236. pTDefRegMap(@Self)^.&set := $04000000;
  116237. end;
  116238. procedure TDEVCFG_DEVCFG3.clearFCANIO; inline;
  116239. begin
  116240. pTDefRegMap(@Self)^.clr := $04000000;
  116241. end;
  116242. procedure TDEVCFG_DEVCFG3.setFCANIO(thebits : TBits_1); inline;
  116243. begin
  116244. if thebits = 0 then
  116245. pTDefRegMap(@Self)^.clr := $04000000
  116246. else
  116247. pTDefRegMap(@Self)^.&set := $04000000;
  116248. end;
  116249. function TDEVCFG_DEVCFG3.getFCANIO : TBits_1; inline;
  116250. begin
  116251. getFCANIO := (pTDefRegMap(@Self)^.val and $04000000) shr 26;
  116252. end;
  116253. procedure TDEVCFG_DEVCFG3.setFUSBIDIO; inline;
  116254. begin
  116255. pTDefRegMap(@Self)^.&set := $40000000;
  116256. end;
  116257. procedure TDEVCFG_DEVCFG3.clearFUSBIDIO; inline;
  116258. begin
  116259. pTDefRegMap(@Self)^.clr := $40000000;
  116260. end;
  116261. procedure TDEVCFG_DEVCFG3.setFUSBIDIO(thebits : TBits_1); inline;
  116262. begin
  116263. if thebits = 0 then
  116264. pTDefRegMap(@Self)^.clr := $40000000
  116265. else
  116266. pTDefRegMap(@Self)^.&set := $40000000;
  116267. end;
  116268. function TDEVCFG_DEVCFG3.getFUSBIDIO : TBits_1; inline;
  116269. begin
  116270. getFUSBIDIO := (pTDefRegMap(@Self)^.val and $40000000) shr 30;
  116271. end;
  116272. procedure TDEVCFG_DEVCFG3.setFVBUSONIO; inline;
  116273. begin
  116274. pTDefRegMap(@Self)^.&set := $80000000;
  116275. end;
  116276. procedure TDEVCFG_DEVCFG3.clearFVBUSONIO; inline;
  116277. begin
  116278. pTDefRegMap(@Self)^.clr := $80000000;
  116279. end;
  116280. procedure TDEVCFG_DEVCFG3.setFVBUSONIO(thebits : TBits_1); inline;
  116281. begin
  116282. if thebits = 0 then
  116283. pTDefRegMap(@Self)^.clr := $80000000
  116284. else
  116285. pTDefRegMap(@Self)^.&set := $80000000;
  116286. end;
  116287. function TDEVCFG_DEVCFG3.getFVBUSONIO : TBits_1; inline;
  116288. begin
  116289. getFVBUSONIO := (pTDefRegMap(@Self)^.val and $80000000) shr 31;
  116290. end;
  116291. procedure TDEVCFG_DEVCFG3.setw(thebits : TBits_32); inline;
  116292. begin
  116293. pTDefRegMap(@Self)^.val := thebits;
  116294. end;
  116295. function TDEVCFG_DEVCFG3.getw : TBits_32; inline;
  116296. begin
  116297. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116298. end;
  116299. procedure TDEVCFG_DEVCFG2.setFPLLIDIV(thebits : TBits_3); inline;
  116300. begin
  116301. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  116302. end;
  116303. function TDEVCFG_DEVCFG2.getFPLLIDIV : TBits_3; inline;
  116304. begin
  116305. getFPLLIDIV := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  116306. end;
  116307. procedure TDEVCFG_DEVCFG2.setFPLLMUL(thebits : TBits_3); inline;
  116308. begin
  116309. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFF8F or ( thebits shl 4 );
  116310. end;
  116311. function TDEVCFG_DEVCFG2.getFPLLMUL : TBits_3; inline;
  116312. begin
  116313. getFPLLMUL := (pTDefRegMap(@Self)^.val and $00000070) shr 4;
  116314. end;
  116315. procedure TDEVCFG_DEVCFG2.setUPLLIDIV(thebits : TBits_3); inline;
  116316. begin
  116317. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFF8FF or ( thebits shl 8 );
  116318. end;
  116319. function TDEVCFG_DEVCFG2.getUPLLIDIV : TBits_3; inline;
  116320. begin
  116321. getUPLLIDIV := (pTDefRegMap(@Self)^.val and $00000700) shr 8;
  116322. end;
  116323. procedure TDEVCFG_DEVCFG2.setUPLLEN; inline;
  116324. begin
  116325. pTDefRegMap(@Self)^.&set := $00008000;
  116326. end;
  116327. procedure TDEVCFG_DEVCFG2.clearUPLLEN; inline;
  116328. begin
  116329. pTDefRegMap(@Self)^.clr := $00008000;
  116330. end;
  116331. procedure TDEVCFG_DEVCFG2.setUPLLEN(thebits : TBits_1); inline;
  116332. begin
  116333. if thebits = 0 then
  116334. pTDefRegMap(@Self)^.clr := $00008000
  116335. else
  116336. pTDefRegMap(@Self)^.&set := $00008000;
  116337. end;
  116338. function TDEVCFG_DEVCFG2.getUPLLEN : TBits_1; inline;
  116339. begin
  116340. getUPLLEN := (pTDefRegMap(@Self)^.val and $00008000) shr 15;
  116341. end;
  116342. procedure TDEVCFG_DEVCFG2.setFPLLODIV(thebits : TBits_3); inline;
  116343. begin
  116344. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF8FFFF or ( thebits shl 16 );
  116345. end;
  116346. function TDEVCFG_DEVCFG2.getFPLLODIV : TBits_3; inline;
  116347. begin
  116348. getFPLLODIV := (pTDefRegMap(@Self)^.val and $00070000) shr 16;
  116349. end;
  116350. procedure TDEVCFG_DEVCFG2.setw(thebits : TBits_32); inline;
  116351. begin
  116352. pTDefRegMap(@Self)^.val := thebits;
  116353. end;
  116354. function TDEVCFG_DEVCFG2.getw : TBits_32; inline;
  116355. begin
  116356. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116357. end;
  116358. procedure TDEVCFG_DEVCFG1.setFNOSC(thebits : TBits_3); inline;
  116359. begin
  116360. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFF8 or ( thebits shl 0 );
  116361. end;
  116362. function TDEVCFG_DEVCFG1.getFNOSC : TBits_3; inline;
  116363. begin
  116364. getFNOSC := (pTDefRegMap(@Self)^.val and $00000007) shr 0;
  116365. end;
  116366. procedure TDEVCFG_DEVCFG1.setFSOSCEN; inline;
  116367. begin
  116368. pTDefRegMap(@Self)^.&set := $00000020;
  116369. end;
  116370. procedure TDEVCFG_DEVCFG1.clearFSOSCEN; inline;
  116371. begin
  116372. pTDefRegMap(@Self)^.clr := $00000020;
  116373. end;
  116374. procedure TDEVCFG_DEVCFG1.setFSOSCEN(thebits : TBits_1); inline;
  116375. begin
  116376. if thebits = 0 then
  116377. pTDefRegMap(@Self)^.clr := $00000020
  116378. else
  116379. pTDefRegMap(@Self)^.&set := $00000020;
  116380. end;
  116381. function TDEVCFG_DEVCFG1.getFSOSCEN : TBits_1; inline;
  116382. begin
  116383. getFSOSCEN := (pTDefRegMap(@Self)^.val and $00000020) shr 5;
  116384. end;
  116385. procedure TDEVCFG_DEVCFG1.setIESO; inline;
  116386. begin
  116387. pTDefRegMap(@Self)^.&set := $00000080;
  116388. end;
  116389. procedure TDEVCFG_DEVCFG1.clearIESO; inline;
  116390. begin
  116391. pTDefRegMap(@Self)^.clr := $00000080;
  116392. end;
  116393. procedure TDEVCFG_DEVCFG1.setIESO(thebits : TBits_1); inline;
  116394. begin
  116395. if thebits = 0 then
  116396. pTDefRegMap(@Self)^.clr := $00000080
  116397. else
  116398. pTDefRegMap(@Self)^.&set := $00000080;
  116399. end;
  116400. function TDEVCFG_DEVCFG1.getIESO : TBits_1; inline;
  116401. begin
  116402. getIESO := (pTDefRegMap(@Self)^.val and $00000080) shr 7;
  116403. end;
  116404. procedure TDEVCFG_DEVCFG1.setPOSCMOD(thebits : TBits_2); inline;
  116405. begin
  116406. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFCFF or ( thebits shl 8 );
  116407. end;
  116408. function TDEVCFG_DEVCFG1.getPOSCMOD : TBits_2; inline;
  116409. begin
  116410. getPOSCMOD := (pTDefRegMap(@Self)^.val and $00000300) shr 8;
  116411. end;
  116412. procedure TDEVCFG_DEVCFG1.setOSCIOFNC; inline;
  116413. begin
  116414. pTDefRegMap(@Self)^.&set := $00000400;
  116415. end;
  116416. procedure TDEVCFG_DEVCFG1.clearOSCIOFNC; inline;
  116417. begin
  116418. pTDefRegMap(@Self)^.clr := $00000400;
  116419. end;
  116420. procedure TDEVCFG_DEVCFG1.setOSCIOFNC(thebits : TBits_1); inline;
  116421. begin
  116422. if thebits = 0 then
  116423. pTDefRegMap(@Self)^.clr := $00000400
  116424. else
  116425. pTDefRegMap(@Self)^.&set := $00000400;
  116426. end;
  116427. function TDEVCFG_DEVCFG1.getOSCIOFNC : TBits_1; inline;
  116428. begin
  116429. getOSCIOFNC := (pTDefRegMap(@Self)^.val and $00000400) shr 10;
  116430. end;
  116431. procedure TDEVCFG_DEVCFG1.setFPBDIV(thebits : TBits_2); inline;
  116432. begin
  116433. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFCFFF or ( thebits shl 12 );
  116434. end;
  116435. function TDEVCFG_DEVCFG1.getFPBDIV : TBits_2; inline;
  116436. begin
  116437. getFPBDIV := (pTDefRegMap(@Self)^.val and $00003000) shr 12;
  116438. end;
  116439. procedure TDEVCFG_DEVCFG1.setFCKSM(thebits : TBits_2); inline;
  116440. begin
  116441. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFF3FFF or ( thebits shl 14 );
  116442. end;
  116443. function TDEVCFG_DEVCFG1.getFCKSM : TBits_2; inline;
  116444. begin
  116445. getFCKSM := (pTDefRegMap(@Self)^.val and $0000C000) shr 14;
  116446. end;
  116447. procedure TDEVCFG_DEVCFG1.setWDTPS(thebits : TBits_5); inline;
  116448. begin
  116449. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFE0FFFF or ( thebits shl 16 );
  116450. end;
  116451. function TDEVCFG_DEVCFG1.getWDTPS : TBits_5; inline;
  116452. begin
  116453. getWDTPS := (pTDefRegMap(@Self)^.val and $001F0000) shr 16;
  116454. end;
  116455. procedure TDEVCFG_DEVCFG1.setFWDTEN; inline;
  116456. begin
  116457. pTDefRegMap(@Self)^.&set := $00800000;
  116458. end;
  116459. procedure TDEVCFG_DEVCFG1.clearFWDTEN; inline;
  116460. begin
  116461. pTDefRegMap(@Self)^.clr := $00800000;
  116462. end;
  116463. procedure TDEVCFG_DEVCFG1.setFWDTEN(thebits : TBits_1); inline;
  116464. begin
  116465. if thebits = 0 then
  116466. pTDefRegMap(@Self)^.clr := $00800000
  116467. else
  116468. pTDefRegMap(@Self)^.&set := $00800000;
  116469. end;
  116470. function TDEVCFG_DEVCFG1.getFWDTEN : TBits_1; inline;
  116471. begin
  116472. getFWDTEN := (pTDefRegMap(@Self)^.val and $00800000) shr 23;
  116473. end;
  116474. procedure TDEVCFG_DEVCFG1.setw(thebits : TBits_32); inline;
  116475. begin
  116476. pTDefRegMap(@Self)^.val := thebits;
  116477. end;
  116478. function TDEVCFG_DEVCFG1.getw : TBits_32; inline;
  116479. begin
  116480. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116481. end;
  116482. procedure TDEVCFG_DEVCFG0.setDEBUG(thebits : TBits_2); inline;
  116483. begin
  116484. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  116485. end;
  116486. function TDEVCFG_DEVCFG0.getDEBUG : TBits_2; inline;
  116487. begin
  116488. getDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  116489. end;
  116490. procedure TDEVCFG_DEVCFG0.setICESEL; inline;
  116491. begin
  116492. pTDefRegMap(@Self)^.&set := $00000008;
  116493. end;
  116494. procedure TDEVCFG_DEVCFG0.clearICESEL; inline;
  116495. begin
  116496. pTDefRegMap(@Self)^.clr := $00000008;
  116497. end;
  116498. procedure TDEVCFG_DEVCFG0.setICESEL(thebits : TBits_1); inline;
  116499. begin
  116500. if thebits = 0 then
  116501. pTDefRegMap(@Self)^.clr := $00000008
  116502. else
  116503. pTDefRegMap(@Self)^.&set := $00000008;
  116504. end;
  116505. function TDEVCFG_DEVCFG0.getICESEL : TBits_1; inline;
  116506. begin
  116507. getICESEL := (pTDefRegMap(@Self)^.val and $00000008) shr 3;
  116508. end;
  116509. procedure TDEVCFG_DEVCFG0.setPWP(thebits : TBits_8); inline;
  116510. begin
  116511. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFF00FFF or ( thebits shl 12 );
  116512. end;
  116513. function TDEVCFG_DEVCFG0.getPWP : TBits_8; inline;
  116514. begin
  116515. getPWP := (pTDefRegMap(@Self)^.val and $000FF000) shr 12;
  116516. end;
  116517. procedure TDEVCFG_DEVCFG0.setBWP; inline;
  116518. begin
  116519. pTDefRegMap(@Self)^.&set := $01000000;
  116520. end;
  116521. procedure TDEVCFG_DEVCFG0.clearBWP; inline;
  116522. begin
  116523. pTDefRegMap(@Self)^.clr := $01000000;
  116524. end;
  116525. procedure TDEVCFG_DEVCFG0.setBWP(thebits : TBits_1); inline;
  116526. begin
  116527. if thebits = 0 then
  116528. pTDefRegMap(@Self)^.clr := $01000000
  116529. else
  116530. pTDefRegMap(@Self)^.&set := $01000000;
  116531. end;
  116532. function TDEVCFG_DEVCFG0.getBWP : TBits_1; inline;
  116533. begin
  116534. getBWP := (pTDefRegMap(@Self)^.val and $01000000) shr 24;
  116535. end;
  116536. procedure TDEVCFG_DEVCFG0.setCP; inline;
  116537. begin
  116538. pTDefRegMap(@Self)^.&set := $10000000;
  116539. end;
  116540. procedure TDEVCFG_DEVCFG0.clearCP; inline;
  116541. begin
  116542. pTDefRegMap(@Self)^.clr := $10000000;
  116543. end;
  116544. procedure TDEVCFG_DEVCFG0.setCP(thebits : TBits_1); inline;
  116545. begin
  116546. if thebits = 0 then
  116547. pTDefRegMap(@Self)^.clr := $10000000
  116548. else
  116549. pTDefRegMap(@Self)^.&set := $10000000;
  116550. end;
  116551. function TDEVCFG_DEVCFG0.getCP : TBits_1; inline;
  116552. begin
  116553. getCP := (pTDefRegMap(@Self)^.val and $10000000) shr 28;
  116554. end;
  116555. procedure TDEVCFG_DEVCFG0.setFDEBUG(thebits : TBits_2); inline;
  116556. begin
  116557. pTDefRegMap(@Self)^.val := pTDefRegMap(@Self)^.val and $FFFFFFFC or ( thebits shl 0 );
  116558. end;
  116559. function TDEVCFG_DEVCFG0.getFDEBUG : TBits_2; inline;
  116560. begin
  116561. getFDEBUG := (pTDefRegMap(@Self)^.val and $00000003) shr 0;
  116562. end;
  116563. procedure TDEVCFG_DEVCFG0.setw(thebits : TBits_32); inline;
  116564. begin
  116565. pTDefRegMap(@Self)^.val := thebits;
  116566. end;
  116567. function TDEVCFG_DEVCFG0.getw : TBits_32; inline;
  116568. begin
  116569. getw := (pTDefRegMap(@Self)^.val and $FFFFFFFF) shr 0;
  116570. end;
  116571. procedure _CORE_TIMER_VECTOR_interrupt; external name '_CORE_TIMER_VECTOR_interrupt';
  116572. procedure _CORE_SOFTWARE_0_VECTOR_interrupt; external name '_CORE_SOFTWARE_0_VECTOR_interrupt';
  116573. procedure _CORE_SOFTWARE_1_VECTOR_interrupt; external name '_CORE_SOFTWARE_1_VECTOR_interrupt';
  116574. procedure _EXTERNAL_0_VECTOR_interrupt; external name '_EXTERNAL_0_VECTOR_interrupt';
  116575. procedure _TIMER_1_VECTOR_interrupt; external name '_TIMER_1_VECTOR_interrupt';
  116576. procedure _INPUT_CAPTURE_1_VECTOR_interrupt; external name '_INPUT_CAPTURE_1_VECTOR_interrupt';
  116577. procedure _OUTPUT_COMPARE_1_VECTOR_interrupt; external name '_OUTPUT_COMPARE_1_VECTOR_interrupt';
  116578. procedure _EXTERNAL_1_VECTOR_interrupt; external name '_EXTERNAL_1_VECTOR_interrupt';
  116579. procedure _TIMER_2_VECTOR_interrupt; external name '_TIMER_2_VECTOR_interrupt';
  116580. procedure _INPUT_CAPTURE_2_VECTOR_interrupt; external name '_INPUT_CAPTURE_2_VECTOR_interrupt';
  116581. procedure _OUTPUT_COMPARE_2_VECTOR_interrupt; external name '_OUTPUT_COMPARE_2_VECTOR_interrupt';
  116582. procedure _EXTERNAL_2_VECTOR_interrupt; external name '_EXTERNAL_2_VECTOR_interrupt';
  116583. procedure _TIMER_3_VECTOR_interrupt; external name '_TIMER_3_VECTOR_interrupt';
  116584. procedure _INPUT_CAPTURE_3_VECTOR_interrupt; external name '_INPUT_CAPTURE_3_VECTOR_interrupt';
  116585. procedure _OUTPUT_COMPARE_3_VECTOR_interrupt; external name '_OUTPUT_COMPARE_3_VECTOR_interrupt';
  116586. procedure _EXTERNAL_3_VECTOR_interrupt; external name '_EXTERNAL_3_VECTOR_interrupt';
  116587. procedure _TIMER_4_VECTOR_interrupt; external name '_TIMER_4_VECTOR_interrupt';
  116588. procedure _INPUT_CAPTURE_4_VECTOR_interrupt; external name '_INPUT_CAPTURE_4_VECTOR_interrupt';
  116589. procedure _OUTPUT_COMPARE_4_VECTOR_interrupt; external name '_OUTPUT_COMPARE_4_VECTOR_interrupt';
  116590. procedure _EXTERNAL_4_VECTOR_interrupt; external name '_EXTERNAL_4_VECTOR_interrupt';
  116591. procedure _TIMER_5_VECTOR_interrupt; external name '_TIMER_5_VECTOR_interrupt';
  116592. procedure _INPUT_CAPTURE_5_VECTOR_interrupt; external name '_INPUT_CAPTURE_5_VECTOR_interrupt';
  116593. procedure _OUTPUT_COMPARE_5_VECTOR_interrupt; external name '_OUTPUT_COMPARE_5_VECTOR_interrupt';
  116594. procedure _SPI_1A_VECTOR_interrupt; external name '_SPI_1A_VECTOR_interrupt';
  116595. procedure _UART_1_VECTOR_interrupt; external name '_UART_1_VECTOR_interrupt';
  116596. procedure _UART_1A_VECTOR_interrupt; external name '_UART_1A_VECTOR_interrupt';
  116597. procedure _I2C_3_VECTOR_interrupt; external name '_I2C_3_VECTOR_interrupt';
  116598. procedure _I2C_1A_VECTOR_interrupt; external name '_I2C_1A_VECTOR_interrupt';
  116599. procedure _SPI_3_VECTOR_interrupt; external name '_SPI_3_VECTOR_interrupt';
  116600. procedure _I2C_1_VECTOR_interrupt; external name '_I2C_1_VECTOR_interrupt';
  116601. procedure _CHANGE_NOTICE_VECTOR_interrupt; external name '_CHANGE_NOTICE_VECTOR_interrupt';
  116602. procedure _ADC_VECTOR_interrupt; external name '_ADC_VECTOR_interrupt';
  116603. procedure _PMP_VECTOR_interrupt; external name '_PMP_VECTOR_interrupt';
  116604. procedure _COMPARATOR_1_VECTOR_interrupt; external name '_COMPARATOR_1_VECTOR_interrupt';
  116605. procedure _COMPARATOR_2_VECTOR_interrupt; external name '_COMPARATOR_2_VECTOR_interrupt';
  116606. procedure _SPI_2A_VECTOR_interrupt; external name '_SPI_2A_VECTOR_interrupt';
  116607. procedure _UART_3_VECTOR_interrupt; external name '_UART_3_VECTOR_interrupt';
  116608. procedure _UART_2A_VECTOR_interrupt; external name '_UART_2A_VECTOR_interrupt';
  116609. procedure _I2C_4_VECTOR_interrupt; external name '_I2C_4_VECTOR_interrupt';
  116610. procedure _I2C_2A_VECTOR_interrupt; external name '_I2C_2A_VECTOR_interrupt';
  116611. procedure _SPI_2_VECTOR_interrupt; external name '_SPI_2_VECTOR_interrupt';
  116612. procedure _SPI_3A_VECTOR_interrupt; external name '_SPI_3A_VECTOR_interrupt';
  116613. procedure _UART_2_VECTOR_interrupt; external name '_UART_2_VECTOR_interrupt';
  116614. procedure _UART_3A_VECTOR_interrupt; external name '_UART_3A_VECTOR_interrupt';
  116615. procedure _I2C_5_VECTOR_interrupt; external name '_I2C_5_VECTOR_interrupt';
  116616. procedure _I2C_3A_VECTOR_interrupt; external name '_I2C_3A_VECTOR_interrupt';
  116617. procedure _SPI_4_VECTOR_interrupt; external name '_SPI_4_VECTOR_interrupt';
  116618. procedure _I2C_2_VECTOR_interrupt; external name '_I2C_2_VECTOR_interrupt';
  116619. procedure _FAIL_SAFE_MONITOR_VECTOR_interrupt; external name '_FAIL_SAFE_MONITOR_VECTOR_interrupt';
  116620. procedure _RTCC_VECTOR_interrupt; external name '_RTCC_VECTOR_interrupt';
  116621. procedure _DMA_0_VECTOR_interrupt; external name '_DMA_0_VECTOR_interrupt';
  116622. procedure _DMA_1_VECTOR_interrupt; external name '_DMA_1_VECTOR_interrupt';
  116623. procedure _DMA_2_VECTOR_interrupt; external name '_DMA_2_VECTOR_interrupt';
  116624. procedure _DMA_3_VECTOR_interrupt; external name '_DMA_3_VECTOR_interrupt';
  116625. procedure _DMA_4_VECTOR_interrupt; external name '_DMA_4_VECTOR_interrupt';
  116626. procedure _DMA_5_VECTOR_interrupt; external name '_DMA_5_VECTOR_interrupt';
  116627. procedure _DMA_6_VECTOR_interrupt; external name '_DMA_6_VECTOR_interrupt';
  116628. procedure _DMA_7_VECTOR_interrupt; external name '_DMA_7_VECTOR_interrupt';
  116629. procedure _FCE_VECTOR_interrupt; external name '_FCE_VECTOR_interrupt';
  116630. procedure _USB_1_VECTOR_interrupt; external name '_USB_1_VECTOR_interrupt';
  116631. procedure _CAN_1_VECTOR_interrupt; external name '_CAN_1_VECTOR_interrupt';
  116632. procedure _CAN_2_VECTOR_interrupt; external name '_CAN_2_VECTOR_interrupt';
  116633. procedure _ETH_VECTOR_interrupt; external name '_ETH_VECTOR_interrupt';
  116634. procedure _UART_1B_VECTOR_interrupt; external name '_UART_1B_VECTOR_interrupt';
  116635. procedure _UART_4_VECTOR_interrupt; external name '_UART_4_VECTOR_interrupt';
  116636. procedure _UART_2B_VECTOR_interrupt; external name '_UART_2B_VECTOR_interrupt';
  116637. procedure _UART_6_VECTOR_interrupt; external name '_UART_6_VECTOR_interrupt';
  116638. procedure _UART_3B_VECTOR_interrupt; external name '_UART_3B_VECTOR_interrupt';
  116639. procedure _UART_5_VECTOR_interrupt; external name '_UART_5_VECTOR_interrupt';
  116640. procedure Vectors; assembler; nostackframe;
  116641. label interrupt_vectors;
  116642. asm
  116643. .section ".init.interrupt_vectors,\"ax\",@progbits"
  116644. interrupt_vectors:
  116645. j _CORE_TIMER_VECTOR_interrupt
  116646. nop
  116647. nop
  116648. nop
  116649. nop
  116650. nop
  116651. nop
  116652. nop
  116653. j _CORE_SOFTWARE_0_VECTOR_interrupt
  116654. nop
  116655. nop
  116656. nop
  116657. nop
  116658. nop
  116659. nop
  116660. nop
  116661. j _CORE_SOFTWARE_1_VECTOR_interrupt
  116662. nop
  116663. nop
  116664. nop
  116665. nop
  116666. nop
  116667. nop
  116668. nop
  116669. j _EXTERNAL_0_VECTOR_interrupt
  116670. nop
  116671. nop
  116672. nop
  116673. nop
  116674. nop
  116675. nop
  116676. nop
  116677. j _TIMER_1_VECTOR_interrupt
  116678. nop
  116679. nop
  116680. nop
  116681. nop
  116682. nop
  116683. nop
  116684. nop
  116685. j _INPUT_CAPTURE_1_VECTOR_interrupt
  116686. nop
  116687. nop
  116688. nop
  116689. nop
  116690. nop
  116691. nop
  116692. nop
  116693. j _OUTPUT_COMPARE_1_VECTOR_interrupt
  116694. nop
  116695. nop
  116696. nop
  116697. nop
  116698. nop
  116699. nop
  116700. nop
  116701. j _EXTERNAL_1_VECTOR_interrupt
  116702. nop
  116703. nop
  116704. nop
  116705. nop
  116706. nop
  116707. nop
  116708. nop
  116709. j _TIMER_2_VECTOR_interrupt
  116710. nop
  116711. nop
  116712. nop
  116713. nop
  116714. nop
  116715. nop
  116716. nop
  116717. j _INPUT_CAPTURE_2_VECTOR_interrupt
  116718. nop
  116719. nop
  116720. nop
  116721. nop
  116722. nop
  116723. nop
  116724. nop
  116725. j _OUTPUT_COMPARE_2_VECTOR_interrupt
  116726. nop
  116727. nop
  116728. nop
  116729. nop
  116730. nop
  116731. nop
  116732. nop
  116733. j _EXTERNAL_2_VECTOR_interrupt
  116734. nop
  116735. nop
  116736. nop
  116737. nop
  116738. nop
  116739. nop
  116740. nop
  116741. j _TIMER_3_VECTOR_interrupt
  116742. nop
  116743. nop
  116744. nop
  116745. nop
  116746. nop
  116747. nop
  116748. nop
  116749. j _INPUT_CAPTURE_3_VECTOR_interrupt
  116750. nop
  116751. nop
  116752. nop
  116753. nop
  116754. nop
  116755. nop
  116756. nop
  116757. j _OUTPUT_COMPARE_3_VECTOR_interrupt
  116758. nop
  116759. nop
  116760. nop
  116761. nop
  116762. nop
  116763. nop
  116764. nop
  116765. j _EXTERNAL_3_VECTOR_interrupt
  116766. nop
  116767. nop
  116768. nop
  116769. nop
  116770. nop
  116771. nop
  116772. nop
  116773. j _TIMER_4_VECTOR_interrupt
  116774. nop
  116775. nop
  116776. nop
  116777. nop
  116778. nop
  116779. nop
  116780. nop
  116781. j _INPUT_CAPTURE_4_VECTOR_interrupt
  116782. nop
  116783. nop
  116784. nop
  116785. nop
  116786. nop
  116787. nop
  116788. nop
  116789. j _OUTPUT_COMPARE_4_VECTOR_interrupt
  116790. nop
  116791. nop
  116792. nop
  116793. nop
  116794. nop
  116795. nop
  116796. nop
  116797. j _EXTERNAL_4_VECTOR_interrupt
  116798. nop
  116799. nop
  116800. nop
  116801. nop
  116802. nop
  116803. nop
  116804. nop
  116805. j _TIMER_5_VECTOR_interrupt
  116806. nop
  116807. nop
  116808. nop
  116809. nop
  116810. nop
  116811. nop
  116812. nop
  116813. j _INPUT_CAPTURE_5_VECTOR_interrupt
  116814. nop
  116815. nop
  116816. nop
  116817. nop
  116818. nop
  116819. nop
  116820. nop
  116821. j _OUTPUT_COMPARE_5_VECTOR_interrupt
  116822. nop
  116823. nop
  116824. nop
  116825. nop
  116826. nop
  116827. nop
  116828. nop
  116829. nop
  116830. nop
  116831. nop
  116832. nop
  116833. nop
  116834. nop
  116835. nop
  116836. nop
  116837. j _SPI_1A_VECTOR_interrupt
  116838. nop
  116839. nop
  116840. nop
  116841. nop
  116842. nop
  116843. nop
  116844. nop
  116845. j _I2C_1_VECTOR_interrupt
  116846. nop
  116847. nop
  116848. nop
  116849. nop
  116850. nop
  116851. nop
  116852. nop
  116853. j _CHANGE_NOTICE_VECTOR_interrupt
  116854. nop
  116855. nop
  116856. nop
  116857. nop
  116858. nop
  116859. nop
  116860. nop
  116861. j _ADC_VECTOR_interrupt
  116862. nop
  116863. nop
  116864. nop
  116865. nop
  116866. nop
  116867. nop
  116868. nop
  116869. j _PMP_VECTOR_interrupt
  116870. nop
  116871. nop
  116872. nop
  116873. nop
  116874. nop
  116875. nop
  116876. nop
  116877. j _COMPARATOR_1_VECTOR_interrupt
  116878. nop
  116879. nop
  116880. nop
  116881. nop
  116882. nop
  116883. nop
  116884. nop
  116885. j _COMPARATOR_2_VECTOR_interrupt
  116886. nop
  116887. nop
  116888. nop
  116889. nop
  116890. nop
  116891. nop
  116892. nop
  116893. j _SPI_2A_VECTOR_interrupt
  116894. nop
  116895. nop
  116896. nop
  116897. nop
  116898. nop
  116899. nop
  116900. nop
  116901. j _SPI_3A_VECTOR_interrupt
  116902. nop
  116903. nop
  116904. nop
  116905. nop
  116906. nop
  116907. nop
  116908. nop
  116909. j _I2C_2_VECTOR_interrupt
  116910. nop
  116911. nop
  116912. nop
  116913. nop
  116914. nop
  116915. nop
  116916. nop
  116917. j _FAIL_SAFE_MONITOR_VECTOR_interrupt
  116918. nop
  116919. nop
  116920. nop
  116921. nop
  116922. nop
  116923. nop
  116924. nop
  116925. j _RTCC_VECTOR_interrupt
  116926. nop
  116927. nop
  116928. nop
  116929. nop
  116930. nop
  116931. nop
  116932. nop
  116933. j _DMA_0_VECTOR_interrupt
  116934. nop
  116935. nop
  116936. nop
  116937. nop
  116938. nop
  116939. nop
  116940. nop
  116941. j _DMA_1_VECTOR_interrupt
  116942. nop
  116943. nop
  116944. nop
  116945. nop
  116946. nop
  116947. nop
  116948. nop
  116949. j _DMA_2_VECTOR_interrupt
  116950. nop
  116951. nop
  116952. nop
  116953. nop
  116954. nop
  116955. nop
  116956. nop
  116957. j _DMA_3_VECTOR_interrupt
  116958. nop
  116959. nop
  116960. nop
  116961. nop
  116962. nop
  116963. nop
  116964. nop
  116965. j _DMA_4_VECTOR_interrupt
  116966. nop
  116967. nop
  116968. nop
  116969. nop
  116970. nop
  116971. nop
  116972. nop
  116973. j _DMA_5_VECTOR_interrupt
  116974. nop
  116975. nop
  116976. nop
  116977. nop
  116978. nop
  116979. nop
  116980. nop
  116981. j _DMA_6_VECTOR_interrupt
  116982. nop
  116983. nop
  116984. nop
  116985. nop
  116986. nop
  116987. nop
  116988. nop
  116989. j _DMA_7_VECTOR_interrupt
  116990. nop
  116991. nop
  116992. nop
  116993. nop
  116994. nop
  116995. nop
  116996. nop
  116997. j _FCE_VECTOR_interrupt
  116998. nop
  116999. nop
  117000. nop
  117001. nop
  117002. nop
  117003. nop
  117004. nop
  117005. j _USB_1_VECTOR_interrupt
  117006. nop
  117007. nop
  117008. nop
  117009. nop
  117010. nop
  117011. nop
  117012. nop
  117013. j _CAN_1_VECTOR_interrupt
  117014. nop
  117015. nop
  117016. nop
  117017. nop
  117018. nop
  117019. nop
  117020. nop
  117021. j _CAN_2_VECTOR_interrupt
  117022. nop
  117023. nop
  117024. nop
  117025. nop
  117026. nop
  117027. nop
  117028. nop
  117029. j _ETH_VECTOR_interrupt
  117030. nop
  117031. nop
  117032. nop
  117033. nop
  117034. nop
  117035. nop
  117036. nop
  117037. j _UART_1B_VECTOR_interrupt
  117038. nop
  117039. nop
  117040. nop
  117041. nop
  117042. nop
  117043. nop
  117044. nop
  117045. j _UART_2B_VECTOR_interrupt
  117046. nop
  117047. nop
  117048. nop
  117049. nop
  117050. nop
  117051. nop
  117052. nop
  117053. j _UART_3B_VECTOR_interrupt
  117054. nop
  117055. nop
  117056. nop
  117057. nop
  117058. nop
  117059. nop
  117060. nop
  117061. .weak _CORE_TIMER_VECTOR_interrupt
  117062. .weak _CORE_SOFTWARE_0_VECTOR_interrupt
  117063. .weak _CORE_SOFTWARE_1_VECTOR_interrupt
  117064. .weak _EXTERNAL_0_VECTOR_interrupt
  117065. .weak _TIMER_1_VECTOR_interrupt
  117066. .weak _INPUT_CAPTURE_1_VECTOR_interrupt
  117067. .weak _OUTPUT_COMPARE_1_VECTOR_interrupt
  117068. .weak _EXTERNAL_1_VECTOR_interrupt
  117069. .weak _TIMER_2_VECTOR_interrupt
  117070. .weak _INPUT_CAPTURE_2_VECTOR_interrupt
  117071. .weak _OUTPUT_COMPARE_2_VECTOR_interrupt
  117072. .weak _EXTERNAL_2_VECTOR_interrupt
  117073. .weak _TIMER_3_VECTOR_interrupt
  117074. .weak _INPUT_CAPTURE_3_VECTOR_interrupt
  117075. .weak _OUTPUT_COMPARE_3_VECTOR_interrupt
  117076. .weak _EXTERNAL_3_VECTOR_interrupt
  117077. .weak _TIMER_4_VECTOR_interrupt
  117078. .weak _INPUT_CAPTURE_4_VECTOR_interrupt
  117079. .weak _OUTPUT_COMPARE_4_VECTOR_interrupt
  117080. .weak _EXTERNAL_4_VECTOR_interrupt
  117081. .weak _TIMER_5_VECTOR_interrupt
  117082. .weak _INPUT_CAPTURE_5_VECTOR_interrupt
  117083. .weak _OUTPUT_COMPARE_5_VECTOR_interrupt
  117084. .weak _SPI_1A_VECTOR_interrupt
  117085. .weak _UART_1_VECTOR_interrupt
  117086. .weak _UART_1A_VECTOR_interrupt
  117087. .weak _I2C_3_VECTOR_interrupt
  117088. .weak _I2C_1A_VECTOR_interrupt
  117089. .weak _SPI_3_VECTOR_interrupt
  117090. .weak _I2C_1_VECTOR_interrupt
  117091. .weak _CHANGE_NOTICE_VECTOR_interrupt
  117092. .weak _ADC_VECTOR_interrupt
  117093. .weak _PMP_VECTOR_interrupt
  117094. .weak _COMPARATOR_1_VECTOR_interrupt
  117095. .weak _COMPARATOR_2_VECTOR_interrupt
  117096. .weak _SPI_2A_VECTOR_interrupt
  117097. .weak _UART_3_VECTOR_interrupt
  117098. .weak _UART_2A_VECTOR_interrupt
  117099. .weak _I2C_4_VECTOR_interrupt
  117100. .weak _I2C_2A_VECTOR_interrupt
  117101. .weak _SPI_2_VECTOR_interrupt
  117102. .weak _SPI_3A_VECTOR_interrupt
  117103. .weak _UART_2_VECTOR_interrupt
  117104. .weak _UART_3A_VECTOR_interrupt
  117105. .weak _I2C_5_VECTOR_interrupt
  117106. .weak _I2C_3A_VECTOR_interrupt
  117107. .weak _SPI_4_VECTOR_interrupt
  117108. .weak _I2C_2_VECTOR_interrupt
  117109. .weak _FAIL_SAFE_MONITOR_VECTOR_interrupt
  117110. .weak _RTCC_VECTOR_interrupt
  117111. .weak _DMA_0_VECTOR_interrupt
  117112. .weak _DMA_1_VECTOR_interrupt
  117113. .weak _DMA_2_VECTOR_interrupt
  117114. .weak _DMA_3_VECTOR_interrupt
  117115. .weak _DMA_4_VECTOR_interrupt
  117116. .weak _DMA_5_VECTOR_interrupt
  117117. .weak _DMA_6_VECTOR_interrupt
  117118. .weak _DMA_7_VECTOR_interrupt
  117119. .weak _FCE_VECTOR_interrupt
  117120. .weak _USB_1_VECTOR_interrupt
  117121. .weak _CAN_1_VECTOR_interrupt
  117122. .weak _CAN_2_VECTOR_interrupt
  117123. .weak _ETH_VECTOR_interrupt
  117124. .weak _UART_1B_VECTOR_interrupt
  117125. .weak _UART_4_VECTOR_interrupt
  117126. .weak _UART_2B_VECTOR_interrupt
  117127. .weak _UART_6_VECTOR_interrupt
  117128. .weak _UART_3B_VECTOR_interrupt
  117129. .weak _UART_5_VECTOR_interrupt
  117130. .text
  117131. end;
  117132. end.